Error on ALV Sum

Hi Expert,
I have created a ALV like this,
FORM fill_fieldcat USING i_fieldcat TYPE slis_t_fieldcat_alv .
CLEAR wa_fieldcat.
REFRESH : i_fieldcat.
    PERFORM fill_fields USING :
                 'COUNT'        'SR.NO.'                             ' ',
                 'VBELN'        'LOADING MEMO NO'         ' ',
                 'BLDAT'        'DATE'                                ' ',
                 'TRAID'        'TRUCK NO'                         ' ',
                 'LFIMG'        'QUANTITY'                         'X',
                'VTEXT'        'TRANS.DESC.'                      ' '.
FORM fill_fields CHANGING value(f_field)
                           value(f_fdesc)
                           value(do_sum).
ADD 1 TO sr.
wa_fieldcat-col_pos    = sr.
wa_fieldcat-row_pos    = 1.
wa_fieldcat-tabname    = 'git_fchl'.
wa_fieldcat-just       = 'l' .
wa_fieldcat-do_sum     = do_sum.
APPEND wa_fieldcat TO i_fieldcat.
CLEAR wa_fieldcat.
ENDFORM.                    " fill_fields
I have to do this for doing grand total and sub total. but when i run this it given a error.
Error analysis
    Short text of error message:
    Long text of error message:
    Technical information about the message:
    Message class....... "0K"
    Number.............. 000
    Variable 1.......... " "
    Variable 2.......... " "
    Variable 3.......... " "
    Variable 4.......... " "
Please help me in this regards ..
Regards,
Shri

I think what you have obviously missed is fieldname in fieldcatalog + data type for each field. This can be taken from the tablename field you have, but it must be provided in uppercase. So, basically it should look like:
wa_fieldcat-fieldname = "NAME_OF_FIELD_IN_UPPERCASE".
wa_fieldcat-tabname = "NAME_OF_TAB_IN_UPPERCASE".
Cheers
Marcin

Similar Messages

Runtime Error in ALV Totaling.

Dear Friends
i am getting run time error in ALV while pressing sum button.
my alv code as follows
FIELDCATALOG-FIELDNAME   = 'DMBTR'.
FIELDCATALOG-SELTEXT_M   = 'Amount'.
FIELDCATALOG-COL_POS     = 1.
FIELDCATALOG-ref_fieldname = 'WAERS'.
FIELDCATALOG-DO_SUM      = 'X'.        "Display column total
FIELDCATALOG-ref_tabname = 'BKPF'.
FIELDCATALOG-DATATYPE     = 'CURR'.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
I have tried all possibilities but did not get the solution...
if anything left let me know
thank you
Avirat Patel

Dear Ravi
Thank you .. i am able to trace out my problem
the problem with this code
FIELDCATALOG-FIELDNAME   = 'AUGBL'.
FIELDCATALOG-SELTEXT_M   = 'Clearing Doc.No'.
FIELDCATALOG-COL_POS     = 1.
FIELDCATALOG-DO_SUM      = 'X'.        "Display column total
FIELDCATALOG-DATATYPE     = 'CURR'.
APPEND FIELDCATALOG TO FIELDCATALOG.
CLEAR FIELDCATALOG.
i am getting an error with this code
how can i able to display this field in alv column.?
- Avirat Patel
*SORRY FRIENDS I HAVE NOT DECLARED MENTIONED VARIABLE IN INTERNAL TABLE ITSELF SO THAT
I AM GETTING ERROR.*
problem has been resolved..
thank you.
Edited by: Corrtech on Dec 19, 2011 1:05 PM

ALV sums of lines depending on value of field of the line?

Hi,
We have an ALV and would like to get the sums depending on the value of a field of each line.
For example: imagine we have an ALV, and there are two kinds of lines: one have a counter=1, and others have a counter=2. Is it possible to receive two totals in the ALV, one for the lines that have counter=1, and one for the lines that have counter=2? And that when a filter is being applied, the sums change automatically?
Thx!

Hi,
Please the below code which ill help to change the subtotal text, you need do manula total and replace with the wa of the subtotal with you calculated sum. In the below code i replaced a break point where you need to add your coding
*& Report Z_ALV_SUBTOTAL
REPORT Z_ALV_SUBTOTAL.
*& Table declaration
TABLES: EKKO.
*& Type pool declaration
TYPE-POOLS: SLIS. " Type pool for ALV
*& Selection screen
SELECT-OPTIONS: S_EBELN FOR EKKO-EBELN.
*& Type declaration
*Type declaration for internal table to store EKPO data
TYPES: BEGIN OF X_DATA,
       EBELN TYPE CHAR30, " Document no.
       EBELP TYPE EBELP,   " Item no
       MATNR TYPE MATNR,   " Material no
       MATNR1 TYPE MATNR,   " Material no
       WERKS TYPE WERKS_D, " Plant
       WERKS1 TYPE WERKS_D, " Plant
       NTGEW TYPE ENTGE,   " Net weight
       GEWE   TYPE EGEWE,   " Unit of weight
       END OF X_DATA.
*& Internal table declaration
DATA:
     * INTERNAL TABLE TO STORE EKPO      DATA
I_EKPO TYPE STANDARD TABLE OF X_DATA INITIAL SIZE 0,
Internal table for storing field catalog information
I_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
Internal table for Top of Page info. in ALV Display
I_ALV_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER,
Internal table for ALV Display events
I_EVENTS TYPE SLIS_T_EVENT,
Internal table for storing ALV sort information
I_SORT TYPE SLIS_T_SORTINFO_ALV,
I_EVENT TYPE SLIS_T_EVENT.
*& Work area declaration
DATA:
WA_EKKO TYPE X_DATA,
WA_LAYOUT     TYPE SLIS_LAYOUT_ALV,
WA_EVENTS         TYPE SLIS_ALV_EVENT,
WA_SORT TYPE SLIS_SORTINFO_ALV.
*& Constant declaration
CONSTANTS:
C_HEADER   TYPE CHAR1 VALUE 'H',                    "Header in ALV
C_ITEM     TYPE CHAR1 VALUE 'S'.
*& Start-of-selection event
START-OF-SELECTION.
Select data from ekpo
SELECT EBELN " Doc no
EBELP " Item
MATNR " Material
MATNR " Material
WERKS " Plant
WERKS " Plant
NTGEW " Quantity
GEWEI " Unit
FROM EKPO
INTO TABLE I_EKPO
WHERE EBELN IN S_EBELN
AND NTGEW NE '0.00'.
IF SY-SUBRC = 0.
    SORT I_EKPO BY EBELN EBELP MATNR .
