‎2008 Mar 14 9:08 AM
HOW TO INSERT A TABLE INSIDE AN SAPSCRIPT FORM WINDOW(MAIN).
PLZ REPLY ASAP.
‎2008 Mar 14 9:14 AM
Hi,
PASSING TABLE VALUES AS AN ARGUMENT TO SAPSCRIPT:
-
In the line editor, specify the table field arguments enclosed by '&' symbol as follows:
/E ELEMENT
&KNA1-KUNNR& ,, &KNA1-NAME1& ,, &KNA1-LAND1&
Save -> Activate.
In the Print Program, specify following code:
TABLES KNA1.
CALL FUNCTION 'OPEN_FORM'
EXPORTING
FORM = 'ZSHABFORM1'
LANGUAGE = SY-LANGU.
SELECT * FROM KNA1.
CALL FUNCTION 'WRITE_FORM'
EXPORTING
ELEMENT = 'ELEMENT'
WINDOW = 'MAIN'.
ENDSELECT.
CALL FUNCTION 'CLOSE_FORM'.
Save -> Activate -> Execute.
Regards,
Priya.
PASSING INTERNAL TABLE AS AN ARGUMENT TO THE FORM:
-
In line editor, specify following arguments:
/E ELEMENT
&ITAB-KUNNR& &ITAB-NAME1& &ITAB-LAND1&
Save -> Activate.
In Print Program, specify following code:
DATA ITAB LIKE KNA1 OCCURS 0 WITH HEADER LINE.
SELECT * FROM KNA1 INTO TABLE ITAB.
CALL FUNCTION 'OPEN_FORM'
EXPORTING
FORM = 'ZSHABFORM1'
LANGUAGE = SY-LANGU.
LOOP AT ITAB.
CALL FUNCTION 'WRITE_FORM'
EXPORTING
ELEMENT = 'ELEMENT'
WINDOW = 'MAIN'.
ENDLOOP.
CALL FUNCTION 'CLOSE_FORM'.
-> Save -> Activate -> Execute.
‎2008 Mar 14 9:14 AM
Hi,
PASSING TABLE VALUES AS AN ARGUMENT TO SAPSCRIPT:
-
In the line editor, specify the table field arguments enclosed by '&' symbol as follows:
/E ELEMENT
&KNA1-KUNNR& ,, &KNA1-NAME1& ,, &KNA1-LAND1&
Save -> Activate.
In the Print Program, specify following code:
TABLES KNA1.
CALL FUNCTION 'OPEN_FORM'
EXPORTING
FORM = 'ZSHABFORM1'
LANGUAGE = SY-LANGU.
SELECT * FROM KNA1.
CALL FUNCTION 'WRITE_FORM'
EXPORTING
ELEMENT = 'ELEMENT'
WINDOW = 'MAIN'.
ENDSELECT.
CALL FUNCTION 'CLOSE_FORM'.
Save -> Activate -> Execute.
Regards,
Priya.
PASSING INTERNAL TABLE AS AN ARGUMENT TO THE FORM:
-
In line editor, specify following arguments:
/E ELEMENT
&ITAB-KUNNR& &ITAB-NAME1& &ITAB-LAND1&
Save -> Activate.
In Print Program, specify following code:
DATA ITAB LIKE KNA1 OCCURS 0 WITH HEADER LINE.
SELECT * FROM KNA1 INTO TABLE ITAB.
CALL FUNCTION 'OPEN_FORM'
EXPORTING
FORM = 'ZSHABFORM1'
LANGUAGE = SY-LANGU.
LOOP AT ITAB.
CALL FUNCTION 'WRITE_FORM'
EXPORTING
ELEMENT = 'ELEMENT'
WINDOW = 'MAIN'.
ENDLOOP.
CALL FUNCTION 'CLOSE_FORM'.
-> Save -> Activate -> Execute.