Suva Programming
Blog about C++ and other programming source code.
Sunday 13 October 2024
Simple SAP Program to add two numbers
Thursday 11 July 2024
SAP Program to fetch data from standard table vbap by filtering out data by input in the parameter matnr in selection screen
Program:
REPORT ZSM_SMART_FORM.
TYPES: BEGIN OF str,
vbeln type vbap-vbeln,
posnr TYPE vbap-posnr,
matnr TYPE vbap-matnr,
netwr TYPE vbap-netwr,
END OF str.
PARAMETERS: matnr TYPE vbap-matnr.
DATA: it TYPE STANDARD TABLE OF str.
select vbap~vbeln vbap~posnr vbap~matnr vbap~netwr FROM vbap into TABLE it UP TO 20 ROWS WHERE matnr = ' '.
CALL FUNCTION '/1BCDWB/SF00000490'
* 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
zsm_internal_five = it
* EXCEPTIONS
* FORMATTING_ERROR = 1
* INTERNAL_ERROR = 2
* SEND_ERROR = 3
* USER_CANCELED = 4
* OTHERS = 5
.
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.
Output:
Tuesday 9 July 2024
SAP Program to fetch data from standard table vbap when data is put in the parameter matnr
Program:
REPORT ZSM_SMART_FORM.
TYPES: BEGIN OF str,
vbeln type vbap-vbeln,
posnr TYPE vbap-posnr,
matnr TYPE vbap-matnr,
netwr TYPE vbap-netwr,
END OF str.
PARAMETERS: matnr TYPE vbap-matnr.
DATA: it TYPE STANDARD TABLE OF str.
select vbap~vbeln vbap~posnr vbap~matnr vbap~netwr FROM vbap into TABLE it UP TO 20 ROWS.
CALL FUNCTION '/1BCDWB/SF00000490'
* 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
zsm_internal_five = it
* EXCEPTIONS
* FORMATTING_ERROR = 1
* INTERNAL_ERROR = 2
* SEND_ERROR = 3
* USER_CANCELED = 4
* OTHERS = 5
.
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.
Output:
Wednesday 3 July 2024
SAP Program to fetch fields from vbap standard table and show up to 20 records
Friday 28 June 2024
SAP Program to fetch data from mara and makt table of fields matnr mtart and maktx on showing it in smartform
Program:
REPORT zsm_smartform_three.
TYPES: BEGIN OF str,
matnr TYPE matnr,
mtart TYPE mtart,
maktx TYPE maktx,
END OF str.
DATA: it TYPE STANDARD TABLE OF str,
wa TYPE str.
SELECT mtart maktx
INTO TABLE it
FROM mara INNER JOIN makt ON mara~matnr = makt~matnr UP TO 10 ROWS.
CALL FUNCTION '/1BCDWB/SF00000487'
* 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
z_it_smart_three = it
EXCEPTIONS
formatting_error = 1
internal_error = 2
send_error = 3
user_canceled = 4
OTHERS = 5.
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.
OUTPUT: