RG1 Report Tables

Hi,
Can any one please provide the list tables/views which used RG1 Report.Kindly let me know.

RG-1 register, i.e. daily stock account of excisable goods.
We have seeded report oracle EBS ,but unable find the table/views of reports.kindly let me know the solution.

Similar Messages

  • RG1 Report

    Hi All,
    We developed a report to display RG1 report, currently in that we are facing a problem.
    The problem is when we run the report fro the current month its is not displaying the closing balnce done for the material in the previous month. (i.e.) If the report is run for the January month and if not transaction is performed in the December month the report is supose to fetch the last last transaction performed inthe November month.
    The thing is it fetching the value for January month and not the value of November month.
    Below we have pasted the logic used for this issue.
    The Bold sentence is what used for the specific logic.
    *& Report  ZFI_IN01_RG1_REPORT
    REPORT  ZFI_IN01_RG1_REPORT LINE-SIZE 265.
    TYPE-POOLS : SLIS.
    TABLES : ZIN01_RG1BASE, "RG1 Base Table
             MAKT,          " Material Descriptions
             J_1ICHIDTX.    " Chapter id and Text
    TYPES: BEGIN OF TP_RG1BASE,
    MBLNR           LIKE ZIN01_RG1BASE-MBLNR,
    REF_DOC       LIKE ZIN01_RG1BASE-REF_DOC,
    MATNR           LIKE ZIN01_RG1BASE-MATNR,
    ZEILE           LIKE ZIN01_RG1BASE-ZEILE,
    J_1ICHID        LIKE ZIN01_RG1BASE-J_1ICHID,         " CHAPTER ID
    J_1ICHT1        LIKE J_1ICHIDTX-J_1ICHT1,         " CHAPTER ID DESC
    BUDAT           LIKE ZIN01_RG1BASE-BUDAT,
    BWART           LIKE ZIN01_RG1BASE-BWART,
    KZBEW           LIKE ZIN01_RG1BASE-KZBEW,
    CPUTM           like ZIN01_RG1BASE-CPUTM,
    SPLIT_ID        like ZIN01_RG1BASE-SPLIT_ID,
    MENGE           LIKE ZIN01_RG1BASE-MENGE,
    CLOSE_BAL_PRD   LIKE ZIN01_RG1BASE-CLOSE_BAL_PRD,
    EXPIND          LIKE ZIN01_RG1BASE-EXPIND,
    ZKZBEW          LIKE ZIN01_RG1BASE-ZKZBEW,
    REF_MTYPE       LIKE ZIN01_RG1BASE-REF_MTYPE,
    END OF TP_RG1BASE.
    DATA : IG_RG1BASE TYPE STANDARD TABLE OF TP_RG1BASE WITH HEADER LINE
                                 INITIAL SIZE 100 WITH DEFAULT KEY,
           WG_RG1BASE LIKE LINE OF IG_RG1BASE,
           IG_RG1BASE_COPY LIKE TABLE OF IG_RG1BASE,
           WG_RG1BASE_COPY LIKE LINE OF IG_RG1BASE,
           IG_SUBCONT TYPE STANDARD TABLE OF TP_RG1BASE WITH HEADER LINE
                                 INITIAL SIZE 100 WITH DEFAULT KEY.
          WG_SUBCONT LIKE LINE OF IG_RG1BASE.
    DATA : G_OPEN_BAL LIKE ZIN01_RG1BASE-CLOSE_BAL_PRD,
           G_CLOSE_BAL  LIKE ZIN01_RG1BASE-CLOSE_BAL_PRD,
           G_FLAG .
    <b>DATA : IG_SORT        TYPE TABLE OF ZIN01_RG1BASE ,
                WG_SORT        TYPE ZIN01_RG1BASE,
                IG_ZIN01_RG1BASE LIKE TABLE OF ZIN01_RG1BASE WITH HEADER LINE.</b>
    Selection Screen
    SELECTION-SCREEN : BEGIN OF BLOCK BLOCK1 WITH FRAME.
    PARAMETERS      : PF_BUDAT LIKE MKPF-BUDAT OBLIGATORY ,                     " FROM DATE
                      PT_BUDAT LIKE MKPF-BUDAT OBLIGATORY.                      " TO DATE
    SELECTION-SCREEN : END OF BLOCK BLOCK1.
    AT Selection Screen
    AT SELECTION-SCREEN.
    SELECT SINGLE * FROM ZIN01_RG1BASE WHERE BUDAT BETWEEN PF_BUDAT AND PT_BUDAT AND CANC_IND <> 'C'.
    IF SY-SUBRC <> 0.
    MESSAGE E006(ZIN01_FI).
    ENDIF.
    START OF SELECTION
    START-OF-SELECTION.
    SELECT MBLNR REF_DOC     MATNR ZEILE A~J_1ICHID J_1ICHT1 BUDAT BWART KZBEW CPUTM
           SPLIT_ID MENGE CLOSE_BAL_PRD EXPIND ZKZBEW REF_MTYPE FROM ZIN01_RG1BASE AS A INNER JOIN J_1ICHIDTX AS B
                                                            ON A~J_1ICHID = B~J_1ICHID
                                                            INTO TABLE IG_RG1BASE
                                                            WHERE BUDAT BETWEEN PF_BUDAT AND PT_BUDAT AND CANC_IND <> 'C'
                                                            AND B~LANGU = SY-LANGU+0(1) AND BWART <> '602'
                                                                                    AND BWART <> '262'
                                                                                    AND BWART <> '202'
                                                                                    AND BWART <> '123'
                                                                                    AND BWART <> '162'
                                                                                    AND BWART <> '102'
                                                                                    AND BWART <> '502'
                                                                                    AND BWART <> '532'.
    IF SY-SUBRC <> 0.
    MESSAGE E006(ZIN01_FI).
    ELSE.
    SELECT  A~MBLNR A~XBLNR B~RDOC1 B~ZEILE B~RITEM1 B~EXBAS B~MENGE INTO TABLE IG_EXCISE FROM MKPF AS A INNER JOIN
                                                      J_1IEXCDTL AS B  ON A~XBLNR = B~RDOC1
                                                      FOR ALL ENTRIES IN IG_RG1BASE
                                                      WHERE  A~MBLNR = IG_RG1BASE-MBLNR  AND B~STATUS <> 'R'.
    IF SY-SUBRC <> 0.
    MESSAGE E006(ZIN01_FI).
    ELSE.
    SELECT VBELN POSNN INTO TABLE IG_VBFA FROM VBFA  FOR ALL ENTRIES IN IG_EXCISE
                                          WHERE VBELV = IG_EXCISE-RDOC1 AND POSNV = IG_EXCISE-RITEM1 AND VBTYP_N = 'M'.
    SORT IG_RG1BASE BY MATNR .
    IG_RG1BASE_COPY[] = IG_RG1BASE[].
    DELETE ADJACENT DUPLICATES FROM IG_RG1BASE_COPY COMPARING MATNR.
    <b>SORT IG_RG1BASE BY MATNR BUDAT CPUTM SPLIT_ID.
    SELECT * FROM ZIN01_RG1BASE INTO IG_ZIN01_RG1BASE.
    IG_SORT[] = IG_ZIN01_RG1BASE[].
    SORT IG_SORT BY MATNR BUDAT  DESCENDING.</b>
    *for 122 AND 161 movement type : if the refdoc is 101 f , subtract 122 menge from 101 menge.
    LOOP AT IG_RG1BASE_COPY INTO WG_RG1BASE_COPY.
    CLEAR G_FLAG.
    LOOP AT IG_RG1BASE INTO WG_RG1BASE WHERE MATNR = WG_RG1BASE_COPY-MATNR.
    <b>IF G_FLAG = ' '.
    PERFORM OPENING_BALANCE.
    WG_MAIN-OPEN_BAL   =  G_OPEN_BAL.
    ELSE.
    WG_MAIN-OPEN_BAL   = G_CLOSE_BAL.
    ENDIF.</b>
    APPEND WG_MAIN TO IG_MAIN.
    CLEAR : WG_MAIN, WG_RG1BASE.
    ENDLOOP.
    CLEAR WG_RG1BASE_COPY.
    ENDLOOP.
    PERFORM OPENING_BAL_CHANGE.
    PERFORM DISPLAY.
    *&      Form  OPENING_BALANCE
          text
    FORM OPENING_BALANCE.
    G_FLAG = ‘F’.
    <b>READ TABLE IG_SORT INTO WG_SORT WITH KEY MATNR = WG_MATERIAL-MATNR.
    IF SY-SUBRC = 0.
    *RECIPT +
    IF WG_RG1BASE-BWART = '101' AND WG_RG1BASE-KZBEW = 'F' OR WG_RG1BASE-BWART = '501' OR WG_RG1BASE-BWART = '561' OR WG_RG1BASE-BWART = '531'.
    G_OPEN_BAL = WG_SORT-CLOSE_BAL_PRD  - WG_RG1BASE-MENGE.
    *ISSUES
    ELSEIF WG_RG1BASE-REF_MTYPE = '101' AND WG_RG1BASE-ZKZBEW  = 'F' .
    G_OPEN_BAL = WG_SORT-CLOSE_BAL_PRD  + WG_RG1BASE-MENGE.
    ELSEIF  WG_RG1BASE-REF_MTYPE = '501' OR WG_RG1BASE-REF_MTYPE = '561' OR WG_RG1BASE-REF_MTYPE = '531'.
    G_OPEN_BAL = WG_SORT-CLOSE_BAL_PRD  + WG_RG1BASE-MENGE.
    ELSE.
    G_OPEN_BAL = WG_SORT-CLOSE_BAL_PRD.
    ENDIF.
    ELSE.
    G_OPEN_BAL = 0.
    ENDIF.</b>
    ENDFORM.
    Suggestions and Help will be much appreciated.
    Regards.
    Ramesh.

    Hi,
    I am having already this report please use this coding.
    REPORT YMS_EXDET MESSAGE-ID E4 NO STANDARD PAGE HEADING LINE-SIZE 350.
    *REPORT  ZMM_EXIN_DOC_ALV_HEADER .
    TABLES : J_1IEXCHDR,      " header table
             J_1IEXCDTL,      " item table
             J_1IPART1,       " Excise part I detials
             J_1IPART2,       " Excise Part II details
             LFA1,            " vendor master table
             J_1IMOVEND,      " vendor excise details table
             MSEG,            " Document Segment: Material
             MKPF,            " Header: Material Document
             DD07T,           " domain text table
             T001W.           " Plant and Branch Details
    DATA : BEGIN OF IT_CHDR OCCURS 100,
           SERIALNO   LIKE J_1IPART1-SERIALNO,
           DOCNO      LIKE J_1IEXCHDR-DOCNO,
           DOCYR      LIKE J_1IEXCHDR-DOCYR,
           EXNUM      LIKE J_1IEXCHDR-EXNUM,
           EXDAT      LIKE J_1IEXCHDR-EXDAT,
           WERKS      LIKE J_1IEXCHDR-WERKS,
           EXBED      LIKE J_1IEXCHDR-EXBED,
           EXCCD      LIKE J_1IEXCHDR-EXCCD,
           ECS        LIKE J_1IEXCHDR-ECS,
           STATUS LIKE J_1IEXCHDR-STATUS, "CHALLAN STATUS
           END OF IT_CHDR.
    DATA : BEGIN OF IT_CDTL OCCURS 100,
           SERIALNO LIKE J_1IPART1-SERIALNO,
           DOCYR  LIKE J_1IEXCDTL-DOCYR,
           DOCNO  LIKE J_1IEXCDTL-DOCNO,
           EXNUM  LIKE J_1IEXCDTL-EXNUM,
           EXDAT  LIKE J_1IEXCDTL-EXDAT,
           LIFNR  LIKE J_1IEXCDTL-LIFNR,
           MATNR  LIKE J_1IEXCDTL-MATNR,
           MAKTX  LIKE J_1IEXCDTL-MAKTX,
           CHAPID LIKE J_1IEXCDTL-CHAPID,
           EXBAS  LIKE J_1IEXCDTL-EXBAS,
           EXBED  LIKE J_1IEXCDTL-EXBED,
           ECS    LIKE J_1IEXCDTL-ECS,
           MENGE  LIKE J_1IEXCDTL-MENGE,
           MEINS  LIKE J_1IEXCDTL-MEINS,
           RDOC2  LIKE J_1IEXCDTL-RDOC2,
           EXGRP  LIKE J_1IEXCDTL-EXGRP,
           RDOC1  LIKE J_1IEXCDTL-RDOC1,
           STATUS LIKE J_1IEXCDTL-STATUS, "CHALLAN STATUS
           END OF IT_CDTL.
    DATA TEXT(10).
    DATA : BEGIN OF IT_OUT OCCURS 0,
           SERIALNO LIKE J_1IPART1-SERIALNO,
           TEXT1    LIKE TEXT,
           EXNUM    LIKE J_1IEXCDTL-EXNUM,
           EXDAT    LIKE J_1IEXCDTL-EXDAT,
           NAME     LIKE LFA1-NAME1,
           DDTEXT   LIKE DD07T-DDTEXT,
           EXCCD    LIKE J_1IEXCHDR-EXCCD,
           BUDAT    LIKE MKPF-BUDAT,
           EXBAS    LIKE IT_CDTL-EXBAS,
           EXBED    LIKE IT_CDTL-EXBED,
           ECS      LIKE IT_CDTL-ECS,
           MATNR    LIKE IT_CDTL-MATNR,
           MAKTX    LIKE IT_CDTL-MAKTX,
           CHAPID   LIKE IT_CDTL-CHAPID,
           MENGE    LIKE IT_CDTL-MENGE,
           MEINS    LIKE IT_CDTL-MEINS,
           DEL_IND(1),
           END OF IT_OUT.
    DATA IT_PART2 LIKE J_1IPART1 OCCURS 0 WITH HEADER LINE.
    DATA S_NO(4) .
    DATA DB_CNT LIKE SY-TABIX.
    DATA EBELN_T LIKE MSEG-EBELN .
    TYPE-POOLS : SLIS.
    DATA : AFIELD TYPE SLIS_FIELDCAT_ALV.
    DATA : LIST_HEADER   TYPE SLIS_T_LISTHEADER,
           FIELDCAT      TYPE SLIS_T_FIELDCAT_ALV,
           LS_FTCAT      TYPE LVC_S_FCAT,
           SORTCAT       TYPE SLIS_T_SORTINFO_ALV,
           SORTCAT_LN    LIKE LINE OF SORTCAT,
           G_REPID LIKE SY-REPID,
           G_BACK_GROUND(70),  "like bapibds01-objkey,
           GS_VARIANT LIKE DISVARIANT,
           G_SAVE ,
           GT_EVENTS TYPE SLIS_T_EVENT,
           ALV_EVENT TYPE SLIS_ALV_EVENT,
           EVENTCAT             TYPE SLIS_T_EVENT,
           EVENTCAT_LN          LIKE LINE OF EVENTCAT,
           LAYOUT_IN            TYPE SLIS_LAYOUT_ALV,
           LAYOUT_IN1           TYPE SLIS_LAYOUT_ALV.
    CONSTANTS : GC_FORMNAME_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE
    'TOP_OF_PAGE',
                GC_FORMNAME_USER_COMMAND TYPE SLIS_FORMNAME VALUE
    'USER_COMMAND',
                GC_FORMNAME_BEFORE_OUTPUT TYPE SLIS_FORMNAME VALUE
    'BEFORE_OUTPUT'.
      ALV_EVENT TYPE SLIS_ALV_EVENT,
    DATA EX_NO LIKE IT_CHDR-EXNUM VALUE 0.
    DATA REGTYP_1 LIKE J_1IPART1-REGTYP.
    SELECTION-SCREEN BEGIN OF BLOCK B WITH FRAME.
    PARAMETERS  WERKS TYPE J_1IEXCHDR-WERKS.
    SELECT-OPTIONS : BUDAT FOR J_1IEXCHDR-EXDAT.
    PARAMETERS : R1 RADIOBUTTON GROUP GRP DEFAULT 'X',
                 R2 RADIOBUTTON GROUP GRP.
    SELECTION-SCREEN END OF BLOCK B.
    INITIALIZATION.
      G_REPID = SY-REPID.
      G_SAVE = 'A'.
    PERFORM BUILD_EVENT USING GT_EVENTS[].
      PERFORM ALV_EVENT_INIT.
    AT SELECTION-SCREEN.
      REFRESH LIST_HEADER.
      PERFORM TOP_OF_PAGE_LIST_HEADER USING LIST_HEADER.
    START-OF-SELECTION.
    PERFORM ALV_EVENT_INIT.
      G_REPID = SY-REPID.
      G_BACK_GROUND = ' ' .
      IF R1 = 'X'.
        CLEAR R2. CLEAR : REGTYP_1.
        REGTYP_1 = 'A'.
         set titlebar 'BALAJI' with DB_CNT.
      ELSEIF R2 = 'X'.
        CLEAR R1.CLEAR : REGTYP_1.
        REGTYP_1 = 'C'.
         set titlebar 'BALAJI1' with DB_CNT.
      ENDIF.
    SELECT * FROM J_1IPART1
                      INTO CORRESPONDING FIELDS OF TABLE IT_PART2
                      WHERE REGTYP = REGTYP_1 AND
                            TRNTYP = 'GRPO'.
                            AND BUDAT IN BUDAT.
                              DOCYR = IT_CDTL-DOCYR AND
                              DOCNO = IT_CDTL-DOCNO.
    LOOP AT IT_PART2.
       SELECT SINGLE * FROM J_1IEXCHDR
                 INTO CORRESPONDING FIELDS OF IT_CHDR
                         WHERE  TRNTYP = 'GRPO' AND
                          STATUS NE ' ' AND
                         STATUS EQ ' ' AND
                         DOCYR = IT_PART2-DOCYR AND
                         DOCNO = IT_PART2-DOCNO AND
                         WERKS = WERKS AND
                         EXDAT IN BUDAT.
                       ORDER BY EXDAT.
       IF SY-SUBRC = 0.
         APPEND IT_CHDR.
       ELSE.
         CONTINUE.
       ENDIF.
    IF SY-SUBRC <> 0.
       MESSAGE E084.
    ENDIF.
    ENDLOOP.
    *******************SPD****************
    SELECT * INTO CORRESPONDING FIELDS OF IT_CDTL FROM J_1IEXCDTL WHERE
                                   TRNTYP = 'GRPO' AND WERKS = WERKS AND
                                    EXDAT IN BUDAT AND STATUS NE 'B'.
    SELECT SINGLE * FROM J_1IPART1 WHERE DOCNO = IT_CDTL-DOCNO AND
                                         DOCYR = IT_CDTL-DOCYR AND
                                         REGTYP = REGTYP_1.
    IF SY-SUBRC EQ 0.
    SELECT SINGLE * FROM J_1IPART2 WHERE DOCNO = IT_CDTL-DOCNO AND
                                             DOCYR = IT_CDTL-DOCYR.
      IF SY-SUBRC NE 0.
        IT_CDTL-SERIALNO = J_1IPART1-SERIALNO.
        APPEND IT_CDTL.
      ENDIF.
    ENDIF.
    ENDSELECT.
    ***************SPD********************
    SELECT BDOCNO BDOCYR BEXNUM BEXDAT BWERKS BEXBED B~EXCCD
           B~ECS
           B~STATUS
           A~SERIALNO
           FROM J_1IPART1 AS A INNER JOIN J_1IEXCHDR AS B
           ON ADOCYR = BDOCYR AND ADOCNO = BDOCNO INTO CORRESPONDING
           FIELDS OF TABLE IT_CHDR WHERE B~TRNTYP = 'GRPO' AND
           BWERKS = WERKS AND BEXDAT IN BUDAT AND
           B~STATUS = ' ' AND
           B~STATUS = 'C' AND
           A~REGTYP = REGTYP_1.
    SORT IT_PART2 BY SERIALNO.
    LOOP AT IT_CHDR.
       SELECT * FROM J_1IEXCDTL
                 INTO CORRESPONDING FIELDS OF IT_CDTL
                FOR ALL ENTRIES IN IT_CHDR
                        WHERE
                         TRNTYP = 'GRPO' AND
                          STATUS EQ ' ' AND
                          STATUS EQ 'C' AND
                         STATUS NE 'P' AND
                         DOCNO  = IT_CHDR-DOCNO AND
                         DOCYR  = IT_CHDR-DOCYR AND
                         EXNUM  = IT_CHDR-EXNUM AND
                         EXDAT  = IT_CHDR-EXDAT AND
                         WERKS  = IT_CHDR-WERKS.
         IF SY-SUBRC = 0.
           APPEND IT_CDTL.
           CLEAR  IT_CDTL.
         ELSE.
           CONTINUE.
         ENDIF.
       ENDSELECT.
    MODIFY IT_CDTL INDEX SY-TABIX.
    CLEAR IT_CDTL.
    ENDLOOP.
    *****spd change**********
    *LOOP AT IT_CDTL.
    *SELECT SINGLE * FROM J_1IPART2 WHERE DOCNO = IT_CDTL-DOCNO AND
                                        DOCYR = IT_CDTL-DOCYR.
    *IF SY-SUBRC = 0.
    DELETE IT_CDTL INDEX SY-TABIX.
    *ENDIF.
    *ENDLOOP.
    **SELECT
    *******spd ****************
    SORT IT_CDTL BY  EXNUM EXDAT.
    DELETE ADJACENT DUPLICATES FROM IT_CDTL COMPARING MATNR EXNUM EXDAT.
      LOOP AT IT_CDTL.
        CLEAR TEXT.
        DB_CNT = DB_CNT + 1.
        READ TABLE IT_CHDR WITH KEY EXNUM = IT_CDTL-EXNUM DOCNO =
    IT_CDTL-DOCNO.
       READ TABLE IT_PART2 WITH KEY DOCNO = IT_CDTL-DOCNO .
       IT_OUT-SERIALNO = IT_PART2-SERIALNO.
        SELECT SINGLE NAME1 FROM LFA1
                        INTO IT_OUT-NAME
                        WHERE LIFNR = IT_CDTL-LIFNR.
        SELECT SINGLE * FROM LFA1
                          WHERE LIFNR = IT_CDTL-LIFNR.
        IF LFA1-LAND1 EQ 'IN'.
          TEXT = 'INVOICE'.
          IT_OUT-TEXT1 = TEXT.
        ELSE.
          TEXT = 'BOE'.
          IT_OUT-TEXT1 = TEXT.
        ENDIF.
        SELECT SINGLE * FROM J_1IMOVEND
                        WHERE LIFNR = IT_CDTL-LIFNR.
        SELECT SINGLE * FROM DD07T
                       INTO IT_OUT-DDTEXT
                        WHERE DOMNAME = 'J_1IVTYP' AND
                              DDLANGUAGE = 'EN' AND
                              DOMVALUE_L = J_1IMOVEND-J_1IVTYP.
      IF DD07T-DDTEXT = 'First Stage Dealer of indigenous excisable goods'
    OR
        DD07T-DDTEXT = 'Second Stage Dealer of indigenous excisablegoods'.
          DD07T-DDTEXT = 'Dealer'.
        ENDIF.
        IT_OUT-DDTEXT = DD07T-DDTEXT.
       ELSEIF DD07T-DDTEXT = 'Second Stage Dealer of indigenous excisable
    *goods'.
          DD07T-DDTEXT =
        CLEAR EBELN_T.
        SELECT SINGLE LFBNR FROM MSEG
                            INTO EBELN_T
                            WHERE MBLNR = IT_CDTL-RDOC2 .
        SELECT SINGLE * FROM MSEG
                          WHERE BWART EQ '106' AND
                                LFBNR = EBELN_T ."and
                               ebeln = ebeln_t.
        IF SY-SUBRC = 0.
          IT_OUT-DEL_IND = 'X'.
        ELSE.
          IT_OUT-DEL_IND = ' '.
        ENDIF.
        SELECT SINGLE BUDAT FROM MKPF
                          INTO IT_OUT-BUDAT
                          WHERE MBLNR = EBELN_T  ."MSEG-LFBNR.
        IT_OUT-EXNUM = IT_CDTL-EXNUM.
        IT_OUT-EXDAT = IT_CDTL-EXDAT.
        IT_OUT-EXCCD = IT_CHDR-EXCCD.
       IT_OUT-SERIALNO = IT_CHDR-SERIALNO.
        IT_OUT-SERIALNO = IT_CDTL-SERIALNO.
        IT_OUT-EXBAS = IT_CDTL-EXBAS.
        IT_OUT-EXBED = IT_CDTL-EXBED.
        IT_OUT-ECS   = IT_CDTL-ECS.
        IT_OUT-MATNR = IT_CDTL-MATNR.
        IT_OUT-MAKTX = IT_CDTL-MAKTX.
        IT_OUT-CHAPID = IT_CDTL-CHAPID.
        IT_OUT-MENGE = IT_CDTL-MENGE.
        IT_OUT-MEINS = IT_CDTL-MEINS.
        APPEND IT_OUT.
       EX_NO = IT_CDTL-EXNUM.
      ENDLOOP.
    Title Portion
      IF REGTYP_1 = 'A'.
        SET TITLEBAR 'BALAJI' WITH DB_CNT.
      ELSEIF REGTYP_1 = 'C'.
        SET TITLEBAR 'BALAJI1' WITH DB_CNT.
      ENDIF.
      AFIELD-COL_POS = 1.
      AFIELD-FIELDNAME = 'SERIALNO'.
      AFIELD-SELTEXT_L = 'SERIAL NO.'.
      AFIELD-JUST = 'L'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 2.
      AFIELD-FIELDNAME = 'TEXT1'.
      AFIELD-SELTEXT_L = 'TYPE OF DOC'.
      AFIELD-JUST = 'L'.
      AFIELD-DECIMALS_OUT = '0'.
      AFIELD-NO_ZERO = 'X'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 3.
      AFIELD-FIELDNAME = 'EXNUM'.
      AFIELD-SELTEXT_L = 'DOC.NO'.
      AFIELD-JUST = 'L'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 4.
      AFIELD-FIELDNAME = 'EXDAT'.
      AFIELD-SELTEXT_L = 'DOC.DATE'.
      AFIELD-JUST = 'C'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 5.
      AFIELD-FIELDNAME = 'NAME'.
      AFIELD-SELTEXT_L = 'NAME OF THE SUPPLIER'.
      AFIELD-NO_ZERO = 'X'.
      AFIELD-JUST = 'L'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 6.
      AFIELD-FIELDNAME = 'DDTEXT'.
      AFIELD-SELTEXT_L = 'TYPE-OF-SUPPLIER'.
      AFIELD-JUST = 'L'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 7.
      AFIELD-FIELDNAME = 'EXCCD'.
      AFIELD-SELTEXT_L = 'ECC OF THE SUPPLIER'.
      AFIELD-NO_ZERO = 'X'.
      AFIELD-JUST = 'L'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 8.
      AFIELD-FIELDNAME = 'BUDAT'.
      AFIELD-SELTEXT_L = 'INPUT RECV DATE'.
      AFIELD-JUST = 'C'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 9.
      AFIELD-FIELDNAME = 'EXBAS'.
      AFIELD-SELTEXT_L = 'ASSESSABLE-VALUE'.
      AFIELD-DO_SUM             = 'X'.
      AFIELD-JUST = 'R'.
      AFIELD-DECIMALS_OUT = '2'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 10.
      AFIELD-FIELDNAME = 'EXBED'.
      AFIELD-SELTEXT_L = 'DET OF CREDIT TAKEN CENVAT'.
      AFIELD-JUST = 'R'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 11.
      AFIELD-FIELDNAME = 'ECS'.
      AFIELD-SELTEXT_L = 'DET OF CREDIT TAKEN E-CESS'.
      AFIELD-JUST = 'R'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 12.
      AFIELD-FIELDNAME = 'MATNR'.
      AFIELD-SELTEXT_L = 'MATERIAL-CODE'.
      AFIELD-JUST = 'L'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 13.
      AFIELD-FIELDNAME = 'MAKTX'.
      AFIELD-SELTEXT_L = 'DESCRIPTION'.
      AFIELD-JUST = 'L'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 14.
      AFIELD-FIELDNAME = 'CHAPID'.
      AFIELD-SELTEXT_L = 'TARIFF-ID'.
      AFIELD-JUST = 'L'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 15.
      AFIELD-FIELDNAME = 'MENGE'.
      AFIELD-SELTEXT_L = 'QUANTITY'.
      AFIELD-JUST = 'R'.
      AFIELD-DO_SUM             = ' '.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 16.
      AFIELD-FIELDNAME = 'MEINS'.
      AFIELD-SELTEXT_L = 'UOM'.
      AFIELD-JUST = 'C'.
      APPEND AFIELD TO FIELDCAT.
      AFIELD-COL_POS = 17.
      AFIELD-FIELDNAME = 'DEL_IND'.
      AFIELD-SELTEXT_L = 'Deleted'.
      AFIELD-JUST = 'C'.
      APPEND AFIELD TO FIELDCAT.
    AFIELD-COL_POS = 18.
    AFIELD-FIELDNAME = 'PO NO'.
    AFIELD-SELTEXT_L = 'PURDOCNO'.
    AFIELD-JUST = 'C'.
    APPEND AFIELD TO FIELDCAT.
    * LAYOUT FOR ZEBRA CATLOG
      LAYOUT_IN-COLWIDTH_OPTIMIZE = 'X'.
      LAYOUT_IN-ZEBRA             = 'X'.
      LAYOUT_IN-GET_SELINFOS      = 'X'.
      LAYOUT_IN-CONFIRMATION_PROMPT = 'X'.
      LAYOUT_IN-DETAIL_POPUP = 'X' .
    SORTCAT-decimals     = '0'.
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
        EXPORTING
          I_CALLBACK_PROGRAM      = G_REPID
          I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
          I_SAVE                  = G_SAVE
          IS_VARIANT              = GS_VARIANT
          IT_FIELDCAT             = FIELDCAT
          IT_SORT                 = SORTCAT
          IS_LAYOUT               = LAYOUT_IN
          IT_EVENTS               = EVENTCAT
         I_BACKGROUND_ID         = g_back_ground
        TABLES
          T_OUTTAB                = IT_OUT.
    *&      Form  TOP_OF_PAGE_LIST_HEADER
          text
         -->LIST_HEADERtext
    FORM TOP_OF_PAGE_LIST_HEADER USING LIST_HEADER TYPE SLIS_T_LISTHEADER.
      DATA : HLINE TYPE SLIS_LISTHEADER,
             TEXT(60) TYPE C.
      CLEAR : HLINE,TEXT.
      HLINE-TYP = 'H'.
      HLINE-INFO = TEXT.
      APPEND HLINE TO LIST_HEADER.
      SELECT SINGLE * FROM T001W WHERE WERKS = WERKS.
      CLEAR : HLINE,TEXT.
      HLINE-TYP = 'H'.
      WRITE 'PLANT :' TO TEXT.
      WRITE WERKS TO TEXT+8.
      HLINE-INFO = TEXT.
      APPEND HLINE TO LIST_HEADER.
      CLEAR : HLINE,TEXT.
      HLINE-TYP = 'H'.
      WRITE T001W-NAME1 TO TEXT.
      HLINE-INFO = TEXT.
      APPEND HLINE TO LIST_HEADER.
      CLEAR : HLINE,TEXT.
      HLINE-TYP = 'H'.
      WRITE T001W-STRAS TO TEXT.
      HLINE-INFO = TEXT.
      APPEND HLINE TO LIST_HEADER.
      CLEAR : HLINE,TEXT.
      HLINE-TYP = 'H'.
      WRITE T001W-ORT01 TO TEXT.
      HLINE-INFO = TEXT.
      APPEND HLINE TO LIST_HEADER.
      CLEAR : HLINE,TEXT.
      HLINE-TYP = 'H'.
      WRITE 'DATE :' TO TEXT.
      WRITE BUDAT-LOW TO TEXT+7.
      IF BUDAT-HIGH NE ''.
        WRITE 'TO' TO TEXT+18.
        WRITE BUDAT-HIGH TO TEXT+22.
      ENDIF.
      HLINE-INFO = TEXT.
      APPEND HLINE TO LIST_HEADER.
    ENDFORM.                    "TOP_OF_PAGE_LIST_HEADER
    *&      Form  ALV_EVENT_INIT
          text
    FORM ALV_EVENT_INIT .
      CLEAR ALV_EVENT.
      ALV_EVENT-NAME = SLIS_EV_TOP_OF_PAGE.
      ALV_EVENT-FORM = 'ALV_TOP_OF_PAGE'.
      APPEND ALV_EVENT TO EVENTCAT.
      CLEAR ALV_EVENT.
      ALV_EVENT-NAME = SLIS_EV_TOP_OF_LIST.
      ALV_EVENT-FORM = 'ALV_TOP_OF_LIST'.
      APPEND ALV_EVENT TO EVENTCAT.
       CLEAR ALV_EVENT.
       ALV_EVENT-NAME = SLIS_EV_END_OF_LIST.
       ALV_EVENT-FORM = 'ALV_END_OF_LIST'.
       APPEND ALV_EVENT TO GT_EVENTS.
       CLEAR ALV_EVENT.
       ALV_EVENT-NAME = SLIS_EV_END_OF_PAGE.
       ALV_EVENT-FORM = 'ALV_END_OF_PAGE'.
       APPEND ALV_EVENT TO GT_EVENTS.
    ENDFORM.                    "ALV_EVENT_INIT
    *&      Form  ALV_TOP_OF_PAGE
          text
    FORM ALV_TOP_OF_PAGE.
      CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
        EXPORTING
          IT_LIST_COMMENTARY = LIST_HEADER
          I_LOGO             = 'ENJOYSAP_LOGO'.
    ENDFORM.                    "ALV_TOP_OF_PAGE
    *&      Form  BUILD_EVENT
          text
         -->P_GT_EVENTS[]  text
    FORM BUILD_EVENT USING P_EVENTS TYPE SLIS_T_EVENT.
      CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
        EXPORTING
          I_LIST_TYPE     = 0
        IMPORTING
          ET_EVENTS       = P_EVENTS
        EXCEPTIONS
          LIST_TYPE_WRONG = 1
          OTHERS          = 2.
      READ TABLE P_EVENTS WITH KEY NAME = SLIS_EV_USER_COMMAND INTO
    ALV_EVENT.
      IF SY-SUBRC = 0.
        MOVE GC_FORMNAME_USER_COMMAND TO ALV_EVENT-FORM.
        APPEND ALV_EVENT TO P_EVENTS.
      ENDIF.
      READ TABLE P_EVENTS WITH KEY NAME = SLIS_EV_BEFORE_LINE_OUTPUT INTO
    ALV_EVENT.
      IF SY-SUBRC = 0.
        MOVE GC_FORMNAME_BEFORE_OUTPUT TO ALV_EVENT-FORM.
        APPEND ALV_EVENT TO P_EVENTS.
      ENDIF.
    ENDFORM.                    " BUILD_EVENT
    Thanks,
    Shankar

  • RG1 Report requirements

    Hi all,
    Following is the clients requirements for RG1 report,
    1. When there is opening qnty for materials,but no transactions(production or issues) the report should show the details of opening & closing stock of FG stocks,
    where as the above requirement is notmet with stanard RG1 report,palnning to go for ABAP custom developmwnt,
    can anyone provide inputs how to handle the same through ABAP?
    Moderator message - Please do not simply post yourr clients requirements and hope that someone will do your work for you - post locked
    Edited by: Rob Burbank on Sep 1, 2009 9:20 AM

    Hi,
    1. Fetch all the material details from the table j_1iRG1(it contains rg1 transaction details) with desired inputs (plant, date range, excise group ect.) to itab1
    2. Sort  or delete material which are not FG from itab1.
    3. Fetch the opening & closing balance for sorted FG materials details from table j_2irg1bal for corresponding input details and put in itab2.
    4. Compare two internal table and collect materials details in the third internal table which are not found itab1.
    5. Display final internal table as output
    Hope this will be helpful.

  • RG1 report-Ztable_entries insertion

    Hi Folks,
    Inorder to create a RG1 report the previous development team has created a ztable of the same strcuture as J_2IRG1BAL.But I was not able to find out how they are inserting the entires into this ztable.
    1.Is there any  possibility that they would have return any bdc to populate this ztable?
    2.J_2IRG1BAL needs two transactions to be run for the table to have the entries( I heard),so does the same logic applies for the ztable too?
    3.What are the ways to find how a ztable is getting populated?
    K.Kiran.

    Hi Man,
    Poppulating Entries for RG1 Related tables is bit tricky. It gets poppulated when u run tcode J2I5. For this SAP is having many considerations like updating RG1BAL Table and other related tables.
    Hope this answers your query. for RG1 and CIN you can contact me on email or mobile given in my profile.
    Regards,
    Darshan
    <i><b>**Reward Points to helpful answers; it motivates us to answer more</b></i>

  • Report / Table for getting Datewise item cost

    Friends,
    Can u help me know MM Report / Table for getting Datewise item cost in a plant.

    hi,
    try table S031...Movement of stocks....
    THis shd help you..
    Regards
    Priyanka.P

  • Report S_ALR_87013105 : no authorization for the report/ table 7KU6_001

    Hi Gurus,
    While executing the program S_ALR_87013105 (Detailed Reports 
    For Sales Order : Plan/Actual Comparison ) system showing the selection log.
    "Have no authorization for the report/table  7KU6_001 and 7KU6_002".
    But for the user the authorization check through SU53 was successful.
    Pl can any one suggest on this issue.
    Thanks in advance,
    Vijay

    Hi,
    Contact your basis consultant to provide the missing authorisation. This is one of the authorisation object.
    Regards,
    Sankar

  • User/Profile Risk Violation Report table is empty

    Dear community,
    I am struggeling to find the solution for a quite simple problem: the user and profile risk violation report tables show no results (are empty). And this, although the associated tables (in the backend) contain entries for the same selection criteria (eg. GRACPROFILEACTVL etc.). What could be the reason for that? I started again the batch risk analysis very carefully (manually) on User and Profile Level, for the correct rule set and the correct system, it completed successfully, but I still can't see any results (not even a message like "No violations" or something). As an example, I took the profile SAP_ALL for a target system, which should obviously return a lot of risks/violations.
    I have also checked that this is not an authorization issue. To be more precise, actually, this functionality is working fine on the development and UAT GRC system, but not in production.
    Any help is highly appreciated. Thanks in advance.

    Hi Erik,
    The problem you are facing with only due to the SoD rule sets, which are in active as you might not have generated in Production system
    Generate the SoD rule sets, run the jobs and then run the risks reports, you will get the results as expected.
    Regards,
    Ameet

  • How to find out the Area Menu for a Report/ Table/Function Module

    Hi,
    Is there any procedure to find out the <b>"AREA MEANU"</b> for a Report/Table/Function Module...
    Or is there any Transaction code / Report is available to find out all the report for a particular "AREA MENU".
    Thank you for your quick response...
    Regards,
    Thiru
    <b></b>

    Hi,
    Check these below threads:
    user log in & log out time SAO
    How to find user log-out time ?
    Regards,
    Nitin

  • Error in ABAP Report TABLES declaration

    Hi,
    I am a Basis administrator and trying to write a small program for archiving.
    I get a folowing error when user the following statement in a report -
    TABLES: RSDAARCHREQ.
    The error is as follows -
    "RSDAARCHREQ" must be a flat structure. You cannot use internal tables,
    strings, references, or structures as components. -
    I can include all the other tables requred but somehow this particular table gives me this error which I have never encountered earlier. This is BI 7.0 and it is standard SAP transparent table.
    Please help me.
    I will appreciate it.
    Regards,
    Sume

    Hi Sume,
    Do not declare RSDAARCHREQ in tables.
    If you want a internal table  declare in the below mentioned way .
    data: it_RSDAARCHREQ TYPE STANDARD TABLE OF RSDAARCHREQ.
    select * into table
    it_RSDAARCHREQ
      from RSDAARCHREQ.
    Regards
    Naresh

  • Pivot report table

    Hi i am new to OAF. Please someone help me in how to create a Pivot report table in OAF?
    The table structure should be like
    _______________________________________Column1________________________Column2____________________Column3
    _______________________________________Part1 __________________________ Part2______________________Part3
    _______________________________________Part 1.a_____Part1.b____________ Part2.a_______ part2.b_________Part3.a_______ part3.c
    Row1__Organization name1 Manager Name1 count of employees
    Row2__Organization name2 Manager Name2 count of employees
    Edited by: 847828 on Mar 28, 2011 1:27 AM
    Edited by: 847828 on Mar 28, 2011 1:33 AM
    Edited by: 847828 on Mar 28, 2011 1:39 AM

    Hi,
    Kindly elaborate your requirement.
    Thanks,
    Gaurav

  • RG1 Report printing.

    Hi All,
    We r not getting proper RG1 report print on A4 size with all records
    and format. Quantity are not coming on print view through J2iln
    transaction.
    Yusuf

    Hi
    Can you see the quantity on the print preview screen?
    If yes then that report is not meant for A4 size.
    If no then you will have to check with your ABAPer as to why the quantity is not seen.
    Regards
    Sandy

  • Timestamp format in Report table

    How can you set the timestamp value to nowrap in the Report table results. It is the only column that is wrapping since the timestamp is longer than the Column header

    I also work with Timestamps, and I would ask what you are trying to achieve. The Timestamp takes up a lot of room. If you don't necessarily need every bit of the timestamp, use a dateformat to display it in a shorter format that fits in the space restraints you define. If you need all the data, you're going to have to either give it the space it needs (could be up to almost 30 characters) or put it on two lines.
    You could also try using HTML tags to affect the font size, or even display the full timestamp as a mouseover. Other than that, not many options.

  • Project Server 2013 : Report table not updated with Published tables

    Hello Team,
    We found the issue that Publish and Reporting table have difference in work attribute. is their any way that we can refresh the Reporting table in one go.
    Thanks.

    If this issue is specific to one or few projects, using Save for sharing would be much more easier.
    If this issue is for all the projects then as NicoOosthuysen recommended RDB refresh would be the option. Having said that  you have to take extra measure before you start RDb refresh , since it is very high system resource and time consuming activity
    Steps for Save for sharing
    1. Open MS Project Pro 2013.
    2. Open the project plan from the server.
    3. Now save it locally without making changes in the File Name, using File > Share > Save For Sharing. Provide local location. Do not close Project Professional
    4. Now save back the project back to server using File > Save As (Project Name should be grayed out)
    5. Save and then publish the project plan.
    Hrishi Deshpande Senior Consultant

  • Add fields to reporting table/structure CCSS

    My customer has defined some new fields (Z......) for WBS reporting in table PRPS. They would like to use these fields in report painter reports, but we have not managed to make them available in the library used (6P3). In order to make that happen they must show in the reporting table/structure used (CCSS) I guess? According to SAP there's no "easy way" of doing this, but obviously it should be possible.
    Can somebody give ma an idea how this can be done?

    Eventually we manage to get the customer defined field to show up as a characteristic in the relevant library. The reason we struggled with this was the defined length of the field. SAP does not accept a characteristic with a defined field length of more than 24 characters (we had 30). We ended up redefining the length of the field directly in include CI_CC1Z.
    Edited by: Roar Sørli on Feb 5, 2009 2:52 PM

  • Oracle APEX 4.0  -  Interactive Report - Table Column Filter Issue

    Environment: Oracle APEX 4.0  -  Interactive Report - Table Column header Filter Issue
    We have developed an interactive report using Oracle APEX 4.0, which contains a record count of around 3,000 Rows. All the rows values are unique in nature. When we try to filter the same with the help of column header filter option available in the interactive report,We get only 1000 records.
    Could some one help us, why this behaviour under APEX Table Column Header Filter as if it does not display beyond 1000 distinct values.
    Is there a way or workaround on how to get all the records in the column header filter?
    Thanks in advance.
    Krish

    Hi
    Thanks for the advice and this issue has been moved to the below URL
    Oracle APEX 4.0 - Interactive Report - Table Column Filter Issue Posted: No
    Krish

