fix the error for abap code for join tables

REPORT ZSOIPQ. TYPE-POOLS: slis. TABLES: VBAK, VBAP. TYPES: BEGIN OF ty_vbak, VBELN TYPE VBELN_VA, "Sales Document AUART TYPE AUART, " Sales Document Type END OF ty_vbak. TYPES: BEGIN OF ty_vbap, VBELN TYPE VBELN_VA, "Sales Document POSNR TYPE POSNR_VA, " Sales Document Item MATNR TYPE MATNR, "Material Number END OF ty_vbap. DATA : gt_vbak TYPE TABLE OF ty_vbak, st_vbak TYPE ty_vbak. DATA : gt_vbaP TYPE TABLE OF ty_vbaP, st_vbaP TYPE ty_vbaP. PARAMETERS: P_vbeln TYPE vbeln. START-OF-SELECTION. SELECT vbeln posnr matnr FROM VBAP INTO TABLE gt_vbap. SELECT vbak~vbeln VBAK~AUART VBAP~vbeln VBAP~posnr VBAP~matnr INTO TABLE gt_vbak FROM VBAK INNER JOIN VBAP ON VBAK~vbeln = VBAP~vbeln where auart eq 'ZQPC' AND VBAK~vbeln GE '0030000000'. if sy-subrc = 0. loop at gt_vbaK INTO st_vbaK. APPEND st_vbaK to gt_vbak. AT FIRST. WRITE: /10'Sales Document', 35 'Sales Document Type', 65 'Sales Document Item', 100 'Material Number'. ENDAT. WRITE: /13 ST_VBAK-vbeln, 43 ST_VBAK-auart, 72 ST_VBAP-POSNR, 90 ST_VBAP-MATNR. ENDLOOP. SORT gt_vbap. DELETE ADJACENT DUPLICATES FROM gt_vbap. endif.