REPORT ZRAJ3.
TABLES: VBAP,VBAK,VBUK.
DATA: ITAB1 LIKE VBAP OCCURS 0 WITH HEADER LINE,
ITAB2 LIKE VBAK OCCURS 0 WITH HEADER LINE,
WA1 TYPE VBAP-VBELN,
WA2 TYPE VBAK-VBELN.
SELECT VBELN POSNR MATNR FROM VBAP INTO CORRESPONDING FIELDS OF TABLE ITAB1.
LOOP AT ITAB1.
WRITE:/ ITAB1-VBELN, ITAB1-POSNR, ITAB1-MATNR.
ENDLOOP.
AT LINE-SELECTION.
CASE SY-LSIND.
WHEN '1'.
GET CURSOR FIELD ITAB1-VBELN VALUE WA1.
CONCATENATE '000000' WA1 INTO WA2.
SELECT VBELN ERNAM ERDAT FROM VBAK INTO CORRESPONDING FIELDS OF TABLE ITAB2.
LOOP AT ITAB2.
WRITE:/ ITAB2-VBELN, ITAB2-ERNAM, ITAB2-ERDAT.
ENDLOOP.
ENDCASE.
↧
hi i want specific value for specific record using where statement in this program plz help
↧