Reg Dump

Hi Experts,
             I am doing one report now, while executing the report  it is going to the dump but iam not getting the dump analysis. But on top  i have the description.it is  given below.
'' There is no help text for this dump either text was inadvertentlydeleted or the release of the kernel difers from the release of the database refer to the note system for further information on dump''.
Rewardas are helpful.
Thanks&regards,
Narasimharao

The note mentioned in the description would explain more on the problem. The note can be viewed in SAP Service Market place.

Similar Messages

  • Reg : dump while assigning personnel no to position

    When assigning personnel number to position in PA30 and once when I save I am getting a dump
    how to solve this please help me....
    Runtime Errors         GETWA_NOT_ASSIGNED
    Date and Time          07.04.2009 01:37:56
    Short text
         Field symbol has not yet been assigned.
    What happened?
         Error in the ABAP Application Program
         The current ABAP program "SAPLHRWF" had to be terminated because it has
         come across a statement that unfortunately cannot be executed.
    Error analysis
         You attempted to access an unassigned field symbol
         (data segment 32770).
         This error may occur if
         - You address a typed field symbol before it has been set with
           ASSIGN
         - You address a field symbol that pointed to the line of an
           internal table that was deleted
         - You address a field symbol that was previously reset using
           UNASSIGN or that pointed to a local field that no
           longer exists
         - You address a global function interface, although the
           respective function module is not active - that is, is
           not in the list of active calls. The list of active calls
           can be taken from this short dump.
    Trigger Location of Runtime Error
        Program                                 SAPLHRWF
        Include                                 LHRWFU03
        Row                                     96
        Module type                             (FUNCTION)
        Module Name                             HR_ASSEMBLE_OBJECTKEY
    Source Code Extract
    Line  SourceCde
       66           OTHERS   = 1.
       67
       68 * v========================== XRGUNI ============================v
       69 *LOOP AT KEYFIELDS.
       70 *  LOOP AT STRUCTURE_PKEY WHERE FIELDNAME EQ KEYFIELDS-REFFIELD.
       71 *    BUSINESSOBJECTKEY+KEYFIELDS-OFFSET(KEYFIELDS-INTLENGTH) =
       72 *    KEY_OF_RECORD+STRUCTURE_PKEY-OFFSET(STRUCTURE_PKEY-DDLEN).
       73 *  ENDLOOP.
       74 *  IF SY-SUBRC NE 0.
       75 ** fatal error! BusObjectKey doesn't refer Infotypekey defined in DDIC
       76 ** structure PAKEY/PBKEY
       77 *  ENDIF.
       78 *ENDLOOP.
       79
       80 * sort table keyfields to create correct objectkey
       sort keyfields by editorder.
    loop at keyfields.
      clear fname.
    build fname for actual target field
      concatenate keyfields-refstruct '-' keyfields-reffield into fname.
      assign (fname) to <bo_key_field>.
      DATA d_ref TYPE REF TO DATA.
      CREATE DATA d_ref TYPE (fname).
      ASSIGN d_ref->* TO <bo_key_field>.
    now <bo_key_field> is declared with type fname
    build fname for actual source field
      clear fname.
      concatenate 'key_of_record' '-' keyfields-reffield into fname.
      assign (fname) to <source_value>.
    fill target field with corresponding value
      move <source_value> to <bo_key_field>.
    get length of actual target field to calculate offset for next loop
      describe field <bo_key_field> length bokf_length in character mode.
      move <bo_key_field> to businessobjectkey+bok_filled_to.
      bok_filled_to = bok_filled_to + bokf_length.
    endloop.
    ========================== XRGUNI ============================
    ENDFUNCTION.
    Edited by: VENKATESH MADANAGOPAL on Apr 7, 2009 7:52 AM
    Edited by: VENKATESH MADANAGOPAL on Apr 7, 2009 7:53 AM

    Check the Functional Module  GETWA_NOT_ASSIGNED once SE37
    Not sure but i doubt.................

  • Reg Dump in MIGO Transaction

    Hi all,
    When I am executing MIGO transaction in Pre-Production I am getting error as 'GETWA_NOT_ASSIGNED'. IF I check thru ST22, showing message as 'Field symbol has not yet been assigned'. Could anybody please assist in this regard.Thanks in advance.
    Thanks & Regards.
    I. Reddy Prasad

    Hi
    Pls check the following notes
    Note 496258 - MIGO: ABAP runtime error GETWA_NOT_ASSIGNED
    Note 712454 - MB1B/MIGO aborts with GETWA_NOT_ASSIGNED
    Note 979013 MIGO: Programmabbruch GETWA_NOT_ASSIGNED in LMIGOKC2
    Note 379448 GETWA_NOT_ASSIGNED for return delivery with MIGO
    Note 965675 MIGO: Termination after setting OK flag for tied empties
    Pls take opinion from SAP / Basis before implementing the note
    Regards
    Madhan

  • GETWA_NOT_ASSIGNED - Runtime Error in MIGO

    Dear All
    I am receiving GETWA_NOT_ASSIGNED - Runtime Error in MIGO transaction for a particular user only in production system. I am not able to narrow down is this transaction specific or user issue.  I searched the forum and not able to get reason.  If someone knows about ths kindly give me a hint.
    Regards,
    Venkat

    Hi,
    Please check if any User Exit BADI implemented and have a look into below thread
    Reg Dump in MIGO Transaction
    GETWA_NOT_ASSIGNED run time error_MIGO processing stock transport order
    Shiva

  • Reg:ABAP dump:TYPELOAD_NEW_VERSION

    Hi All,
    We are getting the dumps(150),TYPELOAD_NEW_VERSION with only one particular user in one of our production servers,there are a few background jobs scheduled with the same user and all the jobs have got finished successfully.
    below pasted is the detailed dump message
    Data type "MC11VA0ITM" was found in a newer version than required.
    What happened?
    Runtime error
    The current ABAP program, "SAPLMCEX", had to be terminated because one of the
    statements could not be executed at runtime.
    What can you do?
    Try restarting the program.
    If the error occurrs several times, consult your SAP administrator.
    Choose "Print" to obtain a hard copy of the termination message.
    You can use Transaction ST22 to display and manage short dump messages.
    It also allows you to retain them beyond their normal deletion date.
    Error analysis
    The data type "MC11VA0ITM" was reloaded from the database while the program
    was running.
    However, the system found a version of the type that was newer than
    the one required.
    How to correct the error
    Try to restart the program.
    System environment
    SAP Release.............. "620"
    Application server....... "provpr08"
    Network address.......... "10.130.33.98"
    Operating system......... "AIX"
    Release.................. "5.3"
    Hardware type............ "00C6C8D04C00"
    Character length......... 16 Bits
    Pointer length........... 64 Bits
    Work process number...... 0
    Short dump setting....... "full"
    Database server.......... "provpr01"
    Database type............ "ORACLE"
    Database name............ "VPR"
    Database owner........... "SAPERP"
    Character set............ "C"
    SAP kernel............... "640"
    Created on............... "Aug 17 2008 21:27:08"
    Created in............... "AIX 1 5 00538A4A4C00"
    Database version......... "OCI_920 "
    Patch level.............. "247"
    Patch text............... " "
    Supported environment....
    Database................. "ORACLE 9.2.0.., ORACLE 10.1.0.., ORACLE
    10.2.0.."
    SAP database version..... "640"
    Operating system......... "AIX 1 5, AIX 2 5, AIX 3 5, AIX 1 6"
    User, transaction...
    Client.............. 810
    User................ "ADMINJOBS"
    Language key........ "E"
    Transaction......... " "
    Program............. "SAPLMCEX"
    Screen.............. "SAPMSSY0 1000"
    Row of screen....... 6
    Information about program making the Remote Function Call (RFC):
    System.............. "VPR"
    Database Release.... 620
    Kernel Release...... 640
    Connection type: 3 (2 = R/2, 3 = R/3, E = External, R = Reg.external)
    Call type: "synchron (imode 1)" (S = Synchronous, a/A = Asynchronous, T =
    Transaction)
    Client.............. 810
    User................ "ADMINJOBS"
    Transaction......... " (Program: SAPLV50R_VIEW)"
    Function module..... "SHP_VL10_DELIVERY_CREATE_PARA"
    Call destination.... "provpr08_VPR_01"
    Source server....... "provpr05_VPR_01"
    Source IP address... "10.130.33.108"
    Additional RFC logon information:
    Trusted Relation....." "
    Logon return code....0
    Trusted return code..0
    Note: Prior to Release 4.0, there was less information available on RFC
    calling programs.
    Information on where terminated
    The termination occurred in the ABAP program "SAPLMCEX" in "MCEX_11_QRFC".
    The main program was "SAPMSSY4 ".
    The termination occurred in line 0 of the source code of the (Include)
    program " "
    of the source code of program " " (when calling the editor 00).
    We are on 640 Kernel-AIX ,level-247
    I have no clue on how to go about,
    can some one pls.look into it nad do the needful.
    Thanks in advance
    Rgds
    Venu

    Hi Rohit,
    Thanks once again
    I believe that my question has been answered appropriately,I appriciate the your help and support.
    I take the liberty to put across one more ABAP dump(80 dumps by a single user),"RABAX_CALLING_RABAX:"
    The error text is as below
    Runtime Error          RABAX_CALLING_RABAX
           Occurred on     03/24/2009 at   07:25:29
    Error "14 431" in error handling.
    What happened?
    A further error occurred when displaying an error message.
    What can you do?
    You can display the error message using Transaction ST22. If
    no further error is logged there, try to find an appropriate
    entry in the SAP system log.
    Make a note of the actions and input which caused the error.
    To resolve the problem, contact your SAP system administrator.
    You can use transaction ST22 (ABAP Dump Analysis) to view and administer
    termination messages, especially those beyond their normal deletion
    date.
    Error analysis
    The T100 error code is "14 431".
    The error text reads
    Invalid output to terminal from background processing
    with this key.
               Last error logged in SAP kernel
    Component............ "Taskhandler"
    Place................ "SAP-Server provpr03_VPR_01 on host provpr03 (wp 0)"
    Version.............. 1
    Error code........... 5
    Error text........... "ThAMInsert: no active mode"
    Description.......... " "
    System call.......... " "
    Module............... "thxxhead.c"
    Line................. 9893
    How to correct the error
    In general, it is sufficient to determine the original cause of the
    error and to eliminate it. Since the display of the runtime error
    has failed, you can only analyze the error by looking at the
    system log or the short dump display.
    System environment
    SAP Release.............. "620"
    Application server....... "provpr03"
    Network address.......... "10.130.33.106"
    Operating system......... "AIX"
    Release.................. "5.3"
    Hardware type............ "00C6C9904C00"
    Character length......... 16 Bits
    Pointer length........... 64 Bits
    Work process number...... 2
    Short dump setting....... "full"
    Database server.......... "provpr01"
    Database type............ "ORACLE"
    Database name............ "VPR"
    Database owner........... "SAPERP"
    Character set............ "C"
    SAP kernel............... "640"
    Created on............... "Aug 17 2008 21:27:08"
    Created in............... "AIX 1 5 00538A4A4C00"
    Database version......... "OCI_920 "
    Patch level.............. "247"
    Patch text............... " "
    Supported environment....
    Database................. "ORACLE 9.2.0.., ORACLE 10.1.0.., ORACLE
    10.2.0.."
    SAP database version..... "640"
    Operating system......... "AIX 1 5, AIX 2 5, AIX 3 5, AIX 1 6"
    Client.............. 810
    User................ "HJAFFER"
    Language key........ "E"
    Transaction......... " "
    Program............. "SAPLSGUI"
    Screen.............. "SAPMS380 0100"
    Row of screen....... 3
    Information about program making the Remote Function Call (RFC):
    System.............. "VPR"
    Database Release.... 620
    Kernel Release...... 640
    Connection type: 3 (2 = R/2, 3 = R/3, E = External, R = Reg.external)
    Call type: "synchron (imode 1)" (S = Synchronous, a/A = Asynchronous, T =
    Transaction)
    Client.............. 810
    User................ "HJAFFER"
    Transaction......... "ZSA5E (Program: ZVRV_OPEN_ORDERS_ALV)"
    Function module..... "ZVRV_OPEN_ORDERS_ALV_PRL"
    Call destination.... "provpr03_VPR_00"
    Source server....... "provpr03_VPR_01"
    Source IP address... "10.130.33.106"
    Additional RFC logon information:
    Trusted Relation....." "
    Logon return code....0
    Trusted return code..0
    Note: Prior to Release 4.0, there was less information available on RFC
    calling programs.
    Information on where terminated
    The termination occurred in the ABAP program "SAPLSGUI" in
    "SAPGUI_PROGRESS_INDICATOR".
    The main program was "SAPMS380 ".
    The termination occurred in line 33 of the source code of the (Include)
    program "LSGUIU01"
    of the source code of program "LSGUIU01" (when calling the editor 330).
    There are so many logs written in SM21 by the same user as mentioned below
    HJAFFER           AB0 Run-time error "CALL_FUNCTION_SEND_ERROR" occurred
    HJAFFER           AB1 > Short dump "090324 072401 provpr03 HJAFFER " generated
    HJAFFER           D01 Transaction Canceled 14 431 ( )
    HJAFFER           AB0 Run-time error "RABAX_CALLING_RABAX" occurred
    detailed Log...
    Details Page 1 Line 17    System Log: Central Analysis                        1
    Time     Instance             Ty. Nr Cl. User         Tcod MNo Text                                               Date : 24.03.09
    07:24:01 provpr03_VPR_00      DIA 01 810 HJAFFER           D01 Transaction Canceled 14 431 ( )
    Details
    Recording at local and central time........................ 03/24/2009 07:24:01
    Entry in collective system log at local time............... 03/24/2009 07:25:25
    Task................ 55318 . 01 D1 Dialog work process No. 01
    User................ HJAFFER
    Client.............. 810
    Terminal............ TXFRIALP
    Session............. 1
    Transaction code....
    Program name........ SAPMS380
    Problem class....... K    SAP Web AS Problem
    Development class... SDYN
    Module name.........
    Location............
    T100................ 14                  431
    Parameters..........
    Documentation for system log message D0 1 :
    The transaction has been terminated.  This may be caused by a
    termination message from the application (MESSAGE Axxx) or by an
    error detected by the SAP System due to which it makes no sense to
    proceed with the transaction.  The actual reason for the termination
    is indicated by the T100 message and the parameters.
    Additional documentation for message 14                  431
    Invalid output to terminal from background processing
    No documentation exists for message 14431
    Pls.look into it and guide me thru as you did in the earlier case
    Rgds
    Venu

  • Reg Core Dump

    We are getting bad address core dump while using Coherence lib .
    Please find the dbx stack trace below in .
    @null (l@9) terminated by signal SEGV (no mapping at the fault address)
    0xffffffffffffffff: <bad address 0xffffffffffffffff>
    (dbx) where
    [1] 0xfa666f08(0xf71f8940, 0x28ec9c8, 0xf71f8930, 0x18, 0x8, 0xf71f8880), at 0xfa666f08
    [2] 0xfa662da8(0xf71f8ab0, 0x28ec9c8, 0xf71f89b0, 0xf71f8940, 0x154396e8, 0xfdf88a80), at 0xfa662da8
    [3] 0xfa414a6c(0xf71f8ab0, 0x28ec9d0, 0xf71f8aa0, 0xf71f91e0, 0x0, 0xf71f89b0), at 0xfa414a6c
    [4] 0xfaba8c78(0x28ec9c8, 0xf71f8c20, 0x0, 0xf71f8b80, 0xf71f8ab0, 0x1), at 0xfaba8c78
    [5] 0xfb1f6b8c(0xf71f9190, 0xf71f91e0, 0xf71f8c20, 0xf71f91a0, 0xf71f8c30, 0x28af100), at 0xfb1f6b8c
    [6] 0xfb1f2af0(0x28aaeb0, 0xf71f91a0, 0x0, 0x1, 0xf71f9190, 0xfb1df870), at 0xfb1f2af0
    [7] 0xfb1f5c48(0x28aaeb0, 0x569fb10, 0xf71f9270, 0xf71f9280, 0xf71f9280, 0xf71f9360), at 0xfb1f5c48
    [8] 0xfad25bd0(0x289f3b8, 0xf71f9360, 0xf71f9360, 0xf71f92f0, 0x1, 0xf71f9360), at 0xfad25bd0
    [9] 0xfabf44c0(0x569fb10, 0xfb1fefd4, 0xfeb88ae0, 0xf71f9360, 0xfabf309c, 0xfeaae700), at 0xfabf44c0
    [10] 0xfa8a3d70(0x289f228, 0xf71f9460, 0xf71f9420, 0xf71f9430, 0xfdf88a80, 0xf71f9460), at 0xfa8a3d70
    [11] 0xfa8a338c(0x289f228, 0xf71f9540, 0xf71f9540, 0xf71f94d0, 0x1, 0xf71f95c0), at 0xfa8a338c
    [12] 0xfa7c1dd8(0x25b6ef8, 0x7f13700, 0xf71f9540, 0xf71f95c0, 0xf71f9550, 0x289f2a0), at 0xfa7c1dd8
    [13] 0xfabf44c0(0x7f13700, 0xfa7c3a60, 0xfe37b854, 0xf71f95c0, 0xfabf309c, 0xfe37ac90), at 0xfabf44c0
    [14] 0xfb2c9184(0xf71f9be0, 0xfdd965d4, 0x0, 0xffffffff, 0x1, 0x0), at 0xfb2c9184
    [15] 0xfa8866b4(0x28df150, 0xf71f9d14, 0xf71fa390, 0xfdf88a80, 0x0, 0xf71fa134), at 0xfa8866b4
    [16] 0xfa90c320(0x41f30d0, 0xfe476544, 0x28aae50, 0xf71fa380, 0x3, 0xf71fa458), at 0xfa90c320
    [17] 0xfad8f044(0x867800, 0x41f3198, 0xf71fb500, 0xf71fa670, 0xf71fb500, 0xf71fa5b0), at 0xfad8f044
    [18] 0xfad838dc(0x28aad08, 0xf71fb234, 0xfe7f165c, 0xfdf88a80, 0xf71fad6c, 0xf71fae44), at 0xfad838dc
    [19] 0xfb293ed0(0x28dba98, 0x28aad08, 0xc54400, 0xf71fb500, 0xf71fb4d0, 0xfdf88a80), at 0xfb293ed0
    [20] 0xfa758038(0x28dbab0, 0xfe6ea03c, 0xfe6ea03c, 0xf71fb5a0, 0x1, 0xf71fb5c0), at 0xfa758038
    [21] 0xfa9d9918(0xf71fbed0, 0x28dbdc0, 0xfdf88a80, 0x28e05b8, 0xf71fbf28, 0xfe4eab9c), at 0xfa9d9918
    [22] 0xfa614f74(0x17be110, 0xf71fc000, 0x0, 0x0, 0xfa629ee8, 0xfe275df0), at 0xfa614f74
    Without Coherence lib we don't see these kind of bad address core dumps

    Some time we do see below stack trace caused by coherence ,
    Current function is coherence::native::NativeAtomic64::peek
    79 return m_lAtomic;
    (dbx) where
    =>[1] coherence::native::NativeAtomic64::peek(this = 0x3844119f), line 79 in "NativeAtomic64.hpp"
    [2] coherence::lang::Object::_detach(this = 0x38441197, fEscaped = false), line 761 in "Object.hpp"
    [3] 0xfa2a7fc0(0x3192d5b0, 0x0, 0xc0000000, 0xfdf88a80, 0x0, 0x4f5ca40), at 0xfa2a7fc0
    [4] 0xfa7c5570(0x3192d528, 0x1, 0x1000, 0x3f1728, 0x3f1400, 0xfdf88a80), at 0xfa7c5570
    [5] 0xfab9537c(0x3192d5c8, 0x1ffffe0, 0xfdf88a80, 0x80000000, 0xc0, 0x80), at 0xfab9537c
    [6] coherence::lang::Object::_detach(this = 0x3192d5c8, fEscaped = false), line 774 in "Object.hpp"
    [7] 0xfa7ccd34(0xf71fa288, 0x2, 0x18, 0xfdf88a80, 0x1, 0x1), at 0xfa7ccd34
    [8] 0xfa886744(0x2c0d4e0, 0xf71f9d14, 0xf71f9d14, 0xfdf88a80, 0x0, 0xf71fa134), at 0xfa886744
    [9] 0xfa90c320(0x655adb0, 0xfe476544, 0x2bc2a40, 0xf71fa380, 0x2, 0xf71fa458), at 0xfa90c320
    [10] 0xfad8f044(0x867800, 0x655ae78, 0xf71fb500, 0xf71fa670, 0xf71fb500, 0xf71fa5b0), at 0xfad8f044
    [11] 0xfad838dc(0x2bc28f8, 0xf71fb234, 0xfe7f165c, 0xfdf88a80, 0xf71fad6c, 0xf71fae44), at 0xfad838dc
    [12] 0xfb293ed0(0x2c09620, 0x2bc28f8, 0xc54400, 0xf71fb500, 0xf71fb4d0, 0xfdf88a80), at 0xfb293ed0
    [13] 0xfa758038(0x2c09638, 0xfe6ea03c, 0xfe6ea03c, 0xf71fb5a0, 0x1, 0xf71fb5c0), at 0xfa758038
    [14] 0xfa9d9918(0xf71fbed0, 0x2c09948, 0xfdf88a80, 0x2c0e9c8, 0xf71fbf28, 0xfe4eab9c), at 0xfa9d9918
    [15] 0xfa614f74(0x256e910, 0xf71fc000, 0x0, 0x0, 0xfa629ee8, 0xfe275df0), at 0xfa614f74
    (dbx)
    Please advice.

  • Reg: SXMB_MONI Dump

    Hi All,
    I am getting the below error. In SXMB_MONI first it is failed automatically it Processed successfully. In Development same scenario is working fine.
    <?xml version="1.0" encoding="UTF-8" standalone="yes" ?>
    - <!--  Call Adapter -->
    - <SAP:Error xmlns:SAP="http://sap.com/xi/XI/Message/30" xmlns:SOAP="http://schemas.xmlsoap.org/soap/envelope/" SOAP:mustUnderstand="">
    <SAP:Category>XIProtocol</SAP:Category>
    <SAP:Code area="PARSER">ITEM_MISSING</SAP:Code>
    <SAP:P1>Envelope</SAP:P1>
    <SAP:P2 />
    <SAP:P3 />
    <SAP:P4 />
    <SAP:AdditionalText />
    <SAP:ApplicationFaultMessage namespace="" />
    <SAP:Stack>XML element Envelope missing in SOAP message header (SAP XI Extension)</SAP:Stack>
    <SAP:Retry>M</SAP:Retry>
    </SAP:Error>
    In SXMb_MONI if i click on Inbound Message or Technical routing, it's getting shot dump.
    Short dump Message is : A raise statement in the program SAPLOLEA raised an expection condition "SYSTEM_FAILURE"
    Plese help me...
    Regards,
    Chandra.

    Hi Chandra,
    Are you using SOAP adapter ?
    If yes, check if you have selected the check button "Do not use SOAP Envelop" then Uncheck it.
    (if you are using this setting then you have to send nosoap in your URL else it will through short dump)
    Thanks,
    Sunil Singh

  • Reg:OBJECTS_OBJREF_NOT_ASSIGNED dump

    Hi Experts,
    I am seeing a lot of OBJECTS_OBJREF_NOT_ASSIGNED dumps in one of our productions servers with the a few of the cancelled background jobs.
    We have just upgraded from 4.7 to ECC6
    The error text is
    An exception occurred that is explained in detail below.
    The exception, which is assigned to class 'CX_SY_REF_IS_INITIAL', was not
    caught in
    procedure "GET_SPECIAL_DATA_INTERNAL" "(METHOD)", nor was it propagated by a
    RAISING clause.
    Since the caller of the procedure could not have anticipated that the
    exception would occur, the current program is terminated.
    The reason for the exception is:
    You attempted to use a 'NULL' object reference (points to 'nothing')
    access a component (variable: "ME->GO_PARENT_CBASE_PROFILE").
    An object reference must point to an object (an instance of a class)
    before it can be used to access components.
    Either the reference was never set or it was set to 'NULL' using the
    CLEAR statement.
    We have tried to find the SAP notes,but could not find the proper ones
    Kindly help us fix the dump issue
    Rgds-
    Venu

    Hi Venu,
    In your setup of the shared memory area in SHMA, do you have the versioning option unchecked?  If you do that might explain your issue.  If a user tries to access the one instance of the object in the shared memory area while it is currently being refreshed to memory they will get this short dump.  The one way to protect against this error would be to make sure that the user reading from the memory area does a check for success in attach_for_read( ) before going further.  See this example:
      DATA: lv_tries TYPE i,
            lv_subrc TYPE sy-subrc.
      CONSTANTS: lc_max TYPE i VALUE '10000''.
    Initialize variables for a max of 10000 tries
      CLEAR lv_tries.
      lv_subrc = 1.
    Attach for read from shared memory area
      WHILE lv_tries < lc_max AND lv_subrc <> 0.
        TRY.
          cl_area = zcl_shm_employee_master=>attach_for_read( ).
          lv_subrc = sy-subrc.
          CATCH: cx_shm_inconsistent,
                       cx_shm_no_active_version,
                       cx_shm_read_lock_active,
                       cx_shm_exclusive_lock_active,
                       cx_shm_parameter_error,
                       cx_shm_change_lock_active.
          lv_tries = lv_tries + 1.
        ENDTRY.
      ENDWHILE.
    Raise exception if tries reaches count of 10000
      IF lv_tries = lc_max.
        RAISE READ_ERROR.
      ENDIF.
    The number 10000 is an arbitrary number chosen for the example but you can get the idea from it.  This will ensure that either a success attach is performed or an exception is thrown.  Of course you could always just call multiple times until you get a successful attach.  I did it this way to avoid a potential infinite loop in the case that it is not able to attach successfully.
    Regards,
    Ryan Crosby

  • Reg : Short Dump While Activating Workflow

    Hi All,
    This morning I added a condition step in my workflow and created two custom methods in the corresponding BO and used them in the task. Initially when i made the changes in the workflow and tested it, it was working fine. But after sometime, when I did the necessary binding and tried to activate the workflow, the workflow started resulting in short dump.
    Below is the dump analysis.
    SAPSQL_ARRAY_INSERT_DUPREC
    The ABAP/4 Open SQL array insert results in duplicate database records.
    000310        L_OTYPE EQ ORG_OBJTYPE_WORKFLOW.
    000320       LOOP AT ACT_LINES.
    000330         MOVE-CORRESPONDING ACT_WFDKEY TO ACT_LINES.
    000340         MOVE ACT_CLIENT TO ACT_LINES-CLIENT.
    000350         MODIFY ACT_LINES.
    000360       ENDLOOP.
    000370     ELSE.
    000380       MESSAGE E280 WITH L_OTYPE RAISING INVALID_OBJECT_TYPE.
    000390     ENDIF.
    000400
    000410   *- insert lines table
    ------>     INSERT SWD_LINES CLIENT SPECIFIED FROM TABLE ACT_LINES.
    000430     IF SY-SUBRC NE 0.
    000440       MESSAGE E281 WITH SY-SUBRC 'SWD_LINES'
    000450                    RAISING INTERNAL_DATABASE_ERROR.
    000460     ENDIF.
    000470
    000480   *- commit
    000490     IF DO_COMMIT NE ' '.
    000500       COMMIT WORK.
    000510     ENDIF.
    000520
    000530   ENDFUNCTION.
    I tried searching sdn. But all other posts were related to passing entries from internal table to DB. Also I'm not even sure if i can raise a OSS, because a few minutes back the system was working fine and all of sudden this started happening.
    So can you please guide me what I am missing and how can i fix this?
    Thanks & Regards,
    Raj

    Hi Rick,
    When I get acitvate the workflow, the workflow template is gettign active & saved and after that the system results into short dump. And also when i try creating a PR and test this workflow, in SWEL, i can see the below message in RFC status field.
    The ABAP/4 Open SQL array insert results in duplicate database records..
    I haven't done any duplicate binding. Also I checked what you suggested. Didn't work. Also checked my newly added code. But I'm not accessing database directly anywhere. All is done via SAP standard function module.
    Even if i try to display this workflow in PFTC, the system is resulting in the same short dump.
    What could be the reason?
    Regards,
    Raj
    Edited by: Raj  Karunanidhi on Feb 23, 2010 5:30 AM

  • Reg: VA01 sales order going to dump

    Dear all,
    In our develpment server(ecc 6.0),while creating sales order in VA01 for a sales area, when ever entering material number(variant configuration material)  and quantity and press enter, it is giving runtime error as i shown below.
    The following syntax error occurred in program
    "CL_LORD_OBJECT================CP " in include
    "CL_LORD_OBJECT================CM005 " in
    line 40:
    ""OBJECT-" expected, not "IF_OBJECT_""
    method class_constructor.
    Register to event CHANGED of all LORD object instances
      set handler on_lord_object_changed for all instances activation 'X'.---->VA01 is going dump from here
    Register to event AUART_CHANGED of all LORD header instances
      set handler on_lord_auart_changed for all instances activation 'X'.
    endmethod.
    can any one guide me in this issue

    Check
    Note 1304648 - SAP ERP Enhan.Pk.5 SP Stack 01(07/2010) - Release Info. Note
    There is one internal note (0001460737) mentioned there which talks about syntax error in CL_LORD_OBJECT class. This is enhancement package 5 for ECC 6
    The note 1304648  is talking about applying enhancement package 5, so it is not just syntax issue that it will resolved. You need to get your BASIS team involved as this issue it seems can be resolved by applying EhP5

  • Reg 10g dumps

    hai all can any one help me with oracle 10g dumps my email id is
    [email protected]

    no, noone is going to give you a cheatsheet to cram for the exam.
    Such practices reduce the value of the cert to the point of worthlessness, degrading the effort people put in who do seriously study for it.

  • REG:Oracle10g OCA DUMPS

    Hi,
    Friends I am working as a ORACLE DBA FRESHER and I want to prepare for OCA EXAM can any on send me the OCA
    DUMPS to my mail Id :[email protected]

    Hi
    what is a ORACLE DBA FRESHER ?
    You might use the selftest as they are official oracle practical test provider.
    Please read that : Stop Braindump requests on this forum
    good exam preparation.

  • Field too short-DUMP

    Hi Folks,
    I am getting the following dump error.Can any one here please throw some light on this.
    Field too small when calculating totals in internal table.
    <b>In the internal table "\PROGRAM=ZFI\DATA=IT_HEADER[]", a SUM statement is used to calculate totals. However, the values are too large for the designated field.
    The name of the field is "KURSF".
    The name of the field is "KURSF".</b>
    The field "KURSF" in the program "ZFIR_IMPORT_REGISTER"
    be a different
    type (e.g. type P of appropriate length).
    REPORT  ZFI.
    TABLES: rbkp,
            rseg,
            bset,
            mara,
            lfa1,
            ekko,
            t161t.
    TYPE-POOLS: slis.
    TYPES: BEGIN OF TY_CUSTOM,
              WRBTR TYPE RSEG-WRBTR,
              KSCHL TYPE RSEG-KSCHL,
              EBELN TYPE RSEG-EBELN,
              EBELP TYPE RSEG-EBELP,
           END OF TY_CUSTOM.
    TYPES: BEGIN OF ty_itab,
          lfbnr LIKE rseg-lfbnr,               " GR NO
          belnr LIKE rbkp-belnr,               " MIRO doc.no.
          buzei LIKE rseg-buzei,               " MIRO line item number
          fidoc LIKE bkpf-belnr,               " accounting doc.no.
          matnr LIKE rseg-matnr,               " Material number
          maktx LIKE makt-maktx,               " material description
          xblnr LIKE rbkp-xblnr,               " Reference Document Number
          budat LIKE rbkp-budat,               " Posting Date in Document
          mwskz LIKE rseg-mwskz,               " Tax Code
          bklas LIKE rseg-bklas,               " Valuation Class
          menge LIKE rseg-menge,               " Quantity
          gjahr LIKE rseg-gjahr,               " Fiscal Year
          bldat LIKE rbkp-bldat,               " Document Date
          lifnr TYPE rbkp-lifnr,                "Vendor Code
          stcd1 TYPE lfa1-stcd1,                "Tin number
          matkl TYPE mara-matkl,                "Mat Desc
          name1 TYPE lfa1-name1,                "Vendor Name
          awkey TYPE bkpf-awkey,                "Reference Key
          str_suppl1 TYPE adrc-str_suppl1,      "Street
          post_code1 TYPE adrc-post_code1,      "Pincode
          city1 TYPE adrc-city1,                "City
          region TYPE adrc-region,              "Region
          adrnr TYPE lfa1-adrnr,                "Address Number
          dms(3) TYPE c,                        "DMS
          werks TYPE rseg-werks,                "PLANT
          bukrs TYPE rseg-bukrs,                "COMPANY CODE
          stblg TYPE rbkp-stblg,                "DOCUMENT REVERSAL INDICATOR
          mtart TYPE mara-mtart,                "MATERIAL TYPE
          wrbtr TYPE rseg-wrbtr,                "Base Amount
          tax_amount TYPE konv-kwert,           "Tax amount for summary
          vgart TYPE rbkp-vgart,                "Transaction Type
          ivtyp TYPE rbkp-ivtyp,                "Invoice Category
          reverse(2),                           "Invoice Reversed
          land1 TYPE lfa1-land1,                "Country Key
    *Fields added for customs
          BED TYPE RSEG-WRBTR,                  "BASIC ED FOR CUSTOMS
          CVD TYPE RSEG-WRBTR,                  "CVD FOR CUSTOMS
          ECVD TYPE RSEG-WRBTR,                 "CESS ON VD FOR CUSTOMS
          ECED TYPE RSEG-wrbtr,                 "CESS ON DUTIES
          lfgja type rseg-lfgja,                "Mat Doc Year
          frbnr type mkpf-frbnr,                "Bill of Lading No
          waers type rbkp-waers,
          txz01 TYPE ekpo-txz01,                "Short Text for Material
          ebeln TYPE rseg-ebeln,                "Purchasing Doc
          bsart type ekko-bsart,                "Pur.Doc Type
          batxt type t161t-batxt,               "Desc for Pur Doc.Type
          ebelp TYPE ekpo-ebelp,                "Purchase Ord Ln Item
          NCVD TYPE RSEG-WRBTR,                 "CESS ON VD FOR CUSTOMS
          SBED TYPE RSEG-wrbtr,                 "CESS ON DUTIES
          TEXT(30),
          qtr_yr(4),
          qtr_mth(10),
    *Fields added for Inr Value for exchange rate
          kursf type rbkp-kursf,
          inrval type rseg-wrbtr,
          BELNR1 TYPE RBKP-BELNR,
          remarks(15),
    END OF ty_itab.
    TYPES: BEGIN OF ty_header,
          belnr LIKE rbkp-belnr,               " MIRO doc.no.
          fidoc LIKE bkpf-belnr,               " accounting doc.no.
          xblnr LIKE rbkp-xblnr,               " Reference Document Number
          budat LIKE rbkp-budat,               " Posting Date in Document
          mwskz LIKE rseg-mwskz,               " Tax Code
          bklas LIKE rseg-bklas,               " Valuation Class
          gjahr LIKE rseg-gjahr,               " Fiscal Year
          bldat LIKE rbkp-bldat,               " Document Date
          lifnr TYPE rbkp-lifnr,                "Vendor Code
          stcd1 TYPE lfa1-stcd1,                "Tin number
          name1 TYPE lfa1-name1,                "Vendor Name
          awkey TYPE bkpf-awkey,                "Reference Key
          str_suppl1 TYPE adrc-str_suppl1,      "Street
          post_code1 TYPE adrc-post_code1,      "Pincode
          city1 TYPE adrc-city1,                "City
          region TYPE adrc-region,              "Region
          adrnr TYPE lfa1-adrnr,                "Address Number
          dms(3) TYPE c,                        "DMS
          werks TYPE rseg-werks,                "PLANT
          bukrs TYPE rseg-bukrs,                "COMPANY CODE
          stblg TYPE rbkp-stblg,                "DOCUMENT REVERSAL INDICATOR
          mtart TYPE mara-mtart,                "MATERIAL TYPE
          wrbtr TYPE rseg-wrbtr,                "Base Amount
          tax_amount TYPE konv-kwert,           "Tax amount for summary
          vgart TYPE rbkp-vgart,                "Transaction Type
          ivtyp TYPE rbkp-ivtyp,                "Invoice Category
          reverse(2),                           "Invoice Reversed
          land1 TYPE lfa1-land1,                "Country Key
          BED TYPE RSEG-WRBTR,                  "BASIC ED FOR CUSTOMS
          CVD TYPE RSEG-WRBTR,                  "CVD FOR CUSTOMS
          ECVD TYPE RSEG-WRBTR,                 "CESS ON VD FOR CUSTOMS
          ECED TYPE RSEG-wrbtr,                 "CESS ON DUTIES
          lfgja type rseg-lfgja,                "Mat Doc Year
          frbnr type mkpf-frbnr,                "Bill of Lading No
          waers type rbkp-waers,
          txz01 TYPE ekpo-txz01,                "Short Text for Material
          NCVD TYPE RSEG-WRBTR,                 "CESS ON VD FOR CUSTOMS
          SBED TYPE RSEG-wrbtr,                 "CESS ON DUTIES
          TEXT(30),
          qtr_yr(4),
          qtr_mth(10),
    *Fields added for Inr Value for exchange rate
          kursf type rbkp-kursf,
          inrval type rseg-wrbtr,
          BELNR1 TYPE RBKP-BELNR,
          remarks(15),
    END OF ty_header.
    types: begin of ty_pohistory,
            xblnr type ekbe-xblnr,
            bewtp type ekbe-bewtp,
            belnr type ekbe-belnr,
            gjahr type ekbe-gjahr,
           end of ty_pohistory.
    TYPES: BEGIN OF ty_temp,
            fidoc TYPE bkpf-belnr,              "FIDOC No
            awkey TYPE bkpf-belnr,              "Reference Key
            gjahr TYPE bkpf-gjahr,              "Fiscal Year
            budat TYPE bkpf-budat,              "Posting Date
            belnr TYPE rbkp-belnr,              "Doc No
            blart TYPE bkpf-blart,              "Document Type
           END OF ty_temp.
    *Internal Table
    DATA: itab TYPE ty_itab OCCURS 0 WITH HEADER LINE.
    DATA: itab_temp TYPE ty_temp OCCURS 0 WITH HEADER LINE.
    DATA : IT_CUSTOM TYPE TY_CUSTOM OCCURS 0 WITH HEADER LINE.
    data: it_pohistory type ty_pohistory occurs 0 with header line.
    data : it_header type ty_header occurs 0 with header  line.
    data : it_temp14 type ty_header occurs 0 with header  line.
    *Data Declaration
    DATA: BKTXT TYPE MKPF-BKTXT.
    DATA: FRBNR TYPE MKPF-FRBNR.
    data: budat type mkpf-budat.
    DATA: BELNR TYPE RSEG-BELNR.
    data: gjahr type rseg-gjahr.
    data: date1(10).
    data: date2(10).
    data: title(70).
    DATA : adrnr1 LIKE t001w-adrnr.
    DATA: plant_name1 LIKE adrc-name1.
    DATA: plant_name2 type adrc-name2.
    data: plant_name(70).
    DATA: comp_name1 LIKE adrc-name1.
    DATA: comp_name2 type adrc-name2.
    data: comp_name(70).
    DATA: month(2).
    For ALV display
    DATA: itfieldcat TYPE slis_t_fieldcat_alv WITH HEADER LINE,
          gd_layout TYPE slis_layout_alv,
          itsort TYPE slis_t_sortinfo_alv WITH HEADER LINE.
    DATA: gd_prntparams TYPE slis_print_alv.
    DATA : it_data TYPE slis_t_listheader,
           wa_data LIKE LINE OF it_data.
    **ALV Declaration
    DATA: it_alv1 LIKE TABLE OF itab WITH HEADER LINE.
    DATA : i TYPE n.
    DATA : col_name(10) TYPE c.
    data: text(70).
    *Selection Screen
    SELECTION-SCREEN BEGIN OF BLOCK block1 WITH FRAME TITLE text-001.
    PARAMETERS:p_bukrs LIKE rbkp-bukrs OBLIGATORY.
    SELECT-OPTIONS: s_werks FOR rseg-werks NO INTERVALS OBLIGATORY.
    SELECT-OPTIONS: s_regio FOR lfa1-regio NO INTERVALS.
    SELECT-OPTIONS: s_lifnr FOR lfa1-lifnr NO INTERVALS.
    select-options: s_bsart for ekko-bsart no intervals.
    SELECT-OPTIONS:s_bldat FOR rbkp-bldat.
    SELECT-OPTIONS:s_budat FOR rbkp-budat OBLIGATORY.
    SELECTION-SCREEN END OF BLOCK block1.
    SELECTION-SCREEN BEGIN OF BLOCK block2 WITH FRAME TITLE text-002.
    PARAMETERS : R1  RADIOBUTTON GROUP G1.
    PARAMETERS : R2  RADIOBUTTON GROUP G1.
    SELECTION-SCREEN END OF BLOCK block2.
    SELECT-OPTIONS: s_mwskz FOR rseg-mwskz NO-DISPLAY.
    SELECT-OPTIONS: s_land1 FOR lfa1-land1 NO-DISPLAY.
    START-OF-SELECTION.
    PERFORM get_data.
    **Filtering the Data based on the Document Type and Document Status in the Internal Table
    LOOP AT itab_temp.
    IF itab_temp-blart = 'RE'.
    itab_temp-belnr = itab_temp-awkey+0(10).
    MODIFY itab_temp.
    ELSE.
    DELETE itab_temp.
    ENDIF.
    ENDLOOP.
    WRITE : s_budat-low TO date1,
             s_budat-high TO date2.
    CONCATENATE 'Import Purchase Register From :' date1 ' To : '   date2 INTO text.
    if r1 = 'X'.
    PERFORM taxvalues.
    PERFORM filtering.
    PERFORM CUSTOMS.
    perform filtering2.
    PERFORM build_layout.
    PERFORM build_fieldcat.
    PERFORM alv_display.
    endif.
    if r2 = 'X'.
    PERFORM taxvalues.
    PERFORM filtering.
    PERFORM CUSTOMS.
    perform filtering2.
    PERFORM importheader.
    PERFORM build_layout.
    PERFORM build_fieldcat1.
    PERFORM alv_display_header.
    endif.
    *&      Form  get_data
          text
    -->  p1        text
    <--  p2        text
    FORM get_data .
    SELECT belnr AS fidoc
           awkey
           budat
           gjahr
           blart
           FROM bkpf INTO CORRESPONDING FIELDS OF TABLE itab_temp
           WHERE bukrs = p_bukrs
           AND budat IN s_budat
           AND bstat = space.
    IF sy-subrc NE 0.
      MESSAGE 'No Values exist for the Selection.' TYPE 'S'.
      STOP.
    ENDIF.
    ENDFORM.
    *&      Form  taxvalues
          text
    -->  p1        text
    <--  p2        text
    FORM taxvalues .
    LOOP AT itab_temp.
    MOVE-CORRESPONDING itab_temp TO itab.
      SELECT SINGLE
              lifnr
              xblnr
              belnr
              gjahr
              stblg
              bldat
              vgart
              ivtyp
              waers
              kursf
              FROM rbkp INTO CORRESPONDING FIELDS OF itab
                 WHERE belnr = itab_temp-belnr
                   AND gjahr = itab_temp-gjahr.
      SELECT  menge
              bklas
              matnr
              lfbnr
              werks
              mwskz
              buzei
              wrbtr
              pstyp
              kschl
              ebeln
              ebelp
              lfgja
              shkzg FROM rseg INTO CORRESPONDING FIELDS OF itab
              WHERE belnr = itab_temp-belnr
              AND gjahr = itab_temp-gjahr.
    APPEND itab.
    ENDSELECT.
    CLEAR itab.
    CLEAR itab_temp.
    ENDLOOP.
    LOOP AT itab .
    *Purchase Order Document Type.
    select single bsart from ekko into corresponding fields of itab
    where ebeln = itab-ebeln.
    select single batxt from t161t into corresponding fields of itab
    where spras = 'EN' AND
          bsart = itab-bsart.
    *Material Details
    SELECT SINGLE  matkl mtart FROM mara
                    INTO CORRESPONDING FIELDS OF itab
                    WHERE mara~matnr = itab-matnr.
    SELECT SINGLE name1 adrnr land1 FROM lfa1 INTO
                    (itab-name1,itab-adrnr,itab-land1) WHERE lifnr = itab-lifnr.
    *Short Text
    SELECT SINGLE txz01 INTO itab-maktx FROM ekpo
                WHERE ebeln = itab-ebeln
                and ebelp = itab-ebelp.
    **Vendor Address
    SELECT SINGLE str_suppl1
           post_code1
           city1
           region
           FROM adrc INTO CORRESPONDING FIELDS OF itab
                 WHERE addrnumber = itab-adrnr.
    itab-qtr_yr = itab-bldat+0(4).
    month = itab-bldat+4(2).
    CASE month.
      WHEN '01'.
        itab-qtr_mth = 'JAN'.
      WHEN '02'.
        itab-qtr_mth = 'FEB'.
      WHEN '03'.
        itab-qtr_mth = 'MAR'.
      WHEN '04'.
        itab-qtr_mth = 'APR'.
      WHEN '05'.
        itab-qtr_mth = 'MAY'.
      WHEN '06'.
        itab-qtr_mth = 'JUN'.
      WHEN '07'.
        itab-qtr_mth = 'JUL'.
      WHEN '08'.
        itab-qtr_mth = 'AUG'.
      WHEN '09'.
        itab-qtr_mth = 'SEP'.
      WHEN '10'.
        itab-qtr_mth = 'OCT'.
      WHEN '11'.
        itab-qtr_mth = 'NOV'.
      WHEN '12'.
        itab-qtr_mth = 'DEC'.
    ENDCASE.
    *INR VALUE CALCULATION
    <b>itab-inrval = itab-wrbtr * itab-kursf.</b>MODIFY itab.
    ENDLOOP.
    ENDFORM.                    " taxvalues
    *&      Form  build_layout
          text
    -->  p1        text
    <--  p2        text
    FORM build_layout .
      CLEAR itab.
      gd_layout-zebra = 'X'.
      gd_layout-colwidth_optimize = 'X'.
    ENDFORM.                    " build_layout
    *&      Form  build_fieldcat
          text
    -->  p1        text
    <--  p2        text
    FORM build_fieldcat .
    IF itab[] IS INITIAL.
      MESSAGE 'No Values exist for the Selection.' TYPE 'S'.
      STOP.
    ENDIF.
      DEFINE m_fieldcat.
        itfieldcat-fieldname = &1.
        itfieldcat-col_pos = &2.
        itfieldcat-seltext_l = &3.
        itfieldcat-do_sum = &4.
        itfieldcat-outputlen = &5.
        append itfieldcat to itfieldcat.
        clear itfieldcat.
      END-OF-DEFINITION.
      m_fieldcat 'LFBNR' '' 'GR NO' '' 10.
      m_fieldcat 'BELNR' '' 'MIRO NO' '' 10.
      m_fieldcat 'BUZEI' '' 'MIRO LN ITM' '' 10.
      m_fieldcat 'LIFNR' '' 'VENDOR CODE' '' 10.
      m_fieldcat 'NAME1' '' 'VENDOR NAME'  '' 14.
      m_fieldcat 'STR_SUPPL1' '' 'VENDOR ADDRESS' '' '15'  .
      m_fieldcat 'POST_CODE1' '' 'PINCODE' '' 6.
      m_fieldcat 'XBLNR' '' 'VEN INV NO' '' 16.
      m_fieldcat 'BLDAT' '' 'VEN INV DATE' '' 8.
      m_fieldcat 'EBELN' '' 'PUR ORD NO' '' 10.
    m_fieldcat 'BATXT' '' 'PUR ORD DOC.TYPE' '' 20.  "Pur Doc. Type Description
      m_fieldcat 'EBELP' '' 'PUR LN ITM' '' 5.
      m_fieldcat 'WERKS' '' 'PLANT' '' 8.
      m_fieldcat 'MATNR' '' 'MAT NO' '' 18.
      m_fieldcat 'MAKTX' '' 'MAT DESC' '' 15.
      m_fieldcat 'MATKL' '' 'MAT CC' '' 7.
      m_fieldcat 'MENGE' '' 'QTY' '' 13.
      m_fieldcat 'WRBTR' '' 'VAL. OF GOODS' '' 11.
      m_fieldcat 'WAERS' '' 'CURR' '' 5.
      m_fieldcat 'INRVAL' '' 'INR VALUE' '' 13.
      m_fieldcat 'BED' '' 'BED' '' 10.
      m_fieldcat 'CVD' '' 'CVD' '' 10.
      m_fieldcat 'ECVD' '' 'CESS ON CVD' '' 10.
      m_fieldcat 'ECED' '' 'CESS ON DUTIES' '' 13.
    *Bill of Lading Removed and Bill of Entry Added.
    m_fieldcat 'FRBNR' '' 'BILL OF LADING' '' 13.
      m_fieldcat 'BELNR1' '' 'BILL OF ENTRY' '' 13.
      m_fieldcat 'REVERSE' '' 'Reversed' '' 2.
      m_fieldcat 'FIDOC' '' 'FI DOC NO' '' 10.
      m_fieldcat 'MWSKZ' '' 'TC' '' 2.
      m_fieldcat 'BKLAS' '' 'VL CLS' '' 4.
      m_fieldcat 'CITY1' '' 'VENDOR CITY' '' 10.
      m_fieldcat 'QTR_MTH' '' 'MONTH' '' 10.
      m_fieldcat 'QTR_YR' '' 'YEAR' '' 4.
      m_fieldcat 'REMARKS' '' 'REMARKS' '' 15.
    ENDFORM.                    " build_fieldcat
    *&      Form  list1
          text
         -->R_UCOMM    text
         -->RS_SELFIELDtext
    FORM list1 USING r_ucomm LIKE sy-ucomm
                      rs_selfield TYPE slis_selfield.
    Check function code
      CASE r_ucomm.
        WHEN '&IC1'.
      Check field clicked on within ALVgrid report
          IF rs_selfield-fieldname = 'LFBNR'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE itab
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'MBN' FIELD itab-lfbnr.
            SET PARAMETER ID 'GJR' FIELD itab-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'MB03' AND SKIP FIRST SCREEN.
          ENDIF.
          IF rs_selfield-fieldname = 'FIDOC'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE itab
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'BLN' FIELD itab-fidoc.
            SET PARAMETER ID 'BUK' FIELD p_bukrs.
            SET PARAMETER ID 'GJR' FIELD itab-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN.
          ENDIF.
          IF rs_selfield-fieldname = 'BELNR'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE itab
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'RBN' FIELD itab-BELNR.
            SET PARAMETER ID 'GJR' FIELD itab-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
          ENDIF.
          IF rs_selfield-fieldname = 'BELNR1'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE itab
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'RBN' FIELD itab-BELNR1.
            SET PARAMETER ID 'GJR' FIELD itab-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
          ENDIF.
      ENDCASE.
    ENDFORM.
    *&      Form  alv_display
          text
    -->  p1        text
    <--  p2        text
    FORM alv_display .
    IF sy-batch = space.
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
        EXPORTING
          i_callback_program      = sy-repid
          is_layout               = gd_layout
          i_callback_user_command = 'LIST1'
          I_CALLBACK_TOP_OF_PAGE  = 'TOP_OF_PAGE'
          it_fieldcat             = itfieldcat[]
          i_save                  = 'A'
          is_print                = gd_prntparams
          it_sort                 = itsort[]
        TABLES
          t_outtab                = itab
          EXCEPTIONS
          program_error           = 1
          OTHERS                  = 2.
      IF sy-subrc <> 0.
        MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
      ENDIF.
    ELSEIF sy-batch = 'X'.
      CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
       EXPORTING
         i_callback_program             = sy-repid
         it_fieldcat                    = itfieldcat[]
          it_sort                       = itsort[]
        TABLES
          t_outtab                       = itab
       EXCEPTIONS
         program_error                  = 1
         OTHERS                         = 2
      IF sy-subrc <> 0.
       MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
               WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
      ENDIF.
    ENDIF.
    ENDFORM.                    " alv_display
    *&      Form  FILTERING
          text
    -->  p1        text
    <--  p2        text
    FORM filtering .
    Material type should be of ROH or HALB or FERT
    *CLEAR s_mtart.
    *REFRESH s_mtart.
    *s_mtart-sign = 'I'.
    *s_mtart-option = 'EQ'.
    *s_mtart-low = 'ROH'.
    *APPEND s_mtart.
    *s_mtart-low = 'HALB'.
    *APPEND s_mtart.
    *s_mtart-low = 'FERT'.
    *APPEND s_mtart.
    *CLEAR  s_mtart.
    *Tax Code for WCT should not be included.
    s_mwskz-sign = 'I'.
    s_mwskz-option = 'EQ'.
    s_mwskz-low = 'W1'.
    APPEND s_mwskz.
    s_mwskz-low = 'W2'.
    APPEND s_mwskz.
    s_mwskz-low = 'W3'.
    APPEND s_mwskz.
    s_mwskz-low = 'W4'.
    APPEND s_mwskz.
    s_mwskz-low = 'W5'.
    APPEND s_mwskz.
    s_mwskz-low = 'W6'.
    APPEND s_mwskz.
    s_land1-sign = 'I'.
    s_land1-option = 'NE'.
    s_land1-low = 'IN'.
    APPEND s_land1.
    LOOP AT itab.
        IF itab-mwskz NOT IN s_mwskz
          AND itab-shkzg EQ 'S'
           AND itab-bldat IN s_bldat
           AND itab-region IN s_regio
           AND itab-lifnr IN s_lifnr
           AND itab-land1 IN s_land1
           AND itab-werks IN s_werks
           AND itab-bsart IN s_bsart.
         ELSE.
           DELETE itab.
           CONTINUE.
        ENDIF.
        IF itab-vgart EQ 'RS'
           AND itab-ivtyp EQ '5'
           AND itab-stblg NE ' '.
             itab-reverse = 'RS'.
        ELSEIF  itab-vgart EQ 'RD'
           AND itab-ivtyp EQ ' '
           AND itab-stblg NE ' '.
             itab-reverse = 'RD'.
        ENDIF.
       MODIFY itab.
    ENDLOOP.
    ENDFORM.                    " FILTERING
    *&      Form  CUSTOMS
          text
    -->  p1        text
    <--  p2        text
    form CUSTOMS .
    LOOP AT ITAB.
    IF ITAB-LFBNR IS NOT INITIAL.
    SELECT SINGLE BKTXT
                  FRBNR
                  budat
                  FROM MKPF INTO (BKTXT,FRBNR,budat)
                  WHERE MBLNR = ITAB-LFBNR
                  and mjahr = itab-lfgja.
      move frbnr to itab-frbnr.
      perform get_custom_invoice.
    else.
    select xblnr
           bewtp
           belnr
           gjahr
           from ekbe into table it_pohistory
           where ebeln = itab-ebeln
           and ebelp = itab-ebelp.
    sort it_pohistory by xblnr.
    read table it_pohistory with key xblnr = itab-xblnr bewtp = 'E' binary search.
    if sy-subrc = 0.
        SELECT SINGLE BKTXT
                  FRBNR
                  budat
                  FROM MKPF INTO (BKTXT,FRBNR,budat)
                  WHERE MBLNR = it_pohistory-belnr
                  and mjahr = it_pohistory-gjahr.
        move it_pohistory-belnr to itab-lfbnr.
        move frbnr to itab-frbnr.
        perform get_custom_invoice.
    endif.
    ENDIF.
    MODIFY ITAB.
    clear: bktxt,frbnr,budat.
    ENDLOOP.
    SORT itab BY lfbnr belnr. " Sorting by GR no.
    endform.                    " CUSTOMS
    *&      Form  get_custom_invoice
          text
    -->  p1        text
    <--  p2        text
    form get_custom_invoice .
    CALL FUNCTION 'GET_CURRENT_YEAR'
    EXPORTING
       BUKRS         = p_bukrs
       DATE          =  budat
    IMPORTING
       CURRY         = gjahr
    determine if wrong characters were entered
    IF ( BKTXT CN '1234567890' ).
    *string contains wrong characters!
          ITAB-BELNR1 = BKTXT.
          ITAB-remarks = 'Wrng BoE Ref'.
        EXIT.
      ENDIF.
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input         = BKTXT
    IMPORTING
       OUTPUT        = BELNR
    ITAB-BELNR1 = BELNR.
    *For getting the Customs MIRO doc, it is assumed that the Fiscal Year of Customs Miro is same as Fiscal Year of Migo Posting Date
    clear it_custom.
    refresh it_custom.
    SELECT WRBTR
           KSCHL
           EBELN
           EBELP
           FROM RSEG INTO CORRESPONDING FIELDS OF IT_CUSTOM
           WHERE BELNR = BELNR
           and gjahr = gjahr.
    if sy-subrc = 0.
      APPEND IT_CUSTOM.
    endif.
    ENDSELECT.
    LOOP AT IT_CUSTOM.
        IF IT_CUSTOM-EBELN = ITAB-EBELN AND IT_CUSTOM-EBELP = ITAB-EBELP.
             CASE IT_CUSTOM-KSCHL.
                 WHEN 'JCDB'.
                     MOVE IT_CUSTOM-WRBTR TO ITAB-BED.
                 WHEN 'JCV1'.
                     MOVE IT_CUSTOM-WRBTR TO ITAB-CVD.
                 WHEN 'JECV'.
                     MOVE IT_CUSTOM-WRBTR TO ITAB-ECVD.
                 WHEN 'JEDB'.
                     MOVE IT_CUSTOM-WRBTR TO ITAB-ECED.
                 WHEN 'JCDS'.
                     MOVE IT_CUSTOM-WRBTR TO ITAB-SBED.
                 WHEN 'JCV2'.
                     MOVE IT_CUSTOM-WRBTR TO ITAB-NCVD.
              ENDCASE.
        ENDIF.
    ENDLOOP.
    endform.                    " get_custom_invoice
    *&      Form  filtering2
          text
    -->  p1        text
    <--  p2        text
    form filtering2 .
    loop at itab.
      if itab-lfbnr is initial.
          delete itab.
      endif.
    endloop.
    endform.                    " filtering2
    *& Form top_of_page
    text
    FORM top_of_page.
    CLEAR IT_DATA.
    REFRESH IT_DATA.
    *Company Details
    SELECT adrnr FROM t001 INTO adrnr1 WHERE bukrs = p_bukrs.
    ENDSELECT.
    SELECT name1 name2 FROM adrc INTO (comp_name1,comp_name2) WHERE addrnumber = adrnr1.
    ENDSELECT.
    concatenate comp_name1 comp_name2 into comp_name.
    wa_data-typ = 'H'.
    wa_data-info = comp_name.
    APPEND wa_data TO it_data.
    *Plant Details for Display
    loop at s_werks.
    SELECT single adrnr FROM t001w INTO adrnr1 WHERE werks = s_werks-low.
    SELECT single name1 name2 FROM adrc INTO (plant_name1,plant_name2) WHERE addrnumber = adrnr1.
    concatenate s_werks-low ' - ' plant_name1 ',' plant_name2 into plant_name.
    wa_data-info = plant_name.
    APPEND wa_data TO it_data.
    endloop.
    WRITE : s_budat-low TO date1,
            s_budat-high TO date2.
    if r1 = 'X'.
    CONCATENATE 'Import Purchase Register From :' date1 ' To : '   date2 INTO title.
    elseif r2 = 'X'.
    CONCATENATE 'Imp.Pur.Reg- Inv.Header From :' date1 ' To : '   date2 INTO title.
    endif.
    wa_data-info = title.
    APPEND wa_data TO it_data.
    CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
    it_list_commentary = it_data
    I_LOGO =
    I_END_OF_LIST_GRID =
    CLEAR WA_DATA.
    CLEAR IT_DATA.
    ENDFORM. "top_of_page
    *&      Form  importheader
          text
    -->  p1        text
    <--  p2        text
    form importheader .
    LOOP AT itab.
      MOVE-CORRESPONDING itab TO it_header.
      APPEND it_header.
    ENDLOOP.
    SORT it_header BY belnr.
    <b>LOOP AT it_header.
    AT END OF belnr.
      READ TABLE it_header INDEX sy-tabix.
      SUM.                </b>                                      " Summing the Amount for each Vendor Invoice No.
      MOVE-CORRESPONDING it_header TO it_temp14.
      APPEND it_temp14.
      CLEAR it_temp14.
    ENDAT.
    ENDLOOP.
    SORT it_temp14  BY belnr  ASCENDING.                                 " SORTING BY MIRO NUMBER
    endform.                    " importheader
    *&      Form  build_fieldcat1
          text
    -->  p1        text
    <--  p2        text
    form build_fieldcat1 .
    IF itab[] IS INITIAL.
      MESSAGE 'No Values exist for the Selection.' TYPE 'S'.
      STOP.
    ENDIF.
      DEFINE m_fieldcat.
        itfieldcat-fieldname = &1.
        itfieldcat-col_pos = &2.
        itfieldcat-seltext_l = &3.
        itfieldcat-do_sum = &4.
        itfieldcat-outputlen = &5.
        append itfieldcat to itfieldcat.
        clear itfieldcat.
      END-OF-DEFINITION.
      m_fieldcat 'BELNR' '' 'MIRO NO' '' 10.
      m_fieldcat 'LIFNR' '' 'VENDOR CODE' '' 10.
      m_fieldcat 'NAME1' '' 'VENDOR NAME'  '' 14.
      m_fieldcat 'STR_SUPPL1' '' 'VENDOR ADDRESS' '' '15'  .
      m_fieldcat 'POST_CODE1' '' 'PINCODE' '' 6.
      m_fieldcat 'XBLNR' '' 'VEN INV NO' '' 16.
      m_fieldcat 'BLDAT' '' 'VEN INV DATE' '' 8.
      m_fieldcat 'WERKS' '' 'PLANT' '' 8.
      m_fieldcat 'WRBTR' '' 'VAL. OF GOODS' '' 11.
      m_fieldcat 'WAERS' '' 'CURR' '' 5.
      m_fieldcat 'INRVAL' '' 'INRVALUE' '' 11.
      m_fieldcat 'BED' '' 'BED' '' 10.
      m_fieldcat 'CVD' '' 'CVD' '' 10.
      m_fieldcat 'ECVD' '' 'CESS ON CVD' '' 10.
      m_fieldcat 'ECED' '' 'CESS ON DUTIES' '' 13.
    *Bill of Lading Removed and Bill of Entry Added.
    m_fieldcat 'FRBNR' '' 'BILL OF LADING' '' 13.
      m_fieldcat 'BELNR1' '' 'BILL OF ENTRY' '' 13.
      m_fieldcat 'REVERSE' '' 'Reversed' '' 2.
      m_fieldcat 'FIDOC' '' 'FI DOC NO' '' 10.
      m_fieldcat 'MWSKZ' '' 'TC' '' 2.
      m_fieldcat 'BKLAS' '' 'VL CLS' '' 4.
      m_fieldcat 'CITY1' '' 'VENDOR CITY' '' 10.
      m_fieldcat 'QTR_MTH' '' 'MONTH' '' 10.
      m_fieldcat 'QTR_YR' '' 'YEAR' '' 4.
      m_fieldcat 'REMARKS' '' 'REMARKS' '' 15.
      ENDFORM.                    " build_fieldcat
    *&      Form  alv_display_header
          text
    -->  p1        text
    <--  p2        text
    form alv_display_header .
    IF sy-batch = space.
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
        EXPORTING
          i_callback_program      = sy-repid
          is_layout               = gd_layout
          i_callback_user_command = 'LIST2'
          I_CALLBACK_TOP_OF_PAGE  = 'TOP_OF_PAGE'
          it_fieldcat             = itfieldcat[]
          i_save                  = 'A'
          is_print                = gd_prntparams
          it_sort                 = itsort[]
        TABLES
          t_outtab                = it_temp14
          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.
    ELSEIF sy-batch = 'X'.
      CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
       EXPORTING
         i_callback_program             = sy-repid
         it_fieldcat                    = itfieldcat[]
          it_sort                       = itsort[]
        TABLES
          t_outtab                       = it_temp14
       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.
    ENDIF.
    endform.                    " alv_display_header
    *&      Form  list1
          text
         -->R_UCOMM    text
         -->RS_SELFIELDtext
    FORM list2 USING r_ucomm LIKE sy-ucomm
                      rs_selfield TYPE slis_selfield.
    Check function code
      CASE r_ucomm.
        WHEN '&IC1'.
          IF rs_selfield-fieldname = 'FIDOC'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE it_temp14
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'BLN' FIELD it_temp14-fidoc.
            SET PARAMETER ID 'BUK' FIELD p_bukrs.
            SET PARAMETER ID 'GJR' FIELD it_temp14-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN.
          ENDIF.
          IF rs_selfield-fieldname = 'BELNR'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE it_temp14
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'RBN' FIELD it_temp14-BELNR.
            SET PARAMETER ID 'GJR' FIELD it_temp14-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
          ENDIF.
          IF rs_selfield-fieldname = 'BELNR1'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE it_temp14
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'RBN' FIELD it_temp14-BELNR1.
            SET PARAMETER ID 'GJR' FIELD it_temp14-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
          ENDIF.
      ENDCASE.
    ENDFORM.
    Message was edited by:
            Kiran K

    Sandeep,
    It is working fine for all the dates,but going giving dump only for a particular date.
    KURSF is of length 9.Is it including decimal places.
    So,if i declare a varibale of type p decimals 5 and then move actual kursf value to this variable and then SUM,it will work fine.
    data:kursf1 type p decimals 5.
    move it_header-kursf to it_header-kursf1.
    or
    just declare the existing kursf as type p decimals 5
    But why it is not giving dump for other dates.
    Thanks,
    K.Kiran.

  • How to solve the dump eror

    hi
         when i execute this report it execute perfectly. o/p is come perfect.
    But when i double click by mistake on this o/p it  give me the dump error .
    i don't know why this is happen. i am not been able to solve this problem.
    can anyone solve this problem and send modified coding to me.
    thanks in advance.
    Dinesh
    *& Report  ZBIL
    REPORT  ZBIL NO STANDARD PAGE HEADING.
    TABLES: VBRK,
            VBRP,
            KNA1,
            VBAK,
            LIKP,
            J_1IEXCHDR,
            MARM.
    TYPE-POOLS:SLIS.
    TYPES: BEGIN OF IT_FINAL,
           KUNAG LIKE VBRK-KUNAG,
           KDGRP LIKE VBRK-KDGRP,
           VBELN LIKE VBRK-VBELN,
           FKSTO LIKE VBRK-FKSTO,
           FKDAT LIKE VBRK-FKDAT,
          stceg like vbrk-stceg,
           STCEG(20) TYPE C,
           REGIO LIKE VBRK-REGIO,
           RFBSK LIKE VBRK-RFBSK,
           AUBEL LIKE VBRP-AUBEL,
           WERKS LIKE VBRP-WERKS,
           VGBEL LIKE VBRP-VGBEL,
           MATNR LIKE VBRP-MATNR,
           VRKME LIKE VBRP-VRKME,
           FKIMG LIKE VBRP-FKIMG,
           NETWR LIKE VBRP-NETWR,             "netwr_fp,
           MWSBP LIKE VBRP-MWSBP,
           KZWI4 LIKE  VBRP-KZWI4,
           VSTEL LIKE VBRP-VSTEL,
           FKIMG1 TYPE FKIMG,
           NAME1 LIKE KNA1-NAME1,
           ORT01 LIKE KNA1-ORT01,
           PSTLZ LIKE KNA1-PSTLZ,
           EKONT LIKE KNA1-EKONT,
           KUNNR LIKE KNA1-KUNNR,
           STRAS(35) TYPE C,
           AUDAT LIKE VBAK-AUDAT,
           WADAT_IST LIKE LIKP-WADAT_IST,
           EXNUM(10) TYPE C,
           RDOC LIKE J_1IEXCHDR-RDOC,
           UMREZ LIKE MARM-UMREZ,
           MEINH LIKE MARM-MEINH,
           UMREN LIKE MARM-UMREN,
           END OF IT_FINAL.
    TYPES: BEGIN OF IT_VBRK,
           KUNAG LIKE VBRK-KUNAG,
           KDGRP LIKE VBRK-KDGRP,
           VBELN LIKE VBRK-VBELN,
           FKSTO LIKE VBRK-FKSTO,
           FKDAT LIKE VBRK-FKDAT,
          stceg like vbrk-stceg,
           STCEG(20) TYPE C,
           REGIO LIKE VBRK-REGIO,
           RFBSK LIKE VBRK-RFBSK,
         END OF IT_VBRK.
    TYPES: BEGIN OF IT_VBRP,
            WERKS LIKE VBRP-WERKS,
            VGBEL LIKE VBRP-VGBEL,
            MATNR LIKE VBRP-MATNR,
            VRKME LIKE VBRP-VRKME,
            FKIMG LIKE VBRP-FKIMG,
            NETWR LIKE VBRP-NETWR,            "like vbrp-netwr,
            MWSBP LIKE VBRP-MWSBP,              "like vbrp-mwsbp,
            KZWI4 LIKE VBRP-MWSBP,          "   like vbrp-kzwi4,
            AUBEL LIKE VBRP-AUBEL,
            VBELN LIKE VBRP-VBELN,
            VSTEL LIKE VBRP-VSTEL,
          END OF IT_VBRP.
    TYPES:BEGIN OF IT_KNA1,
          NAME1 LIKE KNA1-NAME1,
          ORT01 LIKE KNA1-ORT01,
          PSTLZ LIKE KNA1-PSTLZ,
          EKONT LIKE KNA1-EKONT,
          KUNNR LIKE KNA1-KUNNR,
          STRAS(35) TYPE C,
          END OF IT_KNA1.
    TYPES: BEGIN OF IT_VBAK,
           VBELN LIKE VBAK-VBELN,
           AUDAT LIKE VBAK-AUDAT,
           KUNNR LIKE VBAK-KUNNR,
           END OF IT_VBAK.
    TYPES: BEGIN OF IT_LIKP,
           WADAT_IST LIKE LIKP-WADAT_IST,
           KUNAG LIKE LIKP-KUNAG,
           VBELN LIKE LIKP-VBELN,
           END OF IT_LIKP.
    TYPES: BEGIN OF IT_J_1IEXCHDR,
           EXNUM(10) TYPE C,
           KUNAG LIKE J_1IEXCHDR-KUNAG,
           WERKS LIKE J_1IEXCHDR-WERKS,
           RDOC LIKE J_1IEXCHDR-RDOC,
           END OF IT_J_1IEXCHDR.
    TYPES: BEGIN OF IT_MARM,
           MATNR LIKE MARM-MATNR,
           UMREZ LIKE MARM-UMREZ,
           MEINH LIKE MARM-MEINH,
           UMREN LIKE MARM-UMREN,
           END OF IT_MARM.
    *INTERNAL TABLE DECLARATION
    DATA: I_FINAL TYPE STANDARD TABLE OF IT_FINAL,
          I_VBRP TYPE  STANDARD TABLE OF IT_VBRP,
          I_VBRK TYPE  STANDARD TABLE OF IT_VBRK,
          I_KNA1 TYPE  STANDARD TABLE OF IT_KNA1,
          I_VBAK TYPE  STANDARD TABLE OF IT_VBAK,
          I_LIKP TYPE  STANDARD TABLE OF IT_LIKP,
          I_J_1IEXCHDR TYPE  STANDARD TABLE OF IT_J_1IEXCHDR,
          I_MARM TYPE  STANDARD TABLE OF IT_MARM.
    *DECLARATION FOR THE WORK AREA
    DATA: WA_FINAL TYPE IT_FINAL,
           WA_VBRP TYPE IT_VBRP,
           WA_VBRK TYPE IT_VBRK,
           WA_KNA1 TYPE IT_KNA1,
           WA_VBAK TYPE IT_VBAK,
           WA_LIKP TYPE IT_LIKP,
           WA_J_1IEXCHDR TYPE IT_J_1IEXCHDR,
           WA_MARM TYPE IT_MARM.
    * DECLARATION FOR THE FIELD CATALOG.
    DATA: FIELDCATALOG TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
          WA_FIELDCATALOG TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
          GD_LAYOUT TYPE SLIS_LAYOUT_ALV.
    DATA IT_SORT1 TYPE SLIS_T_SORTINFO_ALV WITH HEADER LINE.
    DATA HEADING1 TYPE SLIS_T_LISTHEADER WITH HEADER LINE.
    DATA  GD_REPID LIKE SY-REPID.
    *DECLARATION FOR THE SELECTION SCREEN
    SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
    SELECT-OPTIONS: CUST FOR VBRK-KUNAG,
                    CUST_GRP FOR VBRK-KDGRP,
                    MAT_NO FOR VBRP-MATNR,
                    PLANT FOR VBRP-WERKS OBLIGATORY,
                    SHIP_PT FOR VBRP-VSTEL,
                    BILL_DOC FOR VBRK-VBELN,
                    SAL_OFF FOR VBRP-VKBUR,
                    BILL_TYP FOR VBRK-FKART,
                    DATE FOR VBRK-FKDAT.
    PARAMETERS:REGIO LIKE VBRK-REGIO DEFAULT  '13'  OBLIGATORY.
    SELECTION-SCREEN :END OF BLOCK B1.
    *DECLARATION FOR THE SUBROUTIN FOR BASIC LIST.
    PERFORM F_GET_I_VBRK_DATA.
    PERFORM F_GET_I_VBRP_DATA.
    PERFORM F_GET_I_KNA1_DATA.
    PERFORM F_GET_I_VBAK_DATA.
    PERFORM F_GET_I_LIKP_DATA.
    PERFORM F_GET_I_J_1IEXCHDR_DATA.
    PERFORM F_GET_I_MARM_DATA.
    PERFORM F_GET_I_FINAL_DATA.
    PERFORM DATA_BUILD.
    PERFORM DATA_CALL.
    FORM F_GET_I_VBRK_DATA.
    SELECT  KUNAG KDGRP VBELN FKSTO FKDAT STCEG REGIO RFBSK REGIO
    FROM VBRK
    INTO CORRESPONDING FIELDS OF TABLE I_VBRK
    WHERE FKDAT IN DATE
    AND KUNAG IN CUST
    AND KDGRP IN CUST_GRP
    AND  VBELN IN BILL_DOC
    AND FKART IN BILL_TYP.
    *AND REGIO LIKE REGIO.
    ENDFORM.
    FORM F_GET_I_VBRP_DATA.
    SELECT  WERKS VGBEL MATNR VRKME FKIMG NETWR MWSBP KZWI4 VBELN AUBEL VSTEL
    FROM VBRP
    INTO CORRESPONDING FIELDS OF TABLE I_VBRP FOR ALL ENTRIES IN I_VBRK
    WHERE VBELN = I_VBRK-VBELN
    AND VKBUR IN SAL_OFF
    AND MATNR IN MAT_NO
    AND VSTEL IN SHIP_PT
    AND WERKS IN PLANT .
    ENDFORM.
    FORM F_GET_I_KNA1_DATA.
    SELECT NAME1 ORT01 PSTLZ EKONT KUNNR STRAS
    FROM KNA1
    INTO CORRESPONDING FIELDS OF TABLE I_KNA1
    FOR ALL ENTRIES IN I_VBRK
    WHERE KUNNR = I_VBRK-KUNAG.
    ENDFORM.
    FORM F_GET_I_VBAK_DATA.
    SELECT VBELN AUDAT KUNNR
    FROM VBAK
    INTO CORRESPONDING FIELDS OF TABLE I_VBAK
    FOR ALL ENTRIES IN I_VBRP
    WHERE VBELN = I_VBRP-AUBEL.
    *for all entries in i_vbrk
    *where kunnr = i_vbrk-kunag .
    ENDFORM.
    FORM F_GET_I_LIKP_DATA.
    SELECT WADAT_IST KUNAG VBELN
    FROM LIKP
    INTO CORRESPONDING FIELDS OF TABLE I_LIKP
    FOR ALL ENTRIES IN I_VBRP
    WHERE VBELN = I_VBRP-VGBEL.
    *for all entries in i_vbrk
    *where kunag = i_vbrk-kunag.
    ENDFORM.
    FORM F_GET_I_J_1IEXCHDR_DATA.
    SELECT EXNUM  WERKS  KUNAG RDOC
    FROM J_1IEXCHDR
    INTO CORRESPONDING FIELDS OF TABLE I_J_1IEXCHDR
    FOR ALL ENTRIES IN I_VBRK
    WHERE RDOC = I_VBRK-VBELN .
    ENDFORM.
    FORM F_GET_I_MARM_DATA.
    SELECT  MATNR UMREZ UMREN MEINH
    FROM MARM
    INTO CORRESPONDING FIELDS OF  TABLE I_MARM
    FOR ALL ENTRIES IN I_VBRP
    WHERE MEINH = 'EA' AND MATNR = I_VBRP-MATNR.
    ENDFORM.
    *for all entries in i_vbrp
    *where werks = i_vbrp-werks .
    *where kunag = i_vbrk-kunag .
    FORM F_GET_I_FINAL_DATA.
    LOOP AT I_VBRP INTO WA_VBRP.
    WA_FINAL-WERKS = WA_VBRP-WERKS.
    WA_FINAL-VGBEL = WA_VBRP-VGBEL.
    WA_FINAL-MATNR = WA_VBRP-MATNR.
    WA_FINAL-VRKME = WA_VBRP-VRKME.
    WA_FINAL-FKIMG = WA_VBRP-FKIMG.
    WA_FINAL-NETWR = WA_VBRP-NETWR.
    WA_FINAL-MWSBP = WA_VBRP-MWSBP.
    WA_FINAL-KZWI4 = WA_VBRP-KZWI4.
    WA_FINAL-AUBEL = WA_VBRP-AUBEL.
    WA_FINAL-VSTEL = WA_VBRP-VSTEL.
    WA_FINAL-VBELN = WA_VBRP-VBELN.
    CLEAR WA_VBRK.
    READ TABLE I_VBRK INTO WA_VBRK WITH KEY VBELN = WA_VBRP-VBELN.
    IF SY-SUBRC = 0.
    WA_FINAL-KUNAG = WA_VBRK-KUNAG.
    WA_FINAL-KDGRP = WA_VBRK-KDGRP.
    WA_FINAL-VBELN = WA_VBRK-VBELN.
    WA_FINAL-FKSTO = WA_VBRK-FKSTO.
    WA_FINAL-FKDAT = WA_VBRK-FKDAT.
    WA_FINAL-STCEG = WA_VBRK-STCEG.
    WA_FINAL-REGIO = WA_VBRK-REGIO.
    WA_FINAL-RFBSK = WA_VBRK-RFBSK.
    ENDIF.
    CLEAR WA_KNA1.
    READ TABLE I_KNA1 INTO WA_KNA1 WITH KEY KUNNR = WA_VBRK-KUNAG.
    IF SY-SUBRC = 0.
    WA_FINAL-NAME1 = WA_KNA1-NAME1.
    WA_FINAL-ORT01 = WA_KNA1-ORT01.
    WA_FINAL-PSTLZ = WA_KNA1-PSTLZ.
    WA_FINAL-STRAS = WA_KNA1-STRAS.
    WA_FINAL-KUNAG = WA_KNA1-KUNNR.
    ENDIF.
    CLEAR WA_VBAK.
    READ TABLE I_VBAK INTO WA_VBAK WITH KEY  VBELN = WA_VBRP-AUBEL.          "kunnr = wa_vbrk-kunag.
    IF SY-SUBRC = 0.
    WA_FINAL-AUDAT = WA_VBAK-AUDAT.
    WA_FINAL-KUNAG = WA_VBAK-KUNNR.
    ENDIF.
    CLEAR WA_LIKP.
    READ TABLE I_LIKP INTO WA_LIKP WITH KEY  VBELN = WA_VBRP-VGBEL.           "kunag = wa_vbrk-kunag.
    IF SY-SUBRC = 0.
    WA_FINAL-WADAT_IST = WA_LIKP-WADAT_IST.
    WA_FINAL-KUNAG = WA_LIKP-KUNAG.
    ENDIF.
    CLEAR WA_J_1IEXCHDR.
    READ TABLE I_J_1IEXCHDR INTO WA_J_1IEXCHDR WITH  KEY  RDOC = WA_VBRK-VBELN. "kunag = wa_vbrk-kunag.
    IF SY-SUBRC = 0.
    WA_FINAL-EXNUM = WA_J_1IEXCHDR-EXNUM.
    WA_FINAL-KUNAG = WA_J_1IEXCHDR-KUNAG.
    WA_FINAL-WERKS = WA_J_1IEXCHDR-WERKS.
    WA_FINAL-RDOC = WA_J_1IEXCHDR-RDOC.
    ENDIF.
    CLEAR WA_MARM.
    READ TABLE I_MARM INTO WA_MARM WITH  KEY MATNR = WA_VBRP-MATNR.
    IF SY-SUBRC = 0.
    WA_FINAL-MEINH = WA_MARM-MEINH.
    WA_FINAL-UMREZ = WA_MARM-UMREZ.
    WA_FINAL-UMREN = WA_MARM-UMREN.
    WA_FINAL-MATNR = WA_MARM-MATNR.
    WA_FINAL-FKIMG1 = WA_VBRP-FKIMG * ( WA_MARM-UMREN / WA_MARM-UMREZ ).
    ENDIF.
    APPEND WA_FINAL TO I_FINAL.
    ENDLOOP.
    ENDFORM.
    FORM DATA_BUILD.
    *break-point.
      WA_FIELDCATALOG-FIELDNAME = 'KUNAG'.
      WA_FIELDCATALOG-SELTEXT_M = 'Sold-to Party'.
      WA_FIELDCATALOG-OUTPUTLEN = 10 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'KDGRP'.
      WA_FIELDCATALOG-SELTEXT_M = 'Customer Group'.
      WA_FIELDCATALOG-OUTPUTLEN = 13 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'AUBEL'.
      WA_FIELDCATALOG-SELTEXT_M = 'Sales Doc'.
      WA_FIELDCATALOG-OUTPUTLEN = 10 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'AUDAT'.
      WA_FIELDCATALOG-SELTEXT_M = 'Doc Date'.
      WA_FIELDCATALOG-OUTPUTLEN = 10 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'VGBEL'.
      WA_FIELDCATALOG-SELTEXT_M = 'Pgi. No.'.
      WA_FIELDCATALOG-OUTPUTLEN = 10 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'WADAT_IST'.
      WA_FIELDCATALOG-SELTEXT_M = 'Pgi.Date'.
      WA_FIELDCATALOG-OUTPUTLEN = 10 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'EXNUM'.
      WA_FIELDCATALOG-SELTEXT_M = 'Excise No.'.
      WA_FIELDCATALOG-OUTPUTLEN = 10 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'VBELN' .
      WA_FIELDCATALOG-SELTEXT_M = 'Bill Doc'.
      WA_FIELDCATALOG-OUTPUTLEN = 12 .
      WA_FIELDCATALOG-KEY = 'X'.
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'WERKS'.
      WA_FIELDCATALOG-SELTEXT_M = 'Plant'.
      WA_FIELDCATALOG-OUTPUTLEN = 8 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'FKSTO'.
      WA_FIELDCATALOG-SELTEXT_M = 'Cancel'.
      WA_FIELDCATALOG-OUTPUTLEN = 8 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'FKDAT'.
      WA_FIELDCATALOG-SELTEXT_M = 'Billing Date'.
      WA_FIELDCATALOG-OUTPUTLEN = 12 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'MATNR'.
      WA_FIELDCATALOG-SELTEXT_M = 'Mat. No.'.
      WA_FIELDCATALOG-OUTPUTLEN = 12 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'VRKME'.
      WA_FIELDCATALOG-SELTEXT_M = 'Sales Unit'.
      WA_FIELDCATALOG-OUTPUTLEN = 10 .
    WA_FIELDCATALOG-SUBTOT = 'X'.
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'FKIMG'.
      WA_FIELDCATALOG-SELTEXT_L = 'Billed Qty in M/4FT/EA'.
      WA_FIELDCATALOG-OUTPUTLEN = 20 .
      WA_FIELDCATALOG-DO_SUM = 'X'.
    COLLECT WA_FIELDCATALOG INTO FIELDCATALOG.
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
    WA_FIELDCATALOG-FIELDNAME = 'FKIMG1'.
      WA_FIELDCATALOG-SELTEXT_M = 'Billed Qty in NOS.'.
      WA_FIELDCATALOG-OUTPUTLEN = 20 .
      WA_FIELDCATALOG-DO_SUM = 'X'.
    COLLECT WA_FIELDCATALOG INTO FIELDCATALOG.
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'NETWR'.
      WA_FIELDCATALOG-SELTEXT_M = 'Net Value'.
      WA_FIELDCATALOG-OUTPUTLEN = 15 .
      WA_FIELDCATALOG-DO_SUM = 'X'.
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'MWSBP'.
      WA_FIELDCATALOG-SELTEXT_M = 'Tax Amount'.
      WA_FIELDCATALOG-OUTPUTLEN = 15 .
      WA_FIELDCATALOG-DO_SUM = 'X'.
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'STCEG'.
      WA_FIELDCATALOG-SELTEXT_M = 'Vat Reg. No.'.
      WA_FIELDCATALOG-OUTPUTLEN = 15 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'VSTEL'.
      WA_FIELDCATALOG-SELTEXT_M = 'Shipping Pt'.
      WA_FIELDCATALOG-OUTPUTLEN = 10 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'REGIO'.
      WA_FIELDCATALOG-SELTEXT_M = 'Region'.
      WA_FIELDCATALOG-OUTPUTLEN = 8 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'RFBSK'.
      WA_FIELDCATALOG-SELTEXT_M = 'PsSt'.
      WA_FIELDCATALOG-OUTPUTLEN = 5 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'KZWI4'.
      WA_FIELDCATALOG-SELTEXT_M = 'Subtotal'.
      WA_FIELDCATALOG-OUTPUTLEN = 10 .
      WA_FIELDCATALOG-DO_SUM = 'X'.
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'NAME1'.
      WA_FIELDCATALOG-SELTEXT_M = 'Party Name'.
      WA_FIELDCATALOG-OUTPUTLEN = 15 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'STRAS'.
      WA_FIELDCATALOG-SELTEXT_M = 'Street Name'.
      WA_FIELDCATALOG-OUTPUTLEN = 15 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'ORT01'.
      WA_FIELDCATALOG-SELTEXT_M = 'City'.
      WA_FIELDCATALOG-OUTPUTLEN = 10 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
      WA_FIELDCATALOG-FIELDNAME = 'PSTLZ'.
      WA_FIELDCATALOG-SELTEXT_M = 'Postal Code'.
      WA_FIELDCATALOG-OUTPUTLEN = 10 .
      APPEND WA_FIELDCATALOG TO FIELDCATALOG.
      CLEAR WA_FIELDCATALOG.
    REFRESH IT_SORT1.
    CLEAR IT_SORT1.
      IT_SORT1-FIELDNAME = 'VBELN'.
      IT_SORT1-UP        = 'X'.
      IT_SORT1-SUBTOT = 'X'.
      APPEND IT_SORT1.
      CLEAR IT_SORT1.
    IT_SORT1-FIELDNAME = 'VRKME'.
    IT_SORT1-UP        = 'X'.
    IT_SORT1-SUBTOT = 'X'.
    APPEND IT_SORT1.
    CLEAR IT_SORT1.
      ENDFORM.
      FORM DATA_CALL.
    data : itab type it_final occurs 0,
    wa_itab type it_final.
    *loop at i_final into wa_final.
    *MOVE wa_final-VRKME to wa_itab-VRKME.
    *add wa_final-fkimg to wa_itab-fkimg.
    *MOVE wa_final-VRKME to wa_itab-VRKME.
    *add wa_final-fkimg to wa_itab-fkimg.
    *MOVE wa_final-VRKME to wa_itab-VRKME.
    *append wa_itab to itab.
    *clear: wa_final, wa_itab.
    **endon.
    **endat.
    endloop.
    *i_final[] = itab[].
      GD_REPID = SY-REPID.
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
       EXPORTING
      I_INTERFACE_CHECK                 = ' '
      I_BYPASSING_BUFFER                = ' '
      I_BUFFER_ACTIVE                   = ' '
         I_CALLBACK_PROGRAM                = GD_REPID
      I_CALLBACK_PF_STATUS_SET          = ' '
         I_CALLBACK_USER_COMMAND           = 'USER-COMMAND'
        I_CALLBACK_TOP_OF_PAGE            = 'TOP_OF_PAGE'
      I_CALLBACK_HTML_TOP_OF_PAGE       = ' '
      I_CALLBACK_HTML_END_OF_LIST       = ' '
      I_STRUCTURE_NAME                  =
      I_BACKGROUND_ID                   = ' '
         I_GRID_TITLE                      = 'List Of Billing Document'
      I_GRID_SETTINGS                   =
       IS_LAYOUT                         = GD_LAYOUT
        IT_FIELDCAT                       = FIELDCATALOG[]
      IT_EXCLUDING                      =
      IT_SPECIAL_GROUPS                 =
       IT_SORT                           = IT_SORT1[]
      IT_FILTER                         =
      IS_SEL_HIDE                       =
      I_DEFAULT                         = 'X'
       I_SAVE                            = 'X'
      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_FINAL
    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.                    "data_call

    hi,
    just comment this line.
    I_CALLBACK_USER_COMMAND = 'USER-COMMAND'
    as it is only useful in interactive reports.

  • Dump while Executing DTP

    Hi All,
    In process chain, While executing DTP( from PSA to ZINFOOBJECT-Master data), I am getting the following ABAP Dump:
    Runtime Errors         TSV_TNEW_PAGE_ALLOC_FAILED
    The internal table "???" could not be further extended. To enable
    error handling, the table had to be delete before this log was written.
    As a result, the table is displayed further down or, if you branch to
    the ABAP Debugger, with 0 rows.
    At the time of the termination, the following data was determined for
    the relevant internal table:
    Memory location: "Session memory"
    Row width: 5356
    Number of rows: 0
    Allocated rows: 138348
    Newly requested rows: 2 (in 69173 blocks)
    How to correct the error
        The amount of storage space (in bytes) filled at termination time was:
        Roll area...................... 416432
        Extended memory (EM)........... 2002720576
        Assigned memory (HEAP)......... 1999932640
        Short area..................... " "
        Paging area.................... 24576
        Maximum address space.......... 4294967295
        If the error occures in a non-modified SAP program, you may be able to
        find an interim solution in an SAP Note.
        If you have access to SAP Notes, carry out a search with the following
        keywords:
        "TSV_TNEW_PAGE_ALLOC_FAILED" " "
        "SAPLRSSTATMAN" or "LRSSTATMANU12"
        "RSSTATMAN_UPDATE_DATASTATE_EXT"
    Could any one suggest solution
    Thanks and Regards,
    Umakanth Jaldu

    Hi Ramanm
    Please suggest how to do repair custom info object in RSRV and the info object is loading from two different dtps and both dtps are failing because of same error.The process of DTP is showing but not moving to next process type.
    Dump:
    Runtime Errors         TSV_TNEW_PAGE_ALLOC_FAILED
    Date and Time          31.03.2015 22:19:53
    |Short text                                                                                        |
    |    No more storage space available for extending an internal table.                              |
    |What happened?                                                                                    |
    |    You attempted to extend an internal table, but the required space was                         |
    |    not available.                                                                                |
    |What can you do?                                                                                  |
    |    Note which actions and input led to the error.                                                |
    |                                                                                                  |
    |    For further help in handling the problem, contact your SAP administrator                      |
    |    .                                                                                             |
    |                                                                                                  |
    |    You can use the ABAP dump analysis transaction ST22 to view and manage                        |
    |    termination messages, in particular for long term reference.                                  |
    |                                                                                                  |
    |    Try to find out (e.g. by targetted data selection) whether the                                |
    |    transaction will run with less main memory.                                                   |
    |                                                                                                  |
    |    If there is a temporary bottleneck, execute the transaction again.                            |
    |    -                                                                                             |
    |                                                                                                  |
    |    If the error persists, ask your system administrator to check the                             |
    |    following profile parameters:                                                                 |
    |                                                                                                  |
    |    o  ztta/roll_area            (1.000.000 - 15.000.000)                                         |
    |           Classic roll area per user and internal mode                                           |
    |           usual amount of roll area per user and internal mode                                   |
    |    o  ztta/roll_extension       (10.000.000 - 500.000.000)                                       |
    |           Amount of memory per user in extended memory (EM)                                      |
    |    o  abap/heap_area_total      (100.000.000 - 1.500.000.000)                                    |
    |           Amount of memory (malloc) for all users of an application                              |
    |           server. If several background processes are running on                                 |
    |           one server, temporary bottlenecks may occur.                                           |
    |           Of course, the amount of memory (in bytes) must also be                                |
    |           available on the machine (main memory or file system swap).                            |
    |           Caution:                                                                               |
    |           The operating system must be set up so that there is also                              |
    |           enough memory for each process. Usually, the maximum address                           |
    |           space is too small.                                                                    |
    |           Ask your hardware manufacturer or your competence center                               |
    |           about this.                                                                            |
    |           In this case, consult your hardware vendor                                             |
    |    abap/heap_area_dia:        (10.000.000 - 1.000.000.000)                                       |
    |           Restriction of memory allocated to the heap with malloc                                |
    |           for each dialog process.                                                               |
    |    Parameters for background processes:                                                          |
    |    abap/heap_area_nondia:        (10.000.000 - 1.000.000.000)                                    |
    |           Restriction of memory allocated to the heap with malloc                                |
    |           for each background process.                                                           |
    |    Other memory-relevant parameters are:                                                         |
    |    em/initial_size_MB:         (35-1200)                                                         |
    |           Extended memory area from which all users of an                                        |
    |           application server can satisfy their memory requirement.                               |
    |Error analysis                                                                                    |
    |    The internal table "???" could not be further extended. To enable                             |
    |    error handling, the table had to be delete before this log was written.                       |
    |    As a result, the table is displayed further down or, if you branch to                         |
    |    the ABAP Debugger, with 0 rows.                                                               |
    |                                                                                                  |
    |    At the time of the termination, the following data was determined for                         |
    |    the relevant internal table:                                                                  |
    |                                                                                                  |
    |    Memory location: "Session memory"                                                             |
    |    Row width: 5356                                                                               |
    |    Number of rows: 0                                                                             |
    |    Allocated rows: 138348                                                                        |
    |    Newly requested rows: 2 (in 69173 blocks)                                                     |
    |How to correct the error                                                                          |
    |    The amount of storage space (in bytes) filled at termination time was:                        |
    |                                                                                                  |
    |    Roll area...................... 416432                                                        |
    |    Extended memory (EM)........... 2002720576                                                    |
    |    Assigned memory (HEAP)......... 1999932640                                                    |
    |    Short area..................... " "                                                           |
    |    Paging area.................... 24576                                                         |
    |    Maximum address space.......... 4294967295                                                    |
    |                                                                                                  |
    |    If the error occures in a non-modified SAP program, you may be able to                        |
    |    find an interim solution in an SAP Note.                                                      |
    |    If you have access to SAP Notes, carry out a search with the following                        |
    |    keywords:                                                                                     |
    |                                                                                                  |
    |    "TSV_TNEW_PAGE_ALLOC_FAILED" " "                                                              |
    |    "SAPLRSSTATMAN" or "LRSSTATMANU12"                                                            |
    |    "RSSTATMAN_UPDATE_DATASTATE_EXT"                                                              |
    |                                                                                                  |
    |    If you cannot solve the problem yourself and want to send an error                            |
    |    notification to SAP, include the following information:                                       |
    |                                                                                                  |
    |    1. The description of the current problem (short dump)                                        |
    |                                                                                                  |
    |       To save the description, choose "System->List->Save->Local File                            |
    |    (Unconverted)".                                                                               |
    |                                                                                                  |
    |    2. Corresponding system log                                                                   |
    |                                                                                                  |
    |       Display the system log by calling transaction SM21.                                        |
    |       Restrict the time interval to 10 minutes before and five minutes                           |
    |    after the short dump. Then choose "System->List->Save->Local File                             |
    |    (Unconverted)".                                                                               |
    |                                                                                                  |
    |    3. If the problem occurs in a problem of your own or a modified SAP                           |
    |    program: The source code of the program                                                       |
    |       In the editor, choose "Utilities->More                                                     |
    |    Utilities->Upload/Download->Download".                                                        |
    |                                                                                                  |
    |    4. Details about the conditions under which the error occurred or which                       |
    |    actions and input led to the error.                                                           |
    |                                                                                                  |
    |System environment                                                                                |
    |    SAP-Release 701                                                                               |
    |                                                                                                  |
    |    Application server... "sapXXXa1"                                                              |
    |    Network address...... "10.10.29.72"                                                           |
    |    Operating system..... "AIX"                                                                   |
    |    Release.............. "7.1"                                                                   |
    |    Hardware type........ "00CB77444C00"                                                          |
    |    Character length.... 16 Bits                                                                  |
    |    Pointer length....... 64 Bits                                                                 |
    |    Work process number.. 4                                                                       |
    |    Shortdump setting.... "full"                                                                  |
    |                                                                                                  |
    |    Database server... "sXXX341.sac.XXX"                                                     |
    |    Database type..... "ORACLE"                                                                   |
    |    Database name..... "XXX"                                                                      |
    |    Database user ID.. "SAPSR3"                                                                   |
    |                                                                                                  |
    |    Terminal.......... "GSSM0510"                                                                 |
    |                                                                                                  |
    |    Char.set.... "C"                                                                              |
    |                                                                                                  |
    |    SAP kernel....... 720                                                                         |
    |    created (date)... "Feb 10 2014 21:43:58"                                                      |
    |    create on........ "AIX 2 5 00092901D600"                                                      |
    |    Database version. "OCI_102, 11.2.0.2.0, V1, default"                                          |
    |                                                                                                  |
    |    Patch level. 525                                                                              |
    |    Patch text.. " "                                                                              |
    |                                                                                                  |
    |    Database............. "ORACLE 10.1.0.*.*, ORACLE 10.2.0.*.*, ORACLE 11.2.*.*.*"               |
    |    SAP database version. 720                                                                     |
    |    Operating system..... "AIX 2 5, AIX 3 5, AIX 1 6, AIX 1 7"                                    |
    |                                                                                                  |
    |    Memory consumption                                                                            |
    |    Roll.... 416432                                                                               |
    |    EM...... 2002720576                                                                           |
    |    Heap.... 1999932640                                                                           |
    |    Page.... 24576                                                                                |
    |    MM Used. 3938002576                                                                           |
    |    MM Free. 59192960                                                                             |
    |User and Transaction                                                                              |
    |    Client.............. 100                                                                      |
    |    User................ "XXXX"                                                               |
    |    Language Key........ "E"                                                                      |
    |    Transaction......... " "                                                                      |
    |    Transactions ID..... "551B198729F80700E10080000A0A1D12"                                       |
    |                                                                                                  |
    |    Program............. "SAPLRSSTATMAN"                                                          |
    |    Screen.............. "SAPLRSBM_REQUEST_GUI 0300"                                              |
    |    Screen Line......... 5                                                                        |
    |                                                                                                  |
    |    Information on caller of Remote Function Call (RFC):                                          |
    |    System.............. "XXX"                                                                    |
    |    Database Release.... 701                                                                      |
    |    Kernel Release...... 720                                                                      |
    |    Connection Type..... 3 (2=R/2, 3=ABAP System, E=Ext., R=Reg. Ext.)                            |
    |    Call Type........... "synchronous and non-transactional (emode 0, imode 0)"                   |
    |    Inbound TID.........." "                                                                      |
    |    Inbound Queue Name..." "                                                                      |
    |    Outbound TID........." "                                                                      |
    |    Outbound Queue Name.." "                                                                      |
    |                                                                                                  |
    |    Client.............. 100                                                                      |
    |    User................ "XXXX"                                                               |
    |    Transaction......... "RSA1"                                                                   |
    |    Call Program........."SAPLRSM1"                                                               |
    |    Function Module..... "RSS2_CALL_FCODE_EMPTY_GLOBALS"                                          |
    |    Call Destination.... "NONE"                                                                   |
    |    Source Server....... "sapXXXa1_XXX_12"                                                        |
    |    Source IP Address... "10.10.29.72"                                                            |
    |                                                                                                  |
    |    Additional information on RFC logon:                                                          |
    |    Trusted Relationship " "                                                                      |
    |    Logon Return Code... 0                                                                        |
    |    Trusted Return Code. 0                                                                        |
    |                                                                                                  |
    |    Note: For releases < 4.0, information on the RFC caller are often                             |
    |    only partially available.                                                                     |
    |Information on where terminated                                                                   |
    |    Termination occurred in the ABAP program "SAPLRSSTATMAN" - in                                 |
    |     "RSSTATMAN_UPDATE_DATASTATE_EXT".                                                            |
    |    The main program was "SAPMSSY1 ".                                                             |
    |                                                                                                  |
    |    In the source code you have the termination point in line 306                                 |
    |    of the (Include) program "LRSSTATMANU12".                                                     |
    |Source Code Extract                                                                               |
    |Line |SourceCde                                                                                   |
    |  276|       l_s_ext_db-records_techok  <> l_s_ext-records_techok.                                |
    |  277|      l_s_ext-ts_tech_changed = l_timestamp.                                                |
    |  278|      l_s_ext-ts_data_changed = l_timestamp.                                                |
    |  279|      l_changed = 'X'.                                                                      |
    |  280|    else.                                                                                   |
    |  281|      l_s_ext-ts_tech_changed = l_s_ext_db-ts_tech_changed.                                 |
    |  282|    endif.                                                                                  |
    |  283|    if l_s_ext-requests_techok = 0.                                                         |
    |  284|      clear l_s_ext-ts_tech_changed.                                                        |
    |  285|    endif.                                                                                  |
    |  286|                                                                                            |
    |  287|    if l_s_ext_db-requests_error <> l_s_ext-requests_error  or                              |
    |  288|       l_s_ext_db-records_error  <> l_s_ext-records_error.                                  |
    |  289|      l_s_ext-ts_error_changed = l_timestamp.                                               |
    |  290|      l_s_ext-ts_data_changed  = l_timestamp.                                               |
    |  291|      l_changed = 'X'.                                                                      |
    |  292|    else.                                                                                   |
    |  293|      l_s_ext-ts_error_changed = l_s_ext_db-ts_error_changed.                               |
    |  294|    endif.                                                                                  |
    |  295|    if l_s_ext-requests_error = 0.                                                          |
    |  296|      clear l_s_ext-ts_error_changed.                                                       |
    |  297|    endif.                                                                                  |
    |  298|                                                                                            |
    |  299|    if l_s_ext_db-requests_all <> l_s_ext-requests_all or                                   |
    |  300|       l_s_ext_db-records_all  <> l_s_ext-records_all.                                      |
    |  301|      l_s_ext-ts_data_changed = l_timestamp.                                                |
    |  302|      l_changed = 'X'.                                                                      |
    |  303|    endif.                                                                                  |
    |  304|                                                                                            |
    |  305|    l_t_part[] = i_t_part[].                                                                |
    |>>>>>|    sort l_t_part by timestamp_verb descending.                                             |
    |  307|    read table l_t_part into l_s_part index 1.                                              |
    |  308|    l_s_ext-ts_last_request = l_s_part-timestamp_verb.                                      |
    |  309|    l_s_ext-last_request    = l_s_part-partnr.                                              |
    |  310|    if l_s_ext_db-ts_last_request <> l_s_ext-ts_last_request or                             |
    |  311|       l_s_ext_db-last_request  <> l_s_ext-last_request.                                    |
    |  312|      l_s_ext-ts_data_changed = l_timestamp.                                                |
    |  313|      l_changed = 'X'.                                                                      |
    |  314|    endif.                                                                                  |
    |  315|    if l_changed = 'X'.                                                                     |
    |  316|      modify rsmdatastate_ext from l_s_ext.                                                 |
    |  317|    endif.                                                                                  |
    |  318|  endif.                                                                                    |
    |  319|                                                                                            |
    |  320|  if not ( i_dta_type = rsstm_c_types-psa_new or                                            |
    |  321|           i_dta_type = rsstm_c_types-psa_old ).                                            |
    |  322|    call function 'RSM_LAST_CHANGE_CHECK_UPDATE'                                            |
    |  323|      exporting                                                                             |
    |  324|        i_dta   = i_dta(30)                                                                 |
    |  325|        i_tstmp = l_s_ext-ts_data_changed.                                                  |
    |
    |Active Calls/Events                                                                               |
    |No.   Ty.          Program                             Include                             Line   |
    |      Name                                                                                        |
    |   16 FUNCTION     SAPLRSSTATMAN                       LRSSTATMANU12                         306  |
    |      RSSTATMAN_UPDATE_DATASTATE_EXT                                                              |
    |   15 FORM         SAPLRSM1                            LRSM1U23                              768  |
    |      RSM1_UPDATE_RSMDATASTATE                                                                    |
    |   14 FORM         SAPLRSM1                            LRSM1F08                             5520  |
    |      RSM1_INIT_PARTTAB                                                                           |
    |   13 FORM         SAPLRSM1                            LRSM1U23                              187  |
    |      RSSM_UPDATE_RSMDATASTATE                                                                    |
    |   12 FUNCTION     SAPLRSM1                            LRSM1U23                              139  |
    |      RSSM_UPDATE_RSMDATASTATE                                                                    |
    |   11 METHOD       CL_RSSM_STATMAN===============CP    CL_RSSM_STATMAN===============CM00L    15  |
    |      CL_RSSM_STATMAN=>IF_RSBK_REQUEST_OBSERVER~AFTER_FINAL_STATE_TRANSITION                      |
    |   10 METHOD       CL_RSBK_REQUEST_STATE=========CP    CL_RSBK_REQUEST_STATE=========CM01S    13  |
    |      CL_RSBK_REQUEST_STATE=>AFTER_FINAL_STATE_TRANSITION                                         |
    |    9 METHOD       CL_RSBK_REQUEST===============CP    CL_RSBK_REQUEST===============CM00H    11  |
    |      CL_RSBK_REQUEST=>IF_RSBK_REQUEST~SET_USTATE_RED                                             |
    |    8 FORM         SAPLRSBM_REQUEST_GUI                LRSBM_REQUEST_GUIF01                   26  |
    |      SET_USTATE_300                                                                              |
    |    7 MODULE (PAI) SAPLRSBM_REQUEST_GUI                LRSBM_REQUEST_GUII01                  122  |
    |      USER_COMMAND_0300                                                                           |
    |    6 MODULE (PAI) SAPLRSBM_REQUEST_GUI                LRSBM_REQUEST_GUII01                   70  |
    |      USER_COMMAND_100                                                                            |
    |    5 FUNCTION     SAPLRSBM_REQUEST_GUI                LRSBM_REQUEST_GUIU01                   24  |
    |      RSBM_SHOW_REQUEST                                                                           |
    |    4 FUNCTION     SAPLRSS2                            LRSS2U26                               39  |
    |      RSS2_CALL_FCODE_EMPTY_GLOBALS                                                               |
    |    3 FORM         SAPLRSS2                            LRSS2U26                                1  |
    |      RSS2_CALL_FCODE_EMPTY_GLOBALS                                                               |
    |    2 FORM         SAPMSSY1                            SAPMSSY1                               85  |
    |      REMOTE_FUNCTION_CALL                                                                        |
    |    1 MODULE (PBO) SAPMSSY1                            SAPMSSY1                               30  |
    |      %_RFC_START                                                                                 |
    Please advise me,
    Thanks and Regards,
    Uma

Maybe you are looking for

  • Dock Extender Cable for iPhone 4

    Why doesn't apple have one of these? I know Cablejive does. I had received one for my iPhone 4 with my Otterbox Defender case, but now realize that the note on the Otterbox website was only for iPhone 3/3GS phones only. I cuoghed up 25.95 when I only

  • Oracle HRMS R12 training from Oracle University

    Oracle HRMS R12 training from Oracle University iWare Logic provides "Oracle Apps Training" and Certification in Oracle HRMS R12 in association with Oracle University. Oracle HRMS Training and Certification topics R12 E-Business Suite Essentials for

  • CSTto be posted to different G/L

    Dear all, Currently the Non deductible CST is posted as under during MIGO <i>CL. stores & spares A/c Cr.  104 GR/IR stores & spares A/c   Cr.        104 (G/L A/C 161230)</i>The requirement is:- <i>CL. stores & spares A/c Cr.  104 GR/IR stores & spare

  • Built in iSight not working wiith Skype!

    I have googled all over and tried everything. I ve even seen this question being asked here before but no solution has worked for me yet. I was using skype and isight just fine until I was unable to hear audio in Quicktime for one of my videos. So I

  • CS5 Programmfehler nach Mavericks-Upgrade

    Hi, ich hab auf mein Macbook Pro jetzt Mavericks geladen (das brauchte ich für Lightroom5), seitdem startet die Creative Suite nicht mehr. Photoshop meldet einen Programmfehler, Indesign und AI öffnen sich einfach nciht vollständig. Probiert habe ich