Overflow Message in ALV Output

Hi All,
In my program I am fetching sub total based on currency.
Report output is in ALV Grid format. But, there are few cases in which I am facing problem.
I am getting: "The field Expected order value cannot be totalled because of field overflow"
message.
I checked my final internal table and it seems to contain all the required values.
Please find below a piece of code.
wa_fieldcatalog-fieldname  = 'WAERS'. "Currency
wa_fieldcatalog-ref_fieldname = 'WAERS'.
wa_fieldcatalog-ref_tabname   = 'EKKO'.
wa_fieldcatalog-cfieldname = 'WAERS'.
wa_fieldcatalog-ctabname = 'ts_final_output'.
APPEND wa_fieldcatalog.
CLEAR wa_fieldcatalog.
wa_fieldcatalog-fieldname  = 'VALUE'. "Remaining Value
wa_fieldcatalog-ref_fieldname = 'EWERT'.
wa_fieldcatalog-ref_tabname   = 'RV45A'.
wa_fieldcatalog-do_sum     = 'X'.
wa_fieldcatalog-just       = 'R'.
APPEND wa_fieldcatalog.
CLEAR wa_fieldcatalog.
wa_sort-spos      = 1.
wa_sort-fieldname = 'WAERS'.
wa_sort-tabname = 'ts_final_output'.
wa_sort-subtot = 'X'.
wa_sort-up = 'X'.
append wa_sort to t_sort.
clear wa_sort.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program = sy-repid
      is_layout          = t_layout
      it_fieldcat        = wa_fieldcatalog[]
      it_sort            = t_sort[]
      i_save             = 'A'
      it_events          = t_events[]
    TABLES
      t_outtab           = ts_final_output[]
    EXCEPTIONS
      program_error      = 1
      OTHERS             = 2.
Please help.

Hi,
Check this
ALV GRID: Sub Total of a field

