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.

TYPESBEGIN OF str,
  vbeln type vbap-vbeln,
  posnr TYPE vbap-posnr,
  matnr TYPE vbap-matnr,
  netwr TYPE vbap-netwr,
  END OF str.


 PARAMETERSmatnr TYPE vbap-matnr.


DATAit 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.

TYPESBEGIN OF str,
  vbeln type vbap-vbeln,
  posnr TYPE vbap-posnr,
  matnr TYPE vbap-matnr,
  netwr TYPE vbap-netwr,
  END OF str.


 PARAMETERSmatnr TYPE vbap-matnr.


DATAit 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

PROGRAM: 


REPORT ZSM_SMARTFORM_FOUR.

TYPESBEGIN OF str,
  vbeln TYPE vbap-vbeln,
  posnr TYPE vbap-posnr,
  matnr TYPE vbap-matnr,
  matkl TYPE vbap-matkl,
  netwr TYPE vbap-netwr,
  END OF str.

  DATAit TYPE STANDARD TABLE OF str.

  select vbap~vbeln vbap~posnr vbap~matnr vbap~matkl vbap~netwr FROM vbap into TABLE it UP TO 20 ROWS.

    CALL FUNCTION '/1BCDWB/SF00000489'
*    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_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: