SAP ABAP

Example ALV report with field catalog merge in SAP ABAP. REPORT ZALV_WITH_FCAT_MERGE. TYPE-POOLS SLIS . DATA : BEGIN OF I_MARA OCCURS 0, MATNR LIKE MARA-MATNR, MTART LIKE MARA-MTART, MBRSH LIKE MARA-MBRSH, MEINS LIKE MARA-MEINS, END OF I_MARA. DATA : I_FCAT TYPE SLIS_T_FIELDCAT_ALV . DATA : WA_FCAT LIKE LINE OF I_FCAT . START-OF-SELECTION . PERFORM GET_DATA . * PERFORM CREATE_FCAT. PERFORM CREATE_FCAT_MERGE . END-OF-SELECTION . PERFORM DISP_ALV . FORM GET_DATA . SELECT * FROM MARA INTO CORRESPONDING FIELDS OF TABLE I_MARA . ENDFORM. " GET_DATA FORM DISP_ALV . CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING I_CALLBACK_PROGRAM = SY-REPID IT_FIELDCAT = I_FCAT TABLES T_OUTTAB = I_MARA. ENDFORM. " DISP_ALV FORM CREATE_FCAT . WA_FCAT-COL_POS = '1' . WA_FCAT-FIELDNAME = 'MATNR' . WA_FCAT-TABNAME = ...

Example report for ALV blocked list display in SAP ABAP. REPORT ZALV_BLOCKED. TYPE-POOLS : SLIS . DATA: BEGIN OF I_MARA OCCURS 0, MATNR LIKE MARA-MATNR, MTART LIKE MARA-MTART, MBRSH LIKE MARA-MBRSH, END OF I_MARA. DATA: BEGIN OF I_MAKT OCCURS 0, MATNR LIKE MAKT-MATNR, SPRAS LIKE MAKT-SPRAS, MAKTX LIKE MAKT-MAKTX, END OF I_MAKT. DATA: BEGIN OF I_MARC OCCURS 0, MATNR LIKE MARC-MATNR, WERKS LIKE MARC-WERKS, BWTTY LIKE MARC-BWTTY, END OF I_MARC. DATA : WA_LAYOUT TYPE SLIS_LAYOUT_ALV . DATA : I_FCAT TYPE SLIS_T_FIELDCAT_ALV . DATA : I_EVENTS TYPE SLIS_T_EVENT . BREAK-POINT. START-OF-SELECTION . PERFORM INIT_BLOCKED_ALV . PERFORM APPEND_BLOCK1. PERFORM APPEND_BLOCK2. PERFORM APPEND_BLOCK3. PERFORM DISPLAY_BLOCKED_ALV . FORM INIT_BLOCKED_ALV . CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT' EXPORTING I_CALLBACK_PROGRAM = SY-REPID. ENDFORM. " INIT_...

ALV report with totals and subtotals in SAP ABAP REPORT ZALV_WITH_TOTALS_SUBTOT. TYPE-POOLS SLIS . TYPES : BEGIN OF TY_VBAP, VBELN TYPE VBAP-VBELN, POSNR TYPE VBAP-POSNR, MATNR TYPE VBAP-MATNR, NETWR TYPE VBAP-NETWR, END OF TY_VBAP. DATA : I_VBAP TYPE TABLE OF TY_VBAP . DATA : WA_VBAP TYPE TY_VBAP . DATA : I_FCAT TYPE SLIS_T_FIELDCAT_ALV . DATA : WA_FCAT LIKE LINE OF I_FCAT . DATA : I_SORT TYPE SLIS_T_SORTINFO_ALV . DATA : WA_SORT LIKE LINE OF I_SORT . START-OF-SELECTION . PERFORM GET_DATA . PERFORM CREATE_FCAT. PERFORM CALC_SUBTOT. END-OF-SELECTION . PERFORM DISP_ALV . FORM GET_DATA . SELECT * FROM VBAP INTO CORRESPONDING FIELDS OF TABLE I_VBAP . ENDFORM. " GET_DATA FORM DISP_ALV . CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING * I_INTERFACE_CHECK = ' ' * I_BYPASSING_BUFFER = ' ' * I_BUFFER_ACTIVE = '...

Real-time example of displaying delivery details for a range of sales orders in SAP ABAP. REPORT ZPROJECT_RANGE NO STANDARD PAGE HEADING LINE-COUNT 37(3). TABLES : VBAK,VBAP,VBFA,LIKP,LIPS. TYPES: BEGIN OF TY_VBAK, VBELN TYPE VBAK-VBELN, VKORG TYPE VBAK-VKORG, VTWEG TYPE VBAK-VTWEG, SPART TYPE VBAK-SPART, END OF TY_VBAK. TYPES: BEGIN OF TY_VBAP, VBELN TYPE VBAP-VBELN, POSNR TYPE VBAP-POSNR, MATNR TYPE VBAP-MATNR, ZMENG TYPE VBAP-ZMENG, NETPR TYPE VBAP-NETPR, END OF TY_VBAP. TYPES: BEGIN OF TY_LIKP, VBELN TYPE LIKP-VBELN, END OF TY_LIKP. TYPES: BEGIN OF TY_LIPS, VBELN TYPE LIPS-VBELN, POSNR TYPE LIPS-POSNR, LFIMG TYPE LIPS-LFIMG, NETPR TYPE LIPS-NETPR, END OF TY_LIPS. TYPES: BEGIN OF TY_VBFA, VBELV TYPE VBFA-VBELV, POSNV TYPE VBFA-POSNV, VBELN TYPE VBFA-VBELN, POSNN TYPE VBFA-POSNN, VBTYP_N TYPE VBFA-VBTYP_N,...

Real-time example of using BDC call transaction method in SAP ABAP REPORT ZCALL_TRAN_XD01 . DATA: BEGIN OF ITAB OCCURS 1, KUNNR(10), BUKRS(4), KTOKD(4), NAME1(30), SORTL(10), STRAS(30), ORT01(25), LAND1(3), AKONT(10), ZUAWA(3), END OF ITAB. DATA: BEGIN OF IT_ERR OCCURS 1, KUNNR(10), BUKRS(4), KTOKD(4), NAME1(30), SORTL(10), STRAS(30), ORT01(25), LAND1(3), AKONT(10), ZUAWA(3), MSG(150), END OF IT_ERR. DATA: IT_BDCDATA LIKE BDCDATA OCCURS 1 WITH HEADER LINE. DATA: IT_MSGS LIKE BDCMSGCOLL OCCURS 1 WITH HEADER LINE. DATA: V_MSG TYPE CHAR255, V_MODE. PARAMETERS: P_FILE LIKE RLGRAP-FILENAME. PARAMETERS: P_A RADIOBUTTON GROUP G1, P_E RADIOBUTTON GROUP G1, P_N RADIOBUTTON GROUP G1 DEFAULT 'X'. AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FILE. ...

Real-time example of using BDC session method in SAP ABAP. REPORT ZSESSION_XD01. DATA: BEGIN OF ITAB OCCURS 1, KUNNR(10), BUKRS(4), KTOKD(4), NAME1(30), SORTL(10), STRAS(30), ORT01(25), LAND1(3), AKONT(10), ZUAWA(3), END OF ITAB. DATA: IT_BDCDATA LIKE BDCDATA OCCURS 1 WITH HEADER LINE. DATA: V_FLAG. PARAMETERS: P_FILE LIKE RLGRAP-FILENAME. AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FILE. PERFORM BROWSE_FILE. START-OF-SELECTION. PERFORM READ_FILE. PERFORM POPULATE_BDCDATA. END-OF-SELECTION. PERFORM MEMORY_FREE. *&---------------------------------------------------------------------* *& Form BROWSE_FILE *&---------------------------------------------------------------------* * text *----------------------------------------------------------------------* FORM BROWSE_FILE . CALL FUNCTION 'F4_FILENAME' IMPORTING FILE_NAME = P_FILE. ENDFORM....