ENDIF.
* TO BUILD THE PAGE HEADER
PERFORM SUB_BUILD_HEADER.
* TO PREPARE FIELD CATALOG
PERFORM SUB_FIELD_CATALOG.
* PERFORM TO POPULATE THE LAYOUT STRUCTURE
PERFORM SUB_POPULATE_LAYOUT.
* PERFORM TO POPULATE THE SORT TABLE.
PERFORM SUB_POPULATE_SORT.
PERFORM TO POPULATE ALV EVENT
PERFORM SUB_GET_EVENT.
END-OF-SELECTION.
* PERFORM TO DISPLAY ALV REPORT
PERFORM SUB_ALV_REPORT_DISPLAY.
*&      Form sub_build_header
      To build the header
      No Parameter
FORM SUB_BUILD_HEADER .
* LOCAL DATA DECLARATION
DATA: L_SYSTEM     TYPE CHAR10 ,          "System id
L_R_LINE     TYPE SLIS_LISTHEADER,   "Hold list header
L_DATE       TYPE CHAR10,           "Date
L_TIME       TYPE CHAR10,           "Time
L_SUCCESS_RECORDS TYPE I,           "No of success records
L_TITLE(300) TYPE C.                "Title
Title Display
L_R_LINE-TYP = C_HEADER.               " header
L_TITLE = 'Test report'(001).
L_R_LINE-INFO = L_TITLE.
APPEND L_R_LINE TO I_ALV_TOP_OF_PAGE.
CLEAR L_R_LINE.
* RUN DATE DISPLAY
CLEAR L_DATE.
L_R_LINE-TYP = C_ITEM.                " Item
WRITE: SY-DATUM TO L_DATE MM/DD/YYYY.
L_R_LINE-KEY = 'Run Date :'(002).
L_R_LINE-INFO = L_DATE.
APPEND L_R_LINE TO I_ALV_TOP_OF_PAGE.
CLEAR: L_R_LINE, L_DATE.
ENDFORM.                    " sub_build_header
*&      Form sub_field_catalog
      Build Field Catalog
      No Parameter
FORM SUB_FIELD_CATALOG .
* BUILD FIELD CATALOG
PERFORM SUB_FILL_ALV_FIELD_CATALOG USING:
            '01' '01' 'EBELN' 'I_EKPO' 'L' 'Doc No'(003) ' ' ' ' ' ' ' ',
            '01' '02' 'EBELP' 'I_EKPO' 'L' 'Item No'(004) 'X' 'X' ' ' ' ',
            '01' '03' 'MATNR' 'I_EKPO' 'L' 'Material No'(005) 'X' ' ' ' ' ' ',
            '01' '03' 'MATNR1' 'I_EKPO' 'L' 'Material No'(005) ' ' ' ' ' ' ' ',
            '01' '04' 'WERKS' 'I_EKPO' 'L' 'Plant'(006) 'X' ' ' ' ' ' ',
            '01' '04' 'WERKS1' 'I_EKPO' 'L' 'Plant'(006) ' ' ' ' ' ' ' ',
            '01' '05' 'NTGEW' 'I_EKPO' 'R' 'Net Weight'(007) ' ' ' ' 'GEWE' 'I_EKPO'.
ENDFORM.                    " sub_field_catalog*
*&     Form sub_fill_alv_field_catalog
*&     For building Field Catalog
*&     p_rowpos   Row position
*&     p_colpos   Col position
*&     p_fldnam   Fldname
*&     p_tabnam   Tabname
*&     p_justif   Justification
*&     p_seltext Seltext
*&     p_out      no out
*&     p_tech     Technical field
*&     p_qfield   Quantity field
*&     p_qtab     Quantity table
FORM SUB_FILL_ALV_FIELD_CATALOG USING P_ROWPOS    TYPE SYCUROW
                                        P_COLPOS    TYPE SYCUCOL
                                        P_FLDNAM    TYPE FIELDNAME
                                        P_TABNAM    TYPE TABNAME
                                        P_JUSTIF    TYPE CHAR1
                                        P_SELTEXT   TYPE DD03P-SCRTEXT_L
                                        P_OUT       TYPE CHAR1
                                        P_TECH      TYPE CHAR1
                                        P_QFIELD    TYPE SLIS_FIELDNAME
                                        P_QTAB      TYPE SLIS_TABNAME.
* LOCAL DECLARATION FOR FIELD CATALOG
DATA: WA_LFL_FCAT    TYPE SLIS_FIELDCAT_ALV.
WA_LFL_FCAT-ROW_POS        = P_ROWPOS.     "Row
WA_LFL_FCAT-COL_POS        = P_COLPOS.     "Column
WA_LFL_FCAT-FIELDNAME      = P_FLDNAM.     "Field Name
WA_LFL_FCAT-TABNAME        = P_TABNAM.     "Internal Table Name
WA_LFL_FCAT-JUST           = P_JUSTIF.     "Screen Justified
WA_LFL_FCAT-SELTEXT_L      = P_SELTEXT.    "Field Text
WA_LFL_FCAT-NO_OUT         = P_OUT.        "No output
WA_LFL_FCAT-TECH           = P_TECH.       "Technical field
WA_LFL_FCAT-QFIELDNAME     = P_QFIELD.     "Quantity unit
WA_LFL_FCAT-QTABNAME       = P_QTAB .      "Quantity table
IF P_FLDNAM = 'NTGEW'.
    WA_LFL_FCAT-DO_SUM = 'X'.
ENDIF.
APPEND WA_LFL_FCAT TO I_FIELDCAT.
CLEAR WA_LFL_FCAT.
ENDFORM.                    " sub_fill_alv_field_catalog
*&      Form sub_populate_layout
      Populate ALV layout
      No Parameter
FORM SUB_POPULATE_LAYOUT .
CLEAR WA_LAYOUT.
WA_LAYOUT-COLWIDTH_OPTIMIZE = 'X'." Optimization of Col width
ENDFORM.                    "SUB_POPULATE_LAYOUT
" sub_populate_layout
*&      Form sub_populate_sort
      Populate ALV sort table
      No Parameter
FORM SUB_POPULATE_SORT .
* SORT ON MATERIAL
WA_SORT-SPOS = '01' .
WA_SORT-FIELDNAME = 'MATNR'.
WA_SORT-TABNAME = 'I_EKPO'.
WA_SORT-UP = 'X'.
WA_SORT-SUBTOT = 'X'.
APPEND WA_SORT TO I_SORT .
CLEAR WA_SORT."* SORT ON PLANT
WA_SORT-SPOS = '02'.
WA_SORT-FIELDNAME = 'WERKS'.
WA_SORT-TABNAME = 'I_EKPO'.
WA_SORT-UP = 'X'.
WA_SORT-SUBTOT = 'X'.
APPEND WA_SORT TO I_SORT .
CLEAR WA_SORT.
ENDFORM.                    " sub_populate_sort
*&      Form sub_get_event
      Get ALV grid event and pass the form name to subtotal_text
      event
      No Parameter
FORM SUB_GET_EVENT .
CONSTANTS : C_FORMNAME_SUBTOTAL_TEXT TYPE SLIS_FORMNAME VALUE 'SUBTOTAL_TEXT'.
DATA: L_S_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      I_LIST_TYPE     = 4
    IMPORTING
      ET_EVENTS       = I_EVENT
    EXCEPTIONS
      LIST_TYPE_WRONG = 0
      OTHERS          = 0.
* SUBTOTAL
READ TABLE I_EVENT INTO L_S_EVENT WITH KEY NAME = SLIS_EV_SUBTOTAL_TEXT.
IF SY-SUBRC = 0.
    MOVE C_FORMNAME_SUBTOTAL_TEXT TO L_S_EVENT-FORM.
    MODIFY I_EVENT FROM L_S_EVENT INDEX SY-TABIX.
ENDIF.
ENDFORM.                    "SUB_GET_EVENT
" sub_get_event
*&      Form sub_alv_report_display
      For ALV Report Display
      No Parameter
FORM SUB_ALV_REPORT_DISPLAY .
DATA: L_REPID TYPE SYREPID .
L_REPID = SY-REPID .
* THIS FUNCTION MODULE FOR DISPLAYING THE ALV REPORT
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      I_CALLBACK_PROGRAM     = L_REPID
     I_CALLBACK_TOP_OF_PAGE = 'SUB_ALV_TOP_OF_PAGE'
     IS_LAYOUT              = WA_LAYOUT
      IT_FIELDCAT            = I_FIELDCAT
      IT_SORT                = I_SORT
      IT_EVENTS              = I_EVENT
     I_DEFAULT              = 'X'
     I_SAVE                 = 'A'
    TABLES
      T_OUTTAB               = I_EKPO
    EXCEPTIONS
      PROGRAM_ERROR          = 1
      OTHERS                 = 2.
IF SY-SUBRC <> 0.
   MESSAGE i000 WITH 'Error in ALV report display'(055).
ENDIF.
ENDFORM.                    " sub_alv_report_display
      FORM sub_alv_top_of_page
      Call ALV top of page
      No parameter
FORM SUB_ALV_TOP_OF_PAGE.                                   "#EC CALLED
To write header for the ALV
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
   EXPORTING
     IT_LIST_COMMENTARY = I_ALV_TOP_OF_PAGE.
ENDFORM.                    "alv_top_of_page
*&      Form subtotal_text
      Build subtotal text
      P_total Total
      p_subtot_text Subtotal text info
FORM SUBTOTAL_TEXT CHANGING
               P_TOTAL TYPE ANY
               P_SUBTOT_TEXT TYPE SLIS_SUBTOT_TEXT.
Material level sub total
IF P_SUBTOT_TEXT-CRITERIA = 'MATNR'.
    P_SUBTOT_TEXT-DISPLAY_TEXT_FOR_SUBTOTAL = 'Materia l'(009).
    BREAK-POINT.
here calucate the total and change the p_total
ENDIF.
* PLANT LEVEL SUB TOTAL
IF P_SUBTOT_TEXT-CRITERIA = 'WERKS'.
    P_SUBTOT_TEXT-DISPLAY_TEXT_FOR_SUBTOTAL = 'Plant level total'(010).
ENDIF.
ENDFORM.                    "subtotal_text

Error in ALV : Field Does not exists in Output table .

Hi All,
In my ALV report, program get dumped and showing error when i tried to put a col named Distribution channel ion the alv.
I have put the Distribution cannel field in the IT_FInal table , but still getting folwong errors :
Error : Field Symbol is not been assigned.
As Instructed i have passed I_INTERFACE_CHECK = 'X'.
By this i am getting detail error that :
Field Distribution channel does not exists in Output table & Heading for List is missing .
But i have maintained the distribition channel in IT_Final table
Please suggest wheather we have to define dis channel in any other place.
Thanks in advance.
Can any one help me regrarding this.
Thanks in advance.

Hello,
You have to populate the same in the fieldcatalog as well, i think you have not maintained this field there.
BR,
Suhas
PS: Also make it a point to follow-up on your previous post: [Error in ALV : Field Symbol not been assigned.|Error in ALV : Field Symbol not been assigned.]

Display error in alv

Hi Experts,
can anyone suggest me that Hw can i display the errors in alv?
proper answer will be rewarded.
with regards.
sunil.

Hello Sunil
You may have a look at my Wiki posting:
[ Message Handling - Finding the Needle in the Haystack|https://wiki.sdn.sap.com/wiki/display/profile/2007/07/09/MessageHandling-FindingtheNeedleintheHaystack]
There I describe how to use the interface IF_RECA_MESSAGE_LIST in order to present application messages in a very user-friendly way (tree & ALV list).
Regards,
Uwe

There is an error in the sum total displayed in infoty type 8.

Hi,
In infotype 8 there is an error in the sum total . Recently few wage types were added in the system.
Now the total amount of all the wagetypes is not displayed correct.
please tell me is there any functional aspect through which it can be corrected.

2BAS     Basic Salary          30.964,00      INR
2HRA     House Rent Allowance     15.482,00      INR
2SPL     Special Allowance          871,00      INR
1LTA     Leave Travel All. (CTC)     2.580,00      INR
1DRI     Driver's Pay Reimb. (CTC)     6.000,00      INR
1MED     Medical Reimb. (CTC)          1.250,00      INR
1PET     Petrol Reimb. (CTC)          4.000,00      INR
1GRA     Gratuity (CTC)          1.489,00      INR
1LEN     Leave Encashment (CTC)     300,00      INR
1BON     Bonus(CTC)          6.881,00      INR
1IMC     Medical Insurance (CTC)     179,00      INR
IV 24.10.2008 - 31.12.9999                 * 47.317,00 INR*
Here the total amount for all the wage types is incorrect. This is my problem. How to correct the displayed total amount.

Error running ALV report

Hello,
I am tring to run my first ALV report and I am getting a dump when I run it. it is dumping at
<b>      Program                                      SAPLSLVC
     Include                                      LSLVCF36
     Row                                          3,221
     Module type                                  (FORM)
     Module Name                                  FILL_DATA_TABLE
     macro_cell_data_get
       <ls_fcat>
       <ls_data>
       <l_field_value>
       ls_lvc_data-value.    </b>
I searched the forum for the "macro_cell_data_get" and I found 1 response that gave a response of
<i>field symbol errors in ALV are usually down to fieldcat columns incorrectly defined. Check your internal table fields of the table you pass to the alv FM against the columns defined in the fieldcat</i>
I am not sure what I should be checking. I am looked at the structure that I have created for the ALV and the internal tables and I am not sure what to look for.
any help would be greatly appreciated.

I hope this is what you are looking for.
FORM create_fieldcatalog USING   value(p1_repid) TYPE sy-repid
                        CHANGING p_it_fieldcat TYPE slis_t_fieldcat_alv.
Local data declarations
DATA: wa_fieldcat TYPE slis_fieldcat_alv.
CONSTANTS: c_l TYPE c VALUE 'L'.
Call the FM to build the required field catalog.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_program_name         = p1_repid
      i_internal_tabname     = 'IT_OUTDATA'
      i_structure_name       = 'zfi_ap_unpln_dlvry_csts_STRUCT'
    CHANGING
      ct_fieldcat            = p_it_fieldcat[]
    EXCEPTIONS
      inconsistent_interface = 1
      program_error          = 2
      OTHERS                 = 3.
IF sy-subrc = 0.
LOOP AT p_it_fieldcat INTO wa_fieldcat.
wa_fieldcat-ddictxt = c_l.
Update the fieldcatalog parameters
      CASE wa_fieldcat-fieldname.
        WHEN 'BUKRS'.
          wa_fieldcat-key = c_check.
        WHEN OTHERS.
ENDCASE.
      MODIFY p_it_fieldcat FROM wa_fieldcat INDEX sy-tabix.
    ENDLOOP.
ENDIF.
ENDFORM. " FORM CREATE_FIELDCATALOG
$$----
$$ Form display_report
$$----
FORM display_alv CHANGING p_it_outdata TYPE ty_t_outdata
                           p_it_fieldcat TYPE slis_t_fieldcat_alv
                           p_it_alv_sort TYPE ty_t_sort_alv
                           p1_layout   TYPE slis_layout_alv
                           value(p1_repid)    TYPE sy-repid
                           value(p1_var)      TYPE disvariant.
Call the FM to generate the ALV in grid format.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program      = p1_repid
      i_callback_user_command = 'USER_COMMAND'
      i_callback_top_of_page = 'TOP_OF_PAGE'
      is_layout               = p1_layout
      i_structure_name        = 'ZFI_AP_UNPLN_DLVRY_CSTS_STRUCT'
      it_fieldcat             = p_it_fieldcat
     it_sort                 = p_it_alv_sort
      i_save                  = 'A'
      is_variant              = p1_var
    TABLES
      t_outtab                = p_it_outdata
    EXCEPTIONS
      program_error           = 1
      OTHERS                  = 2.
IF sy-subrc <> 0.
    FREE: p_it_outdata.
ENDIF.
ENDFORM.                    "display_alv
also I checked all of the entries and they seemed to match. I am using the field BELNR which looks like it is a combination of two fields. I am not sure if this is causing my problem or not

ALV SUM error

Hi all !!
I'm dipalying CURR field on alv. When trying to do sum on i get short dump.
that is my fieldcat definition:
ls_fieldcat-fieldname    = 'NETWR'.
ls_fieldcat-ref_fieldname = 'NETWR'.
ls_fieldcat-ref_tabname = 'VBRP'.
ls_fieldcat-datatype = 'CURR'.
ls_fieldcat-cfieldname = 'WAERK'.
ls_fieldcat-ctabname = 'VBRK'.
What is my error ??
BR, JAcek

Nothing of that doesnt work fine on my system (4.7).
(ST22 Error): MESSAGE_TYPE_X
assign component
          <ls_fieldcat>-fieldname of structure rt_data to <g_field>.
   if sy-subrc ne 0.
     message x000(0k).
   endif.
or when using in fieldac:
ls_fieldcat-cfieldname = 'WAERS'.
what was suggested in similiar problem in that formum sone times ago:
(st22)
Invalid dynamic line component.
When the ABAP program "SAPLSKBH" attempted to process the internal
table "RT_COLLECT00[]" with "SORT", a component "WAERS " was specified
dynamically
as the contents of the field "L_UFIELDNAME".
One of the following errors then occurred:
- The line type "u" of the internal table "RT_COLLECT00[]" contains no
component "WAERS ".
- "WAERS " contained an invalid offset or length specification (for
example, you may have tried to access part of a field with type I or
STRING).
- The program "SAPLSKBH" is a Unicode program. In Unicode programs, you
can only apply offset/length access to a structure within its
character-type initial section. The system went beyond the
boundaries of "WAERS " 's initial section in this case.
- "WAERS " contains a declaration of the form "A->B" for dynamically
accessing an object attribute. At present, attributes can only be
addressed in this way statically.
- "WAERS " contained significant trailing spaces (only possible with type
STRING).
Message was edited by: Jacek Slowikowski

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

While importing a request error message' Check-sum error in data file'

Hi Friends
I have a problem.
We are trying to inport a request after putting the files in cofile and data file folders( 4.6C System).While doing so an error message is seen in the log " Check-sum error in data file after XXXX bytes".
Can some one help me with this?
Thanks
Regards
Ankur

Hi Ankur,
It is sure your file is corrupted or not present.
Check in cofiles and data directory under /usr/sap/trans your transport request number.
Best Wishes.
Kumar

Runtime Error in ALV Tree Output

Dear All, I am trying to create a ALV Tree using Class cl_gui_alv_tree. The Report Shows the Output with the first Node but when i try to expand it is dumping with a runtime error GETWA_NOT_ASSIGNED in class CL_ALV_TREE_BASE and method SET_ITEMS_FOR_COLUMN. The Reason being the data which was copied in the initial node display to mt_outtab is getting refreshed.
Can any one of you help me the reason for the table getting refreshed. Do i need to pass any data.
I am doing the following steps.
1. Create Container,
2. Create Tree Class object
3. Generate the Field Catalog.
4. Set table for first display " With empty internal table
5. Generate the Hierarchy
6. Call the Method Frontend Update.
Let me know if i had missed any steps in the process.
Thank you,
Regards,
Swaroop Patri

One reason for getting this error is using local defined tables for it_outtab parameter in the below code:
To get rid of the dump, define two distinct output tables globally: one is an empty table which you will pass to the below method, other one is your real output table whose size increases dependently.
CALL METHOD go_tree->set_table_for_first_display
      EXPORTING
        is_hierarchy_header = ls_hier_header
      CHANGING
        it_outtab           = gt_data_e "Empty table
        it_fieldcatalog     = gt_fcat_tree.

Error in alv report

hi expert i have created alv report ... it is giving runtime error .. in   CALL FUNCTION 'REUSE_ALV_EVENTS_GET' how to solve this plz help ....
*& Report ZALVTRIAL                                                   *
REPORT ZALVTRIAL                               .
tables : vbak,vbap.
type-pools: slis.
types : begin of scr1,
        vbeln type VBELN_VA,
        erdat type erdat,
        ernam type ernam,
        end of scr1.
data : i_vbak type standard table of scr1,
       wa_vbak type scr1.
types : begin of scr2,
        vbeln type VBELN_VA,
        matnr type matnr,
        posnr type posnr_va,
        end of scr2.
data : i_vbap type standard table of scr2,
       wa_vbap type scr2.
types : begin of scr_final,
        vbeln type VBELN_VA,
        erdat type erdat,
        ernam type ernam,
        matnr type matnr,
        posnr type posnr_va,
        end of scr_final.
data : i_final type standard table of scr_final,
       wa_final type scr_final.
**START OF DATA DECLERATION FOR ALV
*DATA FOR CATLOG
DATA: wa_fldcat TYPE slis_fieldcat_alv,
      i_fldcat TYPE slis_t_fieldcat_alv WITH HEADER LINE .
*DATA FOR EVENT
DATA : wa_event TYPE slis_alv_event,
       i_event TYPE slis_t_event WITH HEADER LINE.
*DATA FOR HEADER
DATA: wa_head TYPE slis_listheader,
      i_head TYPE slis_t_listheader WITH HEADER LINE.
*data for layout
DATA: wa_layout TYPE slis_layout_alv.
selection-screen: begin of block b1 with frame title text-001.
select-options: s_vbeln for vbak-vbeln .
SELECTION-SCREEN: END OF BLOCK B1.
start-of-selection.
select vbeln erdat ernam
from vbak
into table i_vbak where vbeln in s_vbeln.
if sy-subrc <> 0.
leave list-processing.
else.
sort i_vbak by vbeln.
endif.
if i_vbak[] is not initial.
select vbeln matnr posnr
from vbap
into table i_vbap
for all entries in i_vbak
where vbeln = i_vbak-vbeln.
endif.
loop at i_vbak into wa_vbak.
wa_final-vbeln = wa_vbak-vbeln.
wa_final-erdat = wa_vbak-erdat .
wa_final-ernam = wa_vbak-ernam .
append wa_final to i_final.
endloop.
if sy-subrc = 0.
loop at i_final into wa_final.
    read table i_vbap into wa_vbap
    with key vbeln = wa_vbak-vbeln binary search.
    if sy-subrc = 0.
      wa_final-matnr = wa_vbap-matnr.
      wa_final-posnr = wa_vbap-posnr.
      modify i_final from wa_final transporting matnr posnr.
    endif.
    clear : wa_vbap , wa_final.
endloop.
endif.
**WRITE:/1 sy-uline(63).
**WRITE:/1'|', 2 'Sales Document' COLOR 4 ON ,11'|',12 'Date' COLOR 5
**ON
**,21'|',22 'Name' COLOR 4 ON,35'|',
      36 'Material Number' COLOR 5 ON, 55'|',56 'line no' COLOR 4 ON
**63'|'.
**WRITE:/1 sy-uline(63).
**LOOP AT i_final INTO wa_final.
WRITE:/1'|', 2 wa_final-vbeln,11'|',12 wa_final-erdat,21'|',22
wa_final-ernam,35'|',
       36 wa_final-matnr, 55'|',56 wa_final-posnr,63'|'.
**endloop.
perform builtcatalog.
perform event.
perform listheader.
perform layout.
perform display.
*&      Form builtcatalog
      text
form builtcatalog.
wa_fldcat-col_pos = '1'.
wa_fldcat-fieldname = 'vbeln'.
wa_fldcat-tabname = 'I_FINAL'.
wa_fldcat-reptext_ddic = 'Sales Document'.
APPEND wa_fldcat TO i_fldcat.
CLEAR wa_fldcat.
wa_fldcat-col_pos = '2'.
wa_fldcat-fieldname = 'erdat'.
wa_fldcat-tabname = 'I_FINAL'.
wa_fldcat-reptext_ddic = 'Date'.
APPEND wa_fldcat TO i_fldcat.
CLEAR wa_fldcat.
wa_fldcat-col_pos = '3'.
wa_fldcat-fieldname = 'ernam'.
wa_fldcat-tabname = 'I_FINAL'.
wa_fldcat-reptext_ddic = 'Name'.
APPEND wa_fldcat TO i_fldcat.
CLEAR wa_fldcat.
wa_fldcat-col_pos = '4'.
wa_fldcat-fieldname = 'matnr'.
wa_fldcat-tabname = 'I_FINAL'.
wa_fldcat-reptext_ddic = 'Material Number'.
APPEND wa_fldcat TO i_fldcat.
CLEAR wa_fldcat.
wa_fldcat-col_pos = '5'.
wa_fldcat-fieldname = 'posnr'.
wa_fldcat-tabname = 'I_FINAL'.
wa_fldcat-reptext_ddic = 'Sales Document Item'.
APPEND wa_fldcat TO i_fldcat.
CLEAR wa_fldcat.
endform.                    "builtcatalog
*&      Form event
      text
form event.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
   EXPORTING
     I_LIST_TYPE = 0
    IMPORTING
      ET_EVENTS   = i_final[].
EXCEPTIONS
   LIST_TYPE_WRONG       = 1
   OTHERS                = 2
IF sy-subrc = 0.
    READ TABLE i_event INTO wa_event
    WITH KEY name = slis_ev_top_of_page.
    IF sy-subrc = 0.
      wa_event-form = slis_ev_top_of_page.
      MODIFY i_event FROM wa_event INDEX sy-tabix TRANSPORTING form.
    ENDIF.
    READ TABLE i_event INTO wa_event
     WITH KEY name = slis_ev_pf_status_set .
    IF sy-subrc = 0.
      wa_event-form = slis_ev_pf_status_set .
      MODIFY i_event FROM wa_event INDEX sy-tabix TRANSPORTING form.
    ENDIF.
    READ TABLE i_event INTO wa_event
     WITH KEY name = slis_ev_user_command.
    IF sy-subrc = 0.
      wa_event-form = slis_ev_user_command .
      MODIFY i_event FROM wa_event INDEX sy-tabix TRANSPORTING form.
    ENDIF.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
endform.                    "event
*&      Form
      text
form listheader.
wa_head-typ = 'H'.
wa_head-info = 'ALV PROGRAM                             AUTHOR jessy'
APPEND wa_head TO i_head.
endform.                    "listheader
*&      Form layout
      text
form layout.
wa_layout-zebra = 'X'.
wa_layout-f2code = 'DUB'.
endform.                    "layout
*&      Form display
      text
form display.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
   EXPORTING
I_INTERFACE_CHECK                 = ' '
I_BYPASSING_BUFFER                = ' '
I_BUFFER_ACTIVE                   = ' '
     I_CALLBACK_PROGRAM                = ' sy-repid '
I_CALLBACK_PF_STATUS_SET          = ' '
I_CALLBACK_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                   =
   IS_LAYOUT                         = wa_layout
   IT_FIELDCAT                       = i_fldcat[]
IT_EXCLUDING                      =
IT_SPECIAL_GROUPS                 =
IT_SORT                           =
IT_FILTER                         =
IS_SEL_HIDE                       =
I_DEFAULT                         = 'X'
I_SAVE                            = ' '
IS_VARIANT                        =
IT_EVENTS                         =
IT_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_HYPERLINK                      =
IT_ADD_FIELDCAT                   =
IT_EXCEPT_QINFO                   =
I_HTML_HEIGHT_TOP                 =
I_HTML_HEIGHT_END                 =
IMPORTING
E_EXIT_CAUSED_BY_CALLER           =
ES_EXIT_CAUSED_BY_USER            =
    TABLES
      T_OUTTAB                          = i_event[]
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.                    "display

Hi,
The error has been corrected.
Copy the following code and execute. You won't get any runtime errors.
*& Report ZALVTRIAL *
REPORT ZALVTRIAL .
tables : vbak,vbap.
type-pools: slis.
types : begin of scr1,
vbeln type VBELN_VA,
erdat type erdat,
ernam type ernam,
end of scr1.
data : i_vbak type standard table of scr1,
wa_vbak type scr1.
types : begin of scr2,
vbeln type VBELN_VA,
matnr type matnr,
posnr type posnr_va,
end of scr2.
data : i_vbap type standard table of scr2,
wa_vbap type scr2.
types : begin of scr_final,
vbeln type VBELN_VA,
erdat type erdat,
ernam type ernam,
matnr type matnr,
posnr type posnr_va,
end of scr_final.
data : i_final type standard table of scr_final,
wa_final type scr_final.
**START OF DATA DECLERATION FOR ALV
*DATA FOR CATLOG
DATA: wa_fldcat TYPE slis_fieldcat_alv,
i_fldcat TYPE slis_t_fieldcat_alv WITH HEADER LINE .
*DATA FOR EVENT
DATA : wa_event TYPE slis_alv_event,
i_event TYPE SLIS_T_EVENT." WITH HEADER LINE.   "-----> correction done here
*DATA FOR HEADER
DATA: wa_head TYPE slis_listheader,
i_head TYPE slis_t_listheader WITH HEADER LINE.
*data for layout
DATA: wa_layout TYPE slis_layout_alv.
selection-screen: begin of block b1 with frame title text-001.
select-options: s_vbeln for vbak-vbeln .
SELECTION-SCREEN: END OF BLOCK B1.
start-of-selection.
select vbeln erdat ernam
from vbak
into table i_vbak where vbeln in s_vbeln.
if sy-subrc = 0.
leave list-processing.
else.
sort i_vbak by vbeln.
endif.
if i_vbak[] is not initial.
select vbeln matnr posnr
from vbap
into table i_vbap
for all entries in i_vbak
where vbeln = i_vbak-vbeln.
endif.
loop at i_vbak into wa_vbak.
wa_final-vbeln = wa_vbak-vbeln.
wa_final-erdat = wa_vbak-erdat .
wa_final-ernam = wa_vbak-ernam .
append wa_final to i_final.
endloop.
if sy-subrc = 0.
loop at i_final into wa_final.
read table i_vbap into wa_vbap
with key vbeln = wa_vbak-vbeln binary search.
if sy-subrc = 0.
wa_final-matnr = wa_vbap-matnr.
wa_final-posnr = wa_vbap-posnr.
modify i_final from wa_final transporting matnr posnr.
endif.
clear : wa_vbap , wa_final.
endloop.
endif.
**WRITE:/1 sy-uline(63).
**WRITE:/1'|', 2 'Sales Document' COLOR 4 ON ,11'|',12 'Date' COLOR 5
**ON
**,21'|',22 'Name' COLOR 4 ON,35'|',
*36 'Material Number' COLOR 5 ON, 55'|',56 'line no' COLOR 4 ON
**63'|'.
**WRITE:/1 sy-uline(63).
**LOOP AT i_final INTO wa_final.
WRITE:/1'|', 2 wa_final-vbeln,11'|',12 wa_final-erdat,21'|',22
wa_final-ernam,35'|',
36 wa_final-matnr, 55'|',56 wa_final-posnr,63'|'.
**endloop.
perform builtcatalog.
perform event.
perform listheader.
perform layout.
perform display.
**& Form builtcatalog
*text
form builtcatalog.
wa_fldcat-col_pos = '1'.
wa_fldcat-fieldname = 'vbeln'.
wa_fldcat-tabname = 'I_FINAL'.
wa_fldcat-reptext_ddic = 'Sales Document'.
APPEND wa_fldcat TO i_fldcat.
CLEAR wa_fldcat.
wa_fldcat-col_pos = '2'.
wa_fldcat-fieldname = 'erdat'.
wa_fldcat-tabname = 'I_FINAL'.
wa_fldcat-reptext_ddic = 'Date'.
APPEND wa_fldcat TO i_fldcat.
CLEAR wa_fldcat.
wa_fldcat-col_pos = '3'.
wa_fldcat-fieldname = 'ernam'.
wa_fldcat-tabname = 'I_FINAL'.
wa_fldcat-reptext_ddic = 'Name'.
APPEND wa_fldcat TO i_fldcat.
CLEAR wa_fldcat.
wa_fldcat-col_pos = '4'.
wa_fldcat-fieldname = 'matnr'.
wa_fldcat-tabname = 'I_FINAL'.
wa_fldcat-reptext_ddic = 'Material Number'.
APPEND wa_fldcat TO i_fldcat.
CLEAR wa_fldcat.
wa_fldcat-col_pos = '5'.
wa_fldcat-fieldname = 'posnr'.
wa_fldcat-tabname = 'I_FINAL'.
wa_fldcat-reptext_ddic = 'Sales Document Item'.
APPEND wa_fldcat TO i_fldcat.
CLEAR wa_fldcat.
endform. "builtcatalog
**& Form event
*text
form event.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
EXPORTING
I_LIST_TYPE = 0
IMPORTING
ET_EVENTS = i_event                                         "-----> correction done here
EXCEPTIONS
LIST_TYPE_WRONG = 1
OTHERS = 2
IF sy-subrc = 0.
READ TABLE i_event INTO wa_event
WITH KEY name = slis_ev_top_of_page.
IF sy-subrc = 0.
wa_event-form = slis_ev_top_of_page.
MODIFY i_event FROM wa_event INDEX sy-tabix TRANSPORTING form.
ENDIF.
READ TABLE i_event INTO wa_event
WITH KEY name = slis_ev_pf_status_set .
IF sy-subrc = 0.
wa_event-form = slis_ev_pf_status_set .
MODIFY i_event FROM wa_event INDEX sy-tabix TRANSPORTING form.
ENDIF.
READ TABLE i_event INTO wa_event
WITH KEY name = slis_ev_user_command.
IF sy-subrc = 0.
wa_event-form = slis_ev_user_command .
MODIFY i_event FROM wa_event INDEX sy-tabix TRANSPORTING form.
ENDIF.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
endform. "event
**& Form
*text
form listheader.
wa_head-typ = 'H'.
wa_head-info = 'ALV PROGRAM AUTHOR jessy'
APPEND wa_head TO i_head.
endform. "listheader
**& Form layout
*text
form layout.
wa_layout-zebra = 'X'.
wa_layout-f2code = 'DUB'.
endform. "layout
**& Form display
*text
form display.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
*I_INTERFACE_CHECK = ' '
*I_BYPASSING_BUFFER = ' '
*I_BUFFER_ACTIVE = ' '
I_CALLBACK_PROGRAM = ' sy-repid '
*I_CALLBACK_PF_STATUS_SET = ' '
*I_CALLBACK_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 =
IS_LAYOUT = wa_layout
IT_FIELDCAT = i_fldcat[]
*IT_EXCLUDING =
*IT_SPECIAL_GROUPS =
*IT_SORT =
*IT_FILTER =
*IS_SEL_HIDE =
*I_DEFAULT = 'X'
*I_SAVE = ' '
*IS_VARIANT =
IT_EVENTS = i_event[]                                                 "-----> correction done here
*IT_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_HYPERLINK =
*IT_ADD_FIELDCAT =
*IT_EXCEPT_QINFO =
*I_HTML_HEIGHT_TOP =
*I_HTML_HEIGHT_END =
*IMPORTING
*E_EXIT_CAUSED_BY_CALLER =
*ES_EXIT_CAUSED_BY_USER =
TABLES
T_OUTTAB = i_final                                                        "-----> correction done here
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. "display
You need to check the TYPE before passing the internal tables or workareas to the PARAMETERS of a Function Module.
Regards,
Ravi Kiran..

Error in alv report (fieldcatlog is not found)

Hai Genious
i am a new of the sap-abap, i have a one problem in my alv report, now i am using the reuse_alv_ fieldcatlog_merge,
i declared with my internal table with type,
my error is :- fieldcatlog not found
for example
types: begin of ty_mara,
matnr type matnr,
meins type meins,
ersda type ersda,
ernam type ernam,
end of ty_mara.
data: wa_mara type ty_mara,
it_mara like table of wa_mara.
select matnr meins ersda ernam from mara into table it_mara.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
EXPORTING
I_PROGRAM_NAME = SY-REPID
I_INTERNAL_TABNAME = 'IT_MARA'
I_STRUCTURE_NAME =
I_CLIENT_NEVER_DISPLAY = 'X'
I_INCLNAME = SY-REPID
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_list_display'

Hi,
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
EXPORTING
I_PROGRAM_NAME = SY-REPID
I_INTERNAL_TABNAME = 'IT_MARA'
I_STRUCTURE_NAME = 'TY_MARA'-->give it
I_CLIENT_NEVER_DISPLAY = 'X'
I_INCLNAME = SY-REPID
IF sy-subrc 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
also use...
CHANGING
      ct_fieldcat                  = i_fieldtab
data :i_fieldtab TYPE slis_t_fieldcat_alv,
s_fieldtab_body TYPE slis_fieldcat_alv.
fill i_fieldtab like this...
CASE s_fieldtab_body-fieldname.
      WHEN 'OA_NO'.
        s_fieldtab_body-seltext_l = 'Order Accep. No.'.
        MODIFY i_fieldtab FROM s_fieldtab_body INDEX sy-tabix.
        CLEAR s_fieldtab_body.
      WHEN 'KTEXT'.
        s_fieldtab_body-seltext_l = 'Ramco Order No.'.
        MODIFY i_fieldtab FROM s_fieldtab_body INDEX sy-tabix.
        CLEAR s_fieldtab_body.
and so on

Error when using SUM function in Excel template

I am trying to use the XDO_METADATA to create a sum of a column from my XML data and I am getting the following error in the Template Viewer:
[111412_104246459][][PROCEDURE] Log Level is changed to PROCEDURE
[111412_104246553][oracle.xdo.common.xml.XSLTWrapper][ERROR] XSL error:
Time: 0.125 sec.
FO Formatting failed.
<Line 317, Column 116>: XML-23029: (Error) FORG0001: invalid value for cast/constructor
@Line 317 ==> <Cell Index="2" Style="R7C3" Field="XDO_?SUM_V_CR_MO_IDD1?"><xsl:value-of select="sum(.//G_CR_MST_D/V_CR_MO_IDD)"/>
when I use:
XDO_?SUM_V_CR_MO_IDD1? <?sum(.//G_CR_MST_D/V_CR_MO_IDD)?>
or
[111412_104048508][][PROCEDURE] Log Level is changed to PROCEDURE
[111412_104048554][oracle.xdo.common.xml.XSLTWrapper][ERROR] XSL error:
Time: 0.078 sec.
FO Formatting failed.
<Line 317, Column 105>: XML-23029: (Error) FORG0001: invalid value for cast/constructor
@Line 317 ==> <Cell Index="2" Style="R7C3" Field="XDO_?SUM_V_CR_MO_IDD1?"><xsl:value-of select="sum(.//V_CR_MO_IDD)"/>
when I use:
XDO_?SUM_V_CR_MO_IDD1? <?sum(.//V_CR_MO_IDD)?>
I believe the XSL to be correct because when I change it to a count it works and when I go into BI Publisher 11g and create the query in the data model and then create a summary from it, the summary is created.
Can anyone help?

I went back to basics and created reports (via EXCEL templates) like I was asking based on good old EMP and DEPT and I found exactly the same problems I was mentioning. I looked at the templates provided but they were not calculating totals, like me they were selecting them and then just displaying them on the page.
Anyway, I have narrowed it down to the fact that when you do aggregates like sum(.//SAL) this works if you have a salary for every value. I did an outer join with DEPT so I did have empty rows and why I still experienced the problems.
Basically XSL does not like adding (including using the sum function) values that effectively have nulls in them which is why I get the cast/constructor errors because it is trying to turn a NaN value to a number and does not (or cannot) do it.
You need to either have a value in every row of your column (maybe possible by selecting nvl in your query) and make sure that you check the "create empty nodes" checkbox in the data model of BI Publisher.,
the other solution is an xsl solution where you would have to make sure that you only added non null values and for that you would have to investigate xsl blogs.
It is, by the way, why my count worked because it is just counting that the record exists it does not care what the element content is or isn't.
Closing thread.

Run-time error in alv

Hi guys,
I am executing an alv grid report.i m getting a run time error and i m gettig a dump.In the below i pasted the error.any suggestions where i m going wrong in the code.
What happened?
    The current application program detected a situation which really
    should not occur. Therefore, a termination with a short dump was
    triggered on purpose by the key word MESSAGE (type X).
Information on where terminated?
Termination occurred in the ABAP program "SAPLSLVC" - in "FILL_DATA_TABLE"
    The main program was "ZRPP1353 ".
In the source code you have the termination point in line 2735
    of the (Include) program "LSLVCF36".
Source code where the error occured?
Column per Fieldcat Entry
        ls_lvc_data-value = space.
        clear ls_lvc_data-style.
        loop at it_fcat_local assigning <ls_fcat>
                where tech ne 'X' and no_out ne 'X'.
          if l_invisible eq 'X'.
            clear l_invisible.
            if <ls_fcat>-do_sum is initial.
              continue.
            else.
              clear ls_lvc_data-col_pos.
            endif.
          endif.
add 1 to ls_lvc_data-col_pos.
assign component <ls_fcat>-fieldname
                           of structure <ls_data> to <l_field_value>.
          if sy-subrc ne 0.
            message x000(0k).
          endif.

Hi Dinesh,
This is because of some problem with the field catalog you have defined. Please give the field catalog so that we can identify the problem easily.

Error on ALV Sum

Similar Messages

Maybe you are looking for