Similar Messages

  • ALV Report - Field Overflow message in status Bar

    Hi
    I am trying to display ALV report , ALV report is displaying fine but on execution of report , an message in status bar is coming as "Field copy Number can not be totalled because of field overflow."
    Can anyone tell why such messgae is comming?
    Thanks,
    Debadatta

    Just a wild guess, treat the below as an example.
    Eg:
    assuming one field in the output is of length 2 type i.
    values: 20, 30, 60, 45.
    Totalling the values result as 155. but due to the length of the field as 2. We can encounter the overflow message.
      Considering the above example, manually total the values of your numerical columns and see if any of the column is execeeding the specified length.
    Regards
    Eswar
    Note: Reward if you find the info useful.

  • Total display in the ALV output

    Hi
    Is  do_sum  in the field catalog has some restriction to display SUM in the report output. In my report around 4000 records are displaying. For some of the fields do_sum  functionality used to display the total in the ouput. But for some fields it showing Total and remaining fields Total is not coming and it gives one messag  in the output "The field cannot be totalled because of field overflow". Message is coming from standard Include LSKBHF__ . Is there any way to display for all the fields other than writting logic for that.
    Regards
    Raj

    Example:
    TYPE-POOLS SLIS.
    DATA: BEGIN OF ITAB OCCURS 0,
           BELNR LIKE BSEG-BELNR,
           GJAHR TYPE I,
           WRBTR TYPE I,
           WAERS LIKE BKPF-WAERS,
           TOTAL TYPE P,
           AUGDT type BSEG-AUGDT,
          END OF ITAB.
    DATA: LAYOUT     TYPE SLIS_LAYOUT_ALV,
          IT_EVENTS  TYPE SLIS_T_EVENT,
          FCAT       TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
          REC_FCAT   TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE.
    START-OF-SELECTION.
      FCAT-COL_POS       = 1.
      FCAT-FIELDNAME     = 'BELNR'.
      FCAT-TABNAME       = 'ITAB'.
      FCAT-REF_FIELDNAME = 'BELNR'.
      FCAT-REF_TABNAME   = 'BSEG'.
      APPEND FCAT.
      FCAT-COL_POS       = 2.
      FCAT-FIELDNAME     = 'GJAHR'.
      FCAT-TABNAME       = 'ITAB'.
      FCAT-REF_FIELDNAME = 'GJAHR'.
      FCAT-DATATYPE      = 'INT4'.
      FCAT-INTTYPE       = 'I'.
      FCAT-DO_SUM        = 'X'.
      APPEND FCAT.
      FCAT-COL_POS       = 3.
      FCAT-FIELDNAME     = 'WRBTR'.
      FCAT-TABNAME       = 'ITAB'.
      FCAT-DATATYPE      = 'INT4'.
      FCAT-INTTYPE       = 'I'.
      FCAT-DO_SUM        = 'X'.
      APPEND FCAT.
    FCAT-COL_POS       = 4.
      FCAT-FIELDNAME     = 'TOTAL'.
      FCAT-TABNAME       = 'ITAB'.
    *  FCAT-DATATYPE      = 'INT4'.
      FCAT-INTTYPE       = 'P'.
      FCAT-DO_SUM        = 'X'.
      APPEND FCAT.
    FCAT-COL_POS       = 5.
      FCAT-FIELDNAME     = 'AUGDT'.
      FCAT-TABNAME       = 'ITAB'.
      FCAT-REF_FIELDNAME = 'AUGDT'.
      FCAT-REF_TABNAME   = 'BSEG'.
      APPEND FCAT.
    BREAK DEVELOPER.
      DO 100 TIMES.
        ITAB-WRBTR = SY-INDEX.
        ITAB-GJAHR = SY-INDEX + 1.
       ITAB-TOTAL = ITAB-WRBTR / ITAB-GJAHR.
       itab-AUGDT = sy-datum.
        APPEND ITAB.
      ENDDO.
    *CALLING ALV
      CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
        EXPORTING
          I_CALLBACK_PROGRAM = 'Z_TOT_ALV'.
      CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
        EXPORTING
          IS_LAYOUT   = LAYOUT
          IT_FIELDCAT = FCAT[]
          I_TABNAME   = 'ITAB'
          IT_EVENTS   = IT_EVENTS[]
        TABLES
          T_OUTTAB    = ITAB[].
      CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'.

  • Total is not getting displayed in the ALV output.

    Hi,
    Total is not getting displayed in the ALV output.
    I m using :REUSE_ALV_BLOCK_LIST_APPEND & REUSE_ALV_BLOCK_LIST_DISPLAY
    Are  there any issues with it as the same settings are working fine with REUSE_ALV_LIST_DISPLAY
    source code:
    DATA: layout TYPE slis_layout_alv,
          IT_eventS  TYPE slis_t_event,
          fcat   TYPE slis_t_fieldcat_alv WITH HEADER LINE,
          rec_fcat TYPE slis_t_fieldcat_alv WITH HEADER LINE.
    TYPES: BEGIN OF ty_tab,
          belnr TYPE dberchz-belnr,
          belzart TYPE dberchz-belzart,
          net TYPE dberchz-nettobtr,
          END OF ty_tab.
    DATA: lt_tab TYPE STANDARD TABLE OF ty_tab.
    SELECT belnr belzart nettobtr
      FROM dberchz
      INTO TABLE lt_tab[]
    WHERE belnr eq '000000000001'.
      if sy-subrc ne 0.
      ENDIF.
    *  defining layout
    layout-colwidth_optimize = 'X'.
    layout-def_status = 'X'.
    *defning event
    *event
    *defining field catalog
    fcat-col_pos = 1.
    fcat-fieldname = 'BELNR'.
    fcat-tabname  = 'LT_TAB'.
    APPEND fcat.
    fcat-col_pos = 2.
    fcat-fieldname = 'BELZART'.
    fcat-tabname  = 'LT_TAB'.
    APPEND fcat.
    fcat-col_pos = 3.
    fcat-fieldname = 'NET'.
    fcat-tabname  = 'LT_TAB'.
    fcat-do_sum = 'X'.
    APPEND fcat.
    *calling alv
    CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
      EXPORTING
        i_callback_program             = 'YZ_PLR'
    *   I_CALLBACK_PF_STATUS_SET       = ' '
    *   I_CALLBACK_USER_COMMAND        = ' '
    *   IT_EXCLUDING                   =
    CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
      EXPORTING
        is_layout                        = layout
        it_fieldcat                      = fcat[]
        i_tabname                        = 'LT_TAB'
        it_events                        = IT_EVENTS[]
    *   IT_SORT                          =
    *   I_TEXT                           = ' '
      tables
        t_outtab                         = lt_tab[]
    * EXCEPTIONS
    *   PROGRAM_ERROR                    = 1
    *   MAXIMUM_OF_APPENDS_REACHED       = 2
    *   OTHERS                           = 3
    IF sy-subrc <> 0.
    * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    *         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'
    Thanks,
    Gaurav

    Hi
    No I don't think, this is my code (based on your code) and it works fine:
    TYPE-POOLS SLIS.
    DATA: BEGIN OF LT_TAB OCCURS 0,
           BELNR LIKE BSEG-BELNR,
           GJAHR LIKE BSEG-GJAHR,
           WRBTR LIKE BSEG-WRBTR,
           WAERS LIKE BKPF-WAERS,
          END OF LT_TAB.
    DATA: LAYOUT     TYPE SLIS_LAYOUT_ALV,
          IT_EVENTS  TYPE SLIS_T_EVENT,
          FCAT       TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
          REC_FCAT   TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE.
    START-OF-SELECTION.
      FCAT-COL_POS       = 1.
      FCAT-FIELDNAME     = 'BELNR'.
      FCAT-TABNAME       = 'LT_TAB'.
      FCAT-REF_FIELDNAME = 'BELNR'.
      FCAT-REF_TABNAME   = 'BSEG'.
      APPEND FCAT.
      FCAT-COL_POS       = 2.
      FCAT-FIELDNAME     = 'GJAHR'.
      FCAT-TABNAME       = 'LT_TAB'.
      FCAT-REF_FIELDNAME = 'GJAHR'.
      FCAT-REF_TABNAME   = 'BSEG'.
      APPEND FCAT.
      FCAT-COL_POS       = 3.
      FCAT-FIELDNAME     = 'WRBTR'.
      FCAT-TABNAME       = 'LT_TAB'.
      FCAT-CFIELDNAME    = 'WAERS'.
      FCAT-REF_FIELDNAME = 'WRBTR'.
      FCAT-REF_TABNAME   = 'BSEG'.
      FCAT-DO_SUM        = 'X'.
      APPEND FCAT.
      FCAT-COL_POS       = 4.
      FCAT-FIELDNAME     = 'WAERS'.
      FCAT-TABNAME       = 'LT_TAB'.
      FCAT-REF_FIELDNAME = 'WAERS'.
      FCAT-REF_TABNAME   = 'BKPF'.
      FCAT-DO_SUM        = SPACE.
      APPEND FCAT.
      SELECT * FROM BSEG INTO CORRESPONDING FIELDS OF TABLE LT_TAB
        WHERE BUKRS = 'MAAB'
          AND BELNR = '0000000001'.
      LT_TAB-WAERS = 'EUR'.
      MODIFY LT_TAB FROM LT_TAB TRANSPORTING WAERS WHERE WAERS = SPACE.
    *CALLING ALV
      CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
        EXPORTING
          I_CALLBACK_PROGRAM = 'ZPROVAMAX5'.
      CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
        EXPORTING
          IS_LAYOUT   = LAYOUT
          IT_FIELDCAT = FCAT[]
          I_TABNAME   = 'LT_TAB'
          IT_EVENTS   = IT_EVENTS[]
        TABLES
          T_OUTTAB    = LT_TAB[].
      CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'.
    I've also inserted a currency field
    Max

  • I am not getting the headings of the fields in ALV output.

    I am not getting ALV out put but  the headings of the fields in ALV output.
    Please see my below code .
    TYPES : BEGIN OF ty_zgxmit.
              INCLUDE STRUCTURE zgxmit.
    TYPES : END OF ty_zgxmit.
    DATA : gt_zgxmit TYPE TABLE OF ty_zgxmit.
    *&      Form  alv_display                                              *
    This subroutine is to display the out put in ALV.                    *
    FORM alv_display .
    Local data
      DATA: y_x          LIKE boole  VALUE 'X'.
    DATA: lt_fieldcat  TYPE slis_t_fieldcat_alv.
      DATA: lf_fieldcat  TYPE slis_fieldcat_alv.
      DATA: lh_index     LIKE lf_fieldcat-col_pos.
    For variant
    DATA: ws_repid LIKE sy-repid,
          g_save TYPE c VALUE 'A',
          g_exit TYPE c,
          g_variant LIKE disvariant,
          gx_variant LIKE disvariant.
      For 1st field.( RPT_LOC )
        CLEAR lf_fieldcat.
        lf_fieldcat-fieldname = 'RPT_LOC'.
        lf_fieldcat-tabname = 'GT_ZGXMIT'.
        lf_fieldcat-ref_tabname = 'RPT_LOC'.
        lf_fieldcat-ref_fieldname = 'ZGXMIT'.
        lh_index = lh_index + 1.
        lf_fieldcat-col_pos = lh_index.
        lf_fieldcat-key = y_x.
        lf_fieldcat-no_sum = y_x.
        APPEND lf_fieldcat TO lt_fieldcat.
    For 2nd field.( BAL_XMIT )
        CLEAR lf_fieldcat.
        lf_fieldcat-fieldname = 'BAL_XMIT'.
        lf_fieldcat-tabname = 'GT_ZGXMIT'.
        lf_fieldcat-ref_tabname = 'BAL_XMIT'.
        lf_fieldcat-ref_fieldname = 'ZGXMIT'.
        lh_index = lh_index + 1.
        lf_fieldcat-col_pos = lh_index.
        lf_fieldcat-key = y_x.
        lf_fieldcat-no_sum = y_x.
        APPEND lf_fieldcat TO lt_fieldcat.
    For 3rd field.( INC_XMIT )
        CLEAR lf_fieldcat.
        lf_fieldcat-fieldname = 'INC_XMIT'.
        lf_fieldcat-tabname = 'GT_ZGXMIT'.
        lf_fieldcat-ref_tabname = 'INC_XMIT'.
        lf_fieldcat-ref_fieldname = 'ZGXMIT'.
        lh_index = lh_index + 1.
        lf_fieldcat-col_pos = lh_index.
        lf_fieldcat-key = y_x.
        lf_fieldcat-no_sum = y_x.
        APPEND lf_fieldcat TO lt_fieldcat.
    For 4th field.( Z500_XMIT )
        CLEAR lf_fieldcat.
        lf_fieldcat-fieldname = 'Z500_XMIT'.
        lf_fieldcat-tabname = 'GT_ZGXMIT'.
        lf_fieldcat-ref_tabname = 'Z500_XMIT'.
        lf_fieldcat-ref_fieldname = 'ZGXMIT'.
        lh_index = lh_index + 1.
        lf_fieldcat-col_pos = lh_index.
        lf_fieldcat-key = y_x.
        lf_fieldcat-no_sum = y_x.
        APPEND lf_fieldcat TO lt_fieldcat.
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
           EXPORTING
                i_callback_program       = 'ZJV_2245'
                it_fieldcat              = lt_fieldcat
           TABLES
                t_outtab                 = gt_zgxmit
           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.                    " alv_display

    You can force the headings like so.
    CLEAR lf_fieldcat.
    lf_fieldcat-fieldname = 'RPT_LOC'.
    lf_fieldcat-tabname = 'GT_ZGXMIT'.
    lf_fieldcat-ref_tabname = 'RPT_LOC'.
    lf_fieldcat-ref_fieldname = 'ZGXMIT'.
    lf_fieldcat-reptext_ddic  = 'Whatever Heading'.    "<-  Right here
    lh_index = lh_index + 1.
    lf_fieldcat-col_pos = lh_index.
    lf_fieldcat-key = y_x.
    lf_fieldcat-no_sum = y_x.
    APPEND lf_fieldcat TO lt_fieldcat.
    Regards,
    Rich Heilman

  • Newly added field not getting displayed in ALV output

    Hi All,
       I'm adding one more field/column to be displayed in an old existing program that uses REUSE_ALV_FIELDCATALOG_MERGE to generate the ALV fieldcat.
    DATA: BEGIN OF it_salary OCCURS 0,
            pernr LIKE pa0000-pernr,
            ename LIKE pa0001-ename,
            rtext like lv_rtext, -
    added field
            waers LIKE pa0008-waers
      CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
        EXPORTING
          i_program_name         = driver
          i_internal_tabname     = 'IT_SALARY'
          i_client_never_display = 'X'
          i_inclname             = driver
        CHANGING
          ct_fieldcat            = lv_fieldcat[]
        EXCEPTIONS
          inconsistent_interface = 1
          program_error          = 2
          OTHERS                 = 3.
      CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
        EXPORTING
          i_callback_program      = driver
          it_fieldcat             = lv_fieldcat[]
          i_default               = 'X'
          i_save                  = 'A'
          is_variant              = lv_tmplt
          is_layout               = lv_ls_layout
         i_callback_user_command = 'USER_COMMAND'
        TABLES
          t_outtab                = it_salary
        EXCEPTIONS
          program_error           = 1
          OTHERS                  = 2.
    The newly added field is not getting populated in the lv_fieldcat table. Tried running programs BALVBUFDEL,
    BCALV_BUFFER_DEL_SHARED then logging off and logging in but of no help.
    Please provide suggestion for this issue.
    Regards,
    Sridevi S

    Hi,
    Fieldcat is buffered - so use
    I_BYPASSING_BUFFER = 'X'
    Since a while CL_GUI_ALV_GRID is available which does NOT need any fieldcat (is determined internally using RTTI). It is worth playing around whith this class if you have some time. This class is recommended for ALV Output by SAP (but no edit is possible - was never supported officially).
    A simple use would be:
    data: gt_output type standard table of (adjust!).
    *simple ALV output
    data go_alv type ref to cl_salv_table.
    data go_functions type ref to cl_salv_functions_list.
    data go_columns type ref to cl_salv_columns_table.
    data go_column type ref to cl_salv_column_table.
    *Exceprion handlig
    data: go_exception  type ref to cx_root,
          gv_errortext   type string.
    ** fill table gt_output ...
    ** ALV output
    if not gt_output is initial.
        try.
            call method cl_salv_table=>factory
              importing
                r_salv_table = go_alv
              changing
                t_table      = gt_output.
          catch cx_salv_msg into go_exception.
            gv_errortext = go_exception->get_text( ).
            message gv_errortext type 'A'.
        endtry.
    * enable all standard ALV functions
        go_functions =  go_alv->get_functions( ).
        go_functions->set_all( ).
    * hide MANDT
        go_columns = go_alv->get_columns( ).
        go_column ?=  go_columns->get_column( columnname = 'MANDT' ).
        go_column->set_technical( ).
        go_alv->display( ).
    Kind regards,
    Holger

  • ALV output converted into PDF format and send that PDF to user through mail

    Hi Experts,
    I have report earlier its output was in alv grid.
    Now i want that ALV output converted into PDF format.And that PDF output send to user through mail.
    Can u please tell how to do?
    My code is here(output is displaying in ALV grid).
    INCLUDE <icon>.
    TYPE-POOLS: slis, kkblo.
    TABLES : zmsd_freight_hdr, zmsd_freight_det, zmsd_blinfo, zmsd_diheader.
    TABLES : lfa1.
    DATA : t_hdr   LIKE   zmsd_freight_hdr   OCCURS 0 WITH HEADER LINE,
           T_DET   LIKE   ZMSD_FREIGHT_DET   OCCURS 0 WITH HEADER LINE,
           t_bl    LIKE   zmsd_blinfo        OCCURS 0 WITH HEADER LINE,
           t_di    LIKE   zmsd_diheader      OCCURS 0 WITH HEADER LINE.
    DATA: BEGIN OF t_det OCCURS 0.
            INCLUDE STRUCTURE zmsd_freight_det.
    DATA    type(30).
    DATA: END OF t_det.
    DATA: v_target2(30),
          v_zsammg LIKE t_det-zsammg,
          v_gsttotal LIKE t_det-zamount.
    DATA : BEGIN OF t_data OCCURS 0,
             zsammg       LIKE  zmsd_freight_hdr-zsammg,
             zdidbl       LIKE  zmsd_freight_hdr-zdidbl,
             zvkorg       LIKE  zmsd_freight_hdr-zvkorg,
             zinvno       LIKE  zmsd_freight_hdr-zinvno,
             zttlamt      LIKE  zmsd_freight_hdr-zttlamt,
             zstatus      LIKE  zmsd_freight_hdr-zstatus,
             ztype        LIKE  zmsd_freight_hdr-ztype,
             zconfirm     LIKE  zmsd_freight_hdr-zconfirm,
             zconfirmdate LIKE  zmsd_freight_hdr-zconfirmdate,
             erdat        LIKE  zmsd_freight_hdr-erdat,
             ernam        LIKE  zmsd_freight_hdr-ernam,
             erzet        LIKE  zmsd_freight_hdr-erzet,
             aedat(10),
             aenam        LIKE  zmsd_freight_hdr-aenam,
             aezet        LIKE  zmsd_freight_hdr-aezet,
             zline        LIKE  zmsd_freight_det-zline,
             zfptype      LIKE  zmsd_freight_det-zfptype,
             zchrcode     LIKE  zmsd_freight_det-zchrcode,
             zcurcode     LIKE  zmsd_freight_det-zcurcode,
             zqty         LIKE  zmsd_freight_det-zqty,
             zuom         LIKE  zmsd_freight_det-zuom,
             zrate        LIKE  zmsd_freight_det-zrate,
             zamount      LIKE  zmsd_freight_det-zamount,
             zexrate      LIKE  zmsd_freight_det-zexrate,
           zccode       LIKE  zmsd_blinfo-zccode,      "MADK991565
             zccode       like  ZMSD_FREIGHT_HDR-zfcode, "MADK991565
             zbldate(10),
             zbl          LIKE  zmsd_blinfo-zbl,
             type(3),
             waerk        LIKE  zmsd_freight_det-zcurcode,
             zamountl     LIKE  zmsd_freight_det-zamount,
           END OF t_data.
    DATA : w_layout      TYPE   slis_layout_alv,
           w_catalog     TYPE   slis_fieldcat_alv,
           t_catalog     TYPE   slis_t_fieldcat_alv,
           w_sort        TYPE   slis_sortinfo_alv,
           t_sort        TYPE   slis_t_sortinfo_alv.
    DATA   V_ZINVNO    like   T_HDR-ZINVNO.                   "MADK991565
    DATA : v_count  TYPE  i.
    SELECTION-SCREEN BEGIN OF BLOCK a0 WITH FRAME TITLE text-001.
    PARAMETERS     :  p_zvkorg LIKE zmsd_freight_hdr-zvkorg  OBLIGATORY .
    SELECT-OPTIONS :  s_zdidbl FOR  zmsd_freight_hdr-zdidbl             ,
                      s_zccode FOR  lfa1-lifnr                          ,
                      s_status FOR  zmsd_freight_hdr-zstatus            ,
                      s_ztype  FOR  zmsd_freight_hdr-ztype              ,
                      s_erdat  FOR  zmsd_freight_hdr-erdat              ,
                      s_ernam  FOR  zmsd_freight_hdr-ernam              ,
                      s_zconfd FOR  zmsd_freight_hdr-zconfirmdate       .
    PARAMETERS     :  p_zconf  AS   CHECKBOX                            .
    SELECTION-SCREEN END OF BLOCK a0.
    SELECTION-SCREEN BEGIN OF BLOCK a1 WITH FRAME TITLE text-002.
    PARAMETERS     :  p_hdr    RADIOBUTTON GROUP rad DEFAULT 'X'        ,
                      p_det    RADIOBUTTON GROUP rad                    .
    SELECTION-SCREEN END OF BLOCK a1.
    INITIALIZATION.
    AT SELECTION-SCREEN.
    START-OF-SELECTION.
      PERFORM get_data.
      PERFORM process.
      PERFORM display.
    END-OF-SELECTION.
      PERFORM fm_get_num_pages.
    AT USER-COMMAND.
    AT LINE-SELECTION.
    TOP-OF-PAGE.
      PERFORM fm_top_of_page USING '7010' sy-title space.
    FORM get_data.
      SELECT   *
        FROM   zmsd_freight_hdr
        INTO   TABLE t_hdr
       WHERE   zvkorg        EQ  p_zvkorg
         AND   zdidbl        IN  s_zdidbl
         AND   zstatus       IN  s_status
         AND   ztype         IN  s_ztype
         AND   erdat         IN  s_erdat
         AND   ernam         IN  s_ernam
         AND   zconfirmdate  IN  s_zconfd
         AND   ZFCODE        IN  S_ZCCODE.                      "MADK991565
      IF p_zconf = 'X'.
        DELETE t_hdr WHERE zconfirm NE 'C'.
      ENDIF.
      CHECK NOT t_hdr[] IS INITIAL.
      SELECT   *
        FROM   zmsd_blinfo
        INTO   TABLE t_bl
         FOR   ALL ENTRIES IN t_hdr
       WHERE   zsammg = t_hdr-zsammg.
      SORT t_bl BY zsammg.
      SELECT   *
        FROM   zmsd_diheader
        INTO   TABLE t_di
         FOR   ALL ENTRIES IN t_hdr
       WHERE   zsammg = t_hdr-zsammg.
      SORT t_di BY zsammg.
    IF P_DET = 'X'. "MADK933361
      SELECT   *
        FROM   zmsd_freight_det
        INTO   TABLE t_det
         FOR   ALL ENTRIES IN t_hdr
       WHERE   zsammg  =  t_hdr-zsammg
       AND ZINVNO =  T_HDR-ZINVNO .                           "MADK991565
    SORT t_det BY zsammg zline.                            "MADK991565
       SORT T_DET BY ZSAMMG ZINVNO ZLINE.                     "MADK991565
    ENDIF. "MADK933361
    ENDFORM.
    FORM process.
      REFRESH t_data.
      CLEAR v_gsttotal.                                         "MADK933361
      LOOP AT t_hdr.
    Start of MADK933361
        CLEAR: v_target2.
        v_zsammg = t_hdr-zsammg.
        V_ZINVNO = T_HDR-ZINVNO.                                "MADK991565
       AT NEW zsammg.                                         "MADK991565
         AT NEW ZINVNO.                                         "MADK991565
          PERFORM get_gst_value.
        ENDAT.
    End of MADK933361
        PERFORM move_header.
        CHECK t_data-zccode IN s_zccode.
        IF p_det = 'X'.
    CSF Project Changes Starts   DEV34    MADK985782
        LOOP AT T_DET WHERE ZSAMMG = T_HDR-ZSAMMG..
          LOOP AT t_det WHERE zsammg = t_hdr-zsammg AND
                              zinvno = t_hdr-zinvno.
    CSF Project Changes Ends     DEV34    MADK985782
            PERFORM move_header.
            CHECK t_data-zccode IN s_zccode.
            MOVE-CORRESPONDING t_det TO t_data.
            t_data-zamountl = t_data-zamount * t_data-zexrate.
            APPEND t_data.
            CLEAR t_data.
          ENDLOOP.
        ELSE.
          APPEND t_data.
          CLEAR t_data.
        ENDIF.
        AT END OF zsammg.
          CLEAR v_gsttotal.
        ENDAT.
    *Start of changes for  IS090901289-PIA MADK991565
        AT END OF ZINVNO.
          CLEAR V_GSTTOTAL.
        ENDAT.
    *End of changes for  IS090901289-PIA MADK991565
      ENDLOOP.
    ENDFORM.
    FORM move_header.
      MOVE-CORRESPONDING t_hdr TO t_data.
      t_data-zttlamt = t_data-zttlamt + v_gsttotal.             "MADK933361
      t_data-waerk = 'SGD'.
      IF NOT t_hdr-aedat IS INITIAL.
        WRITE: t_hdr-aedat TO t_data-aedat.
      ELSE.
        CLEAR : t_data-aedat.
      ENDIF.
      READ TABLE t_bl WITH KEY zsammg = t_hdr-zsammg BINARY SEARCH.
      IF sy-subrc EQ 0.
      t_data-zccode  = t_bl-zccode.   "MADK991565
        T_DATA-ZCCODE = T_HDR-ZFCODE.   "MADK991565     
        IF NOT t_bl-zbldate IS INITIAL.
          WRITE: t_bl-zbldate TO t_data-zbldate.
        ENDIF.
        t_data-zbl     = t_bl-zbl.
        t_data-type    = 'DBL'.
      ELSE.
        READ TABLE t_di WITH KEY zsammg = t_hdr-zsammg BINARY SEARCH.
        IF sy-subrc EQ 0.
        t_data-zccode  = t_di-zdiforcode.     "MADK991565
          T_DATA-ZCCODE = T_HDR-ZFCODE.         "MADK991565
          t_data-type    = 'DI'.
        ENDIF.
      ENDIF.
    ENDFORM.
    FORM display.
      IF t_data[] IS INITIAL.
        MESSAGE s398(00) WITH 'No Data Selected'.
        EXIT.
      ENDIF.
      DATA : l_repid LIKE sy-repid.
      l_repid = sy-repid.
      REFRESH t_catalog.
      CLEAR   t_catalog.
      w_layout-cell_merge = 'X'.
      PERFORM map_fields.
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
           EXPORTING
                i_callback_program      = l_repid
                i_callback_user_command = 'ALV_USER_COMMAND'
                is_layout               = w_layout
                it_fieldcat             = t_catalog[]
                i_grid_title            = sy-title
                i_save                  = 'A'
                it_sort                 = t_sort[]
           TABLES
                t_outtab                = t_data
           EXCEPTIONS
                program_error           = 1
                OTHERS                  = 2.
      IF sy-subrc <> 0.
      ENDIF.
    ENDFORM.
    FORM map_fields.
    Sort Order
      CLEAR v_count.
      PERFORM sf USING 'ZDIDBL'   'X'  'X'.
    Fields to be displayed
      CLEAR v_count.
      IF p_hdr = 'X'.
        PERFORM af USING :
       DESCRIPTION       FIELD        LEN   RTABLE             RFIELD
        'DI/DBL         ' 'ZDIDBL'     '14' '                ' '        ',
        'Type           ' 'TYPE'       '04' '                ' '        ',
        'Forwarder Code ' 'ZCCODE'     '14' '                ' '        ',
        'BL Number      ' 'ZBL'        '14' '                ' '        ',
        'BL Date        ' 'ZBLDATE'    '10' '                ' '        ',
        'Invoice Number ' 'ZINVNO'     '15' '                ' '        ',
        'Extraction     ' 'ZSTATUS'    '05' 'ZMSD_FREIGHT_HDR' 'ZSTATUS ',
        'Freight Type   ' 'ZTYPE'      '05' 'ZMSD_FREIGHT_HDR' 'ZTYPE   ',
        'Confirmation   ' 'ZCONFIRM'   '05' 'ZMSD_FREIGHT_HDR' 'ZCONFIRM',
        'Confirm Date   ' 'ZCONFIRMDATE' '10' 'ZMSD_FREIGHT_HDR'
    'ZCONFIRMDATE',
        'Total Amount   ' 'ZTTLAMT'    '18' '                ' '        ',
        'Created On     ' 'ERDAT'      '10' '                ' '        ',
        'Created By     ' 'ERNAM'      '10' '                ' '        ',
        'Changed On     ' 'AEDAT'      '10' '                ' '        ',
        'Changed By     ' 'AENAM'      '10' '                ' '        '.
      ELSE.
        PERFORM af USING :
       DESCRIPTION         FIELD     LEN   RTABLE             RFIELD
        'DI/DBL           ' 'ZDIDBL'   '14' '                ' '        ',
        'Type             ' 'TYPE'     '04' '                ' '        ',
        'Forwarder Code   ' 'ZCCODE'   '14' '                ' '        ',
        'BL Number        ' 'ZBL'      '14' '                ' '        ',
        'BL Date          ' 'ZBLDATE'  '10' '                ' '        ',
        'Invoice Number   ' 'ZINVNO'   '15' '                ' '        ',
        'Extraction       ' 'ZSTATUS'  '05' 'ZMSD_FREIGHT_HDR' 'ZSTATUS ',
        'Freight Type     ' 'ZTYPE'    '05' 'ZMSD_FREIGHT_HDR' 'ZTYPE   ',
        'Confirmation     ' 'ZCONFIRM' '05' 'ZMSD_FREIGHT_HDR' 'ZCONFIRM',
        'Confirm Date     ' 'ZCONFIRMDATE' '10' 'ZMSD_FREIGHT_HDR'
    'ZCONFIRMDATE',
        'Total Amount     ' 'ZTTLAMT'  '18' '                ' '        ',
        'Freight Payment  ' 'ZFPTYPE'  '14' '                ' '        ',
        'Charge Code      ' 'ZCHRCODE' '10' '                ' '        ',
        'Currency         ' 'ZCURCODE' '08' '                ' '        ',
        'Quantity         ' 'ZQTY'     '13' '                ' '        ',
        'UoM              ' 'ZUOM'     '04' '                ' '        ',
        'Rate             ' 'ZRATE'    '15' '                ' '        ',
        'Amt(Foreign Curr)' 'ZAMOUNT'  '16' '                ' '        ',
        'Exchange Rate    ' 'ZEXRATE'  '13' '                ' '        ',
        'Amt(Local Curr)  ' 'ZAMOUNTL' '16' '                ' '        ',
        'Created On       ' 'ERDAT'    '10' '                ' '        ',
        'Created By       ' 'ERNAM'    '10' '                ' '        ',
        'Changed On       ' 'AEDAT'    '10' '                ' '        ',
        'Changed By       ' 'AENAM'    '10' '                ' '        '.
      ENDIF.
    ENDFORM.
    FORM af USING text
                  field
                  len
                  table
                  reffield.
      v_count = v_count + 1.
      w_catalog-col_pos       = v_count.
      w_catalog-fieldname     = field.
      w_catalog-ref_tabname   = table.
      w_catalog-ref_fieldname = reffield.
      w_catalog-seltext_s     = text.
      w_catalog-seltext_m     = text.
      w_catalog-seltext_l     = text.
      w_catalog-outputlen     = len.
      IF field = 'ZTTLAMT' OR field = 'ZAMOUNTL'.
        w_catalog-no_zero     = 'X'.
        w_catalog-cfieldname  = 'WAERK'.
        w_catalog-datatype    = 'CURR'.
      ENDIF.
    IF FIELD = 'ZRATE' OR FIELD = 'ZAMOUNT'.
      IF field = 'ZAMOUNT'.
        w_catalog-no_zero     = 'X'.
        w_catalog-cfieldname  = 'ZCURCODE'.
        w_catalog-datatype    = 'CURR'.
      ENDIF.
      IF field = 'ZQTY' OR field = 'ZRATE'.
        w_catalog-no_zero     = 'X'.
        w_catalog-datatype  =  'DEC'.
      ENDIF.
      APPEND w_catalog TO t_catalog.
      CLEAR  w_catalog.
    ENDFORM.
    FORM sf    USING   fieldname  sortup  group.
      v_count = v_count + 1.
      CLEAR w_sort.
      w_sort-fieldname = fieldname.
      w_sort-spos      = v_count.
      w_sort-up        = sortup.
      w_sort-group     = group.
      APPEND w_sort TO t_sort.
    ENDFORM.
    FORM alv_user_command USING  in_ucomm    LIKE sy-ucomm
                                 in_selfield TYPE slis_selfield.
      DATA: lfs_data LIKE t_data.
      IF in_ucomm = '&IC1'.
        READ TABLE t_data INDEX in_selfield-tabindex INTO lfs_data.
        CHECK NOT lfs_data-zdidbl IS INITIAL.
        IF lfs_data-type = 'DBL'.
          DATA: l_zdbl LIKE zmsd_diheader-zdinum.
          l_zdbl = in_selfield-value.
          EXPORT l_zdbl TO MEMORY ID 'VBL'.
          CALL TRANSACTION 'ZMSD_BL01'.
        ENDIF.
        IF lfs_data-type = 'DI'.
          DATA: v_dinum LIKE zmsd_diheader-zdinum.
          v_dinum = in_selfield-value.
          EXPORT v_dinum TO MEMORY ID 'VDI'.
          CALL TRANSACTION 'ZMSD_DI01'.
        ENDIF.
      ENDIF.
    ENDFORM.
    FORM get_gst_value.
      LOOP AT t_det WHERE zsammg = v_zsammg
         AND ZINVNO = V_ZINVNO.                              "MADK991565
        CHECK t_data-zccode IN s_zccode.
        t_det-zamount  = t_det-zamount * t_det-zexrate.
        SELECT SINGLE  y0mmtarget2
                INTO   v_target2
                FROM   y0mmipstranslate
                WHERE  y0mmdatatype = '70' AND
                       y0mmsource = t_det-zchrcode.
        SELECT SINGLE y0mmtarget1
               INTO   t_det-type
               FROM   y0mmipstranslate
               WHERE  y0mmdatatype = '76' AND
                      y0mmsource = v_target2.
        IF t_det-type NE '3Z'.
          v_gsttotal    = v_gsttotal +
                               ( t_det-zamount * 5 / 100 ).
        ENDIF.
      ENDLOOP.
    Regards,
    Raj.

    Hello,
    Following is the procedure to convert alv output to spool and then it to PDF Format.
    After we display the ALV, we can check whether it is running in the background using system field u2018sy-batchu2018. Then,we call an function module named u2018GET_JOB_RUNTIME_INFOu2019 to get the current job information. Then go to spool request table tbtcp to get the spool id.
    Get current job details
      CALL FUNCTION u2018GET_JOB_RUNTIME_INFOu2019
           IMPORTING
                eventid                 = gd_eventid
                eventparm               = gd_eventparm
                external_program_active = gd_external_program_active
                jobcount                = gd_jobcount
                jobname                 = gd_jobname
                stepcount               = gd_stepcount
           EXCEPTIONS
                no_runtime_info         = 1
                OTHERS                  = 2.
    SELECT * FROM  tbtcp
                     INTO TABLE it_tbtcp
                     WHERE      jobname     = gd_jobname
                               AND jobcount = gd_jobcount
                               AND stepcount = gd_stepcount
                               AND listident <> u20180000000000u2032
                               ORDER BY   jobname
                                                   jobcount
                                                   stepcount.
      READ TABLE it_tbtcp INTO wa_tbtcp INDEX 1.
    Finally, we can call function module u2018CONVERT_ABAPSPOOLJOB_2_PDFu2018 to convert spool reqeust(which is stored in OTF format) to PDF format. Then we can call either function module u2018SO_DOCUMENT_SEND_API1u2032 or SAP BCS (Business Communication Service) to send the pdf as an email attachment.
    CALL FUNCTION u2018CONVERT_ABAPSPOOLJOB_2_PDFu2019
           EXPORTING
                src_spoolid              = gd_spool_nr
                no_dialog                = c_no
                dst_device               = c_device
           IMPORTING
                pdf_bytecount = gd_bytecount
           TABLES
                pdf = it_pdf_output
           EXCEPTIONS
                err_no_abap_spooljob     = 1
                err_no_spooljob          = 2
                err_no_permission        = 3
                err_conv_not_possible    = 4
                err_bad_destdevice       = 5
                user_cancelled           = 6
                err_spoolerror           = 7
                err_temseerror           = 8
                err_btcjob_open_failed   = 9
                err_btcjob_submit_failed = 10
                err_btcjob_close_failed  = 11
                OTHERS                   = 12.
    Regards,
    Sayali
    Edited by: Sayali Paradkar on Apr 20, 2010 12:51 PM

  • Page-break in alv background job for alv output variant not coming correctl

    Hi,
    I have created an ALV grid report. When i run the report in background i get the output with correct page-break on FIELD1. Now when i run the report in background with an "ALV output variant" (its the ALV variant that controls the fields display in the output; this is not the program variant), i do not get the page-break on FIELD1.  I have already build the sort criteria and using:
    gs_sort-group = '* '.     "New-Page
    Please let me know what could be reason for not getting the page-break in background when i am using the alv output variant and how do i correct this problem.
    Regards,
    Rakesh

    Hello Everyone,
    I have solved the problem. While running the program in background, we get the page-breaks when we use the below part of code in the sort catalogue with the condition that the program variant should not use any ALV layout variant.
    gs_sort-group = '* '.     "New-Page
    If you are using the ALV layout variant in the program variant then we can check the ROWPOS, COLPOS, and NO_OUT for that ALV layout variant and pass them along in the fieldcatalog table. You should be careful with not to pass the layout variant in the DISVARIANT. You can notice that i have cleared it and simply passing the program name into that.
    *C-- Process separately for jobs running in Background. Actually
    *C-- sortcat-group solves the problem only in Foreground. In background
    *C-- when ALV layout variant is not selected then it works otherwise it
    *C-- fails. So for background jobs we are reading the fieldcat and then
    *C-- passing the same in the display FM.
      IF sy-batch = 'X'.
        CALL FUNCTION 'REUSE_ALV_VARIANT_SELECT'
          EXPORTING
           i_dialog                  = ' '
           i_user_specific           = ' '
           i_default                 = ' '
    *   I_TABNAME_HEADER          =
    *   I_TABNAME_ITEM            =
            it_default_fieldcat       = gt_fieldcat
            i_layout                  = gs_layout
    *   I_BYPASSING_BUFFER        =
    *   I_BUFFER_ACTIVE           =
         IMPORTING
    *   E_EXIT                    =
           et_fieldcat               = lt_fieldcat
    *     et_sort                   = gt_sort[]
    *   ET_FILTER                 =
    *     es_layout                 = gs_layout
         CHANGING
           cs_variant                = gs_disvariant
         EXCEPTIONS
           wrong_input               = 1
           fc_not_complete           = 2
           not_found                 = 3
           program_error             = 4
           OTHERS                    = 5
        IF sy-subrc <> 0.
    * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    *         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
        ENDIF.
        CLEAR gs_fieldcat.
        LOOP AT gt_fieldcat INTO gs_fieldcat.
    *C-- Transfer all position changes to gt_fieldcat from lt_fieldcat
          CLEAR ls_fieldcat.
          READ TABLE lt_fieldcat
                INTO ls_fieldcat
                WITH KEY fieldname = gs_fieldcat-fieldname.
          IF sy-subrc = 0.
            gs_fieldcat-row_pos = ls_fieldcat-row_pos.
            gs_fieldcat-col_pos = ls_fieldcat-col_pos.
            gs_fieldcat-no_out = ls_fieldcat-no_out.
            MODIFY gt_fieldcat FROM gs_fieldcat INDEX sy-tabix.
            CLEAR gs_fieldcat.
          ENDIF.
        ENDLOOP.
    *C-- Clear the disvariant for the background job as it contains the ALV
    *C-- layout varinat
        CLEAR gs_disvariant.
        gs_disvariant-report = 'ZGPPMP0001'.
    Then pass gt_fieldcat to 'REUSE_ALV_GRID_DISPLAY'.
    The reason i'm doing it this way is that when we pass the layout variant name, the contents in gt_fieldcat were getting modified.
    One more thing i'd like to point out is that that, i tried to delete the fields with no_out = 'x'. Now when i ran the program in background with all the fields in sort catalog (suppose there are 2 fields field1 and field2) also in fieldcatalog it ran fine. In the next run in background i removed one of the fields in sort catalog from the fieldcatalog (delete the fields with no_out = 'x') and i got dump. Basically i had hidden field1 and so the code which was deleting fields with no_out = 'x' deleted this field from gt_fieldcat. So basically we should not delete fields with no_out = 'x'.
    I was getting ABAP runtime errors    MESSAGE_TYPE_X in the following part of the standard code.
    000310     LOOP AT CT_SORT INTO LS_SORT.
    000320
    000330       READ TABLE IT_FIELDCAT ASSIGNING <LS_FIELDCAT>
    000340            WITH KEY FIELDNAME = LS_SORT-FIELDNAME BINARY SEARCH.
    000350       IF SY-SUBRC NE 0.
         >         MESSAGE X000(0K).
    000370       ENDIF.
    000380
    000390       LS_SORT-SELTEXT = <LS_FIELDCAT>-SELTEXT.
    i have just mentioned this part because when i checked the forum many people were getting such errors "MESSAGE_TYPE_X". This could also be one of the reasons.

  • ALV output problem in displaying the field lengths.( LONG_DES1 & LONG DES)

    I have  declared itab of ALV output like below...
    Internal table for ALV report generation***********
    DATA : Begin of pdet_otab_alv occurs 0,
            bukrs LIKE bsid-bukrs, "Company code
            postm(4),              "Posting month (YYMM format)
            xblnr LIKE bsid-xblnr, "Reference document number
            kunnr LIKE bsid-kunnr, "Customer (Supplier Billing Customer)
            name1 LIKE kna1-name1,                              "Name 1
            buzei like bsid-buzei,
            gjahr like bsid-gjahr,
            filkd like bsid-filkd, "Rep Number
            rname like kna1-name1, "Rep Name
            belnr LIKE bsid-belnr, "Document number (invoice number)
            blart LIKE bsid-blart, "Document type
            zfbdt LIKE bsid-zfbdt, "Baseline date
            zterm LIKE knb1-zterm, "Terms
            netdt LIKE bsega-netdt,"Due date
            sgtxt LIKE bsid-sgtxt, "Text
            agerg TYPE t_agerg,    "Age range of invoice
            wrbtr LIKE bsid-wrbtr, "Original invoice amount
            due   LIKE bsid-wrbtr, "Amount outstanding on invoice
           long_des(250) type c,   " Long description
    <b>            long_des  TYPE string,
                long_des1 TYPE string,</b>      
          date_s(10) type c,  " Date
            short_des(20) type c,  " Short Description
            counter type i,
           End of pdet_otab_alv.
    And after filling the internal table fields ( fields 'LONG_DES1' & 'LONG_DES'  from FM READ_TEXT 's longtext, which are  of 265 chars each )
    <b>'LONG_DES1' & 'LONG_DES' are trimmed  in ALV out put  WHY ?</b>
      w_fieldcat-fieldname = 'LONG_DES1'.
      w_fieldcat-tabname   = 'PDEL_OTAB_ALV'.
    w_fieldcat-ref_fieldname = 'SCRTEXT_L'.
    w_fieldcat-ref_tabname   = 'DD03P'.
      w_fieldcat-seltext_l = 'Original Note'.
      w_fieldcat-col_pos   = 17.
      APPEND w_fieldcat TO fieldcat.
      CLEAR w_fieldcat.
      w_fieldcat-fieldname = 'LONG_DES'.
      w_fieldcat-tabname   =  'PDEL_OTAB_ALV'.
    w_fieldcat-ref_fieldname = 'SCRTEXT_L'.
    w_fieldcat-ref_tabname   = 'DD03P'.
      w_fieldcat-seltext_l = 'Latest Note'.
      w_fieldcat-col_pos   = 18.
      APPEND w_fieldcat TO fieldcat.
      CLEAR w_fieldcat.
    <b>next part i.e.,   before passing fieldcat.... I have filled s_layout like below.</b>
    <b>  s_layout-max_linesize = 1000.
      s_layout-colwidth_optimize = 'X'.</b>
    Call the following function to display output in ALV form
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
           EXPORTING
                i_callback_program = 'ZFRSBOI0'
                is_layout          = s_layout
                it_fieldcat        = fieldcat
                it_events          = p_events[]
               it_sort            = p_it_sort[]
                i_save             = 'A'
           TABLES
                t_outtab           = pdet_otab_alv1
           EXCEPTIONS
                program_error      = 1
                OTHERS             = 2.
    If the function call is not successful, raise error message
    and come out from the program
      IF sy-subrc <> 0.
        message e000(00) with
                          'Unable to display report'(e01).
        exit.
      ENDIF.

    some body suggested me....we can display full length of text by below coding ?
    Is that not correct - just asking....
    s_layout-max_linesize = 1000.
    s_layout-colwidth_optimize = 'X'.
    Call the following function to display output in ALV form
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
    i_callback_program = 'ZFRSBOI0'
    is_layout = s_layout
    it_fieldcat = fieldcat
    it_events = p_events[]
    it_sort = p_it_sort[]
    i_save = 'A'
    TABLES
    t_outtab = pdet_otab_alv1
    EXCEPTIONS
    program_error = 1
    OTHERS = 2.
    If the function call is not successful, raise error message
    and come out from the program
    IF sy-subrc <> 0.
    message e000(00) with
    'Unable to display report'(e01).
    exit.
    ENDIF.

  • How to get check box in alv output

    hi gurus
    can anyone explian me how to get check box in alv output
    it should not be a pop up window
    i want to get in output itself
    tahnk you
    regards
    kals.

    Hi
    by using rs_selfield
    ty to call dynamic subroutine..
    FORM user_command USING r_ucomm LIKE sy-ucomm
    rs_selfield TYPE slis_selfield. "#EC CALLED
    read table rs-selfield with key cond = 'X'
    endform.
    see the below example
    REPORT Z_GET_REFRESH no standard page heading.
    type-pools : slis.
    tables : makt,
    mara.
    data : i_fieldcat type slis_t_fieldcat_alv.
    CONSTANTS :
    gc_refresh TYPE syucomm VALUE '&REFRESH'.
    data : begin of i_makt occurs 0,
    matnr like makt-matnr,
    maktx like makt-maktx,
    end of i_makt.
    data : v_repid like sy-repid,
    g_user_command type slis_formname value 'USER_COMMAND',
    g_status_set type slis_formname value 'SET_PF_STATUS',
    lt_event_exit TYPE slis_t_event_exit,
    ls_event_exit TYPE slis_event_exit.
    DATA:LC_GLAY TYPE LVC_S_GLAY.
    select-options s_matnr for mara-matnr .
    start-of-selection.
    select matnr maktx from makt into table i_makt
    where matnr in s_matnr.
    end-of-selection.
    Fill the fieldcatlog
    perform fill_field.
    Call the FM
    perform call_fm.
    *& Form fill_field
    text
    --> p1 text
    <-- p2 text
    FORM fill_field.
    data wa_fieldcat type slis_fieldcat_alv.
    clear : wa_fieldcat.
    wa_fieldcat-tabname = 'I_MAKT'.
    wa_fieldcat-fieldname = 'MATNR'.
    wa_fieldcat-outputlen = '18'.
    wa_fieldcat-seltext_l = 'Material #'.
    wa_fieldcat-col_pos = '1'.
    append wa_fieldcat to i_fieldcat.
    clear : wa_fieldcat.
    wa_fieldcat-tabname = 'I_MAKT'.
    wa_fieldcat-fieldname = 'MAKTX'.
    wa_fieldcat-outputlen = '40'.
    wa_fieldcat-seltext_l = 'Material Desc'.
    wa_fieldcat-col_pos = '2'.
    append wa_fieldcat to i_fieldcat.
    ENDFORM. " fill_field
    *& Form call_fm
    text
    --> p1 text
    <-- p2 text
    FORM call_fm.
    v_repid = sy-repid.
    LC_GLAY-EDT_CLL_CB = 'X'.
    CLEAR ls_event_exit.
    ls_event_exit-ucomm = gc_refresh. " Refresh
    ls_event_exit-after = 'X'.
    APPEND ls_event_exit TO lt_event_exit.
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
    I_INTERFACE_CHECK = ' '
    I_BYPASSING_BUFFER =
    I_BUFFER_ACTIVE = ' '
    I_CALLBACK_PROGRAM = v_repid
    I_CALLBACK_PF_STATUS_SET = g_status_set
    I_CALLBACK_USER_COMMAND = g_user_command
    I_CALLBACK_TOP_OF_PAGE = ' '
    I_CALLBACK_HTML_TOP_OF_PAGE = ' '
    I_CALLBACK_HTML_END_OF_LIST = ' '
    I_STRUCTURE_NAME =
    I_BACKGROUND_ID = ' '
    I_GRID_TITLE =
    I_GRID_SETTINGS = LC_GLAY
    IS_LAYOUT =
    IT_FIELDCAT = i_fieldcat
    IT_EXCLUDING =
    IT_SPECIAL_GROUPS =
    IT_SORT =
    IT_FILTER =
    IS_SEL_HIDE =
    I_DEFAULT = 'X'
    I_SAVE = ' '
    IS_VARIANT =
    IT_EVENTS =
    IT_EVENT_EXIT = lt_event_exit
    IS_PRINT =
    IS_REPREP_ID =
    I_SCREEN_START_COLUMN = 0
    I_SCREEN_START_LINE = 0
    I_SCREEN_END_COLUMN = 0
    I_SCREEN_END_LINE = 0
    IT_ALV_GRAPHICS =
    IT_ADD_FIELDCAT =
    IT_HYPERLINK =
    I_HTML_HEIGHT_TOP =
    I_HTML_HEIGHT_END =
    IT_EXCEPT_QINFO =
    IMPORTING
    E_EXIT_CAUSED_BY_CALLER =
    ES_EXIT_CAUSED_BY_USER =
    TABLES
    T_OUTTAB = i_makt
    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. " call_fm
    FORM USER_COMMAND *
    FORM user_command USING r_ucomm LIKE sy-ucomm
    rs_selfield TYPE slis_selfield. "#EC CALLED
    data i_RSPARAMS like RSPARAMS occurs 0.
    CASE R_UCOMM.
    WHEN '&IC1'.
    read table i_makt index rs_selfield-tabindex.
    SET PARAMETER ID 'MAT' FIELD i_makt-matnr.
    if not i_makt-matnr is initial.
    call transaction 'MM02' and skip first screen.
    endif.
    when '&REFRESH'.
    CALL FUNCTION 'RS_REFRESH_FROM_SELECTOPTIONS'
    EXPORTING
    CURR_REPORT = v_repid
    IMPORTING
    SP =
    TABLES
    SELECTION_TABLE = i_RSPARAMS
    EXCEPTIONS
    NOT_FOUND = 1
    NO_REPORT = 2
    OTHERS = 3
    IF SY-SUBRC 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    submit z_get_refresh with selection-table i_RSPARAMS.
    rs_selfield-refresh = 'X'.
    ENDCASE.
    MOVE '&REFRESH' TO r_ucomm.
    ENDFORM.
    FORM set_pf_status *
    FORM SET_PF_STATUS USING rt_extab TYPE slis_t_extab.
    DELETE Rt_extab WHERE fcode = gc_refresh.
    SET PF-STATUS 'STANDARD_FULLSCREEN' OF PROGRAM 'SAPLKKBL'
    EXCLUDING Rt_extab.
    *SET PF-STATUS 'STANDARD' EXCLUDING rt_extab.
    SET TITLEBAR sy-tcode.
    ENDFORM.

  • Clearing of ALV output is not happening in one side of the output.

    Hi All,
    I have created a simple upload program and using a Post button I am posting the Material Document. I have uploaded the file, I am using a ALV splitter to display the output ( Line Item in left panel and Message log in the right panel).
    If I upload another Excel file on the same screen, and click on 'Upload' button, left panel is getting refreshed with new set of line items whereas in the Right Panel Message Log details of First uploaded file is present, it is not getting refreshed.
    I used Free(), Refresh and Refresh_Table_dsiplay keywords to clear it, but its not working.
    In debug mode, If I see the internal table which is used to store the Message Log Details is empty, but the message is still present in the ALV output for newly uploaded file.
    Kindly give your valuable inputs.
    Thanks & Regards,
    Karthikeyan G.

    Hello Karthikeyan G,
    have you tried to cl_gui_cfw=>flush after your Refresh_Table_Display?
    Also,when you write ALV splitter, did you use easy-splitter or the regular splitter container?
    You ran the methods against the correct instance, right
    Hope that helps,
    Frank.

  • Need to sent alv output as html or as pdf attachment in mail

    +Hello
    I want to send an ALV output as attachement in html or as pdf format. how to do that? line size is greater than 600(nearly 40 fields).
    +please help me in this query.
    Regards
    Guruvayurappan
    Moderator Message: Please search before posting your question. Thread locked.
    Edited by: Suhas Saha on Dec 29, 2011 4:57 PM

    Hi,
    For sending the ALV output as PDF attachment, you can create a spool (proper page size in print parameters) and convert the spool to PDF using the FM CONVERT_ABAPSPOOLJOB_2_PDF and then send the same as attachment in mail.
    For send the data as HTML attachment, try the below FMs
    WWW_ITAB_TO_HTML_HEADERS & WWW_ITAB_TO_HTML_LAYOUT to create the HTML layout
    WWW_ITAB_TO_HTML to create the HTML for the actual data.
    Hope this helps you.
    Regards,
    Sachinkumar Mehta

  • How to pass custom search help(F4 help) for a field in ALV output?

    Hi,
    I want to activate the F4 help in ALV output for a field for which we do not have search help assigned at table ,data element and domain level.
    In field catalog i have enabled it by below line.
    ls_fcat-F4AVAILABL = 'X'.
    but because there are no standard input help available it is giving message as "No input help is available".
    so how to pass our custom search help (g_search) for any field in ALV output.
    I am using object oriented ALV grid display.
    Thanks!!!
    Rajesh Gupta.

    hi,
    check this out:
    http://www.sdn.sap.com/irj/scn/index?rid=/library/uuid/b3d5e890-0201-0010-c0ac-bba85ec2ae8d
    http://www.sdn.sap.com/irj/scn/index?rid=/library/uuid/acdefb13-0701-0010-f1a2-8eeefa7d3780
    http://www.sdn.sap.com/irj/scn/go/portal/prtroot/docs/library/uuid/b3d5e890-0201-0010-c0ac-bba85ec2ae8d?quicklink=index&overridelayout=true

  • Error in ALV output

    Hi All,
    I am getting a runtime error in output while i try to do sum in ALV output.
    In my ouput table i want to do sum for below feilds those are defined in output table :
    CURR TYPE P DECIMALS 2,         
    B30 TYPE  P DECIMALS 2,        
    B60 TYPE P DECIMALS 2,         
    B90 TYPE P DECIMALS 2,       
    B120 TYPE P DECIMALS 2,        
    BG121 TYPE P DECIMALS 2,
    i defined feildcatalog as below:
    WA_FIELDCAT-FIELDNAME = 'B60'.
    WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
    WA_FIELDCAT-SELTEXT_L = TEXT-033.
    WA_FIELDCAT-DO_SUM = 'X' .
      WA_FIELDCAT-OUTPUTLEN = 17.
      WA_FIELDCAT-DATATYPE = 'DEC'.
      APPEND WA_FIELDCAT TO IT_FIELDCAT.
      CLEAR  WA_FIELDCAT.
    even if i try to download the ouput feilds in file,then also i am getting a run time error as field symbols are not assign,
    Please help.
    Thanks and Regards,
    Mohit

    Hi,
    I am getting a dump that cause of  by a message type (X).Same i get if i try to download the file.
    My ouput internal table is as below:
    data:BEGIN OF IT_FINAL occurs 0,
          BUKRS TYPE BUKRS,               "Company code
          KUNNR TYPE KUNNR,               "Customer number
          NAME1 TYPE NAME1,               "Name
          BILL_TO TYPE KUNNR,              "Bill To
          BILL_NAME TYPE NAME1,           "Bill To Name
          BRANCH TYPE FILKD,              "Branch
          BRANCH_NAME TYPE NAME1,         "Branch Name
          BRANCH_REGION TYPE REGIO,      "Region
          BRANCH_CITY TYPE ORT01,        "City
          BELNR TYPE BELNR,              "Accounting Document Number
          ACC_CLK_SOLD  TYPE BUSAB,       "A/C Clerk Sold To
          ACC_CLK_SOLD_NAME TYPE SNAME,  "A/C Name
          ACC_CLK_PAYER TYPE BUSAB,      "A/C Payer
          ACC_CLK_PAYER_NAME TYPE BUSAB,  "A/C Payer Name
          ASM_PART  TYPE  KUNN2,          "ASM Partner
          ASM_NAME TYPE   NAME1,          "ASM Name
          DUNNING TYPE BUSAB,             "Dunning Clerk
          KATR4 TYPE KATR4,               "Local /National Account
          ZUONR TYPE DZUONR,              "Assingment Number
          REFERENCE TYPE XBLNR,           "Reference
          XREF1  TYPE  XREF1,             "Ref Key1
          XREF2  TYPE  XREF2,             "Ref Key2
          XREF3  TYPE  XREF3,             "Ref Key3,
          SGTXT     TYPE SGTXT,           "Item Text
          DUE_DATE  TYPE SY-DATUM,        "Due Date
          DOC_DATE  TYPE BLDAT,           "Doc Date
          BILL_DOC_NO TYPE VBELN,         "Billing Doc Number
          ZTERM TYPE  DZTERM,              "Terms
          HKONT TYPE HKONT,               "Gl Account
          CURR TYPE P DECIMALS 2,         "Current Balance
          B30 TYPE  P DECIMALS 2,         "1-30
          B60 TYPE P DECIMALS 2,          "32-60
          B90 TYPE P DECIMALS 2,          "61-90
          B120 TYPE P DECIMALS 2,         "91-120
          BG121 TYPE P DECIMALS 2,        " >121
          BAL TYPE p DECIMALS 2,          "Balance
          P_CURR TYPE CHAR10,       "Current Percentage
          PB30 TYPE CHAR10,         "1-30 %
          PB60 TYPE CHAR10,         "32-60 Percentage
          PB90 TYPE CHAR10,         "61-90 Percentage
          PB120 TYPE CHAR10,        "91-120 Percentage
          PBG121 TYPE CHAR10,       ">121 %
          END OF it_final..
    My fieldcatalog is below:
    WA_FIELDCAT-FIELDNAME = 'BUKRS'.
        WA_FIELDCAT-TABNAME   =  'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L =   TEXT-004.
        WA_FIELDCAT-OUTPUTLEN = 12.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'KUNNR'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-005.
        WA_FIELDCAT-OUTPUTLEN = 10.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'NAME1'.
        WA_FIELDCAT-TABNAME   =  'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L =  TEXT-006.
        WA_FIELDCAT-OUTPUTLEN = 30.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'BILL_TO'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-007.
        WA_FIELDCAT-OUTPUTLEN = 10.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'BILL_NAME'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-008.
        WA_FIELDCAT-OUTPUTLEN = 30.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'BRANCH'  .
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-009.
        WA_FIELDCAT-OUTPUTLEN = 10.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'BRANCH_NAME'  .
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-043.
        WA_FIELDCAT-OUTPUTLEN = 30.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'BRANCH_REGION'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L =  TEXT-010.
        WA_FIELDCAT-OUTPUTLEN = 8.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'BRANCH_CITY'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-011.
        WA_FIELDCAT-OUTPUTLEN = 12.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'BELNR'  .
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-012.
        WA_FIELDCAT-OUTPUTLEN = 11.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'ACC_CLK_SOLD'  .
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-013.
        WA_FIELDCAT-OUTPUTLEN = 10.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'ACC_CLK_SOLD_NAME'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-014.
        WA_FIELDCAT-OUTPUTLEN = 30.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'ACC_CLK_PAYER' .
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L =  TEXT-015.
        WA_FIELDCAT-OUTPUTLEN = 10.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'ACC_CLK_PAYER_NAME'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L =  TEXT-016.
        WA_FIELDCAT-OUTPUTLEN = 30.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'ASM_PART'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-017.
        WA_FIELDCAT-OUTPUTLEN = 10.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'ASM_NAME'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-018.
        WA_FIELDCAT-OUTPUTLEN = 30.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'DUNNING' .
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-019.
        WA_FIELDCAT-OUTPUTLEN = 10.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'KATR4'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-020.
        WA_FIELDCAT-OUTPUTLEN = 2.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'ZUONR'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-044.
        WA_FIELDCAT-OUTPUTLEN = 18.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'REFERENCE'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-021.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'XREF1'  .
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-022.
        WA_FIELDCAT-OUTPUTLEN = 12.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'XREF2'  .
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-023.
        WA_FIELDCAT-OUTPUTLEN = 12.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'XREF3'  .
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-024.
        WA_FIELDCAT-OUTPUTLEN = 12.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'SGTXT'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-025.
        WA_FIELDCAT-OUTPUTLEN = 50.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'DUE_DATE'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-026.
        WA_FIELDCAT-OUTPUTLEN = 10.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'DOC_DATE'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-027.
        WA_FIELDCAT-OUTPUTLEN = 10.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'BILL_DOC_NO'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-028.
        WA_FIELDCAT-OUTPUTLEN = 15.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'ZTERM'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-029.
        WA_FIELDCAT-OUTPUTLEN = 5.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'HKONT'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-030.
        WA_FIELDCAT-OUTPUTLEN = 11.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'CURR'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-031.
       WA_FIELDCAT-OUTPUTLEN = 17.
        WA_FIELDCAT-DO_SUM = 'X' .
        WA_FIELDCAT-DATATYPE = 'DEC'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'B30'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-032.
        WA_FIELDCAT-DO_SUM = 'X' .
       WA_FIELDCAT-OUTPUTLEN = 17.
        WA_FIELDCAT-DATATYPE = 'DEC'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'B60'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-033.
        WA_FIELDCAT-DO_SUM = 'X' .
       WA_FIELDCAT-OUTPUTLEN = 17.
        WA_FIELDCAT-DATATYPE = 'DEC'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'B90'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-034.
        WA_FIELDCAT-DO_SUM = 'X' .
       WA_FIELDCAT-OUTPUTLEN = 17.
        WA_FIELDCAT-DATATYPE = 'DEC'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'B120'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-035.
        WA_FIELDCAT-DO_SUM = 'X' .
       WA_FIELDCAT-OUTPUTLEN = 17.
        WA_FIELDCAT-DATATYPE = 'DEC'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'BG121'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-036.
        WA_FIELDCAT-DO_SUM = 'X' .
       WA_FIELDCAT-OUTPUTLEN = 17.
        WA_FIELDCAT-DATATYPE = 'DEC'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'BAL'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-045.
        WA_FIELDCAT-DO_SUM = 'X' .
       WA_FIELDCAT-OUTPUTLEN = 17.
        WA_FIELDCAT-DATATYPE = 'DEC'.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'P_CURR'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-037.
        WA_FIELDCAT-OUTPUTLEN = 17.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'PB30'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-038.
        WA_FIELDCAT-OUTPUTLEN = 17.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'PB60'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-039.
        WA_FIELDCAT-OUTPUTLEN = 17.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'PB90'.
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-040.
        WA_FIELDCAT-OUTPUTLEN = 17.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'PB120' .
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-041.
        WA_FIELDCAT-OUTPUTLEN = 17.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
        WA_FIELDCAT-FIELDNAME = 'PBG120' .
        WA_FIELDCAT-TABNAME   = 'IT_FINAL'.
        WA_FIELDCAT-SELTEXT_L = TEXT-042.
        WA_FIELDCAT-OUTPUTLEN = 17.
        APPEND WA_FIELDCAT TO IT_FIELDCAT.
        CLEAR  WA_FIELDCAT.
         Please help.
    Thanks
    Mohit

  • How to  send ALV output data into Excel sheet format via Mail to the user?

    Hi friends,
    I have a doubt ie,
    How to  send ALV output data into Excel sheet format via Mail to the user?
    regards
    Moosa

    Hi,
    Provide the output internal table to the objbin in the below FM
    Send Message
      CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
           EXPORTING
                document_data              = i_docdata
                put_in_outbox              = c_x
           TABLES
                packing_list               = i_objpack
                object_header              = i_objhead
                contents_bin               = i_objbin
                contents_txt               = i_objtxt
                receivers                  = i_reclist
    and specify the document type
      i_objpack-doc_type   = 'XLS'.
    and try.
    Regards,
    Nandha

Maybe you are looking for

  • How to create a z-tcode for a report in FSI3 transaction

    hi friends,           i want to create a z tcode for a report in FSI3 transaction, i have copied the program of the report and created a tcode in se93, but some more tabs are getting displayed in selection screen when im executing my Z Tcode, and rep

  • Duplicate invoice. Query help needed

    Hi All, We need to build a query which addresses the following condition Some of the invoices were created against the wrong vendors and that money needs to be recovered. Some of them are already recovered while some are not * list out all the duplic

  • Automatic power on when AC is switched on?

    I've added a UPS, but this means there are now two buttons to press to get started; the UPS power button and the Mac mini power button. How can I configure the Mac mini firmware to power on automatically when the AC is switched from off to on? I've a

  • How do I multiply a cell depending on which check box

    I have a number in cell C17 and need to multiply by 1 or 2 or 3 depending on whether there's a check in cell C11 (*1), C12 (*2) or C13 (*3) Can any one tell me how to do this, please? Also, is it possible to have only one box checked at any one time?

  • Where to get license key for SAP Netweaver ABAP 7.01 trail version?

    Hi All, I installed SAP Netweaver ABAP 7.01 trail version on my PC but I don't know where to get the license key and how to install it. Please guide me.