Example program for using control break statements in SAP ABAP. REPORT ZCONTROL_BREAK NO STANDARD PAGE HEADING. DATA: BEGIN OF ITAB OCCURS 1, MATNR LIKE MARD-MATNR, MAKTX LIKE MAKT-MAKTX, WERKS LIKE MARD-WERKS, LGORT LIKE MARD-LGORT, LABST LIKE MARD-LABST, END OF ITAB. SELECT-OPTIONS: S_MATNR FOR ITAB-MATNR. SELECT A~MATNR MAKTX WERKS LGORT LABST INTO CORRESPONDING FIELDS OF TABLE ITAB FROM MARA AS A INNER JOIN MAKT AS B ON B~MATNR = A~MATNR INNER JOIN MARD AS C ON C~MATNR = A~MATNR WHERE A~MATNR IN S_MATNR AND SPRAS = SY-LANGU. IF NOT ITAB[] IS INITIAL. SORT ITAB BY MATNR. LOOP AT ITAB. AT FIRST . WRITE:/50 'MATERIAL INFO'. ULINE. ENDAT. AT NEW MATNR. READ TABLE ITAB INDEX SY-TABIX. FORMAT INTENSIFIED ON COLOR COL_KEY. WRITE:/ 'Material:', ITAB-MATNR, ITAB-MAKTX. FORMAT RESET. ENDAT. FORMAT...

Example program to display hierarchical ALV report in SAP ABAP. REPORT ZALV_HIE . DATA: IT_VBRK LIKE VBRK OCCURS 1 WITH HEADER LINE. DATA: IT_VBRP LIKE VBRP OCCURS 1 WITH HEADER LINE. TYPE-POOLS: SLIS. DATA: WA_KEY TYPE SLIS_KEYINFO_ALV. SELECT-OPTIONS: S_VBELN FOR IT_VBRK-VBELN. START-OF-SELECTION. PERFORM GET_DATA. END-OF-SELECTION. PERFORM SHOW_HIRAR_GRID. FORM GET_DATA . SELECT * FROM VBRK INTO TABLE IT_VBRK WHERE VBELN IN S_VBELN. SELECT * FROM VBRP INTO TABLE IT_VBRP WHERE VBELN IN S_VBELN. ENDFORM. " GET_DATA FORM SHOW_HIRAR_GRID . WA_KEY-HEADER01 = 'VBELN'. WA_KEY-ITEM01 = 'VBELN'. CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY' EXPORTING I_CALLBACK_PROGRAM = 'ZALV_HIE' I_TABNAME_HEADER = 'IT_VBRK' I_TABNAME_ITEM = 'IT_VBRP' I_STRUCTURE_NAME_HEADER = 'VBRK' I_ST...

Real-time interactive report in SAP ABAP REPORT ZINT_REPORT NO STANDARD PAGE HEADING LINE-SIZE 120 LINE-COUNT 20(2). DATA: IT_VBRK LIKE VBRK OCCURS 1 WITH HEADER LINE, IT_VBRP LIKE VBRP OCCURS 1 WITH HEADER LINE. DATA: V_LINE TYPE I, V_VBELN LIKE VBRK-VBELN. SELECT-OPTIONS: S_VBELN FOR IT_VBRK-VBELN. START-OF-SELECTION. PERFORM GET_DATA. END-OF-SELECTION. IF NOT IT_VBRK[] IS INITIAL. PERFORM SHOW_BLIST. ELSE. MESSAGE I000(Z00) WITH 'No Data found to display'. ENDIF. TOP-OF-PAGE. PERFORM BUILD_PAGE_HEADER. END-OF-PAGE. PERFORM BUILD_PAGE_FOOTER. TOP-OF-PAGE DURING LINE-SELECTION. IF SY-LSIND = 1. PERFORM SEC_PAGE_HEADER. * ELSEIF SY-LSIND = 2. * WRITE:/ 'PAGE HEADER FOR 2ND SECONDARY LIST'. * ELSE. * WRITE:/ 'PAGE HEADER FOR SECONDARY LIST'. ENDIF. AT LINE-SELECTION. IF SY-LSIND = 1. PERFORM SHOW_SLIST. ENDIF. AT PF5. MESSAGE I000(Z00) WITH 'You clicked on F5 key...