Maybe you are looking for

  • Can't transfer tunes to ipod

    I have a 60GB ipod and since upgrading to itunes 7.0, every time I try to transfer my library, I get the error message: "ipod cannot be updated. The disk could not be read from or written to" I've tried the all the advice at http://docs.info.apple.co

  • How do I transfer music from a PC to my iphone 4s

    I have 2 windows based PC's.  I have the latest iTunes (10.5) on both.  I set up my iPhone 4s on PC 1.  When connected to PC 2, iTunes will not allow me to move music from iTunes to the phone.  I am signed into my iTunes account on PC 2 when I am att

  • Migrating from Powerbook G4 to Macbook Pro - Anything I need to know?

    I'm about the begin the process of migrating from one computer to the other. I have cleaned/tidied up my powerbook, tossing old files and making sure all is in order. Is there anything special I need to know? Here are my specific questions before I g

  • Financial Reports WIndows Service(s) missing?

    I'm trying to install Oracle EPM version 11.1.2.1, and I'm pretty far along, but this seems weird. Everything is installed and configured, but I have no Windows service(s) for FR on the services tier server. Looking at the startup order in the Instal

  • How to compare the query definiation of two or more queries?

    HI Folks. I am attempting to determine if there is a method by which I can compare query definination of two or more queries or shows me the differences between queries.  Transaction RSRTQ only give the query details of single query at a time and doe