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: 


    

                                  

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.

TYPESBEGIN OF str,
         matnr TYPE matnr,
         mtart TYPE mtart,
         maktx TYPE maktx,
       END OF str.

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