Example ALV report for using field catalog and layput in SAP ABAP REPORT ZALV_2 . DATA: BEGIN OF ITAB OCCURS 1, MATNR LIKE MARA-MATNR, MAKTX LIKE MAKT-MAKTX, WERKS LIKE MARD-WERKS, LGORT LIKE MARD-LGORT, LABST LIKE MARD-LABST, END OF ITAB. SELECT-OPTIONS: S_MATNR FOR ITAB-MATNR. PARAMETERS: P_MANU RADIOBUTTON GROUP G1, P_AUTO RADIOBUTTON GROUP G1. TYPE-POOLS: SLIS. DATA: IT_FLDCAT TYPE SLIS_T_FIELDCAT_ALV, WA_FLDCAT LIKE LINE OF IT_FLDCAT, WA_LAYO TYPE SLIS_LAYOUT_ALV. START-OF-SELECTION. PERFORM GET_DATA. PERFORM GENERATE_FLDCAT. PERFORM GENERATE_LAYOUT. END-OF-SELECTION. PERFORM SHOW_GRID. FORM GET_DATA . SELECT A~MATNR MAKTX WERKS LGORT LABST INTO TABLE ITAB FROM MARA AS A JOIN MAKT AS B ON B~MATNR = A~MATNR JOIN MARD AS C ON C~MATNR = A~MATNR WHERE A~MATNR IN S_MATNR AND SPR...

Example code for ALV report in SAP ABAP REPORT ZALV1 . DATA: ITAB LIKE MARD OCCURS 1 WITH HEADER LINE. PARAMETERS: P_MATNR LIKE MARA-MATNR. START-OF-SELECTION. PERFORM GET_dATA. END-OF-SELECTION. PERFORM SHOW_GRID. FORM GET_dATA . SELECT * FROM MARD INTO TABLE ITAB WHERE MATNR = P_MATNR. ENDFORM. " GET_dATA FORM SHOW_GRID . CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING I_CALLBACK_PROGRAM = 'ZALV1' I_STRUCTURE_NAME = 'MARD' I_GRID_TITLE = 'Material Str Loc Details' TABLES T_OUTTAB = ITAB EXCEPTIONS PROGRAM_ERROR = 1 OTHERS = 2. IF SY-SUBRC <> 0. * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO * WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4. ENDIF. ENDFORM. " SHOW_GRID

Real-time classical report with top of page and end of page in SAP ABAP *&---------------------------------------------------------------------* *& Report ZCLASSICAL_REPORT * *& * REPORT ZCLASSICAL_REPORT NO STANDARD PAGE HEADING LINE-SIZE 120 LINE-COUNT 10(1). TABLES: MARA, "Material Master T001W. "Plant Master DATA: V_LINE TYPE I. DATA: BEGIN OF IT_MARD OCCURS 1, MATNR LIKE MARA-MATNR, MAKTX LIKE MAKT-MAKTX, WERKS LIKE MARD-WERKS, LGORT LIKE MARD-LGORT, LABST LIKE MARD-LABST, END OF IT_MARD. SELECTION-SCREEN: BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-H01. SELECT-OPTIONS: S_MATNR FOR MARA-MATNR, S_WERKS FOR T001W-WERKS. PARAMETERS: P1 TYPE I. SELECTION-SCREEN: END OF BLOCK B1. INITIALIZATION. S_MATNR-LOW = '100-100'. S_MATNR-HIGH = '10...

Different types of select statements used in SAP ABAP programming to get data from database in SAP ABAP. Select Single which is used to get single exact record from database table. REPORT ZSELECT_SINGLE . TABLES: MARA. SELECT SINGLE * FROM MARA WHERE MATNR = '100-100'. WRITE:/ MARA-MATNR, MARA-MATKL, MARA-MTART. Select Up to rows, is used to get specific number of records from database table. REPORT ZSELECT_UPTO . TABLES: MARD. PARAMETERS: V1 TYPE I. SELECT * FROM MARD UP TO V1 ROWS WHERE MATNR = '100-100'. WRITE:/ MARD-MATNR, MARD-WERKS, MARD-LGORT, MARD-LABST. ENDSELECT.