ABAP - Programs: March 2008

REPORT ZSMARTFORM_CALL .

TABLES : ZTBL_CITY.

DATA ITAB_C LIKE ZTBL_CITY OCCURS 0 WITH HEADER LINE.

SELECT * FROM ZTBL_CITY INTO TABLE ITAB_C.

*LOOP AT ITAB_C.

* WRITE : ITAB_C-CITY_CODE.

*ENDLOOP.

CALL FUNCTION '/1BCDWB/SF00000015'

* EXPORTING

* ARCHIVE_INDEX =

* ARCHIVE_INDEX_TAB =

* ARCHIVE_PARAMETERS =

* CONTROL_PARAMETERS =

* MAIL_APPL_OBJ =

* MAIL_RECIPIENT =

* MAIL_SENDER =

* OUTPUT_OPTIONS =

* USER_SETTINGS = 'X'

* IMPORTING

* DOCUMENT_OUTPUT_INFO =

* JOB_OUTPUT_INFO =

* JOB_OUTPUT_OPTIONS =

TABLES

ITAB_CITY = ITAB_C

* EXCEPTIONS

* FORMATTING_ERROR = 1

* INTERNAL_ERROR = 2

* SEND_ERROR = 3

* USER_CANCELED = 4

* OTHERS = 5

IF SY-SUBRC <> 0.

* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

REPORT ZSM_CALL .

TABLES : LFA1.

DATA ITAB_L LIKE LFA1 OCCURS 0 WITH HEADER LINE.

SELECT * FROM LFA1 INTO TABLE ITAB_L .

CALL FUNCTION '/1BCDWB/SF00000016'