Cobol COMP type

Hello everyone.
I am trying to import data from a cobol file containing ,among others , a field with type "COMP PIC 9(06)v99". If I am correct the field is represented by 4 chars in the file. I have tried defining the field in the sqlloader control file as DECIMAL(8,2), DECIMAL EXTERNAL, INTEGER and INTEGER(4). The only time I get results is with INTEGER(4) but the values are not correct.
Any Ideas?
Thanx

Hi
First the basic COBOL question. The correct datatype is INTEGER(4) UNSIGNED. Integer defaults to signed, but the pic(ture) clause does not specify a sign. In order to get the correct results UNSIGNED must be specified.
Integers are not considered portable by sqlloader because of byte size, byte order, and sign representation. So there still may be problems loading the data. The byte order may also need to be specified (big endian/little endian ness)
There is a paper on OTN that has some examples also;
http://www.oracle.com/technology/products/warehouse/pdf/COBOL%20Data%20Integration%20with%20OWB10gR2.pdf
Cheers
David

Similar Messages

  • Best practices in choosing Product Version / App Comp Type

    Unfornunaly I din't find a document like SAP XI Best practice.
    I am a litle bit confuced  in terms Product version, Software Component Version, Main Instance...
    Are the following scenarios right?
    1. <b>I want to integrate non-SAP System.</b>
         a) I have to create SYSTEM and PRODUCT in SLD
         b) I have to create integration scenario in my PRODUCT
         c) Which type of Application Component do I have to choose?
            (In help.sap.com <b>Choise Template if it is non-SAP product that it is not defined in SLD</b>)
            It is non-SAP product <b>but it is defined</b> in SLD. Which type of App Comp is the best?
            What sense is in Application Component Type? 
    2. <b>I want to integrate SAP SRM and Oracle DB of non-SAP application</b>
         Do I need to use SAP SRM Product Version and to create Integration Scenarion there?
         Which Application Component Type do I need to choose for non-SAP application? Template?

    Hi Sergey,
    >>1. I want to integrate non-SAP System.
    >>>> b) I have to create integration scenario in my PRODUCT
    no you don't have to create integration scenarios
    these are only created to show the flow of our processes
    but you don't have to create/use them
    take a look at this weblog if you really want to create it:
    /people/siva.maranani/blog/2005/08/27/modeling-integration-scenario146s-in-xi
    >>> Do I need to use SAP SRM Product Version and to create Integration Scenarion there?
    you don't need integration scenario here too
    but if you want you can create it
    Regards,
    michal

  • Does the iPhone have the option of having a standard telephone type keyboard instead of the normal comp type

    Does the iPhone have the option of having a standard telephone type keyboard instead of the normal comp type

    phone icon/keyboard (at the bottom of the page )

  • Deep DDIC-Structure - Method to get the Comp.Type of a sub-structure

    Dear colleagues,
    thought the subsequent piece of coding might be helpful for the following problem:
    In DDIC you have created a deep/nested Structure e.g. a complete Business Document representation like
    s_doc_header type struct_doc_header
         (incl.) item  type tab_item
            (incl) party type tab_party etc.
    Now for some purpose you need to access somewhere a sub-part of this structure, e.g. the party-part. You only know (dynamically) the component name "party", but need for dynamic access also the Component Type ("tab_party") (in order to make use of  a "CREATE DATA lr_reftodata TYPE (determined_comp_type)." )
    The following piece of coding should help to query any start component type (here "struct_doc_header") for its embedded components.
    Its a recursive use of features provided by the very nice class(set) of cl_abap_structdescr.
    I implemented it as a static method.
    When doing so, you need to ensure, that the TYPE-GROUP "ABAP" is linked to the class (class properties --> forward declarations),
    Let me know if you find it useful.
    And apologies in advance, if the same problem was already posted in the forum. I did only a rough search before due to a lag of ideas for appropriate search-strings ...
    Best regards,
    Rudy
    Signature:
    Importing:
    IV_COMPNAME     TYPE ABAP_COMPNAME
    IV_START_STRUCTR     TYPE KOMP_TYPE
    Exporting/returning
    EV_DDIC_STRUCT     TYPE KOMP_TYPE
    METHOD search_deep_ddic_by_comp.
    * Description      -------------------------------------------
    *  Methods looks into a deep DDIC-Structure and returns the
    *  corresponding TYPE
    *  Prerequsite for usage: Structures component names are unique.
    * Local Data Defintions --------------------------------------
    * Locals -----------------------------------------------------
    * TYPES:
      DATA: lv_compname                 TYPE abap_compname.
      DATA: lt_componenttable           TYPE abap_component_tab.
      DATA: lv_relative_name            TYPE string.
      DATA: lv_ddic_header                  TYPE x030l.
      DATA: lv_ddic_struct              TYPE komp_type.
      DATA: lv_start_struct             TYPE komp_type.
    * supporting
      DATA: lv_lines                    TYPE i.
      DATA: lv_message                  TYPE string.
      DATA: lt_selopt                   TYPE sesf_selection_parameters_tab.
      DATA: ls_selopt                   TYPE sesf_selection_parameter.
    * References -------------------------------------------------
      DATA: lo_struct_descr             TYPE REF TO cl_abap_structdescr.
      DATA: lo_type_descr               TYPE REF TO cl_abap_typedescr.
    * Field-Symbols ----------------------------------------------
      FIELD-SYMBOLS:
            <fs_struct_descr_component> TYPE abap_componentdescr.
      lo_struct_descr ?= cl_abap_structdescr=>describe_by_name( p_name = iv_start_structr ).
      IF lo_struct_descr IS BOUND.
    *   get all sub-structures/components of iv_start_structr
        CALL METHOD lo_struct_descr->get_components
          RECEIVING
            p_result = lt_componenttable.
        lv_compname = iv_compname.
        READ TABLE lt_componenttable ASSIGNING <fs_struct_descr_component>
                                               WITH KEY  name = lv_compname.
        IF sy-subrc = 0.
    *     matching component found - search for DDIC structure
          CALL METHOD <fs_struct_descr_component>-type->get_relative_name
            RECEIVING
              p_relative_name = lv_relative_name.
          ASSERT lv_relative_name IS NOT INITIAL.
          CASE <fs_struct_descr_component>-type->type_kind.
            WHEN 'u' OR 'v'. "structure
              ev_ddic_struct = lv_relative_name.
              RETURN.
            WHEN 'h'. "table type - derive the line type
              lo_type_descr ?= cl_abap_datadescr=>describe_by_name( p_name = lv_relative_name ).
              CALL METHOD lo_type_descr->get_ddic_header
                RECEIVING
                  p_header = lv_ddic_header.
              IF sy-subrc = 0.
                ev_ddic_struct   = lv_ddic_header-refname.
                RETURN.
              ELSE.
                "error
              ENDIF.
            WHEN OTHERS.
              "error
          ENDCASE.
        ELSE.
    *     go deeper into structure and look into each sub-structure via recursion
          LOOP AT lt_componenttable ASSIGNING <fs_struct_descr_component>.
            CALL METHOD <fs_struct_descr_component>-type->get_relative_name
              RECEIVING
                p_relative_name = lv_relative_name.
            ASSERT lv_relative_name IS NOT INITIAL.
            CASE <fs_struct_descr_component>-type->type_kind.
              WHEN 'u' OR 'v'. "structure
              WHEN 'h'. "table type - derive the line type
                lo_type_descr ?= cl_abap_datadescr=>describe_by_name( p_name = lv_relative_name ).
                CALL METHOD lo_type_descr->get_ddic_header
                  RECEIVING
                    p_header = lv_ddic_header.
                IF sy-subrc = 0.
                  lv_relative_name = lv_ddic_header-refname.
                ELSE.
                  "error
                ENDIF.
              WHEN OTHERS.
                EXIT. "next loop, investigate only struct and table
            ENDCASE.
    *        lv_compname     = <fs_struct_descr_component>-name.
            lv_start_struct = lv_relative_name.
            CALL METHOD /scmtms/cl_ddic_utility=>search_deep_ddic_by_comp
              EXPORTING
                iv_compname      = iv_compname
                iv_start_structr = lv_start_struct
              IMPORTING
                ev_ddic_struct   = lv_ddic_struct.
            IF lv_ddic_struct IS NOT INITIAL.
              ev_ddic_struct = lv_ddic_struct.
              EXIT.
            ENDIF.
          ENDLOOP.
        ENDIF.
      ENDIF.
    ENDMETHOD.

    Using command:
    ASSIGN COMPONENT idx OF STRUCTURE struc TO <fs>.
    For example:
    DESCRIBE FIELD pi_output TYPE pi_output COMPONENTS lv_columns. "For number of columns
    DO lv_columns TIMES.
    ASSIGN COMPONENT SY-INDEX OF
    STRUCTURE (name of structure) TO <l_fs_output>. "<l_fs_output> - field of structure
    DESCRIBE FIELD <l_fs_output>... "with other options.
    ENDDO.

  • Error on Activation : BuiltIn Type or Simple Type expected

    Dear All,
    I imported a DC from NWDI and made some changes. When i checked in the changes and clicked on Activate option, i got an error.
    I figured out that certain files related to a simple type were not present on DTR.
    Check this : [Error while activating DC;
    However, when i tried to add these files to the DTR, the activity which I had used previously was not available in Open Activities. It had moved to Closed Activities.
    So I created another activity and added the file to DTR successfully.
    However, the above error still persists when I try to activate the first activity which has all the changes.
    Following is the activation log:
    Development Component Build (2008-12-22 03:34:50)
      Component name: hal/refx/sdbs/request
      Component vendor: halliburton.com
      SC compartment: halliburton_HAL_SDBS_1
      Configuration: PDI_CITSDBS_D
      Location: PDI_CITSDBS_D
      Source code location: http://NWDI:51000/dtr/ws/CITSDBS/halliburton_HAL_SDBS/dev/active/DCs/halliburton.com/hal/refx/sdbs/request/_comp/
      DC root folder: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCshalliburton.comhal
    efxsdbs
    equest\_comp
      DC type: Web Dynpro
    DC Model check:
       All used DCs are available locally
       validating dependency to build plugin "sap.com/tc/bi/bp/webDynpro"
       validating dependency to  public part "default" of DC "sap.com/tc/cmi"
       validating dependency to  public part "default" of DC "sap.com/tc/ddic/ddicruntime"
       validating dependency to  public part "default" of DC "sap.com/tc/ddic/metamodel/content"
       validating dependency to  public part "default" of DC "sap.com/tc/wd/webdynpro"
       validating dependency to  public part "default" of DC "sap.com/tc/logging"
       validating dependency to  public part "default" of DC "sap.com/tc/wdp/metamodel/content"
       validating dependency to  public part "default" of DC "sap.com/com.sap.aii.proxy.framework"
       validating dependency to  public part "default" of DC "sap.com/com.sap.aii.util.misc"
       validating dependency to  public part "default" of DC "sap.com/com.sap.exception"
       validating dependency to  public part "default" of DC "sap.com/com.sap.mw.jco"
       DC model check OK
    Start build plugin:
       using build plugin: sap.com/tc/bi/bp/webDynpro
       starting build plugin from : E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCssap.com     c i pwebDynpro\_compgendefaultpublicwebDynpro
    Build Plugin 'WebdynproPlugin', Version 7.00 SP 13 (645_VAL_REL, built on 2007-08-11 18:37:55 CEST, CL72348)
       development component:  hal/refx/sdbs/request (halliburton.com)
          software component:  HAL_SDBS (halliburton)
                    location:  PDI_CITSDBS_D
                        type:  Web Dynpro
               build variant:  default
             source location:  SAPServicePDI@localhost
             output location:  E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCshalliburton.comhal
    efxsdbs
    equest\_compgendefault
           plugin start time:  2008-12-22 03:34:51 GMT-06:00 (CST)
                     Java VM:  Java HotSpot(TM) 64-Bit Server VM, 1.4.2_12-b03 (Sun Microsystems Inc.)
    General options:
      convert *.xlf to *.properties: yes
      include sources for debugging: yes
    Warning: Source folder "META-INF" exists but is empty and will be ignored.
    Warning: Source folder "src/mimes" exists but is empty and will be ignored.
    Warning: Source folder "src/configuration" exists but is empty and will be ignored.
    Checking path lengths for sources
    Path length checks finished in 0.078 seconds
    Preparing data context..
    No public part descriptor found for component "tc/cmi" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "tc/ddic/ddicruntime" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "tc/ddic/metamodel/content" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "tc/wd/webdynpro" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "tc/logging" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "tc/wdp/metamodel/content" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "com.sap.aii.proxy.framework" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "com.sap.aii.util.misc" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "com.sap.exception" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "com.sap.mw.jco" (vendor "sap.com"), public part "default", using legacy mode.
    No 'default' JDK defined, will use running VM.
    Data context preparation finished in 0.297 seconds
    Creating Ant build file..
      Creating output file: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCshalliburton.comhal
    efxsdbs
    equest\_compgendefaultlogs uild.xml
      Using macro file:     E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCssap.com     c i pwebDynpro\_compgendefaultpublicwebDynpromacros uild.vm
    Build file creation finished in 0.281 seconds
    Starting Ant..
      Using build file:     E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCshalliburton.comhal
    efxsdbs
    equest\_compgendefaultlogs uild.xml
      Using build target:   build
      Generation folder:    E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590     8FE455C19F0471A21406A9CE51EECCA0
      Using Ant version:    1.6.2
    compile:
          [echo] Starting dictionary generator
         [ddgen]
         [ddgen] [Info]    Property deployment is true: Deployment information is provided!
         [ddgen] [Info]    Property sourcepath: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCshalliburton.comhal
    efxsdbs
    equest\_compsrcpackages
         [ddgen] [Info]    Property targetpath: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590     8FE455C19F0471A21406A9CE51EECCA0gen_ddic
         [ddgen] [Info]    Property archivename: halliburton.comhalrefxsdbsrequest
         [ddgen] [Info]    Property vendor: halliburton.com
         [ddgen] [Info]    Property dcname: hal/refx/sdbs/request
         [ddgen] [Info]    Property projectlanguage: en
         [ddgen] [Info]    Property language: Available languages are automatically determined!
         [ddgen] [Info]    Property addpaths ...
         [ddgen] [Info]       SapMetamodelWebdynproContent.zip - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/bi/extwd/_comp/gen/default/public/def/lib/model
         [ddgen] [Info]       SapMetamodelDictionaryContent.zip - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/bi/extddic/_comp/gen/default/public/def/lib/model
         [ddgen] [Info]       logging.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/logging/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       logging.perf.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/logging/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       SapDictionaryTypeServices.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/ddic/ddicruntime/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       SapDictionaryTypesRuntime.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/ddic/ddicruntime/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       aii_proxy_rt.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/com.sap.aii.proxy.framework/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       SapMetamodelDictionaryContent.zip - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/ddic/metamodel/content/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       SapMetamodelWebdynproContent.zip - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wdp/metamodel/content/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       aii_util_misc.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/com.sap.aii.util.misc/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       jrfc.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/com.sap.mw.jco/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       cmiapi.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/cmi/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynproadmin.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynprobasesrvc.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynproruntime_repository.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynproruntime_repository_pmr.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynproservices.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynproclientserver.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynpromodel_dynamicrfc.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynpromodelimpl.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynpropdfobject.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynproportal.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynproprogmodel.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynproruntime_designtime_coupling.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       webdynproruntime_designtime_coupling_api.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]       exception.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/com.sap.exception/_comp/gen/default/public/default/lib/java
         [ddgen] [Info]    Initialize generation templates from configuration jar:file:/E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/bi/extddic/_comp/gen/default/public/def/lib/java/SapDictionaryGenerationCore.jar!/DictionaryGenerationConfigurationCompiled.xml
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Fegrp.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/PackagePointer.java
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Vkbur.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Vbeln_Va.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Manum.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmtxt.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Magrp.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mgv_Material_External.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapi_Rcode.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Hequi.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Urcod.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Aknum.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Peturma.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Kostl.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ingrp.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Iwerk.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Balognr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmobjnr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Symsgid.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ernam.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Iloan.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Urgrp.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapi_Fld.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bstkd.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Aedat.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ort01.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Tzonso.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Tidnr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Aufnr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mzeit.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ad_Addrnum.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmanum.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmdat.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bdc_Mid.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Erdat.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/J_Objnr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Sttxt.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Submt.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ad_Tlnmbr1.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mgv_Assembly_Guid.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Landx.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Gewrk.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Eqart.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qkunum.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Warpl.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/I_Count.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qobjkey.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Vtweg.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Otgrp.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Auszt.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Daufn.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Kzloesch.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/I_Parnr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmsm_Parvw.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Oteil.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Auztv.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Swo_Objtyp.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapi_Mtype.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ausvn.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ilom_Ordst.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ppsid.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Auztb.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ausbs.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Swerk.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Anln1.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmnum.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapi_Msg.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mncod.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ad_City2.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Binreltyp.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Deviceid.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Char1.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmdab.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Kdauf.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ad_Roomnum.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mfgrp.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Maueh.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapiwait.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bautl.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Abnum.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmart.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Zde_Email.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ktx01.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ad_Name2.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Parvw.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Telnr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Urnum.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Msaus.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Konty.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Aezeit.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mfcod.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Pstur.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Prq_Spregt.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Vkorg.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Pm_Posid_Header.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Fecod.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bstdk.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Persno.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Felfd.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qlfdpos.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapi_Param.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Kokrs.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Symsgv.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmgrp.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Pltxt.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bezdt.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Gsber.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmzab.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Logsys.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Urstx.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapilogsys.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmsmerlnam.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Matxt.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mgv_Assembly_External.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Natio.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Pmloc.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Tdformat.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mgv_Assembly_Version.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qsmnum.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bdc_Mnr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapi_Line.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Raumnr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Land1.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Landx50.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Artpr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Strur.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Aenam.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Matnr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Txt30.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Psterma.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Erzeit.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Fetxt.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Zlname.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Peter.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ad_Bldng_P.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bezur_D.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Pster.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/comp/types/ChargeType.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/comp/types/PackagePointer.java
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Balmnr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Swo_Typeid.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Symsgno.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Kzmla.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bukrs.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/So_Text255.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Priok.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Vkgrp.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bdc_Mart.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Petur.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Cadnr.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Stort.gsimpletype
         [ddgen] [Info]    Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapiret2.gstructure
         [ddgen] [Error]   Structure com.halliburton.esg.erp.re.models.manufacturing.types.Bapi2080_Notcausi is not generated
         [ddgen] [Error]   BuiltIn Type or Simple Type expected
         [ddgen] [Info]    Catching throwable null
         [ddgen] [Info]    com.sap.dictionary.generation.ant.GenerationAntTaskError
         [ddgen]      at com.sap.dictionary.generation.ant.GenerationAnt.showCheckResult(GenerationAnt.java:171)
         [ddgen]      at com.sap.dictionary.tools.generation.Generation.generatePersistentStructure(Generation.java:480)
         [ddgen]      at com.sap.dictionary.tools.generation.console.GenerationConsole.generate(GenerationConsole.java:168)
         [ddgen]      at com.sap.dictionary.generation.ant.GenerationAnt.main(GenerationAnt.java:47)
         [ddgen]      at sun.reflect.NativeMethodAccessorImpl.invoke0(Native Method)
         [ddgen]      at sun.reflect.NativeMethodAccessorImpl.invoke(NativeMethodAccessorImpl.java:39)
         [ddgen]      at sun.reflect.DelegatingMethodAccessorImpl.invoke(DelegatingMethodAccessorImpl.java:25)
         [ddgen]      at java.lang.reflect.Method.invoke(Method.java:324)
         [ddgen]      at com.sap.dictionary.generation.ant.DDGenAntTask.execute(DDGenAntTask.java:219)
         [ddgen]      at org.apache.tools.ant.UnknownElement.execute(UnknownElement.java:275)
         [ddgen]      at org.apache.tools.ant.Task.perform(Task.java:364)
         [ddgen]      at org.apache.tools.ant.Target.execute(Target.java:341)
         [ddgen]      at org.apache.tools.ant.Target.performTasks(Target.java:369)
         [ddgen]      at org.apache.tools.ant.Project.executeTarget(Project.java:1214)
         [ddgen]      at com.sap.tc.buildplugin.techdev.ant.util.AntRunner.run(AntRunner.java:116)
         [ddgen]      at com.sap.tc.buildplugin.DefaultAntBuildAction.execute(DefaultAntBuildAction.java:59)
         [ddgen]      at com.sap.tc.buildplugin.DefaultPlugin.handleBuildStepSequence(DefaultPlugin.java:214)
         [ddgen]      at com.sap.tc.buildplugin.DefaultPlugin.performBuild(DefaultPlugin.java:186)
         [ddgen]      at com.sap.tc.buildplugin.DefaultPluginV3Delegate$BuildRequestHandler.handle(DefaultPluginV3Delegate.java:66)
         [ddgen]      at com.sap.tc.buildplugin.DefaultPluginV3Delegate.requestV3(DefaultPluginV3Delegate.java:48)
         [ddgen]      at sun.reflect.NativeMethodAccessorImpl.invoke0(Native Method)
         [ddgen]      at sun.reflect.NativeMethodAccessorImpl.invoke(NativeMethodAccessorImpl.java:39)
         [ddgen]      at sun.reflect.DelegatingMethodAccessorImpl.invoke(DelegatingMethodAccessorImpl.java:25)
         [ddgen]      at java.lang.reflect.Method.invoke(Method.java:324)
         [ddgen]      at com.sap.tc.buildtool.v2.impl.PluginHandler2.maybeInvoke(PluginHandler2.java:350)
         [ddgen]      at com.sap.tc.buildtool.v2.impl.PluginHandler2.request(PluginHandler2.java:102)
         [ddgen]      at com.sap.tc.buildtool.v2.impl.PluginHandler2.build(PluginHandler2.java:76)
         [ddgen]      at com.sap.tc.buildtool.PluginHandler2Wrapper.execute(PluginHandler2Wrapper.java:58)
         [ddgen]      at com.sap.tc.devconf.impl.DCProxy.make(DCProxy.java:1750)
         [ddgen]      at com.sap.tc.devconf.impl.DCProxy.make(DCProxy.java:1515)
         [ddgen]      at com.sap.tc.buildcontroller.CBSBuildController.build(CBSBuildController.java:761)
         [ddgen]      at com.sap.tc.buildcontroller.CBSBuildController.execCommand(CBSBuildController.java:527)
         [ddgen]      at com.sap.tc.buildcontroller.CBSBuildController.evalCmdLine(CBSBuildController.java:452)
         [ddgen]      at com.sap.tc.buildcontroller.CBSBuildController.run(CBSBuildController.java:324)
         [ddgen]      at com.sap.tc.buildcontroller.CBSBuildController.exec(CBSBuildController.java:262)
         [ddgen]      at com.sap.tc.buildcontroller.CBSBuildController.mainLoop(CBSBuildController.java:217)
         [ddgen]      at com.sap.tc.buildcontroller.CBSBuildController.main(CBSBuildController.java:178)
         [ddgen] ERROR: Unknown exception during generation null (com.sap.dictionary.generation.ant.GenerationAntTaskError)
         [ddgen] ERROR: Generation failed due to errors (3 seconds)
    Error: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCshalliburton.comhal
    efxsdbs
    equest\_compgendefaultlogs uild.xml:80: [Error]   Generation failed!
         at com.sap.dictionary.generation.ant.DDGenAntTask.execute(DDGenAntTask.java:254)
         at org.apache.tools.ant.UnknownElement.execute(UnknownElement.java:275)
         at org.apache.tools.ant.Task.perform(Task.java:364)
         at org.apache.tools.ant.Target.execute(Target.java:341)
         at org.apache.tools.ant.Target.performTasks(Target.java:369)
         at org.apache.tools.ant.Project.executeTarget(Project.java:1214)
         at com.sap.tc.buildplugin.techdev.ant.util.AntRunner.run(AntRunner.java:116)
         at com.sap.tc.buildplugin.DefaultAntBuildAction.execute(DefaultAntBuildAction.java:59)
         at com.sap.tc.buildplugin.DefaultPlugin.handleBuildStepSequence(DefaultPlugin.java:214)
         at com.sap.tc.buildplugin.DefaultPlugin.performBuild(DefaultPlugin.java:186)
         at com.sap.tc.buildplugin.DefaultPluginV3Delegate$BuildRequestHandler.handle(DefaultPluginV3Delegate.java:66)
         at com.sap.tc.buildplugin.DefaultPluginV3Delegate.requestV3(DefaultPluginV3Delegate.java:48)
         at sun.reflect.NativeMethodAccessorImpl.invoke0(Native Method)
         at sun.reflect.NativeMethodAccessorImpl.invoke(NativeMethodAccessorImpl.java:39)
         at sun.reflect.DelegatingMethodAccessorImpl.invoke(DelegatingMethodAccessorImpl.java:25)
         at java.lang.reflect.Method.invoke(Method.java:324)
         at com.sap.tc.buildtool.v2.impl.PluginHandler2.maybeInvoke(PluginHandler2.java:350)
         at com.sap.tc.buildtool.v2.impl.PluginHandler2.request(PluginHandler2.java:102)
         at com.sap.tc.buildtool.v2.impl.PluginHandler2.build(PluginHandler2.java:76)
         at com.sap.tc.buildtool.PluginHandler2Wrapper.execute(PluginHandler2Wrapper.java:58)
         at com.sap.tc.devconf.impl.DCProxy.make(DCProxy.java:1750)
         at com.sap.tc.devconf.impl.DCProxy.make(DCProxy.java:1515)
         at com.sap.tc.buildcontroller.CBSBuildController.build(CBSBuildController.java:761)
         at com.sap.tc.buildcontroller.CBSBuildController.execCommand(CBSBuildController.java:527)
         at com.sap.tc.buildcontroller.CBSBuildController.evalCmdLine(CBSBuildController.java:452)
         at com.sap.tc.buildcontroller.CBSBuildController.run(CBSBuildController.java:324)
         at com.sap.tc.buildcontroller.CBSBuildController.exec(CBSBuildController.java:262)
         at com.sap.tc.buildcontroller.CBSBuildController.mainLoop(CBSBuildController.java:217)
         at com.sap.tc.buildcontroller.CBSBuildController.main(CBSBuildController.java:178)
    Ant runtime 3.469 seconds
    Ant build finished with ERRORS
    [Error]   Generation failed!
    Error: Build stopped due to an error: [Error]   Generation failed!
    Error: Build stopped due to an error: [Error]   Generation failed!
    Build plugin finished at 2008-12-22 03:34:56 GMT-06:00 (CST)
    Total build plugin runtime: 4.954 seconds
    Build finished with ERROR
    Kindly suggest a solution.
    Thanks and regards,
    Mayuresh

    Mayuresh,
    I am not a developer, but it seems to me that just adding required Dictionary DC to DTR is not enough.
    You need to add it as a used DC to your broken DC before your broken DC can be built.
    This might help:
    https://www.sdn.sap.com/irj/scn/go/portal/prtroot/docs/library/uuid/ded11778-0801-0010-258f-ac3b9408a194
    http://help.sap.com/saphelp_nw04s/helpdata/en/c0/2a6a09e6b9e54aace2adf40260337e/frameset.htm
    Regards,
    Slava

  • NWDI - Error on Activation : BuiltIn Type or Simple Type expected

    Dear All,
    I imported a DC from NWDI and made some changes. When i checked in the changes and clicked on Activate option, i got an error.
    I figured out that certain files related to a simple type were not present on DTR.
    Check this : Error while activating DC
    However, when i tried to add these files to the DTR, the activity which I had used previously was not available in Open Activities. It had moved to Closed Activities.
    So I created another activity and added the file to DTR successfully.
    However, the above error still persists when I try to activate the first activity which has all the changes.
    Following is the activation log:
    Development Component Build (2008-12-22 03:34:50)
    Component name: hal/refx/sdbs/request
    Component vendor: halliburton.com
    SC compartment: halliburton_HAL_SDBS_1
    Configuration: PDI_CITSDBS_D
    Location: PDI_CITSDBS_D
    Source code location: http://NWDI:51000/dtr/ws/CITSDBS/halliburton_HAL_SDBS/dev/active/DCs/halliburton.com/hal/refx/sdbs/request/_comp/
    DC root folder: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCshalliburton.comhal
    efxsdbs
    equest\_comp
    DC type: Web Dynpro
    DC Model check:
    All used DCs are available locally
    validating dependency to build plugin "sap.com/tc/bi/bp/webDynpro"
    validating dependency to public part "default" of DC "sap.com/tc/cmi"
    validating dependency to public part "default" of DC "sap.com/tc/ddic/ddicruntime"
    validating dependency to public part "default" of DC "sap.com/tc/ddic/metamodel/content"
    validating dependency to public part "default" of DC "sap.com/tc/wd/webdynpro"
    validating dependency to public part "default" of DC "sap.com/tc/logging"
    validating dependency to public part "default" of DC "sap.com/tc/wdp/metamodel/content"
    validating dependency to public part "default" of DC "sap.com/com.sap.aii.proxy.framework"
    validating dependency to public part "default" of DC "sap.com/com.sap.aii.util.misc"
    validating dependency to public part "default" of DC "sap.com/com.sap.exception"
    validating dependency to public part "default" of DC "sap.com/com.sap.mw.jco"
    DC model check OK
    Start build plugin:
    using build plugin: sap.com/tc/bi/bp/webDynpro
    starting build plugin from : E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCssap.com     c i pwebDynpro\_compgendefaultpublicwebDynpro
    Build Plugin 'WebdynproPlugin', Version 7.00 SP 13 (645_VAL_REL, built on 2007-08-11 18:37:55 CEST, CL72348)
    development component: hal/refx/sdbs/request (halliburton.com)
    software component: HAL_SDBS (halliburton)
    location: PDI_CITSDBS_D
    type: Web Dynpro
    build variant: default
    source location: SAPServicePDI@localhost
    output location: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCshalliburton.comhal
    efxsdbs
    equest\_compgendefault
    plugin start time: 2008-12-22 03:34:51 GMT-06:00 (CST)
    Java VM: Java HotSpot(TM) 64-Bit Server VM, 1.4.2_12-b03 (Sun Microsystems Inc.)
    General options:
    convert *.xlf to *.properties: yes
    include sources for debugging: yes
    Warning: Source folder "META-INF" exists but is empty and will be ignored.
    Warning: Source folder "src/mimes" exists but is empty and will be ignored.
    Warning: Source folder "src/configuration" exists but is empty and will be ignored.
    Checking path lengths for sources
    Path length checks finished in 0.078 seconds
    Preparing data context..
    No public part descriptor found for component "tc/cmi" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "tc/ddic/ddicruntime" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "tc/ddic/metamodel/content" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "tc/wd/webdynpro" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "tc/logging" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "tc/wdp/metamodel/content" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "com.sap.aii.proxy.framework" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "com.sap.aii.util.misc" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "com.sap.exception" (vendor "sap.com"), public part "default", using legacy mode.
    No public part descriptor found for component "com.sap.mw.jco" (vendor "sap.com"), public part "default", using legacy mode.
    No 'default' JDK defined, will use running VM.
    Data context preparation finished in 0.297 seconds
    Creating Ant build file..
    Creating output file: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCshalliburton.comhal
    efxsdbs
    equest\_compgendefaultlogs uild.xml
    Using macro file: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCssap.com     c i pwebDynpro\_compgendefaultpublicwebDynpromacros uild.vm
    Build file creation finished in 0.281 seconds
    Starting Ant..
    Using build file: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCshalliburton.comhal
    efxsdbs
    equest\_compgendefaultlogs uild.xml
    Using build target: build
    Generation folder: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590     8FE455C19F0471A21406A9CE51EECCA0
    Using Ant version: 1.6.2
    compile:
    echo Starting dictionary generator
    ddgen
    ddgen Info Property deployment is true: Deployment information is provided!
    ddgen Info Property sourcepath: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCshalliburton.comhal
    efxsdbs
    equest\_compsrcpackages
    ddgen Info Property targetpath: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590     8FE455C19F0471A21406A9CE51EECCA0gen_ddic
    ddgen Info Property archivename: halliburton.comhalrefxsdbsrequest
    ddgen Info Property vendor: halliburton.com
    ddgen Info Property dcname: hal/refx/sdbs/request
    ddgen Info Property projectlanguage: en
    ddgen Info Property language: Available languages are automatically determined!
    ddgen Info Property addpaths ...
    ddgen Info SapMetamodelWebdynproContent.zip - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/bi/extwd/_comp/gen/default/public/def/lib/model
    ddgen Info SapMetamodelDictionaryContent.zip - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/bi/extddic/_comp/gen/default/public/def/lib/model
    ddgen Info logging.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/logging/_comp/gen/default/public/default/lib/java
    ddgen Info logging.perf.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/logging/_comp/gen/default/public/default/lib/java
    ddgen Info SapDictionaryTypeServices.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/ddic/ddicruntime/_comp/gen/default/public/default/lib/java
    ddgen Info SapDictionaryTypesRuntime.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/ddic/ddicruntime/_comp/gen/default/public/default/lib/java
    ddgen Info aii_proxy_rt.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/com.sap.aii.proxy.framework/_comp/gen/default/public/default/lib/java
    ddgen Info SapMetamodelDictionaryContent.zip - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/ddic/metamodel/content/_comp/gen/default/public/default/lib/java
    ddgen Info SapMetamodelWebdynproContent.zip - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wdp/metamodel/content/_comp/gen/default/public/default/lib/java
    ddgen Info aii_util_misc.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/com.sap.aii.util.misc/_comp/gen/default/public/default/lib/java
    ddgen Info jrfc.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/com.sap.mw.jco/_comp/gen/default/public/default/lib/java
    ddgen Info cmiapi.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/cmi/_comp/gen/default/public/default/lib/java
    ddgen Info webdynproadmin.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info webdynprobasesrvc.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info webdynproruntime_repository.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info webdynproruntime_repository_pmr.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info webdynproservices.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info webdynproclientserver.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info webdynpromodel_dynamicrfc.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info webdynpromodelimpl.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info webdynpropdfobject.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info webdynproportal.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info webdynproprogmodel.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info webdynproruntime_designtime_coupling.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info webdynproruntime_designtime_coupling_api.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/wd/webdynpro/_comp/gen/default/public/default/lib/java
    ddgen Info exception.jar - E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/com.sap.exception/_comp/gen/default/public/default/lib/java
    ddgen Info Initialize generation templates from configuration jar:file:/E:/usr/sap/PDI/J10/j2ee/cluster/server0/temp/CBS/e3/.B/11590/DCs/sap.com/tc/bi/extddic/_comp/gen/default/public/def/lib/java/SapDictionaryGenerationCore.jar!/DictionaryGenerationConfigurationCompiled.xml
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Fegrp.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/PackagePointer.java
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Vkbur.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Vbeln_Va.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Manum.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmtxt.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Magrp.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mgv_Material_External.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapi_Rcode.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Hequi.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Urcod.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Aknum.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Peturma.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Kostl.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ingrp.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Iwerk.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Balognr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmobjnr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Symsgid.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ernam.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Iloan.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Urgrp.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapi_Fld.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bstkd.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Aedat.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ort01.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Tzonso.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Tidnr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Aufnr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mzeit.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ad_Addrnum.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmanum.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmdat.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bdc_Mid.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Erdat.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/J_Objnr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Sttxt.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Submt.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ad_Tlnmbr1.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mgv_Assembly_Guid.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Landx.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Gewrk.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Eqart.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qkunum.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Warpl.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/I_Count.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qobjkey.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Vtweg.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Otgrp.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Auszt.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Daufn.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Kzloesch.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/I_Parnr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmsm_Parvw.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Oteil.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Auztv.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Swo_Objtyp.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapi_Mtype.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ausvn.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ilom_Ordst.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ppsid.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Auztb.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ausbs.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Swerk.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Anln1.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmnum.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapi_Msg.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mncod.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ad_City2.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Binreltyp.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Deviceid.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Char1.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmdab.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Kdauf.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ad_Roomnum.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mfgrp.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Maueh.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapiwait.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bautl.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Abnum.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmart.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Zde_Email.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ktx01.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ad_Name2.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Parvw.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Telnr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Urnum.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Msaus.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Konty.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Aezeit.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mfcod.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Pstur.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Prq_Spregt.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Vkorg.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Pm_Posid_Header.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Fecod.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bstdk.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Persno.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Felfd.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qlfdpos.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapi_Param.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Kokrs.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Symsgv.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmgrp.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Pltxt.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bezdt.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Gsber.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmzab.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Logsys.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Urstx.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapilogsys.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qmsmerlnam.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Matxt.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mgv_Assembly_External.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Natio.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Pmloc.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Tdformat.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Mgv_Assembly_Version.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Qsmnum.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bdc_Mnr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapi_Line.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Raumnr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Land1.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Landx50.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Artpr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Strur.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Aenam.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Matnr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Txt30.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Psterma.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Erzeit.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Fetxt.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Zlname.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Peter.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Ad_Bldng_P.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bezur_D.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Pster.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/comp/types/ChargeType.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/comp/types/PackagePointer.java
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Balmnr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Swo_Typeid.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Symsgno.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Kzmla.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bukrs.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/So_Text255.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Priok.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Vkgrp.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bdc_Mart.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Petur.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Cadnr.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Stort.gsimpletype
    ddgen Info Generating datatypes/com/halliburton/esg/erp/re/models/manufacturing/types/Bapiret2.gstructure
    ddgen Error Structure com.halliburton.esg.erp.re.models.manufacturing.types.Bapi2080_Notcausi is not generated
    ddgen Error BuiltIn Type or Simple Type expected
    ddgen Info Catching throwable null
    ddgen Info com.sap.dictionary.generation.ant.GenerationAntTaskError
    ddgen at com.sap.dictionary.generation.ant.GenerationAnt.showCheckResult(GenerationAnt.java:171)
    ddgen at com.sap.dictionary.tools.generation.Generation.generatePersistentStructure(Generation.java:480)
    ddgen at com.sap.dictionary.tools.generation.console.GenerationConsole.generate(GenerationConsole.java:168)
    ddgen at com.sap.dictionary.generation.ant.GenerationAnt.main(GenerationAnt.java:47)
    ddgen at sun.reflect.NativeMethodAccessorImpl.invoke0(Native Method)
    ddgen at sun.reflect.NativeMethodAccessorImpl.invoke(NativeMethodAccessorImpl.java:39)
    ddgen at sun.reflect.DelegatingMethodAccessorImpl.invoke(DelegatingMethodAccessorImpl.java:25)
    ddgen at java.lang.reflect.Method.invoke(Method.java:324)
    ddgen at com.sap.dictionary.generation.ant.DDGenAntTask.execute(DDGenAntTask.java:219)
    ddgen at org.apache.tools.ant.UnknownElement.execute(UnknownElement.java:275)
    ddgen at org.apache.tools.ant.Task.perform(Task.java:364)
    ddgen at org.apache.tools.ant.Target.execute(Target.java:341)
    ddgen at org.apache.tools.ant.Target.performTasks(Target.java:369)
    ddgen at org.apache.tools.ant.Project.executeTarget(Project.java:1214)
    ddgen at com.sap.tc.buildplugin.techdev.ant.util.AntRunner.run(AntRunner.java:116)
    ddgen at com.sap.tc.buildplugin.DefaultAntBuildAction.execute(DefaultAntBuildAction.java:59)
    ddgen at com.sap.tc.buildplugin.DefaultPlugin.handleBuildStepSequence(DefaultPlugin.java:214)
    ddgen at com.sap.tc.buildplugin.DefaultPlugin.performBuild(DefaultPlugin.java:186)
    ddgen at com.sap.tc.buildplugin.DefaultPluginV3Delegate$BuildRequestHandler.handle(DefaultPluginV3Delegate.java:66)
    ddgen at com.sap.tc.buildplugin.DefaultPluginV3Delegate.requestV3(DefaultPluginV3Delegate.java:48)
    ddgen at sun.reflect.NativeMethodAccessorImpl.invoke0(Native Method)
    ddgen at sun.reflect.NativeMethodAccessorImpl.invoke(NativeMethodAccessorImpl.java:39)
    ddgen at sun.reflect.DelegatingMethodAccessorImpl.invoke(DelegatingMethodAccessorImpl.java:25)
    ddgen at java.lang.reflect.Method.invoke(Method.java:324)
    ddgen at com.sap.tc.buildtool.v2.impl.PluginHandler2.maybeInvoke(PluginHandler2.java:350)
    ddgen at com.sap.tc.buildtool.v2.impl.PluginHandler2.request(PluginHandler2.java:102)
    ddgen at com.sap.tc.buildtool.v2.impl.PluginHandler2.build(PluginHandler2.java:76)
    ddgen at com.sap.tc.buildtool.PluginHandler2Wrapper.execute(PluginHandler2Wrapper.java:58)
    ddgen at com.sap.tc.devconf.impl.DCProxy.make(DCProxy.java:1750)
    ddgen at com.sap.tc.devconf.impl.DCProxy.make(DCProxy.java:1515)
    ddgen at com.sap.tc.buildcontroller.CBSBuildController.build(CBSBuildController.java:761)
    ddgen at com.sap.tc.buildcontroller.CBSBuildController.execCommand(CBSBuildController.java:527)
    ddgen at com.sap.tc.buildcontroller.CBSBuildController.evalCmdLine(CBSBuildController.java:452)
    ddgen at com.sap.tc.buildcontroller.CBSBuildController.run(CBSBuildController.java:324)
    ddgen at com.sap.tc.buildcontroller.CBSBuildController.exec(CBSBuildController.java:262)
    ddgen at com.sap.tc.buildcontroller.CBSBuildController.mainLoop(CBSBuildController.java:217)
    ddgen at com.sap.tc.buildcontroller.CBSBuildController.main(CBSBuildController.java:178)
    ddgen ERROR: Unknown exception during generation null (com.sap.dictionary.generation.ant.GenerationAntTaskError)
    ddgen ERROR: Generation failed due to errors (3 seconds)
    Error: E:usrsapPDIJ10j2eeclusterserver0     empCBSe3.B11590DCshalliburton.comhal
    efxsdbs
    equest\_compgendefaultlogs uild.xml:80: Error Generation failed!
    at com.sap.dictionary.generation.ant.DDGenAntTask.execute(DDGenAntTask.java:254)
    at org.apache.tools.ant.UnknownElement.execute(UnknownElement.java:275)
    at org.apache.tools.ant.Task.perform(Task.java:364)
    at org.apache.tools.ant.Target.execute(Target.java:341)
    at org.apache.tools.ant.Target.performTasks(Target.java:369)
    at org.apache.tools.ant.Project.executeTarget(Project.java:1214)
    at com.sap.tc.buildplugin.techdev.ant.util.AntRunner.run(AntRunner.java:116)
    at com.sap.tc.buildplugin.DefaultAntBuildAction.execute(DefaultAntBuildAction.java:59)
    at com.sap.tc.buildplugin.DefaultPlugin.handleBuildStepSequence(DefaultPlugin.java:214)
    at com.sap.tc.buildplugin.DefaultPlugin.performBuild(DefaultPlugin.java:186)
    at com.sap.tc.buildplugin.DefaultPluginV3Delegate$BuildRequestHandler.handle(DefaultPluginV3Delegate.java:66)
    at com.sap.tc.buildplugin.DefaultPluginV3Delegate.requestV3(DefaultPluginV3Delegate.java:48)
    at sun.reflect.NativeMethodAccessorImpl.invoke0(Native Method)
    at sun.reflect.NativeMethodAccessorImpl.invoke(NativeMethodAccessorImpl.java:39)
    at sun.reflect.DelegatingMethodAccessorImpl.invoke(DelegatingMethodAccessorImpl.java:25)
    at java.lang.reflect.Method.invoke(Method.java:324)
    at com.sap.tc.buildtool.v2.impl.PluginHandler2.maybeInvoke(PluginHandler2.java:350)
    at com.sap.tc.buildtool.v2.impl.PluginHandler2.request(PluginHandler2.java:102)
    at com.sap.tc.buildtool.v2.impl.PluginHandler2.build(PluginHandler2.java:76)
    at com.sap.tc.buildtool.PluginHandler2Wrapper.execute(PluginHandler2Wrapper.java:58)
    at com.sap.tc.devconf.impl.DCProxy.make(DCProxy.java:1750)
    at com.sap.tc.devconf.impl.DCProxy.make(DCProxy.java:1515)
    at com.sap.tc.buildcontroller.CBSBuildController.build(CBSBuildController.java:761)
    at com.sap.tc.buildcontroller.CBSBuildController.execCommand(CBSBuildController.java:527)
    at com.sap.tc.buildcontroller.CBSBuildController.evalCmdLine(CBSBuildController.java:452)
    at com.sap.tc.buildcontroller.CBSBuildController.run(CBSBuildController.java:324)
    at com.sap.tc.buildcontroller.CBSBuildController.exec(CBSBuildController.java:262)
    at com.sap.tc.buildcontroller.CBSBuildController.mainLoop(CBSBuildController.java:217)
    at com.sap.tc.buildcontroller.CBSBuildController.main(CBSBuildController.java:178)
    Ant runtime 3.469 seconds
    Ant build finished with ERRORS
    Error Generation failed!
    Error: Build stopped due to an error: Error Generation failed!
    Error: Build stopped due to an error: Error Generation failed!
    Build plugin finished at 2008-12-22 03:34:56 GMT-06:00 (CST)
    Total build plugin runtime: 4.954 seconds
    Build finished with ERROR
    Kindly suggest a solution.
    Thanks and regards,
    Mayuresh

    I think you have missed some of the things in the activity to add,
    go to the DTR prespective, see anythin is in the home sysmbol, add that to new activity except the gen folder and classpath all those files in the below, other than that you can add all those to the acitivity and check in the same,
    Cheers,
    Apparao

  • GL a/c opening and closing balances

    Hi All,
    Below is my selection screen:
    select-options : s_bukrs for bkpf-bukrs obligatory.
    parameter      :  p_gjahr like bkpf-gjahr obligatory.
    select-options : s_budat for bkpf-budat,
                           s_monat for bkpf-monat,
                           s_hkont for bseg-hkont.
    I am displaying the data from tables BKPF, BSEG, KNA1-NAME1, LFA1-NAME1, SKAT-TXT50. I have to fetch Opening and Closing balances for GL a/c's. I am fetching data from table GLT0-HSLVT(opening balance). But unable to get the data for closing balance based on the period given on the selection screen. In my report I am looping on table it_bseg to populate the final internal table. How to get the closing balances's total based on the input.
    Please help me.
    Thanks,
    Haritha

    Hello Haritha,
                        Try this code by building a function module. This would cover both opening and closing balance.
    FUNCTION ZGL_OPENING_CLOSING_BAL_KEYDAT.
    *"*"Local Interface:
    *"  IMPORTING
    *"     REFERENCE(COMP) TYPE  BKPF-BUKRS
    *"     REFERENCE(DATE) TYPE  BKPF-BUDAT
    *"     REFERENCE(ACCT) TYPE  BSEG-HKONT
    *"  EXPORTING
    *"     REFERENCE(BALANCE) TYPE  BSEG-DMBTR
    DATA : COMPANYCODEID  LIKE  BAPI0002_2-COMP_CODE     ,
    POSTING_DATE   LIKE  BAPI0002_4-POSTING_DATE  ,
    FISCAL_YEAR    LIKE  BAPI0002_4-FISCAL_YEAR   ,
    FISCAL_PERIOD  LIKE  BAPI0002_4-FISCAL_PERIOD .
    DATA : ACCOUNT_BALANCES  TYPE TABLE OF BAPI3006_4 WITH HEADER LINE.
    DATA : BAL TYPE BSEG-DMBTR.
    DATA : IV_DATE  TYPE  D   ,
    EV_MONTH_BEGIN_DATE  TYPE  D,
    EV_MONTH_END_DATE  TYPE  D .
    DATA : COMPANYCODE  LIKE  BAPI3006_0-COMP_CODE,
    GLACCT  LIKE  BAPI3006_0-GL_ACCOUNT ,
    FISCALYEAR  LIKE  BAPI3006_4-FISC_YEAR,
    CURRENCYTYPE  LIKE  BAPI3006_5-CURR_TYPE VALUE 10.
    DATA : IT_BKPF TYPE TABLE OF BKPF WITH HEADER LINE.
    DATA : BEGIN OF IT_BSEG OCCURS 0,
    BELNR TYPE BSEG-BELNR,
    GJAHR TYPE BSEG-GJAHR,
    SHKZG TYPE BSEG-SHKZG  ,
    DMBTR TYPE BSEG-DMBTR,
    END OF IT_BSEG.
    COMPANYCODEID = COMP.
    POSTING_DATE = DATE.
    IV_DATE  = DATE.
    CALL FUNCTION 'HR_JP_MONTH_BEGIN_END_DATE'
    EXPORTING
    IV_DATE             = IV_DATE
    IMPORTING
    EV_MONTH_BEGIN_DATE = EV_MONTH_BEGIN_DATE
    EV_MONTH_END_DATE   = EV_MONTH_END_DATE.
    CALL FUNCTION 'BAPI_COMPANYCODE_GET_PERIOD'
    EXPORTING
    COMPANYCODEID = COMPANYCODEID
    POSTING_DATE  = POSTING_DATE
    IMPORTING
    FISCAL_YEAR   = FISCAL_YEAR
    FISCAL_PERIOD = FISCAL_PERIOD.
    IF EV_MONTH_END_DATE NE DATE.
    IF FISCAL_PERIOD = 1.
    FISCAL_PERIOD = 12              .
    FISCAL_YEAR = FISCAL_YEAR - 1  .
    ELSE.
    FISCAL_PERIOD =  FISCAL_PERIOD - 1.
    ENDIF.
    ENDIF.
    COMPANYCODE  =  COMP.
    GLACCT  = ACCT.
    FISCALYEAR  = FISCAL_YEAR.
    CALL FUNCTION 'BAPI_GL_ACC_GETPERIODBALANCES'
    EXPORTING
    COMPANYCODE      = COMPANYCODE
    GLACCT           = GLACCT
    FISCALYEAR       = FISCALYEAR
    CURRENCYTYPE     = CURRENCYTYPE
    TABLES
    ACCOUNT_BALANCES = ACCOUNT_BALANCES.
    READ TABLE ACCOUNT_BALANCES  WITH KEY FISC_YEAR = FISCALYEAR FIS_PERIOD = FISCAL_PERIOD.
    IF SY-SUBRC = 0.
    BALANCE =  ACCOUNT_BALANCES-BALANCE.
    ENDIF.
    IF EV_MONTH_END_DATE NE DATE.
    SELECT * FROM BKPF INTO TABLE IT_BKPF WHERE BUKRS = COMP AND BUDAT >= EV_MONTH_BEGIN_DATE
    AND BUDAT <= DATE.
    IF IT_BKPF[] IS NOT INITIAL.
    SELECT BELNR GJAHR SHKZG DMBTR
    FROM BSEG INTO CORRESPONDING FIELDS OF TABLE IT_BSEG
    FOR ALL ENTRIES IN IT_BKPF
    WHERE BELNR = IT_BKPF-BELNR AND GJAHR = IT_BKPF-GJAHR AND HKONT = ACCT AND BUKRS = COMP.
    ENDIF.
    LOOP AT IT_BSEG.
    IF IT_BSEG-SHKZG = 'H'.
    BAL = BAL - IT_BSEG-DMBTR.
    ELSEIF IT_BSEG-SHKZG = 'S'.
    BAL = BAL + IT_BSEG-DMBTR.
    ENDIF.
    ENDLOOP.
    BALANCE = BALANCE + BAL.
    ENDIF.
    ENDFUNCTION.
    Raghav

  • First Project - BCS

    ***INCLUDE LUCR_LSTF03 .
    *&       Form  display_detail_list
    FORM display_detail_list_subscreen.
      IF g_display_detail_again IS INITIAL.
        IF g_display_detail_next IS INITIAL.
    * Header text is displayed as dyn. document
          IF go_dydo IS INITIAL.
            CREATE OBJECT go_dydo.
          ELSE.
            FREE  go_dydo.
            CLEAR go_dydo.
            CREATE OBJECT go_dydo.
            PERFORM free_create_screen_objects.
          ENDIF.
        ELSE.
          IF NOT go_dydo->html_control IS INITIAL.
            CALL METHOD go_splitter_container->remove_control
              EXPORTING
                row    = 1
                column = 1.
          ENDIF.
        ENDIF.
      ENDIF.
    * Initialize document
      CALL METHOD go_dydo->initialize_document.
      IF  LINES( gt_header ) > 0.
    * Build and display detail-header
        PERFORM build_header TABLES gt_header
                             USING  go_dydo
                                    gs_header.
      ENDIF.
    * Merge header-document
      CALL METHOD go_dydo->merge_document.
    * set toolbar-added functions for detailed list
      REFRESH gt_toolbar.
      IF go_model->ds_tx_data_io_type-documents IS BOUND.       "mb210303
        PERFORM fill_tool_tab USING:
                     gt_toolbar gs_toolbar 'UCR_DUMMY'   '1',
                     gt_toolbar gs_toolbar 'UCR_ENTRIES' '2',
                     gt_toolbar gs_toolbar 'UCR_DUMMY'   '3',
                     gt_toolbar gs_toolbar 'UCR_PREV'    '4',
                     gt_toolbar gs_toolbar 'UCR_NEXT'    '5',
                     gt_toolbar gs_toolbar 'UCR_DUMMY'   '6'.
      ELSE.                                                   "mb210202 beg.
        PERFORM fill_tool_tab USING:
                     gt_toolbar gs_toolbar 'UCR_DUMMY'   '1',
                     gt_toolbar gs_toolbar 'UCR_PREV'    '2',
                     gt_toolbar gs_toolbar 'UCR_NEXT'    '3',
                     gt_toolbar gs_toolbar 'UCR_DUMMY'   '4'.
      ENDIF.                                                  "mb210202 end.
      SET HANDLER go_event_grid->handle_toolbar_comp   FOR go_grid.
    * Display header
      CALL METHOD go_dydo->display_document
        EXPORTING
          parent = go_container_head.
    * Set header-control visible with user set or
    * predefined height
      IF NOT go_splitter_container IS INITIAL.
        IF g_height IS INITIAL.
          g_height = 27.
        ENDIF.
        CALL METHOD go_splitter_container->set_row_height
          EXPORTING
            id     = 1
            height = g_height.
      ENDIF.
    * display detail-list
      CALL METHOD go_grid->set_table_for_first_display
        EXPORTING
          i_bypassing_buffer   = 'X'
          is_layout            = gs_layout_save
          it_toolbar_excluding = gt_exclude_toolbar
        CHANGING
          it_fieldcatalog      = gt_fieldcat_d
          it_outtab            = <gt_outtab_detail>.
      IF NOT g_display_detail_next IS INITIAL.
        CALL METHOD go_grid->refresh_table_display.
      ENDIF.
    * Set cursor on selected row if necesary
      IF NOT gt_row_id_detail IS INITIAL.
        CALL METHOD go_grid->set_selected_rows
          EXPORTING
            it_index_rows = gt_row_id_detail.
        REFRESH gt_row_id_detail.
      ENDIF.
      CLEAR: g_display_detail_next,
             g_display_detail_again.
    ENDFORM.                    " display_detail_list_subscreen
    *&      Form  display_main_list
    FORM display_main_list_subscreen. "using i_reporting_logic type uc_flg.
      CLEAR g_detail.
    * set toolbar-added functions
      REFRESH gt_toolbar.
      IF go_model->ds_tx_data_io_type IS NOT INITIAL.
        IF go_model->ds_tx_data_io_type-documents IS BOUND.     "mb210303
    *        and i_reporting_logic is initial.
          PERFORM fill_tool_tab USING:
                       gt_toolbar gs_toolbar 'UCR_DUMMY'   '1',
                       gt_toolbar gs_toolbar 'UCR_ENTRIES' '2',
                       gt_toolbar gs_toolbar 'UCR_DUMMY'   '3',
                       gt_toolbar gs_toolbar 'UCR_SEL_COND' '4',
                       gt_toolbar gs_toolbar 'UCR_DUMMY'   '5'.
        ELSE.
          PERFORM fill_tool_tab USING:
                       gt_toolbar gs_toolbar 'UCR_DUMMY'   '1',
                       gt_toolbar gs_toolbar 'UCR_SEL_COND' '2',
                       gt_toolbar gs_toolbar 'UCR_DUMMY'   '3'.
        ENDIF.                                                  "mb210303
        SET HANDLER go_event_grid->handle_toolbar_comp   FOR go_grid.
      ELSE    .
        PERFORM fill_tool_tab USING:
                     gt_toolbar gs_toolbar 'UCR_DUMMY'   '1',
                     gt_toolbar gs_toolbar 'UCR_SEL_COND' '2',
                     gt_toolbar gs_toolbar 'UCR_DUMMY'   '3'.
        SET HANDLER go_event_grid->handle_toolbar_comp   FOR go_grid.
      ENDIF.
    * Set header-control invisible while main-list is displayed
      IF NOT go_splitter_container IS INITIAL.
    * Header container can be set visible by user on main-screen
        CALL METHOD go_splitter_container->set_row_height
          EXPORTING
            id     = 1
            height = 0.
        IF NOT go_dydo IS INITIAL.
    * Display last header if user wants to set it visible
          CALL METHOD go_dydo->display_document
            EXPORTING
              parent = go_container_head.
        ENDIF.
      ENDIF.
    * subscreen with main list simply is started once again
    * prepared with current user settings
      IF ( LINES( gt_fieldcat_save ) > 0 ) AND
         NOT g_display_main_again IS INITIAL.
        REFRESH gt_fieldcat.
        gt_fieldcat[] = gt_fieldcat_save[].
    *    clear g_display_main_again.
    * is necessary, because current_frontend_fieldcat must be set
        CALL METHOD go_grid->set_table_for_first_display
          EXPORTING
            i_bypassing_buffer   = 'X'
            i_save               = g_save
            is_layout            = gs_layout
            is_variant           = gs_variant
            it_special_groups    = gt_sgrp                      "mb110403
            it_toolbar_excluding = gt_exclude_toolbar
          CHANGING
            it_fieldcatalog      = gt_fieldcat
            it_outtab            = <gt_outtab>.
    * set current fieldcat
        CALL METHOD go_grid->set_frontend_fieldcatalog
          EXPORTING
            it_fieldcatalog = gt_fieldcat.
    * now reset other current layout-infos if necessary
        PERFORM set_current_layout USING go_grid
                                         gt_filter_save
                                         gt_sort_save
                                         gs_layout_save.
    * display current main-list
        CALL METHOD go_grid->refresh_table_display.
        REFRESH: gt_fieldcat_save, gt_filter_save, gt_sort_save.
        CLEAR  : gs_layout_save.
      ELSE.
    * Show ALV
        CALL METHOD go_grid->set_table_for_first_display
          EXPORTING
            i_bypassing_buffer   = 'X'
            i_save               = g_save
            is_layout            = gs_layout
            is_variant           = gs_variant
            it_special_groups    = gt_sgrp                      "mb110403
            it_toolbar_excluding = gt_exclude_toolbar
          CHANGING
            it_sort              = gt_sort
            it_fieldcatalog      = gt_fieldcat
            it_outtab            = <gt_outtab>.
        CLEAR g_display_detail_again.
        g_display_main_again = 'X'.
      ENDIF.
    * Set cursor on selected row if necesary
      IF NOT gt_row_id IS INITIAL.
        CALL METHOD go_grid->set_selected_rows
          EXPORTING
            it_index_rows = gt_row_id.
      ENDIF.
    ENDFORM.                    " display_main_list_subscreen
    *&      Form  display_message
    FORM display_message USING lo_grid_object TYPE REF TO cl_gui_alv_grid
                               lf_refresh_msg_table TYPE c.
      DATA: l_lines       TYPE i,
            ls_layout     TYPE lvc_s_layo.
    * header_main is not used by Worbench
      IF g_subscreen IS INITIAL.
        PERFORM header_main.
      ENDIF.
      g_no_data = 'X'.
    * if first data selection results no data gt_parameter_save must be
    * filled  from lt_parameter to take care of further user changed
    * parameters from list screen
      DESCRIBE TABLE gt_parameter_save LINES l_lines.
      IF l_lines =  0.
        gt_parameter_save[] = gt_parameter[].
      ENDIF.
      PERFORM no_data_selected IN PROGRAM (gc_progname)
                                USING      gt_fieldcat_mess
                                           gs_fieldcat_mess
                                           gt_message
                                           gs_message
                                           text-101
                                           text-102
                                           'TEXT'
                                           'LT_MESSAGE'
                                           lf_refresh_msg_table   " 'X'
                                           space.      "  'C610'. no color, accessibility
    *** Start of Comment By Ramesh Babu N,IBM - C1DK900725 ***
    * Set header-control invisible while main-list is displayed
    *  IF NOT go_splitter_container IS INITIAL.
    *    CALL METHOD go_splitter_container->set_row_height
    *      EXPORTING
    *        id     = 1
    *        height = 0.
    *    CALL METHOD go_splitter_container->set_row_sash
    *      EXPORTING
    *        id    = 1
    *        type  = cl_gui_splitter_container=>type_sashvisible
    *        value = cl_gui_splitter_container=>false.
    *  ENDIF.
    *** End of Comment By Ramesh Babu N,IBM - C1DK900725  ***
    * display messages
    *  ls_layout-no_toolbar = 'X'.
      CALL METHOD lo_grid_object->set_table_for_first_display
        EXPORTING
          i_bypassing_buffer   = 'X'
          it_toolbar_excluding = gt_exclude_toolbar_mess
          is_layout            = ls_layout
        CHANGING
          it_fieldcatalog      = gt_fieldcat_mess
          it_outtab            = gt_message.
    *** Start of Comment By Ramesh Babu N,IBM - C1DK900725 ***
    * Event-Handler for docking-container
    *  IF go_event_dock IS INITIAL.
    *    CREATE OBJECT go_event_dock.
    *  ENDIF.
    *** End of Comment By Ramesh Babu N,IBM - C1DK900725  ***
      IF go_parameter IS INITIAL.
        CALL METHOD cl_uc_parameter=>get_instance
          IMPORTING
            eo_instance = go_parameter.
      ENDIF.
    *** Start of Comment By Ramesh Babu N,IBM - C1DK900725 ***
    *  SET HANDLER go_event_dock->handle_new_parameters FOR go_parameter.
    *** End of Comment By Ramesh Babu N,IBM - C1DK900725  ***
    ENDFORM.                    " display_message
    *&      Form  sub_download_data
    * Used for downloading BCS data to a TAB delimited file in Custom task *
    *      <--ct_data  HASHED TABLE
    FORM f_download_data  USING     ct_task     TYPE uc_task
                                    ct_sel      TYPE uc0_ts_sel
                                    gt_param    TYPE ucm_ts_parameter
                          CHANGING  ct_message  TYPE uc0_t_message
                                    ct_data     TYPE HASHED TABLE..
    * SUBROUTINE DESCRIPION: Used for downloading BCS data to file in Custome Task
    *           DEVELOPER: Ramesh Babu Nalla , IBM
    *       CREATION DATE: 2007-10-11
    *          DER NUMBER: None
    * TRANSPORT NUMBER(S): C1DK900725
    * REVISION HISTORY-----------------------------------------------------*
    *       REVISION NO: C1DK900725      REFERENCE NO:  None
    *         DEVELOPER: Ramesh Babu N,IBM       DATE:  2007-10-11
    *       DESCRIPTION: Copied from SAP FM UCR_LST_LOGIC *
      CONSTANTS : c_task01 TYPE uc_task VALUE 'T2700',
                  c_task02 TYPE uc_task VALUE 'T2490'.
      TYPES:  BEGIN OF ty_download,
    **            /bic/zcs_comp   TYPE char08,      " Unilever-Company
    **            /bic/zcs_item   TYPE char10,      " Unilever-Item
    **            /1fb/move_type  TYPE char03,      " Unilever-Movement type
    **            /bic/zcs_pcom   TYPE char08,      " Unilever-Partner Company
    **            /bic/zcs_invc   TYPE char08,      " Unilever-Investee Company
    **            /bic/zcs_cang   TYPE char03,      " Unilever-Cost Analysis Group
    **            /bic/zcs_ad     TYPE char08,      " Unilever-Aquisitions/Disposals
    **            /bic/zcs_cd     TYPE char08,      " Unilever-Continued/Discontinued Ops.
    **            /bic/zcs_prgp   TYPE char08,      " Unilever-Product Category
                /bic/zfb_comp   TYPE char08,      " Unilever-Company
                /bic/zfb_item   TYPE char10,      " Unilever-Item
                /bic/zfb_move   TYPE char03,      " Unilever-Movement type
                /bic/zfb_pcom   TYPE char08,      " Unilever-Partner Company
                /bic/zfb_invc   TYPE char08,      " Unilever-Investee Company
                /bic/zfb_cang   TYPE char03,      " Unilever-Cost Analysis Group
                /bic/zfb_ad     TYPE char08,      " Unilever-Aquisitions/Disposals
                /bic/zfb_cd     TYPE char08,      " Unilever-Continued/Discontinued Ops.
                /bic/zfb_prgp   TYPE char08,      " Unilever-Product Category
                /1fb/cs_trn_lc  TYPE string,      " Unilever-Period value in Local currency
                /1fb/cs_trn_qty TYPE string,     " Unilever-Periodic quantity
                unit            type string,
              END OF ty_download.
    * flag
      DATA flg_chk TYPE c.
      DATA: lr_s_data_out TYPE REF TO data,
            lr_t_data_out TYPE REF TO data,
            l_outtype     TYPE field_type VALUE 'UCR_SX_TX_DATA_LST',
            lr            TYPE REF TO data,
            lo_conv       TYPE REF TO lcl_convert_output,
            lt_char       TYPE lcl_convert_output=>th_comp,
            ls_comp       TYPE lcl_convert_output=>s_comp,
            lr_s_data     TYPE REF TO data,
            lr_t_data     TYPE REF TO data,
            l_filename    TYPE string,
            l_action      TYPE i,
            l_path        TYPE string,
            l_seperator   TYPE char01 VALUE 'X',
            l_fullpath    TYPE string,
            l_mmyy        TYPE string,
            lr_sel_data   TYPE REF TO data,
            lr_t_val      TYPE REF TO data,
            lr_t_final    TYPE REF TO data,
            lr_val        TYPE REF TO data,
            ls_download   TYPE REF TO data,
            lt_download   TYPE REF TO data,
            ls_sel        TYPE REF TO data,
            ls_msg        TYPE uc0_s_message.
    ** SOC by Dpak-------------------------------------------------------------------------------------------
    ** Changed by Deepak N Jain, IBM on 16/11/2006 as the corresponding field name assigned by Ramesh from
    ** the structure <LS_DATA_OUT> are not matching. This is because of the new cube from whch the Financial
    ** data is coming now. The new cube is ZFBCS_T1 which has replaced the old cube ZCS_T1.
    ** Hence, Short Dump on Execution.
    **  DATA: l_comp        TYPE string VALUE '/BIC/ZCS_COMP',  " Unilever-Company
    **        l_cgcomp      TYPE string VALUE '/1FB/SEM_CGCOMP'," Unilever-Consolidation Group
    **        l_pcomp       TYPE string VALUE '/BIC/ZCS_PCOM',  " Unilever-Partner Company
    **        l_doct        TYPE string VALUE '/BIC/ZCS_DOCT',  " Unilever-Document type
    **        l_plevel      TYPE string VALUE 'CS_PLEVEL',      " Unilever-Posting Level
    **        l_tc          TYPE string VALUE '/1FB/CS_TRN_TC', " Unilever-Period value in Transaction currency
    **        l_qty         TYPE string VALUE '/1FB/CS_TRN_QTY'," Unilever-Periodic quantity
    **        l_trn_lc      TYPE string VALUE '/1FB/CS_TRN_LC', " Unilever-Period value in Local currency
    **        l_bu          TYPE string VALUE '/BIC/ZCS_PROF',  " Unilever-Business Unit/Cost Centre
    **        l_low         TYPE string VALUE 'LOW'.
      DATA: l_comp        TYPE string VALUE '/BIC/ZFB_COMP',  " Unilever-Company
            l_cgcomp      TYPE string VALUE '/BIC/ZFB_CG1',   " Unilever-Consolidation Group
            l_pcomp       TYPE string VALUE '/BIC/ZFB_PCOM',  " Unilever-Partner Company
            l_doct        TYPE string VALUE '/BIC/ZFB_DOCT',  " Unilever-Document type
            l_invc        TYPE string VALUE '/BIC/ZFB_INVC',  " Unilever-Investee Company
            l_plevel      TYPE string VALUE 'CS_PLEVEL',      " Unilever-Posting Level
            l_tc          TYPE string VALUE '/1FB/CS_TRN_TC', " Unilever-Period value in Transaction currency
            l_qty         TYPE string VALUE '/1FB/CS_TRN_QTY'," Unilever-Periodic quantity
            l_trn_lc      TYPE string VALUE '/1FB/CS_TRN_LC', " Unilever-Period value in Local currency
            l_bu          TYPE string VALUE '/BIC/ZCS_PROF',  " Unilever-Business Unit/Cost Centre
            l_low         TYPE string VALUE 'LOW',
            l_unit        TYPE string  VALUE 'UNIT'.
    ** EOC by Dpak-----------------------------------------------------------------------------------------------
    ** future use **
    **  FISCVARNT TYPE L0002FISCVARNT,
    **  FISCPERIOD TYPE L0002FISCPERIOD,
    **  /BIC/ZFB_VERS TYPE L0002/BIC/ZFB_VERS,
    **  /BIC/ZFB_CG1 TYPE L0002/BIC/ZFB_CG1,
    **  /BIC/ZFB_COMP TYPE L0002/BIC/ZFB_COMP,
    **  /1FB/CS_CHART TYPE L0002/1FB/CS_CHART,
    **  /BIC/ZFB_MOVE TYPE L0002/BIC/ZFB_MOVE,
    **  /BIC/ZFB_PCOM TYPE L0002/BIC/ZFB_PCOM,
    **  ACQ_YEAR TYPE L0002ACQ_YEAR,
    **  ACQ_PER TYPE L0002ACQ_PER,
    **  /BIC/ZFB_INVC TYPE L0002/BIC/ZFB_INVC,
    **  /BIC/ZFB_ALCO TYPE L0002/BIC/ZFB_ALCO,
    **  CS_PLEVEL TYPE L0002CS_PLEVEL,
    **  /BIC/ZFB_DOCT TYPE L0002/BIC/ZFB_DOCT,
    **  BCS_CTFLG TYPE L0002BCS_CTFLG,
    **  UNIT TYPE L0002UNIT,
    **  /1FB/CURKEY_TC TYPE L0002/1FB/CURKEY_TC,
    **  /1FB/CURKEY_LC TYPE L0002/1FB/CURKEY_LC,
    **  /1FB/CURKEY_GC TYPE L0002/1FB/CURKEY_GC,
    **  /BIC/ZFB_PRGP TYPE L0002/BIC/ZFB_PRGP,
    **  /BIC/ZFB_COUN TYPE L0002/BIC/ZFB_COUN,
    **  /BIC/ZFB_CANG TYPE L0002/BIC/ZFB_CANG,
    **  /1FB/FUNC_AREA TYPE L0002/1FB/FUNC_AREA,
    **  /BIC/ZFB_CT TYPE L0002/BIC/ZFB_CT,
    **  /BIC/ZFB_CD TYPE L0002/BIC/ZFB_CD,
    **  /BIC/ZFB_AD TYPE L0002/BIC/ZFB_AD,
    **  /BIC/ZFB_FR01 TYPE L0002/BIC/ZFB_FR01,
    **  /BIC/ZFB_FR02 TYPE L0002/BIC/ZFB_FR02,
    **  FISCYEAR TYPE L0002FISCYEAR,
    **  /BIC/ZFB_ITEM TYPE L0002/BIC/ZFB_ITEM,
    ** future use **
      FIELD-SYMBOLS: <lt_data_out> TYPE STANDARD TABLE,
                     <ls_data_out> TYPE ANY,
                     <ls_data>     TYPE ANY,
                     <ls_data_cop> TYPE ANY,
                     <lt_data_std> TYPE STANDARD TABLE,
                     <ls_data_std> TYPE ANY,
                     <ls_download>  TYPE ANY,
                     <lt_download> TYPE STANDARD TABLE,
                     <comp>        TYPE ANY,
                     <cgcomp>      TYPE ANY,
                     <pcomp>       TYPE ANY,
                     <doct>        TYPE ANY,
                     <plevel>      TYPE ANY,
                     <tc>          TYPE ANY,
                     <invc>        TYPE ANY,
                     <qty>         TYPE ANY,
                     <unit>        TYPE ANY,
                     <trn_lc>      TYPE ANY,
                     <comp1>       TYPE ANY,
                     <cgcomp1>     TYPE ANY,
                     <pcomp1>      TYPE ANY,
                     <doct1>       TYPE ANY,
                     <plevel1>     TYPE ANY,
                     <tc1>         TYPE ANY,
                     <invc1>       TYPE ANY,
                     <qty1>        TYPE ANY,
                     <trn_lc1>     TYPE ANY,
                     <unit1>       TYPE ANY,
                     <bu>          TYPE ANY,
                     <bu1>         TYPE ANY,
                     <low>         TYPE ANY,
                     <l_year>      TYPE ANY ,
                     <l_period>    TYPE ANY ,
                     <l_mmyy>      TYPE ANY,
                     <ls_sel_data> TYPE ANY,
                     <ls_val>      TYPE zbcs_check_val,
                     <lt_t_val>    TYPE STANDARD TABLE,
                     <lt_t_final>  TYPE STANDARD TABLE.
    **************** Begin Of Addtion - ASIF MAQBOOL ******************
      Data: BEGIN OF l_s_tab,
            values TYPE C LENGTH 400,
           end OF l_s_tab,
          gs_param LIKE LINE OF gt_param,
          l_temp_store LIKE gt_param.
      Field-SYMBOLS: <gt_param> TYPE ANY TABLE,
                     <final_gt> TYPE any ,
                     <gs_fieldname> TYPE any,
                     <gs_value> TYPE any.
      Data: l_t_tab TYPE TABLE OF string INITIAL SIZE 0,
           str TYPE string,
           str1 TYPE string.
    **************** End Of Addtion - ASIF MAQBOOL ******************
    * create Line-structure of data table
      CREATE DATA lr_s_data LIKE LINE OF ct_data.
      ASSIGN lr_s_data->* TO <ls_data_std>.
    ** create cumulation table
      CREATE DATA lr_t_data LIKE STANDARD TABLE OF <ls_data_std>.
      ASSIGN lr_t_data->* TO <lt_data_std>.
      LOOP AT ct_data INTO <ls_data_std>.
        COLLECT <ls_data_std> INTO <lt_data_std>.
      ENDLOOP.
      FREE ct_data.
    * get reference for outtab / create outtab
      CALL METHOD go_model->create_data_reference
        EXPORTING
          io_tx_data_io_type = go_model->ds_tx_data_io_type-totals
          i_type             = l_outtype "'UCR_SX_TX_DATA_LST'
        IMPORTING
          er_data            = lr_s_data_out.
      ASSIGN lr_s_data_out->* TO <ls_data_out>.
      ASSIGN lr_s_data_out->* TO <ls_data_cop>.
      CREATE DATA lr_t_data_out LIKE STANDARD TABLE OF <ls_data_out>.
      ASSIGN lr_t_data_out->* TO <lt_data_out>.
      CREATE DATA lr LIKE LINE OF <lt_data_std>.
      ASSIGN lr->* TO <ls_data>.
      CALL METHOD lcl_convert_output=>get_instance
        EXPORTING
          io_model    = go_model
          it_char     = lt_char
        IMPORTING
          eo_instance = lo_conv
        CHANGING
          cs_data     = <ls_data>.
      ASSIGN: l_comp   TO <comp>,
              l_cgcomp TO <cgcomp>,
              l_pcomp  TO <pcomp>,
              l_invc   TO <invc>,
              l_doct   TO <doct>,
              l_plevel TO <plevel>,
              l_tc     TO <tc>,
              l_qty    TO <qty>,
              l_trn_lc TO <trn_lc>,
              l_bu     TO <bu>,
              l_mmyy   TO <l_mmyy>,
              l_low    TO <low>,
              l_unit   TO <unit>.
      LOOP AT <lt_data_std> INTO <ls_data>.    "  loop
        CALL METHOD lo_conv->convert_output.      "end of "wis240605
    *     fill outtab
        ASSIGN COMPONENT if_uc_model=>gc_type_comp_s_char
        OF STRUCTURE <ls_data> TO <ls_data_cop>.
        MOVE-CORRESPONDING <ls_data_cop> TO <ls_data_out>.
        ASSIGN COMPONENT if_uc_model=>gc_type_comp_s_kfig
        OF STRUCTURE <ls_data> TO <ls_data_cop>.
        MOVE-CORRESPONDING <ls_data_cop> TO <ls_data_out>.
        IF ct_task = c_task01 OR ct_task = space . "'it can be T2700 or blank
    *****  aggregate the transactionaldata for given Rules  *****
          ASSIGN COMPONENT : <comp>   OF STRUCTURE <ls_data_out> TO <comp1>,
                             <cgcomp> OF STRUCTURE <ls_data_out> TO <cgcomp1>,
                             <pcomp>  OF STRUCTURE <ls_data_out> TO <pcomp1>,
                             <doct>   OF STRUCTURE <ls_data_out> TO <doct1>,
                             <invc>   OF STRUCTURE <ls_data_out> TO <invc1>, "added by Asif M.
                             <plevel> OF STRUCTURE <ls_data_out> TO <plevel1>,
                             <tc>     OF STRUCTURE <ls_data_out> TO <tc1>,
                             <qty>    OF STRUCTURE <ls_data_out> TO <qty1>,
                             <trn_lc> OF STRUCTURE <ls_data_out> TO <trn_lc1>.
    **** 1st Rule ****
    * dont include records where '/1FB/CS_TRN_QTY' and '/1FB/CS_TRN_LC' are blank
          IF <trn_lc1> = 0 AND <qty1> = 0.
            CONTINUE.
          ENDIF.
    **** 2nd Rule ****
    * delete the Posting levels if it is > 1 and clear to blank  CS_PLEVEL
          CHECK <plevel1> LE 1.
          CLEAR <plevel1>.
    **** 3rd Rule ****
    * replace the Unilever Company with CG without prefix G and compare with Partner comp for deletion
    * /BIC/ZCS_COMP with   /1FB/SEM_CGCOMP and check with /BIC/ZCS_PCOM
          IF ct_task <> space.
    ***  code added by Ramesh for the removal GBRNCH  records while downloading the file.
    **** code for removal of GBRNCH records only - Hardcode - sample code
    *        IF <cgcomp1> <> 'GBRNCH'.   " to avoid BRNCH records
    ** replace Company with CG without prefix G when task name is not blank
    *          <comp1> = <cgcomp1>+1.
    *        ELSE.
    *          CONTINUE.
    *        ENDIF.
    **** code for removal of GBRNCH records only - Hardcode - sample code
    ***  the assumption here,is consider only records with Legal entity as numeric excepting the first character
            IF <cgcomp1>+1 CN sy-abcde.   " to avoid BRNCH records
    * replace Company with CG without prefix G when task name is not blank
              <comp1> = <cgcomp1>+1.
            ELSE.
              CONTINUE.
            ENDIF.
          ENDIF.
    * removing leading zero's as SAP sometimes adding them to <pcomp1>.
    *      CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
    *        EXPORTING
    *          input  = <pcomp1>
    *        IMPORTING
    *          output = <pcomp1>.
          PERFORM f_alpha_conversion USING <comp1>
                                          CHANGING <comp1>.
          PERFORM f_alpha_conversion USING <pcomp1>
                                     CHANGING <pcomp1>.
          " removing leading zero's from Investee Unit company - Added By Asif Maqbool, IBM/Unilever, 25/01/2008.
          PERFORM f_alpha_conversion USING <invc1>
                                     CHANGING <invc1>.
          CHECK <comp1> <> <pcomp1>.
    **** 4rth Rule ****
    * initialise Document type & PV TC to blank   /BIC/ZCS_DOCT & /1FB/CS_TRN_TC
          CLEAR: <doct1>,<tc1>.
        ENDIF.
        COLLECT: <ls_data_out> INTO <lt_data_out>.
      ENDLOOP.          " end loop
      IF <lt_data_out> IS INITIAL.
        PERFORM f_build_msgs USING 'UCM0'
                                   'W'
                                   '053'
                                   text-102
                                   space "ct_task
                                   space
                                   space
                          CHANGING ct_message.
        RETURN.
        MESSAGE e208(00) WITH text-102.
        EXIT.
      ENDIF.
    * perform various steps based on task name
      CASE ct_task.
        WHEN c_task01 OR space.              " 'T2700' or blank
    * download the data into a tab delimited file
    ****             start of Task 0001              ****
    * create Line-structure of download table
          CREATE DATA ls_download TYPE ty_download.
          ASSIGN ls_download->* TO <ls_download>.
    ** create Download data internal table for task T2700
          CREATE DATA lt_download LIKE STANDARD TABLE OF <ls_download>.
          ASSIGN lt_download->* TO <lt_download>.
          LOOP AT <lt_data_out> INTO <ls_data_out>.
            MOVE-CORRESPONDING <ls_data_out> TO <ls_download>.
            ASSIGN COMPONENT <trn_lc> OF STRUCTURE <ls_download> TO <trn_lc1>.
    *** 6th Rule **********************
            " Check for values, if present remove decimals, if not present clear it of (blank).
            UNASSIGN <qty1>.
            ASSIGN COMPONENT <qty> of STRUCTURE <ls_download> to <qty1>.
            ASSIGN COMPONENT <unit> of STRUCTURE <ls_download> to <unit1>.
            if <unit1> = '' OR <unit1> <> '%'.
              REPLACE ALL OCCURRENCES OF '.' in <qty1> WITH '' RESPECTING CASE.
              <qty1> = ''.
            endif.
            if <unit1> <> '' And <qty1> <> ''.
              <unit1> = ''. " We dont need unit downloaded.
              REPLACE ALL OCCURRENCES OF '.' in <qty1> WITH '' RESPECTING CASE.
              <qty1> = <qty1>+0(2).
            endif.
    **** 5th Rule ****
    * Move the Negative sign to front
            PERFORM f_put_sign_in_front CHANGING <trn_lc1>.
            INSERT <ls_download>  INTO TABLE <lt_download>.
          ENDLOOP.
    * move the aggregated data to final table for display
          FREE ct_data.
          ct_data = <lt_data_out>.
          CLEAR: l_path,l_filename,l_fullpath,l_action.
          CALL FUNCTION 'GUI_FILE_SAVE_DIALOG'
           EXPORTING
             window_title            = 'Download aggregated BCS data to Tab Delimited file'
             default_extension       = 'txt'
    *   DEFAULT_FILE_NAME       = dynamic file name as like ALE settings
             file_filter             = 'Text files (*.txt)'
           IMPORTING
             filename                = l_filename
             path                    = l_path
             fullpath                = l_fullpath
             user_action             = l_action .
          CALL METHOD cl_gui_cfw=>flush.
          " *************************** START OF CHANGE - ASIF MAQBOOL ************************
          IF l_action = 0 OR l_action = 1.
            ASSIGN gt_param TO <gt_param>.
            APPEND '100' to l_t_tab.
            READ TABLE gt_param INDEX 6 INTO gs_param.
            ASSIGN COMPONENT 2 OF STRUCTURE gs_param to <gs_value>.
            APPEND <gs_value> to l_t_tab.
            Clear gs_param.
            READ TABLE gt_param INDEX 4 INTO gs_param.
            ASSIGN COMPONENT 2 OF STRUCTURE gs_param to <gs_value>.
            APPEND <gs_value> to l_t_tab.
    *        LOOP AT <gt_param> INTO gs_param.
    *          ASSIGN COMPONENT 1 OF STRUCTURE gs_param to <gs_fieldname>.
    *          CASE <gs_fieldname>.
    *             WHEN '/BIC/ZFB_VERS'.
    *              APPEND '100' to l_t_tab.
    *             WHEN 'FISCPERIOD'.
    *                ASSIGN COMPONENT 2 OF STRUCTURE gs_param to <gs_value>.
    *                APPEND <gs_value> to l_t_tab.
    *             WHEN 'FISCYEAR'.
    *                ASSIGN COMPONENT 2 OF STRUCTURE gs_param to <gs_value>.
    *                APPEND <gs_value> to l_t_tab.
    *              WHEN OTHERS.
    *                ENDCASE.
    *        ENDLOOP.
            CONCATENATE LINES OF l_t_tab INTO str1 SEPARATED BY cl_abap_char_utilities=>horizontal_tab.
            CLEAR l_t_tab.
            INSERT str1 INTO TABLE l_t_tab.
            ASSIGN l_t_tab TO <final_gt>.
            "  To Start by adding the Header Data.
            CALL METHOD cl_gui_frontend_services=>gui_download
              EXPORTING
                filename              = l_fullpath
                write_field_separator = l_seperator "SPACE
              CHANGING
                data_tab              = <final_gt>
              EXCEPTIONS
                file_write_error      = 1.
            " Now append the Data after the header data insertion.
            CALL METHOD cl_gui_frontend_services=>gui_download
              EXPORTING
                filename                = l_fullpath
                write_field_separator   = l_seperator "SPACE
                append                  = 'X'
              CHANGING
                data_tab                = <lt_download>
              EXCEPTIONS
                file_write_error        = 1
                no_batch                = 2
                gui_refuse_filetransfer = 3
                invalid_type            = 4
                no_authority            = 5
                unknown_error           = 6
                header_not_allowed      = 7
                separator_not_allowed   = 8
                filesize_not_allowed    = 9
                header_too_long         = 10
                dp_error_create         = 11
                dp_error_send           = 12
                dp_error_write          = 13
                unknown_dp_error        = 14
                access_denied           = 15
                dp_out_of_memory        = 16
                disk_full               = 17
                dp_timeout              = 18
                file_not_found          = 19
                dataprovider_exception  = 20
                control_flush_error     = 21
                not_supported_by_gui    = 22
                error_no_gui            = 23
                OTHERS                  = 24.
            " *************************** END OF CHANGE - ASIF MAQBOOL ************************
            IF sy-subrc <> 0.
    *          MESSA

    Hi,
    I am also from same project.
    We are facing a problem with this code.
    How can I increase the length of the field obtained by this method.
    CALL METHOD go_model->create_data_reference
        EXPORTING
          io_tx_data_io_type = go_model->ds_tx_data_io_type-totals
          i_type             = l_outtype "'UCR_SX_TX_DATA_LST'
        IMPORTING
          er_data            = lr_s_data_out.
    ASSIGN lr_s_data_out->* TO <ls_data_out>.
    We are getting data overflow error when we try to move some large value to one of the field in <ls_data_out>.
    we can avoid this if the field length is increased.
    Waiting for your reply.
    Regards
    Madhu G S

  • How to use pf-status u2018menuu2019  in ALV report ?

    Hi Friends,
    How to use pf-status u2018menuu2019  in ALV report ?
    I want to use back button ( F3). whenever press it should show
    another report.
    I used  subroutine
    form SUB_ERROR_OUTPUT USING RT_EXTAB TYPE SLIS_T_EXTAB .
    SET PF-STATUS 'ZMENU' EXCLUDING RT_EXTAB.  u201C( the button name is u201C back u201C)
    CASE SY-UCOMM.
    *WHEN '&F03'.
    WHEN 'BACK'
    ( my coding is there ).
    endcase.
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
    I_CALLBACK_PF_STATUS_SET          = 'SUB_ERROR_OUTPUT'
    but it is  executing, working the back button but not showing another report .
    any other procedure to use back button in alv report ?
    plz any idea .
    For correct answer  reword most.
    Thanking you.

    Purchase day Book .
    Data to be down loaded / printed for EDP dept. CGL.
    CGL - Requirement .
    WRITTEN  BY : ADI.****
    *CONSULTANT : SANJAY JAJOO..
    AS PER DP REQUIREMENT.
    -CHANGED BY    :    KRISHNA MOHAN  (15/01/2002)--
    -CHANGE REQ BY :    JAJU S--
    -DESCRIPTION   :    SUMMRY BY TAX CODE WISE & GL CODE WISE--
    ---MODIFIED LINES: -
    ---CHANGED BY    :    -
    ---CHANGE REQ BY :    -
    ---DESCRIPTION   :    -
    ---MODIFIED LINES: -
    *---changed by    :    sanjay jajoo on 23/08
    *---changed req by:    Ranka
    *---Description   :    Inserting Range of period as sel field
      changed by    :    krishna mohan
      func. consultant:  sanjay jajoo
    REPORT ZMMPURDB MESSAGE-ID 00
                    LINE-SIZE 255
                    LINE-COUNT 60
                    NO STANDARD PAGE HEADING .
    TABLES :   MKPF   ,  MSEG  ,SKAT,
               EKKO   ,  EKPO  , EKBE ,
               BSEG   ,  BKPF  , BSET ,
               T009B  ,  T001  , T007S ,
               T001W  ,  T001K ,LFA1.
    ******Table deactivated on 30/8/2000------jaju
    *tables : zcgltaxatn .
    DATA  : ZFILE1(65) VALUE '/DOWNLOAD/'.
    DATA  : ZFILE2(65) .
    DATA  : ZFILE(30) TYPE C VALUE '/DOWNLOAD/'.
    DATA   : ZMON(2).
    DATA : ZTOTAL(11) TYPE N.
    DATA: ZTOT1 TYPE P DECIMALS 2.
    DATA: ZTXT LIKE SKAT-TXT50.
    TYPES: BEGIN OF COMPANY ,
    HKONT LIKE BSEG-HKONT,
    TOTAL LIKE BSEG-DMBTR,
    END OF COMPANY.
    DATA: COMP TYPE COMPANY,
          COMPTAB TYPE HASHED TABLE OF COMPANY WITH UNIQUE KEY HKONT
          WITH HEADER LINE.
    DATA : NEXT LIKE BSEG-BUZEI.           "A.A. (28/03/2000)
    DATA : DOC LIKE BSEG-BELNR.            "A.A. (28/03/2000)
    DATA  S_GSBER.
    DATA: CTR TYPE I.
    SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-B01.
    PARAMETERS : T_BUKRS LIKE T001-BUKRS OBLIGATORY MEMORY ID BUK .
    ***********CH--ID- ADI- 29 / 09 / 1999
    SELECT-OPTIONS : ZGL FOR BSEG-HKONT OBLIGATORY.
    ***********CH--ID- ADI- 29 / 09 / 1999
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(9) TEXT-C01 .
    PARAMETERS : POPER RADIOBUTTON GROUP RAD1 .
    SELECTION-SCREEN COMMENT 13(7) TEXT-C02 .
    PARAMETERS : MONTH RADIOBUTTON GROUP RAD1 .
    SELECTION-SCREEN COMMENT 23(8) TEXT-C03 .
    SELECTION-SCREEN POSITION 33 .
    commented on 22/08 sanjay jajoo
    *PARAMETERS :  T_MONAT LIKE BKPF-MONAT .
    SELECTION-SCREEN END OF LINE.
    PARAMETERS : T_GJAHR LIKE BKPF-GJAHR OBLIGATORY .
    SELECTION-SCREEN SKIP 1.
    SELECT-OPTIONS : S_DOCTYP FOR BKPF-BLART,
                     S_VENDOR FOR LFA1-LIFNR  MATCHCODE  OBJECT KRED,
                     S_MATNR FOR BSEG-MATNR NO-DISPLAY,
                    T_BUDAT FOR MKPF-BUDAT NO-EXTENSION MODIF ID DAT,
                    p_gsber FOR bseg-gsber  OBLIGATORY,
                     P_GSBER FOR BSEG-GSBER,
    mod starts for inserting range of period - sanjay jajoo
                     T_MONAT FOR BKPF-MONAT OBLIGATORY.
    mod ends
    *SELECT-OPTIONS: br_blart FOR mkpf-blart.
    *Select-options:  br_blart for bkpf-blart.
    SELECTION-SCREEN END OF BLOCK B1 .
    Start of Delete by B.Elan on 23/12/2005
    *PARAMETERS : errors AS CHECKBOX .
    *PARAMETERS : summary AS CHECKBOX .
    *PARAMETERS : nodetail AS CHECKBOX .
    **selection-screen skip 2.
    *SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-b03.   "<<<
    *Add
    *PARAMETER : stax_reg RADIOBUTTON GROUP rad2 .                   "<<<
    *Add
    *PARAMETER : pur_db RADIOBUTTON GROUP rad2 .                     "<<<
    *Add
    *SELECTION-SCREEN END OF BLOCK b3 .     "<<< Add
    *SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-b02.
    *PARAMETERS : display RADIOBUTTON GROUP grp1 ,
                dload RADIOBUTTON GROUP grp1.
    *PARAMETERS : fname1 LIKE rlgrap-filename .
    *DATA : zdoc LIKE bseg-belnr.
    *DATA : fname LIKE rlgrap-filename.
    *SELECTION-SCREEN END OF BLOCK b2 .
    End of Delete by B.Elan on 23/12/2005
    Start of Insert by B.Elan on 23/12/2005
    SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(5) TEXT-C01.
    PARAMETER : PUR_DB RADIOBUTTON GROUP RAD2.
    SELECTION-SCREEN COMMENT 10(25) TEXT-C06.
    SELECTION-SCREEN END OF LINE.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(5) TEXT-C01.
    PARAMETERS : MAT_SM RADIOBUTTON GROUP RAD2.
    SELECTION-SCREEN COMMENT 10(25) TEXT-C04.
    SELECTION-SCREEN COMMENT 35(5) TEXT-C01.
    PARAMETERS : VEN_SM RADIOBUTTON GROUP RAD2.
    SELECTION-SCREEN COMMENT 44(20) TEXT-C05.
    SELECTION-SCREEN END OF LINE.
    SELECTION-SCREEN BEGIN OF LINE.
    SELECTION-SCREEN COMMENT 1(5) TEXT-C01.
    PARAMETERS : MAT_DT RADIOBUTTON GROUP RAD2.
    SELECTION-SCREEN COMMENT 10(25) TEXT-C07.
    SELECTION-SCREEN COMMENT 35(5) TEXT-C01.
    PARAMETERS : VEN_DT RADIOBUTTON GROUP RAD2.
    SELECTION-SCREEN COMMENT 44(20) TEXT-C08.
    SELECTION-SCREEN END OF LINE.
    SELECTION-SCREEN END OF BLOCK B2.
    End of Insert by B.Elan on 23/12/2005
    Hard coded values used in the program
    added by krishna mohan on 09/02/02
    DATA : BEGIN OF IT_MSEG OCCURS 0,
            BELNR LIKE BSEG-BELNR,
            MBLNR LIKE MSEG-MBLNR,
            EBELN LIKE BSEG-EBELN,
            EBELP LIKE BSEG-EBELP,
          END OF IT_MSEG.
    mod ends
    Start of Insert by B.Elan on 23/12/2005
    *--vikky
    DATA : BEGIN OF IT_FINAL OCCURS 0,
             MATNR LIKE MARA-MATNR,
             BLART LIKE BKPF-BLART,         "  doctype
             BELNR LIKE BSEG-BELNR,         "sr - nO  10
             XBLNR LIKE BKPF-XBLNR ,        " Bill-no  16
             NAME1_VENDOR(25),
             "lfa1-name1,   " Vendor Name 35
             HKONT LIKE BSEG-HKONT ,        " Alloc-cd  10
             MWSKZ LIKE EKPO-MWSKZ ,        " St-cd     2
             BUDAT LIKE BKPF-BUDAT ,        " Bill-dt  10
             DUE_DATE LIKE BSEG-ZFBDT ,     " Due date 10
             PON    LIKE EKKO-EBELN ,                           " PON 10
             MAKTX LIKE MAKT-MAKTX,         "Material text 40
             MBLNR LIKE MSEG-MBLNR,
             QTY(8) TYPE P DECIMALS 2  ,                        "Qty 11
             RATE(9) TYPE P DECIMALS 2  ,                       "Rate11
             DISCOUNT(7) TYPE P DECIMALS 2,  "DISCOUNT 11
             PROD-AMT(9) TYPE P DECIMALS 2,
                                                                "AMOUNT 13
             EXCISE(8) TYPE P DECIMALS 2 ,   "eXCISE TAX 11
             SALES(5) TYPE P DECIMALS 2 ,    "SALES TAX   11
             FREIGHT(9) TYPE P DECIMALS 2,   "FREIGHT     11
             OTHERS(11) TYPE P DECIMALS 2,    " OTHERS     11
             TOTAL(9) TYPE P DECIMALS 2,     "TOTAL       17
           END OF IT_FINAL.
    *DATA : BEGIN OF IT_FINAL OCCURS 0,
            MATNR LIKE MARA-MATNR,
            BLART LIKE BKPF-BLART,         "  doctype
            BELNR LIKE BSEG-BELNR,         "sr - nO  10
            XBLNR LIKE BKPF-XBLNR ,        " Bill-no  16
            NAME1_VENDOR(25),
            "lfa1-name1,   " Vendor Name 35
            HKONT LIKE BSEG-HKONT ,        " Alloc-cd  10
            MWSKZ LIKE EKPO-MWSKZ ,        " St-cd     2
            BUDAT LIKE BKPF-BUDAT ,        " Bill-dt  10
            DUE_DATE LIKE BSEG-ZFBDT ,     " Due date 10
            PON    LIKE EKKO-EBELN ,                           " PON  10
            MAKTX LIKE MAKT-MAKTX,         "Material text 40
            MBLNR LIKE MSEG-MBLNR,
            QTY(13) TYPE P DECIMALS 2  ,                       "Qty 11
            RATE(13) TYPE P DECIMALS 2  ,                      "Rate 11
            DISCOUNT(13) TYPE P DECIMALS 2,  "DISCOUNT 11
            PROD-AMT(13) TYPE P DECIMALS 2,
                                                               "AMOUNT 13
            EXCISE(13) TYPE P DECIMALS 2 ,   "eXCISE TAX 11
            SALES(13) TYPE P DECIMALS 2 ,    "SALES TAX   11
            FREIGHT(13) TYPE P DECIMALS 2,   "FREIGHT     11
            OTHERS(13) TYPE P DECIMALS 2,    " OTHERS     11
            TOTAL(13) TYPE P DECIMALS 2,     "TOTAL       17
          END OF IT_FINAL.
    *--vikky
    DATA : BEGIN OF IT_FINAL_VN OCCURS 0,
               NAME1_VENDOR(25),
               "lfa1-name1,   " Vendor Name 35
               MATNR LIKE MARA-MATNR,
               BLART LIKE BKPF-BLART,         "  doctype
               BELNR LIKE BSEG-BELNR,         "sr - nO  10
               XBLNR LIKE BKPF-XBLNR ,        " Bill-no  16
               HKONT LIKE BSEG-HKONT ,        " Alloc-cd  10
               MWSKZ LIKE EKPO-MWSKZ ,        " St-cd     2
               BUDAT LIKE BKPF-BUDAT ,        " Bill-dt  10
               DUE_DATE LIKE BSEG-ZFBDT ,     " Due date 10
               PON    LIKE EKKO-EBELN ,                         " PON  10
               MAKTX LIKE MAKT-MAKTX,         "Material text 40
               MBLNR LIKE MSEG-MBLNR,
               QTY(8) TYPE P DECIMALS 2  ,                      "Qty 11
               RATE(9) TYPE P DECIMALS 2  ,                     "Rate 11
               DISCOUNT(7) TYPE P DECIMALS 2,  "DISCOUNT 11
               PROD-AMT(9) TYPE P DECIMALS 2,
                                                                "AMOUNT 13
               EXCISE(5) TYPE P DECIMALS 2 ,   "eXCISE TAX 11
               SALES(5) TYPE P DECIMALS 2 ,    "SALES TAX   11
               FREIGHT(5) TYPE P DECIMALS 2,   "FREIGHT     11
               OTHERS(9) TYPE P DECIMALS 2,    " OTHERS     11
               TOTAL(9) TYPE P DECIMALS 2,     "TOTAL       17
           END OF IT_FINAL_VN.
    End of Insert by B.Elan on 23/12/2005
    DATA: BEGIN OF ITAB_DISPLAY OCCURS 0,
            BLART LIKE BKPF-BLART,         "  doctype
            BELNR LIKE BSEG-BELNR,         "sr - nO  10
            XBLNR LIKE BKPF-XBLNR ,        " Bill-no  16
            NAME1_VENDOR(25),              "lfa1-name1,   " Vendor Name 35
            HKONT LIKE BSEG-HKONT ,        " Alloc-cd  10
            MWSKZ LIKE EKPO-MWSKZ ,        " St-cd     2
            BUDAT LIKE BKPF-BUDAT ,        " Bill-dt  10
            DUE_DATE LIKE BSEG-ZFBDT ,     " Due date 10
            PON    LIKE EKKO-EBELN ,                            " PON  10
            MAKTX LIKE MAKT-MAKTX,         "Material text 40
           QTY(8) TYPE P DECIMALS 2  ,                          "Qty 11
                                                                "qty 5
         RATE(5) TYPE P DECIMALS 2  ,                         "Rate 11
         mod starts on 21/08 for inc size to 7
           RATE(9) TYPE P DECIMALS 2  ,                         "Rate 11
                                                                "Rate 7
         mod ends -  sanjay jajoo 21/08
           DISCOUNT(7) TYPE P DECIMALS 2,  "DISCOUNT 11
           PROD-AMT(9) TYPE P DECIMALS 2,                       "AMOUNT 13
           EXCISE(5) TYPE P DECIMALS 2 ,   "eXCISE TAX 11
           SALES(5) TYPE P DECIMALS 2 ,    "SALES TAX   11
           FREIGHT(5) TYPE P DECIMALS 2,   "FREIGHT     11
           OTHERS(9) TYPE P DECIMALS 2,    " OTHERS     11 " added by vik on
    *21.08.2008
           TOTAL(9) TYPE P DECIMALS 2,     "TOTAL       17
           TOTAL1(9) TYPE P DECIMALS 2,
           MATNR LIKE MARA-MATNR,
           EBELN LIKE EKPO-EBELN,
           EBELP LIKE EKPO-EBELP,
        END OF ITAB_DISPLAY.
    DATA: BEGIN  OF ITAB_TOTAL1 OCCURS 0,
          HKONT LIKE BSEG-HKONT,
          TOTAL TYPE P DECIMALS 2,
          TXT50 LIKE SKAT-TXT50,
          END OF ITAB_TOTAL1.
    DATA: BEGIN  OF ITAB_KONV OCCURS 0,
            KNUMV LIKE KONV-KNUMV,
            KPOSN LIKE KONV-KPOSN,
            STUNR LIKE KONV-STUNR,
            ZAEHK LIKE KONV-ZAEHK,
            KSCHL LIKE KONV-KSCHL,
            KWERT LIKE KONV-KWERT,
          END OF ITAB_KONV.
    DATA:BEGIN OF ITAB_RATE_MODVAT OCCURS 0,
           EBELN LIKE EKPO-EBELN,
           EBELP LIKE EKPO-EBELP,
           MENGE LIKE EKPO-MENGE,
           BRTWR LIKE EKPO-BRTWR,
           KZWI5 LIKE EKPO-KZWI5,
           KNUMV LIKE EKKO-KNUMV,
           MATNR LIKE EKPO-MATNR,
           TXZ01 LIKE EKPO-TXZ01,
         END OF ITAB_RATE_MODVAT.
    DATA: BEGIN OF ITAB_PO OCCURS 0,
            EBELN LIKE EKPO-EBELN,
            EBELP LIKE EKPO-EBELP,
          END OF ITAB_PO.
    DATA: BEGIN OF ITAB_PO_ITEM OCCURS 0,
            BELNR LIKE BSEG-BELNR,
            EBELN LIKE BSEG-EBELN,
            BUZID LIKE BSEG-BUZID,
            XBLNR LIKE BKPF-XBLNR,
            MATNR LIKE BSEG-MATNR,
            EBELP LIKE BSEG-EBELP,
            MENGE LIKE BSEG-MENGE,
            WRBTR LIKE BSEG-WRBTR,
            EXCISE LIKE BSEG-DMBTR, " ADDED ON 21/01/02 FOR 27500 EXCISE
          SGTXT LIKE BSEG-SGTXT, " ADDED ON 24/01/02
            FLAG,
          END OF ITAB_PO_ITEM.
    DATA:BEGIN OF I_LFA1 OCCURS 0,
           LIFNR LIKE BSEG-LIFNR,
         END OF I_LFA1.
    DATA: BEGIN  OF I_VENDOR OCCURS 0,
            LIFNR LIKE LFA1-LIFNR,
            NAME1 LIKE LFA1-NAME1,
          END OF I_VENDOR.
    DATA: BEGIN OF ITAB_PO_OTHERS OCCURS  0,
            BELNR LIKE BSEG-BELNR,
            MATNR LIKE BSEG-MATNR,
            EBELN LIKE BSEG-EBELN,
            EBELP LIKE BSEG-EBELP,
            MENGE LIKE BSEG-MENGE,
            WRBTR LIKE BSEG-WRBTR,
          END OF ITAB_PO_OTHERS.
    DATA: BEGIN OF ITAB_FINAL OCCURS 0,
            BUKRS LIKE BSEG-BUKRS,
            BELNR LIKE BSEG-BELNR,
            GJAHR LIKE BSEG-GJAHR,
            BUZEI LIKE BSEG-BUZEI,
            BUZID LIKE BSEG-BUZID,
            SHKZG LIKE BSEG-SHKZG,
            EBELN LIKE BSEG-EBELN,
            EBELP LIKE BSEG-EBELP,
            MENGE LIKE BSEG-MENGE,
            WRBTR LIKE BSEG-WRBTR,
            MATNR LIKE BSEG-MATNR,
            HKONT LIKE BSEG-HKONT, " ADDED ON 21/01/02 FOR 27500 EXCISE
            SGTXT LIKE BSEG-SGTXT,         " ADDED ON 24/01/02 FOR SALES TAX
          END OF ITAB_FINAL.
    DATA : BEGIN OF ITAB OCCURS 100 ,
               MWSKZ LIKE EKPO-MWSKZ ,     " St-cd
               HKONT LIKE BSEG-HKONT ,     " Alloc-cd
               MBLNR LIKE MKPF-MBLNR ,     " Sr-No
               LIFNR LIKE LFA1-LIFNR ,     " Supp-cd
               XBLNR LIKE BKPF-XBLNR ,     " Bill-no
               BUDAT LIKE BKPF-BUDAT ,     " Bill-dt
               DUE_DATE LIKE BSEG-ZFBDT ,  " Due date
               PON    LIKE EKKO-EBELN ,    " PON
               BELNR LIKE BKPF-BELNR ,     " CCI no
               DMBTR LIKE BSEG-DMBTR ,     " Prod-amount
               EXCISE LIKE BSEG-DMBTR ,    " Excise / ModVAT
               ST_INV LIKE BSEG-DMBTR ,    " Sales Tax Loaded on Inv.
               ST_SET LIKE BSEG-DMBTR ,    " Sales Tax setoff .
               OCT_TOT LIKE BSEG-DMBTR ,   " A,A, (29/03/2000) Octroi chargs
               PT_PABLE LIKE BSEG-DMBTR ,  " Purchase tax payable
               ST_TOT LIKE BSEG-DMBTR ,    " Sales Tax total
               OTHR_CHRG LIKE BSEG-DMBTR , " Other chagres
               NEBTR LIKE BSEG-NEBTR,      " Total-amount
               NAME1_VENDOR LIKE LFA1-NAME1,   " Vendor Name
         END OF ITAB.
    DATA: BEGIN OF ITAB_DOC OCCURS 0,
            BELNR LIKE BKPF-BELNR,
            BLART LIKE BKPF-BLART,
          END OF ITAB_DOC.
    DATA : BEGIN OF DOCTAB OCCURS 100 ,
             MWSKZ LIKE BSEG-MWSKZ ,
             HKONT LIKE BSEG-HKONT ,
             BELNR LIKE BKPF-BELNR ,
    Changed By Pankaj              19.03.99
    Included field fiscal year
             GJAHR LIKE BKPF-GJAHR ,
             BUDAT LIKE BKPF-BUDAT ,
             XBLNR LIKE BKPF-XBLNR ,
             LIFNR LIKE LFA1-LIFNR ,
             ZTERM LIKE BSEG-ZTERM ,
             AMOUNT LIKE BSEG-DMBTR ,
             DMBTR  LIKE BSEG-DMBTR ,
             OTHR_CHRG LIKE BSEG-DMBTR ,
             MBLNR LIKE MKPF-MBLNR ,
             MJAHR LIKE MSEG-MJAHR ,
             DUE_DATE LIKE BSEG-ZFBDT ,
             PON    LIKE EKKO-EBELN ,
             JMO1  LIKE BSEG-DMBTR ,
             JMO2  LIKE BSEG-DMBTR ,
             JIP1  LIKE BSEG-DMBTR ,
             JIP2  LIKE BSEG-DMBTR ,
    ************CH-ID-ADI-START-28 / 09 / 1999
             JIP4 LIKE BSEG-DMBTR ,
             ZTUT LIKE BSEG-DMBTR ,
    *****************ABEY
             ZOCT LIKE BSEG-DMBTR ,
    *****************END
    ************CH-ID-ADI-START-28 / 09 / 1999
             ZSET  LIKE BSEG-DMBTR ,
             ZPTX  LIKE BSEG-DMBTR ,
             BLART LIKE BKPF-BLART ,
          END OF DOCTAB .
    Download for EDP    "EDP
    DATA : BEGIN OF DOWNLOAD OCCURS 100 ,
           SIGN1(1) ,
           TOT_VAL(11) TYPE N,
           SIGN2(1) ,
           TAXABLE(11) TYPE N ,
           SIGN3(1) ,
           TOT_TAX(11) TYPE N ,
           SIGN4(1) ,
           SURCHARG(9) TYPE N ,
           SIGN5(1) ,
           ST_AMT(9) TYPE N ,
           SIGN6(1) ,
           OTH_CHRG(9) TYPE N ,
    ******************************ch-adi-start-28 / 09 / 1999
           SIGN7(1),
           TOT(9) TYPE N,
    ******************************ch-adi-end-28 / 09 / 1999
           TYPE(1) TYPE N ,
           STKY1(1) TYPE N ,
           STBR(2) ,
           STDV(2) ,
           STCC(1) ,
           STKY(1) ,
           STDC(2) TYPE N ,
           STTYP(1) ,
           STCODE(2) ,
           STRATE(2) TYPE N ,
           STRTT(2) TYPE N ,
           SERIAL_NO(6) TYPE N ,
           STACP(9) ,
           BLANK1(3) ,
           STYRMN(6) ,
           BLANK2(7) TYPE C .
    DATA : END OF DOWNLOAD .
    DATA : BEGIN OF GLTAB OCCURS 5 ,
               MWSKZ LIKE BSEG-MWSKZ,      " << ADD A.A. (01.02.2000)
               HKONT LIKE BSEG-HKONT ,
               DMBTR LIKE BSEG-DMBTR ,     " Prod-amount
               EXCISE LIKE BSEG-DMBTR ,    " Excise / ModVAT
               ST_INV LIKE BSEG-DMBTR ,    " Sales Tax Loaded on Inv.
               ST_SET LIKE BSEG-DMBTR ,    " Sales Tax setoff .
               PT_PABLE LIKE BSEG-DMBTR ,  " Purchase tax payable
               ST_TOT LIKE BSEG-DMBTR ,    " Sales Tax total
               OTHR_CHRG LIKE BSEG-DMBTR , " Other Charges
               NEBTR LIKE BSEG-NEBTR.      " Total-amount
    DATA : END OF GLTAB .
    DATA : BEGIN OF ERRORTAB OCCURS 5 .
            INCLUDE STRUCTURE ITAB .
    DATA : END OF ERRORTAB .
    *- Start of change by Raj on 3-Spet-05
    DATA : V_TMPVAL TYPE P DECIMALS 2.
    *- End of change by Raj on 3-Spet-05
    DATA : STRING LIKE BKPF-AWKEY ,
           V_NO TYPE I,
           V_EBELN LIKE BSEG-EBELN,
           V_MATNR LIKE BSEG-MATNR. " ADDED ON 21/01/02 FOR BUZID = 'S'
    Start of Insert by B.Elan on 23/12/2005
    WORK AREA
    DATA : WA_DISPLAY LIKE ITAB_DISPLAY.
    DATA : V_UCOMM TYPE SY-UCOMM.
    CONSTANTS : C_X TYPE C VALUE 'X'.
    End of Insert by B.Elan on 23/12/2005
    AT SELECTION-SCREEN ON T_BUKRS.
      SELECT SINGLE * FROM T001 WHERE BUKRS = T_BUKRS .
      IF SY-SUBRC NE 0 .
        MESSAGE E368 WITH T_BUKRS TEXT-M01 .
      ENDIF .
    AT SELECTION-SCREEN ON T_MONAT.
    PERFORM check_period_year USING 'X'.   " COMMENTED
    AT SELECTION-SCREEN ON T_GJAHR.
    PERFORM check_period_year USING ' '.   "COMMENTED
    Start of Delete by B.Elan on 23/12/2005
    *AT SELECTION-SCREEN ON RADIOBUTTON GROUP grp1 .
    CLEAR fname .
    DATA : BEGIN OF xt247 OCCURS 12 .
             INCLUDE STRUCTURE t247 .
    DATA : END OF xt247 .
    CHECK dload EQ 'X' .
    REFRESH xt247 .
    IF poper EQ 'X' .
       MESSAGE e368 WITH text-m05 .
    ENDIF .
    CALL FUNCTION 'MONTH_NAMES_GET'
       TABLES
         month_names           = xt247
       EXCEPTIONS
         month_names_not_found = 1
         OTHERS                = 2.
    READ TABLE xt247 WITH KEY mnr = t_monat .
    CONCATENATE 'STAXSUMM.' xt247-ktx INTO fname .
    CONCATENATE  '
    DOWNLOAD\'   fname    INTO fname1.
    CONCATENATE  zfile1   fname    INTO   zfile2.
    CONDENSE fname1 NO-GAPS.
    CONDENSE zfile2 NO-GAPS.
    CONCATENATE 'STAXSUMM.' xt247-ktx INTO fname .
    End of Delete by B.Elan on 23/12/2005
    AT SELECTION-SCREEN OUTPUT .
      LOOP AT SCREEN .
        IF SCREEN-NAME EQ 'FNAME' .
          SCREEN-INPUT = 0.
          MODIFY SCREEN .
        ENDIF .
        IF SCREEN-GROUP2 EQ 'DBS' .
          SCREEN-ACTIVE = 0 .
          MODIFY SCREEN .
          IF SCREEN-NAME EQ 'BR_BLART-LOW' .
    Form the select option for the LDB .
            CLEAR BR_BLART . REFRESH BR_BLART .
            BR_BLART-SIGN = 'I' .
            BR_BLART-OPTION = 'EQ' .
            BR_BLART-LOW = 'RE' .
            APPEND BR_BLART .
            BR_BLART-SIGN = 'I' .
            BR_BLART-OPTION = 'EQ' .
            BR_BLART-LOW = 'SR' .
            APPEND BR_BLART .
            BR_BLART-SIGN = 'I' .
            BR_BLART-OPTION = 'EQ' .
            BR_BLART-LOW = 'SP' .
            APPEND BR_BLART .       " ADD ON 11122003 JAJ
            BR_BLART-SIGN = 'I' .
            BR_BLART-OPTION = 'EQ' .
           br_blart-low = 'VI' .
            BR_BLART-LOW = 'ST'.
            APPEND BR_BLART .
            BR_BLART-LOW = 'S1'.
            APPEND BR_BLART .
            BR_BLART-LOW = 'P1'.
            APPEND BR_BLART .
            BR_BLART-LOW = 'PM'.
            APPEND BR_BLART .
            BR_BLART-LOW = 'R1'.
            APPEND BR_BLART .
            BR_BLART-SIGN = 'I' .
            BR_BLART-OPTION = 'EQ' .
            BR_BLART-LOW = 'KR' .
            APPEND BR_BLART .
            BR_BLART-SIGN = 'I' .
            BR_BLART-OPTION = 'EQ' .
    *************CH-ID-ADI---30 / 09 / 1999.
            BR_BLART-LOW = 'RA'.
            APPEND BR_BLART .
            BR_BLART-SIGN = 'I' .
            BR_BLART-OPTION = 'EQ' .
            BR_BLART-LOW = 'EM'.
            APPEND BR_BLART .
            BR_BLART-SIGN = 'I' .
            BR_BLART-OPTION = 'EQ' .
            BR_BLART-LOW = 'EI' .
            APPEND BR_BLART .
          ENDIF .
        ENDIF .
        CHECK SCREEN-GROUP1 EQ 'DAT' .
        SCREEN-INPUT = 0.
        MODIFY SCREEN .
      ENDLOOP .
    START-OF-SELECTION .
    Block 1 - Selection of accounting documents in the posting period
    is done through the LDB
    GET BKPF .
    commented on 22/08
    CHECK BKPF-MONAT = T_MONAT.
      CHECK BKPF-MONAT IN T_MONAT.
      CHECK BKPF-GJAHR = T_GJAHR.
      CHECK BKPF-STBLG IS INITIAL .        "<<<< Reversed
    *CHECK bkpf-budat IN t_budat .
      CHECK BKPF-BUKRS EQ T_BUKRS .
      CHECK BKPF-BUKRS EQ T_BUKRS .
      CHECK BKPF-BSTAT EQ SPACE .          "<<< Sample docs
      CHECK BKPF-BLART EQ 'RE'             "MM-IV
        OR  BKPF-BLART EQ 'KR'             "FI-IV
      OR  bkpf-blart EQ 'VI'          "FI-IV Direct
    *************CH-ID-ADI-30 / 09  / 1999
      OR  bkpf-blart EQ 'RA'           "CASH CCI
      OR  bkpf-blart EQ 'EM'           "MAINTAINANCE
      OR  bkpf-blart EQ 'EI' .        "IDT
        OR BKPF-BLART EQ  'P1'
        OR BKPF-BLART EQ 'PM'
        OR  BKPF-BLART EQ 'R1'
        OR  BKPF-BLART EQ 'S1'
        OR  BKPF-BLART EQ 'ST'
        OR  BKPF-BLART EQ 'SR'      " ADD ON 101203 JAJ
        OR  BKPF-BLART EQ 'SP'.
    *************CH-ID-ADI-30 / 09  / 1999
      CLEAR DOCTAB .
      DOCTAB-BLART = BKPF-BLART .
      DOCTAB-BELNR = BKPF-BELNR .
      DOCTAB-BUDAT = BKPF-BUDAT .
      DOCTAB-XBLNR = BKPF-XBLNR .
    Added By Pankaj                   19.03.99
    Initializing fiscal year for document table
      DOCTAB-GJAHR = BKPF-GJAHR .
      APPEND DOCTAB.
    Tax details
    GET BSET .   " Commented because LDB gives wrong BSET entries
      " for some documents
      CASE BSET-KSCHL .
        WHEN 'JMO1' .
          DOCTAB-JMO1 = DOCTAB-JMO1 + BSET-HWSTE .
        WHEN 'JMO2' .
          DOCTAB-JMO2 = DOCTAB-JMO2 + BSET-HWSTE .
        WHEN 'JIP1' .
          DOCTAB-JIP1 = DOCTAB-JIP1 + BSET-HWSTE .
        WHEN 'JIP2' .
          DOCTAB-JIP2 = DOCTAB-JIP2 + BSET-HWSTE .
        WHEN 'ZSET' .
         break deven .
          DOCTAB-ZSET = DOCTAB-ZSET + BSET-HWSTE .
        WHEN 'ZPTX' .
          DOCTAB-ZPTX = DOCTAB-ZPTX + BSET-HWSTE .
      ENDCASE .
      DOCTAB-MWSKZ = BSET-MWSKZ.
      MODIFY DOCTAB INDEX SY-TABIX.
    Item details
    *changed by srinivas yerra.
    GET BSEG .
      IF BSEG-KOART = 'K' .              "<<< Vendor Line
    IF BSEG-KOART = 'K' .
    *end of chnages by srinivas yerra.
        DOCTAB-LIFNR = BSEG-LIFNR .
        IF NOT BSEG-ZTERM IS INITIAL .
          DOCTAB-ZTERM = BSEG-ZTERM .
          DOCTAB-DUE_DATE = BSEG-ZFBDT + BSEG-ZBD1T .
        ENDIF .
        IF BSEG-SHKZG EQ 'H' .             "<< Add credits
          DOCTAB-AMOUNT = DOCTAB-AMOUNT + BSEG-DMBTR .
        ELSE .                             "<< Subtr debits
          DOCTAB-AMOUNT = DOCTAB-AMOUNT - BSEG-DMBTR .
        ENDIF .
      ENDIF .
      CASE BSEG-KTOSL .
        WHEN 'WRX' .
          DOCTAB-PON = BSEG-EBELN .
          IF DOCTAB-MWSKZ IS INITIAL .
            DOCTAB-MWSKZ = BSEG-MWSKZ .
          ENDIF .
        WHEN 'BSX' .
    ***********ABEY
          IF NEXT = BSEG-BUZEI
             AND
             DOC = BSEG-BELNR
             AND
             ( BSEG-BUZID = 'M'
               OR
               BSEG-HKONT = 50765 ).
            DOCTAB-ZOCT = DOCTAB-ZOCT + BSEG-DMBTR.
            IF BSEG-SHKZG EQ 'H' .         "<< Subtr credits
              DOCTAB-OTHR_CHRG = DOCTAB-OTHR_CHRG - BSEG-DMBTR .
            ELSE .                         "<< Add debits
              DOCTAB-OTHR_CHRG = DOCTAB-OTHR_CHRG + BSEG-DMBTR .
            ENDIF .
          ENDIF .
    ************END
          IF BSEG-SHKZG EQ 'S' .
            DOCTAB-DMBTR = DOCTAB-DMBTR + BSEG-DMBTR .
          ELSE .
            DOCTAB-DMBTR = DOCTAB-DMBTR - BSEG-DMBTR .
          ENDIF .
        WHEN 'OCT' OR 'FRE' OR 'FR1' OR SPACE .
    *****CH-ID-ADI-30 / 09 /1999.
          IF ( ( BKPF-BLART = 'EM'  OR  BKPF-BLART = 'RA'  OR  BKPF-BLART =
          'EI')
           AND BSEG-KTOSL = SPACE ) OR  BSEG-MWSKZ = '9W' OR BSEG-MWSKZ =
           'K9' OR
                                                                BSEG-MWSKZ =
                                                                'X9'.
            DOCTAB-OTHR_CHRG = 0.
          ELSE.
    *********CH-ID-ADI--01 / 10 / 1999
         Other Charges only for accounts other than vendor acc.
            CHECK BSEG-BUZID NE 'T' .
            CHECK BSEG-BUZID NE 'P' .
            IF BSEG-KOART NE 'K' .
    *********ABEY (25/02/2000), (21/02/2000)
              IF BSEG-BUZID = 'F'
               OR BSEG-HKONT = 75461.
                NEXT = BSEG-BUZEI + 1.
                DOC = BSEG-BELNR.
                DOCTAB-ZOCT = DOCTAB-ZOCT + BSEG-DMBTR.
              ENDIF.
              IF BSEG-BUZEI = NEXT
                 AND
                 ( BSEG-BUZID = 'M'
                   OR
                   BSEG-HKONT = 50765 ).
                DOCTAB-ZOCT = DOCTAB-ZOCT + BSEG-DMBTR.
              ENDIF.
    *********END
              IF BSEG-SHKZG EQ 'H' .       "<< Subtr credits
                DOCTAB-OTHR_CHRG = DOCTAB-OTHR_CHRG - BSEG-DMBTR .
              ELSE .                       "<< Add debits
                DOCTAB-OTHR_CHRG = DOCTAB-OTHR_CHRG + BSEG-DMBTR .
              ENDIF .
            ENDIF .
    *****NEXT-LINE ADDED BY ADI
          ENDIF .
    *************END.
      ENDCASE .
    *CHANGED BY SRINIVAS YERRA
    *MODIFY DOCTAB INDEX SY-TABIX.
      APPEND DOCTAB.
    *END OF CHANGES.
    PO History
    GET EKBE .
      CHECK DOCTAB-BELNR EQ EKBE-BELNR .
      DOCTAB-MBLNR = EKBE-LFBNR .
      DOCTAB-MJAHR = EKBE-LFGJA .
      MODIFY DOCTAB INDEX SY-TABIX .
    PERFORM show_indicator USING text-m02 .
    *PERFORM convert_data.
    END-OF-SELECTION .
    Data read from LDB is converted into printable format.
      PERFORM SHOW_INDICATOR USING TEXT-M04 .
      PERFORM CONVERT_DATA .
    Start of Delete by B.Elan on 23/12/2005
    IF stax_reg EQ 'X' .                 "<<< Add
       SORT itab BY mwskz hkont belnr .
    ELSE .                               "<<< Add
       SORT itab BY belnr .               "<<< Add
        SORT itab BY pon.
    ENDIF .                              "<<< Add
    Perform further operation based on user input
    IF display EQ 'X' .
       PERFORM write_itab.
       PERFORM write_data .
    ELSE .
      PERFORM download_data .
    ENDIF .
    End of Delete by B.Elan on 23/12/2005
    Start of Insert by B.Elan on 23/12/2005
      SORT ITAB BY BELNR.
      PERFORM WRITE_DATA.
      IF MAT_SM = C_X.
        PERFORM WRITE_MATERIAL_SUMMARY.
      ELSEIF MAT_DT = C_X.
        PERFORM WRITE_MATERIAL_DETAILS.
      ELSEIF VEN_SM = C_X.
        PERFORM WRITE_VENDOR_SUMMARY.
      ELSEIF VEN_DT = C_X.
        PERFORM WRITE_VENDOR_DETAILS.
      ENDIF.
    End of Insert by B.Elan on 23/12/2005
    Start of Insert by B.Elan on 23/12/2005
    AT USER-COMMAND.
      V_UCOMM = SY-UCOMM.
      CASE V_UCOMM.
        WHEN 'DETLS'.
          NEW-PAGE.
          PUR_DB = C_X.
          PERFORM CLEAR_DETAILS.
          PERFORM WRITE_DATA.
        WHEN 'MSUMRY'.
          PERFORM WRITE_MATERIAL_SUMMARY.
        WHEN 'MDETL'.
          PERFORM WRITE_MATERIAL_DETAILS.
        WHEN 'VSUMRY'.
          PERFORM WRITE_VENDOR_SUMMARY.
        WHEN 'VDETL'.
          PERFORM WRITE_VENDOR_DETAILS.
        WHEN 'EXIT'.
          LEAVE PROGRAM.
      ENDCASE.
    End of Insert by B.Elan on 23/12/2005
    *- - - - - - - - - End Of Execution .- - - - - - - - - - - - - - - - - -
    TOP-OF-PAGE .
      IF PUR_DB = C_X.
        PERFORM TOP_OF_PAGE.
        PERFORM TOP_OF_PAGE_PUR_DB.
      ELSEIF MAT_SM = C_X.
        PERFORM TOP_OF_PAGE.
        PERFORM TOP_OF_PAGE_MAT_SM.
      ELSEIF MAT_DT = C_X.
        PERFORM TOP_OF_PAGE.
        PERFORM TOP_OF_PAGE_MAT_DT.
      ELSEIF VEN_SM = C_X.
        PERFORM TOP_OF_PAGE.
        PERFORM TOP_OF_PAGE_VEN_SM.
      ELSEIF VEN_DT = C_X.
        PERFORM TOP_OF_PAGE.
        PERFORM TOP_OF_PAGE_VEN_DT.
      ENDIF.
    TOP-OF-PAGE DURING LINE-SELECTION.
      CASE V_UCOMM.
        WHEN 'DETLS'.
          PERFORM TOP_OF_PAGE.
          PERFORM TOP_OF_PAGE_PUR_DB.
        WHEN 'MSUMRY'.
          PERFORM TOP_OF_PAGE.
          PERFORM TOP_OF_PAGE_MAT_SM.
        WHEN 'MDETL'.
          PERFORM TOP_OF_PAGE.
          PERFORM TOP_OF_PAGE_MAT_DT.
        WHEN 'VSUMRY'.
          PERFORM TOP_OF_PAGE.
          PERFORM TOP_OF_PAGE_VEN_SM.
        WHEN 'VDETL'.
          PERFORM TOP_OF_PAGE.
          PERFORM TOP_OF_PAGE_VEN_DT.
      ENDCASE.
    *&      Form  WRITE_DATA
          text                                                           *
    FORM WRITE_DATA.
      DATA:     V_SALES LIKE ITAB_DISPLAY-SALES,
                V_RATE LIKE ITAB_DISPLAY-RATE,
                V_DISCOUNT LIKE ITAB_DISPLAY-DISCOUNT,
                V_PROD-AMT LIKE ITAB_DISPLAY-PROD-AMT,
                V_EXCISE1 LIKE ITAB_DISPLAY-EXCISE,
                V_EXCISE LIKE ITAB_DISPLAY-EXCISE,
                V_PON LIKE ITAB_DISPLAY-PON,
                V_OTHERS LIKE ITAB_DISPLAY-OTHERS,
                V_FREIGHT LIKE ITAB_DISPLAY-FREIGHT.
      CLEAR ITAB .
    Write the correct data i.e. tax code and G/L code both available .
      LOOP AT ITAB .
    *************CH-ID-ADI-30 / 09 / 1999
        IF ( ITAB-MWSKZ = '9W' OR ITAB-MWSKZ = 'K9' OR ITAB-MWSKZ = 'X9' )
                                                   AND ITAB-OTHR_CHRG NE 0 .
          ITAB-DMBTR = ITAB-OTHR_CHRG.
          ITAB-OTHR_CHRG = 0.
          MODIFY ITAB.
        ENDIF.
      ENDLOOP.
      LOOP AT ITAB.
        I_LFA1-LIFNR = ITAB-LIFNR.
        APPEND I_LFA1.
        CLEAR I_LFA1.
      ENDLOOP.
      SORT I_LFA1.
      DELETE ADJACENT DUPLICATES FROM I_LFA1 COMPARING ALL FIELDS.
      SELECT LIFNR
             NAME1
        FROM LFA1 INTO TABLE I_VENDOR
        FOR ALL ENTRIES IN I_LFA1 WHERE
                                       LIFNR = I_LFA1-LIFNR.
      FREE I_LFA1.
      LOOP AT ITAB.
        READ TABLE I_VENDOR WITH KEY LIFNR = ITAB-LIFNR .
        IF SY-SUBRC EQ 0.
          ITAB-NAME1_VENDOR = I_VENDOR-NAME1.
          MODIFY ITAB  TRANSPORTING NAME1_VENDOR.
        ENDIF.
      ENDLOOP.
      LOOP AT ITAB.
        IF NOT  ITAB-LIFNR IN S_VENDOR.
          DELETE ITAB.
        ENDIF.
      ENDLOOP.
      SELECT BUKRS  BELNR GJAHR BUZEI BUZID SHKZG EBELN EBELP ERFMG WRBTR
       MATNR HKONT SGTXT " ERFMG for MENGE,HKONT,SGTXT Added by KrishnaMohan
             INTO TABLE ITAB_FINAL
            FROM BSEG FOR ALL ENTRIES IN ITAB
            WHERE BUKRS = T_BUKRS AND                           "'1000' AND
                  BELNR = ITAB-BELNR AND
    *added by srinivas
                 hkont in zgl and
    *end
                  GJAHR = T_GJAHR AND
    *- Start of change by Raj on 030905
                 buzid IN ('W', 'M', 'K', 'S', 'F' , 'P' ) AND
                   BUZID IN ('W', 'M', 'K', 'S', 'F' , 'P' , 'T', ' ') AND
                   " ADD T 090206  JAJ
                   KOART <> 'K'   AND    " mod by vik on 21.08.2008" sjaj si
    *- End of change by Raj on 030905
    BUZID = P Added on 21/01/02 by Krishna Mohan
                  GSBER IN P_GSBER AND
                 gsber IN p_gsber OR gsber = ' ' AND
                  MATNR IN S_MATNR.
      SELECT BELNR BLART INTO TABLE ITAB_DOC FROM BKPF
                FOR ALL ENTRIES IN ITAB_FINAL WHERE
                           BUKRS = T_BUKRS AND                  "'1000' AND
                           BELNR  = ITAB_FINAL-BELNR AND
                           GJAHR = T_GJAHR AND
                           BLART NOT IN ('WA' , 'WE').
      SORT ITAB_DOC BY BELNR BLART.
      LOOP AT ITAB_DOC.
        IF NOT ITAB_DOC-BLART IN S_DOCTYP .
          DELETE ITAB_DOC.
        ENDIF.
      ENDLOOP.
      LOOP AT ITAB_FINAL.
        READ TABLE ITAB_DOC WITH KEY BELNR = ITAB_FINAL-BELNR BINARY SEARCH.
        IF SY-SUBRC NE 0.
          DELETE ITAB_FINAL.
        ENDIF.
      ENDLOOP.
      DELETE ITAB_FINAL WHERE BUZID = 'K' AND BUZEI = '1'.
      LOOP AT ITAB_FINAL WHERE SHKZG = 'H'.
        ITAB_FINAL-WRBTR = ITAB_FINAL-WRBTR * ( -1 ).
        MODIFY ITAB_FINAL TRANSPORTING WRBTR.
      ENDLOOP.
      LOOP AT ITAB_FINAL WHERE BUZID = 'M'.
        IF ITAB_FINAL-SGTXT NE ' '.
          TRANSLATE ITAB_FINAL-SGTXT TO UPPER CASE.
          MODIFY ITAB_FINAL.
        ENDIF.
      ENDLOOP.
      LOOP AT ITAB_FINAL .
        IF ITAB_FINAL-BUZID = 'W'.
          CLEAR V_MATNR.
          V_EBELN = ITAB_FINAL-EBELN.
          V_MATNR = ITAB_FINAL-MATNR.
          ITAB_PO_ITEM-BELNR = ITAB_FINAL-BELNR.
          ITAB_PO_ITEM-BUZID = ITAB_FINAL-BUZID.
          ITAB_PO_ITEM-MATNR = ITAB_FINAL-MATNR.
          ITAB_PO_ITEM-EBELN = ITAB_FINAL-EBELN.
          ITAB_PO_ITEM-EBELP = ITAB_FINAL-EBELP.
          ITAB_PO_ITEM-MENGE = ITAB_FINAL-MENGE.
          ITAB_PO_ITEM-WRBTR = ITAB_FINAL-WRBTR.
          COLLECT ITAB_PO_ITEM.
          CLEAR ITAB_PO_ITEM.
        ELSEIF ITAB_FINAL-BUZID = 'M' OR ITAB_FINAL-BUZID = 'K' OR
                                          ITAB_FINAL-BUZID = 'S' OR
            ITAB_FINAL-BUZID = 'P' OR      " ADDED ON 21/01/02
    *- Start of change by Raj on 030905
            ITAB_FINAL-BUZID = ' ' OR
             ITAB_FINAL-BUZID = 'T' OR   " ADD BY JAJ ON 090206
    *- End of change by Raj on 030905
                                          ITAB_FINAL-BUZID = 'F'.
          IF ITAB_FINAL-MATNR IS INITIAL.
            ITAB_FINAL-MATNR = V_MATNR.
          ENDIF.
        CLEAR V_MATNR.
          ITAB_PO_OTHERS-BELNR = ITAB_FINAL-BELNR.
         ITAB_PO_OTHERS-MATNR = ITAB_FINAL-MATNR.
         ITAB_PO_OTHERS-EBELN = ITAB_FINAL-EBELN.
         ITAB_PO_OTHERS-EBELP = ITAB_FINAL-EBELP.
         ITAB_PO_OTHERS-MENGE = ITAB_FINAL-MENGE.
          ITAB_PO_OTHERS-WRBTR = ITAB_FINAL-WRBTR.
    IF CONDITION,ADDED ON 21/01/02 FOR GETTING EXCISE WHEN CONDITION MEETS
    ie TOTAL AMOUNT = EXCISE WHEN BUZID = S AND HKONT = 27500
    *IF itab_final-buzid = 'S' AND ( itab_final-hkont = '0000027500' OR  "
    *COMM BY JAJ ON 090206
          IF ITAB_FINAL-BUZID = 'S' OR ITAB_FINAL-BUZID = 'T' AND (
          ITAB_FINAL-HKONT = '0000027500' OR
                                        ITAB_FINAL-HKONT = '0000027515'
            OR  ITAB_FINAL-HKONT = '0000027550'       " jaj on 090206
           OR  ITAB_FINAL-HKONT = '0000027507' OR
            ITAB_FINAL-HKONT = '0000027508').  "Added on 050905 - Raj
            ITAB_FINAL-EBELN = V_EBELN.
    to get ebeln value into header so that when there are 2 po's
    and 2 W's excise can go into only one po which is v_ebeln
    Start of insert by B.Elan on 10/02/2006
            READ TABLE ITAB_PO_ITEM WITH KEY BELNR = ITAB_FINAL-BELNR
                                             EBELN = ITAB_FINAL-EBELN
                                             MATNR = ITAB_FINAL-MATNR.
            ITAB_PO_ITEM-EXCISE = ITAB_PO_ITEM-EXCISE + ITAB_FINAL-WRBTR.
    End of insert by B.Elan on 10/02/2006
    Start of delete by B.Elan on 10/02/2006
          itab_po_item-excise = itab_final-wrbtr.
    End of delete by B.Elan on 10/02/2006
            MODIFY ITAB_PO_ITEM TRANSPORTING EXCISE
                  WHERE BELNR EQ ITAB_FINAL-BELNR AND
                        EBELN EQ ITAB_FINAL-EBELN.
            CLEAR ITAB_PO_ITEM.
          ELSE.
            COLLECT ITAB_PO_OTHERS.
          ENDIF.
          CLEAR ITAB_PO_OTHERS.
        ENDIF.
      ENDLOOP.
    sateesh
      SORT ITAB_PO_ITEM BY BELNR EBELN.
      LOOP AT ITAB_PO_ITEM.
       AT NEW BELNR.
        AT NEW EBELN.
          READ TABLE ITAB_PO_ITEM INDEX SY-TABIX.
          ITAB_PO_ITEM-FLAG = 'X'.
          MODIFY ITAB_PO_ITEM INDEX SY-TABIX.
        ENDAT.
       ENDAT.
      ENDLOOP.
      LOOP AT ITAB_PO_ITEM.
        ITAB_PO_ITEM-EXCISE = 0.
        MODIFY ITAB_PO_ITEM TRANSPORTING EXCISE
         WHERE EXCISE > 0
           AND FLAG = SPACE.
      ENDLOOP.
    end
      LOOP AT ITAB_PO_ITEM.
        ITAB_PO-EBELN = ITAB_PO_ITEM-EBELN.
        ITAB_PO-EBELP = ITAB_PO_ITEM-EBELP.
        APPEND ITAB_PO.
        CLEAR ITAB_PO.
      ENDLOOP.
      LOOP AT ITAB_PO_OTHERS.
        ITAB_PO-EBELN = ITAB_PO_OTHERS-EBELN.
        ITAB_PO-EBELP = ITAB_PO_OTHERS-EBELP.
        APPEND ITAB_PO.
        CLEAR ITAB_PO.
      ENDLOOP.
      SORT ITAB_PO.
      DELETE ADJACENT DUPLICATES FROM  ITAB_PO COMPARING ALL FIELDS.
      SELECT EKPO~EBELN
             EBELP
             MENGE
             BRTWR
             KZWI5
             EKKO~KNUMV
             EKPO~MATNR
             EKPO~TXZ01
             INTO TABLE ITAB_RATE_MODVAT
             FROM EKPO INNER JOIN EKKO
                 ON EKPO~EBELN = EKKO~EBELN
        FOR ALL ENTRIES IN ITAB_PO WHERE
                        EKPO~EBELN = ITAB_PO-EBELN AND
                        EBELP = ITAB_PO-EBELP.
      SELECT KNUMV KPOSN STUNR ZAEHK KSCHL KWERT
        INTO TABLE ITAB_KONV
        FROM KONV
        FOR ALL ENTRIES IN ITAB_RATE_MODVAT
            WHERE KNUMV = ITAB_RATE_MODVAT-KNUMV AND
      KSCHL IN ('YT02', 'YF07', 'YOTH', 'YPF1', 'YD01', 'YD02', 'YD03' ) .
      SORT ITAB_KONV BY KNUMV KSCHL.
      SORT ITAB BY BELNR.
      SORT ITAB_RATE_MODVAT BY EBELN EBELP.
      SORT ITAB_PO_OTHERS BY BELNR MATNR.
      LOOP AT ITAB_PO_ITEM.
        ITAB_DISPLAY-BELNR = ITAB_PO_ITEM-BELNR.
        READ TABLE ITAB_DOC WITH KEY BELNR = ITAB_PO_ITEM-BELNR BINARY
        SEARCH.
        IF SY-SUBRC EQ 0.
          ITAB_DISPLAY-BLART = ITAB_DOC-BLART.
        ENDIF.
        READ TABLE ITAB WITH KEY BELNR = ITAB_PO_ITEM-BELNR BINARY SEARCH.
        IF SY-SUBRC EQ 0.
          ITAB_DISPLAY-XBLNR = ITAB-XBLNR.
          ITAB_PO_ITEM-XBLNR = ITAB-XBLNR.
          ITAB_DISPLAY-NAME1_VENDOR = ITAB-NAME1_VENDOR.
          ITAB_DISPLAY-HKONT = ITAB-HKONT.
          ITAB_DISPLAY-MWSKZ = ITAB-MWSKZ.
          ITAB_DISPLAY-BUDAT = ITAB-BUDAT.
          ITAB_DISPLAY-DUE_DATE   = ITAB-DUE_DATE.
         ITAB_DISPLAY-PON    =  ITAB_PO_ITEM-EBELN.
        ENDIF.
        ITAB_DISPLAY-QTY  =    ITAB_PO_ITEM-MENGE.
        READ TABLE ITAB_RATE_MODVAT WITH KEY EBELN = ITAB_PO_ITEM-EBELN
                                             EBELP = ITAB_PO_ITEM-EBELP
                                             BINARY SEARCH.
        IF SY-SUBRC EQ 0.
          ITAB_DISPLAY-PON    =  ITAB_PO_ITEM-EBELN.
          ITAB_DISPLAY-MATNR = ITAB_RATE_MODVAT-MATNR.
          ITAB_DISPLAY-MAKTX  =  ITAB_RATE_MODVAT-TXZ01.
          ITAB_DISPLAY-RATE = ITAB_RATE_MODVAT-BRTWR /
          ITAB_RATE_MODVAT-MENGE.
          ITAB_DISPLAY-PROD-AMT = ITAB_DISPLAY-RATE * ITAB_PO_ITEM-MENGE.
          IF ITAB_PO_ITEM-EXCISE NE 0.
            ITAB_DISPLAY-EXCISE = ITAB_PO_ITEM-EXCISE.
        ELSE.
    *ITAB_DISPLAY-EXCISE = ( ITAB_PO_ITEM-MENGE * ITAB_RATE_MODVAT-KZWI5 ) /
                                      ITAB_RATE_MODVAT-MENGE.
    *commentedon 210102 to get excise directly from BSEG - IV
          ENDIF.
        ENDIF.
        READ TABLE ITAB_KONV WITH KEY KNUMV = ITAB_RATE_MODVAT-KNUMV
                                      KPOSN = ITAB_RATE_MODVAT-EBELP
                                      KSCHL = 'YT02' .
        IF SY-SUBRC EQ 0.
          ITAB_DISPLAY-SALES  = ( ITAB_PO_ITEM-MENGE * ITAB_KONV-KWERT ) /
                                 ITAB_RATE_MODVAT-MENGE.
          READ TABLE ITAB_FINAL WITH KEY BELNR = ITAB_PO_ITEM-BELNR
                                         BUZID = 'M'
                                        SGTXT(9) = 'SALES TAX'.
          IF SY-SUBRC EQ 0.
          IF ITAB_FINAL-SGTXT(9) EQ 'SALES TAX'
             OR ITAB_FINAL-SGTXT(9) EQ 'sales tax'.
            ITAB_DISPLAY-SALES = ITAB_DISPLAY-SALES + ITAB_FINAL-WRBTR.
          ENDIF.
          ENDIF.
        ENDIF.
        READ TABLE ITAB_KONV WITH KEY KNUMV = ITAB_RATE_MODVAT-KNUMV
                                      KPOSN = ITAB_RATE_MODVAT-EBELP
                                      KSCHL = 'YF07'.
        IF SY-SUBRC EQ 0.
          ITAB_DISPLAY-FREIGHT = ( ITAB_PO_ITEM-MENGE * ITAB_KONV-KWERT ) /
                                  ITAB_RATE_MODVAT-MENGE.
        ENDIF.
        READ TABLE ITAB_KONV WITH KEY KNUMV = ITAB_RATE_MODVAT-KNUMV
                                      KPOSN = ITAB_RATE_MODVAT-EBELP
                                      KSCHL = 'YD01' .
        IF SY-SUBRC EQ 0.
         ITAB_DISPLAY-DISCOUNT = ( ITAB_PO_ITEM-MENGE * ITAB_KONV-KWERT ) /
                                              ITAB_RATE_MODVAT-MENGE.
        ELSE.
          READ TABLE ITAB_KONV WITH KEY KNUMV = ITAB_RATE_MODVAT-KNUMV
                                        KPOSN = ITAB_RATE_MODVAT-EBELP
                                      KSCHL = 'YD02' .
          IF SY-SUBRC EQ 0.
           ITAB_DISPLAY-DISCOUNT = ( ITAB_PO_ITEM-MENGE * ITAB_KONV-KWERT )
    ITAB_RATE_MODVAT-MENGE.
          ELSE.
            READ TABLE ITAB_KONV WITH KEY KNUMV = ITAB_RATE_MODVAT-KNUMV
                                          KPOSN = ITAB_RATE_MODVAT-EBELP
                                          KSCHL = 'YD03' .
            IF SY-SUBRC EQ 0.
             ITAB_DISPLAY-DISCOUNT = ( ITAB_PO_ITEM-MENGE * ITAB_KONV-KWERT
    ITAB_RATE_MODVAT-MENGE.
            ENDIF.
          ENDIF.
        ENDIF.
        LOOP AT ITAB_KONV WHERE KNUMV = ITAB_RATE_MODVAT-KNUMV AND KPOSN =
                                 ITAB_RATE_MODVAT-EBELP AND
                       (  KSCHL = 'YPF1' OR KSCHL = 'YOTH' ) .
          ITAB_KONV-KWERT = ( ITAB_PO_ITEM-MENGE * ITAB_KONV-KWERT ) /
                                   ITAB_RATE_MODVAT-MENGE.
          ITAB_DISPLAY-OTHERS = ITAB_DISPLAY-OTHERS + ITAB_KONV-KWERT.
        ENDLOOP.
        READ TABLE ITAB_PO_OTHERS WITH KEY BELNR = ITAB_PO_ITEM-BELNR.
                                          EBELN = ITAB_PO_ITEM-EBELN.
                                          BINARY SEARCH.
    sateesh as on 10092003
        IF SY-SUBRC NE 0. CLEAR ITAB_PO_OTHERS. ENDIF.
    end
        IF NOT ITAB_PO_OTHERS-EBELN IS INITIAL.
          READ TABLE ITAB_PO_OTHERS WITH KEY EBELN = ITAB_PO_ITEM-EBELN
                                             EB

  • CL_ABAP_TYPEDESCR does not return integer or decimal field

    Dear All,
    I have an internal table for which I want to get dynamically list of fields.
    I use class CL_ABAP_TYPEDESCR and method DESCRIBE_BY_DATA.
    The list of field is then placed in table CL_ABAP_TYPEDESCR->KEY. The problem
    is that fields with integer type (FIELD FACTOR) are not listed there. What do I do wrong?
    TYPES: BEGIN OF t_table,
            name(20)   TYPE C,
            period(10) TYPE C,
            factor     TYPE I,
          END OF t_table.
    DATA: it_table TYPE STANDARD TABLE OF t_table.
    DATA: wa_table TYPE t_table.
    wa_table-name = 'Brown'. wa_table-period = '2010'. wa_table-factor = 100. APPEND wa_table TO it_table.
    wa_table-name = 'Brown'. wa_table-period = '2011'. wa_table-factor = 200. APPEND wa_table TO it_table.
    wa_table-name = 'Fox'.   wa_table-period = '2010'. wa_table-factor = 50.  APPEND wa_table TO it_table.
    wa_table-name = 'Fox'.   wa_table-period = '2010'. wa_table-factor = 900. APPEND wa_table TO it_table.
    TYPE-POOLS: ABAP.
    DATA: L_REF TYPE REF TO CL_ABAP_TABLEDESCR.
    l_ref ?= CL_ABAP_TYPEDESCR=>DESCRIBE_BY_DATA( it_table ).
    * TABLE l_ref->key DOES NOT SHOW FIELD "FACTOR" (TYPE I)....
    FIELD-SYMBOLS: <KEY_COMP_WA> TYPE ABAP_KEYDESCR.
    LOOP AT l_ref->key ASSIGNING <KEY_COMP_WA>.
       WRITE:/ <KEY_COMP_WA>-NAME.
    ENDLOOP.
    Best regards,
    Mark

    Hi Mark,
    if you want the fields you should consider attribute components, compare this snippet getting the field names of any structure or table (from the times when I still used FORM routines)
    FORM getfields
      USING    px_data                        TYPE any
      CHANGING pt_fields                      TYPE table.
      DATA:
        lt_comp                               TYPE abap_compdescr_tab,
        lr_dat                                TYPE REF TO data,
    **    lv_kind                             TYPE abap_typecategory,
        lr_typedescr                          TYPE REF TO cl_abap_typedescr,
    **    lr_tabledescr                       TYPE REF TO cl_abap_tabledescr,
        lr_structdescr                        TYPE REF TO cl_abap_structdescr.
      FIELD-SYMBOLS:
        <fs>                                  TYPE ANY,
        <ft>                                  TYPE ANY TABLE,
        <comp>                                TYPE LINE OF abap_compdescr_tab.
      lr_typedescr ?= cl_abap_typedescr=>describe_by_data( px_data ).
      CASE lr_typedescr->kind.
        WHEN 'S'.
          lr_structdescr ?= lr_typedescr.
          lt_comp                             = lr_structdescr->components.
        WHEN 'T'.
          ASSIGN px_data TO <ft>.
          CREATE DATA lr_dat                  LIKE LINE OF <ft>.
          ASSIGN lr_dat->* TO <fs>.
          lr_structdescr ?= cl_abap_structdescr=>describe_by_data( <fs> ).
          lt_comp                             = lr_structdescr->components.
        WHEN OTHERS.
          MESSAGE e241(00).
    *   Function is invalid in this environment
      ENDCASE.
      CLEAR pt_fields.
      LOOP AT lt_comp ASSIGNING <comp>.
        APPEND <comp>-name TO pt_fields.
      ENDLOOP." at lt_comp assigning <comp>.
    ENDFORM.                    " getfields
    Regards,
    Clemens

  • How to pass values in dynamic structure and then dynamic table

    Hi,
    we have a Z structure in se11 holding 10 fields. But at run time i need to create a dynamic table with more than 10 records.
    I am able to create the structure and corresponding internal table. Now the issue is i have to populate this dynamic structure with some values and then append it to dynamic internal table. Since the dynamic  table type is any its not allowing an index operation like modify etc etc.
    Could anyone help me in passing the values . I have searched in SDN . everyone created a dynamic table and then populated it values from some standard or custom tables.Then assigning the component of structure  and displaying the output. but in my situation i have no such values stored in any tables. i populate values based on certain calculation.

    Hi Friends,
    This is the piece of code.After creating dynamic work area and dynamic table what i should do?
    TYPES: BEGIN OF STR,
    ID TYPE I,
    NAME(30) TYPE C,
    END OF STR.
    data: v_lines type i.
    STR_TYPE ?= CL_ABAP_TYPEDESCR=>DESCRIBE_BY_NAME( 'STR' ).
    STR_COMP = STR_TYPE->GET_COMPONENTS( ).
    APPEND LINES OF STR_COMP TO COMP_TAB.
    COMP-NAME = 'NAME1'.
    COMP-TYPE = CL_ABAP_ELEMDESCR=>GET_STRING(  ).
    APPEND COMP TO COMP_TAB.
    COMP-NAME = 'VALUE1'.
    COMP-TYPE = CL_ABAP_ELEMDESCR=>GET_STRING( ).
    APPEND COMP TO COMP_TAB.
    COMP-NAME = 'NAME2'.
    COMP-TYPE = CL_ABAP_ELEMDESCR=>GET_STRING( ).
    APPEND COMP TO COMP_TAB.
    COMP-NAME = 'VALUE2'.
    COMP-TYPE = CL_ABAP_ELEMDESCR=>GET_STRING( ).
    APPEND COMP TO COMP_TAB.
    COMP-NAME = 'NAME3'.
    COMP-TYPE = CL_ABAP_ELEMDESCR=>GET_STRING( ).
    APPEND COMP TO COMP_TAB.
    COMP-NAME = 'VALUE3'.
    COMP-TYPE = CL_ABAP_ELEMDESCR=>GET_STRING( ).
    APPEND COMP TO COMP_TAB.
    NEW_STR = CL_ABAP_STRUCTDESCR=>CREATE( COMP_TAB ).
    NEW_TAB = CL_ABAP_TABLEDESCR=>CREATE(
    P_LINE_TYPE = NEW_STR
    P_TABLE_KIND = CL_ABAP_TABLEDESCR=>TABLEKIND_STD
    P_UNIQUE = ABAP_FALSE ).
    CREATE DATA DREF TYPE HANDLE NEW_TAB.
    CREATE DATA DREF1 TYPE HANDLE NEW_str.

  • Pivot function in Oracle 10g???

    Hello everybody,
    at the beginning of the week I had a simple problem (I thought that...), but now after trying and trying, I can't find a solution for it. First of all I'm working on Oracle 10g with the version 10.2.0.4.0. I can't change the version, it's standard in the whole company...
    At the beginning I have a table like the following one, but please note, that the compartment, the type and the amount are flexible and can change at any time:
    comp type amount
    a1 6280 10
    a2 6280 20
    a2 4810 15
    a2 1147 12
    a3 6280 33
    Now I want the table to look like this:
    a1 a2 a3
    1147 0 12 0
    4810 0 15 0
    6280 10 20 33
    A simple question in Excel for example, I just use the pivot function and have it fixed within 10seconds. But how can I do sth. like this in Oracle with simple SQL? Or it can be PL/SQL too, cause I will use this in an APEX application.
    Can you please give me a hint or a solution? But as stated before a1, a2, a3 are just examples it is possible that tomorrow a4, a5 and so on are coming. If it is necessary I can also create additional tables and views of course!
    Thanks for your help!
    Regards
    hoge

    Hi Hoge!
    Here is your solution:
    SELECT TYPE,
           sum(a1) AS a1,
           sum(a2) AS a2,
           sum(a3) AS a3
      FROM (SELECT TYPE,
                   decode(comp, 'a1', amount, 0) AS a1,
                   decode(comp, 'a2', amount, 0) AS a2,
                   decode(comp, 'a3', amount, 0) AS a3
              FROM test)
      GROUP BY TYPE
      ORDER BY TYPE; And here is my test case setup:
    CREATE TABLE test
        (comp VARCHAR2(255),
         TYPE NUMBER,
         amount NUMBER);
    INSERT INTO test(comp, TYPE, amount) VALUES('a1', 6280, 10);
    INSERT INTO test(comp, TYPE, amount) VALUES('a2', 6280, 20);
    INSERT INTO test(comp, TYPE, amount) VALUES('a2', 4810, 15);
    INSERT INTO test(comp, TYPE, amount) VALUES('a2', 1147, 12);
    INSERT INTO test(comp, TYPE, amount) VALUES('a3', 6280, 33);
    commit;Best regards,
    Matt

  • Dynamic context binding in web dynpro alv

    I use dynamic context binding (see code below to show and edit the ALV table.
    'DB_TABLE' is a tranparent table. It works fine.
    But now this table should be expanded with additional fields which are only known at runtime and could be different from case to case.
    How can I get these fields in the context dynamically?
      DATA:
            rootnode_info TYPE REF TO if_wd_context_node_info,
            dyn_node      TYPE REF TO if_wd_context_node,
            tablename   TYPE string.
      rootnode_info = wd_context->get_node_info( ).
      tablename = 'DB_TABLE'.
      cl_wd_dynamic_tool=>create_nodeinfo_from_struct(
        parent_info = rootnode_info
        node_name = tablename
        structure_name = tablename
        is_multiple = abap_true ).
      DATA:
            stru_tab TYPE REF TO data.
      FIELD-SYMBOLS: <tab> TYPE table.
      CREATE DATA stru_tab TYPE TABLE OF (tablename).
      ASSIGN stru_tab->* TO <tab>.
      SELECT * FROM (tablename) INTO CORRESPONDING FIELDS OF TABLE <tab>.
      dyn_node = wd_context->get_child_node( name = tablename ).
      dyn_node->bind_table( <tab> ).

    You should create a structure dynamically and use this as the context structure. See the coding below, where a structure is created, which contains CARRID and CONNID.
    DATA: node_info type ref to if_wd_context_node_info,
          struct_type TYPE REF TO cl_abap_structdescr,
          table_type  type ref to cl_abap_tabledescr,
          comp_tab    TYPE cl_abap_structdescr=>component_table,
          comp        LIKE LINE OF comp_tab,
          my_table    type ref to data,
          my_row      type ref to data.
      field-symbols: <table> type table,
                     <row> type data,
                     <flight> type sflight.
    * build a structure description from the list of single fields
      comp-name = 'CARRID'.
      comp-type ?= cl_abap_datadescr=>describe_by_name( 'S_CARR_ID' ).
      APPEND comp TO comp_tab.
      comp-name = 'CONNID'.
      comp-type ?= cl_abap_datadescr=>describe_by_name( 'S_CONN_ID' ).
      APPEND comp TO comp_tab.
    * note this structure contains the fields "CONNID" and "CARRID"
      struct_type = cl_abap_structdescr=>create( comp_tab ).
    * now the nodeinfo is created
      node_info = wd_context->get_node_info( ).
      node_info = node_info->add_new_child_node(
        name                         = 'MY_NODE'
        IS_MANDATORY                 = ABAP_true
        IS_MULTIPLE                  = ABAP_true
        STATIC_ELEMENT_RTTI          = struct_type
        IS_STATIC                    = ABAP_false
    * fill new node;
      data: l_node type ref to if_wd_context_node,
            l_flight type STANDARD TABLE OF sflight.
      l_node = wd_context->get_child_node( 'MY_NODE' ).
      l_flight = wd_assist->get_flights( ).
    *  if you could create a local data type, would be fine, but if you have to do it dynamically ...
      struct_type = node_info->GET_STATIC_ATTRIBUTES_TYPE( ).
    * create tabledescriptor from structdescription (standard table, no keys)
      table_type = cl_abap_tabledescr=>create( p_line_type = struct_type ).
      create data my_table type handle table_type.
      assign my_table->* to <table>.
      loop at l_flight assigning <flight>.
        create data my_row type handle struct_type.
        assign my_row->* to <row>.
        move-corresponding <flight> to <row>.
        append <row> to <table>.
      endloop.
      l_node->bind_table( <table> ).

  • Negative Condition checking in read statement

    Hi,
    i have table, which i have to read,  key on which i am going to read that will be determined dynamically. now i have to check the value for the key field is initial or not. i can't use a loop here as it doesn't allow me to mention where condition field dynamically.
    thanks & regards,
    prabhu

    Hi use this:
    DATA: BEGIN OF it OCCURS 0,     "your dynamic table
            field1 TYPE c,
            field2 TYPE c,
          END OF it.
    it-field1 = '1'.
    it-field2 = 'A'.
    APPEND it.
    it-field1 = ''.
    it-field2 = 'B'.
    APPEND it.
    it-field1 = '2'.
    it-field2 = 'C'.
    APPEND it.
    FIELD-SYMBOLS: <struct> TYPE ANY,
                   <comp>   TYPE ANY.
    LOOP AT it ASSIGNING <struct>.   "loop at your dynamic table
      ASSIGN COMPONENT 'FIELD1' OF STRUCTURE <struct> TO <comp>.   "FIELD1 is determined dynamically
      IF sy-subrc = 0 AND <comp> is not initial.  
        WRITE <comp>.   "will write out <comp> for each entry which has non initial value in <comp> (here FIELD1)
      ENDIF.
    ENDLOOP.
    Please note that your <lfs> must hold name 'FIELD1' inside, than you can replace it with below code
      ASSIGN COMPONENT <lfs> OF STRUCTURE <struct> TO <comp>. 
    Regards
    Marcin
    One thing to be added here:
    You can't read table comparing its key field with negative condition NE , only comparison EQ are allowed in READ TABLE statement, that's why I chose above approach.
    Edited by: Marcin Pciak on May 26, 2009 4:51 PM

  • How to convert this into alv display and also change parameterstoselect opt

    tables :mara,marc,stpo.
    parameters: p_werks like t001w-werks obligatory,
    p_matnr like mara-matnr obligatory.
    *select-options : p_matnr for mara-matnr obligatory.
    *parameters: p_werks like marc-werks obligatory,
    *p_matnr like marc-matnr obligatory.
    constants c_x value 'X'.
    data: begin of it_comp occurs 0,
    idnrk like stpox-idnrk,
    ojtxp like stpox-ojtxp,
    menge like stpox-menge,
    meins like stpox-meins,
    matkl like stpox-matmk,
    end of it_comp.
    data: w_topmat like cstmat.
    start-of-selection.
    perform explode_assembly.
    end-of-selection.
    perform write_report.
    top-of-page.
    perform print_header.
    form print_header.
    write: /(18) 'Component'(h00),
    (40) 'Description'(h01),
    'Mat.Group'(h02),
    (18) 'Quantity'(h03).
    uline.
    endform.
    form write_report.
    write: / w_topmat-matnr under text-h00 color col_heading,
    w_topmat-maktx under text-h01 color col_heading.
    loop at it_comp.
    write: /
    it_comp-idnrk under text-h00,
    it_comp-ojtxp under text-h01,
    it_comp-matkl under text-h02,
    it_comp-menge unit it_comp-meins under text-h03,
    it_comp-meins.
    endloop.
    uline.
    endform.
    form explode_assembly.
    data: it_stb like stpox occurs 0 with header line,
    it_stb2 like stpox occurs 0 with header line,
    it_stb3 like stpox occurs 0 with header line,
    w_msg(255) type c.
    Explode highest level:
    call function 'CS_BOM_EXPL_MAT_V2'
    exporting
    auskz = c_x
    capid = 'PP01'
    cuols = c_x
    datuv = sy-datum
    knfba = c_x
    ksbvo = c_x
    mbwls = c_x
    mdmps = c_x
    BGIXO = c_x
    MKMAT = c_x
    MMAPS = c_x
    FBSTP = c_x
    FTREL = c_x
    mtnrv = p_matnr
    werks = p_werks
    importing
    topmat = w_topmat
    tables
    stb = it_stb
    exceptions
    alt_not_found = 1
    call_invalid = 2
    material_not_found = 3
    missing_authorization = 4
    no_bom_found = 5
    no_plant_data = 6
    no_suitable_bom_found = 7
    conversion_error = 8
    others = 9.
    if sy-subrc <> 0.
    message id sy-msgid type sy-msgty number sy-msgno
    with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4
    into w_msg.
    write: / w_msg.
    exit.
    endif.
    Don't process documents
    delete it_stb where idnrk is initial.
    Don't process valid from furure:
    delete it_stb where datuv >= sy-datum.
    Explode phantom assemblies up to last level
    *do.
    it_stb2[] = it_stb[].
    *delete it_stb2 where dumps is initial.
    *if it_stb2[] is initial.
    *exit.
    *endif.
    *delete it_stb where not dumps is initial.
    delete it_stb where VPRSV <> 'S' OR MMSTA = '61'.
    loop at it_stb2.
    call function 'CS_BOM_EXPL_MAT_V2'
    exporting
    capid = 'PP01'
    auskz = c_x
    cuols = c_x
    datuv = sy-datum
    knfba = c_x
    ksbvo = c_x
    mbwls = c_x
    mdmps = c_x
    FBSTP = c_x
    FTREL = c_x
    mtnrv = it_stb2-idnrk
    werks = p_werks
    tables
    stb = it_stb3
    exceptions
    alt_not_found = 1
    call_invalid = 2
    material_not_found = 3
    missing_authorization = 4
    no_bom_found = 5
    no_plant_data = 6
    no_suitable_bom_found = 7
    conversion_error = 8
    others = 9.
    if sy-subrc <> 0.
    message id sy-msgid type sy-msgty number sy-msgno
    with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4
    into w_msg.
    write: / w_msg.
    else.
    delete it_stb3 where idnrk is initial.
    delete it_Stb3 where sobsl = 50.
    loop at it_stb3 .
    multiply it_stb3-menge by it_stb2-menge.
    modify it_stb3 transporting menge.
    endloop.
    append lines of it_stb3 to it_stb.
    endif.
    endloop.
    *enddo.
    Build table of components collecting the same components from
    all levels
    loop at it_stb.
    it_comp-matkl = it_stb-matmk.
    it_comp-idnrk = it_stb-idnrk.
    it_comp-ojtxp = it_stb-ojtxp.
    it_comp-menge = it_stb-menge.
    it_comp-meins = it_stb-meins.
    collect it_comp.
    clear it_comp.
    endloop.
    ENDFORM.
    using this i got the bom explosion and also i tried to use the following code
    to diplay alv diplay,but i got the errormsg,
    here  i got only one material input,instead of i want to use
    select options to from to ,if i give 1 to 10 material
    ouput is
    material 1
    descripn
    bom and components
    materials 2
    desc
    bom comp
    TYPE-POOLS : SLIS.
    DATA : IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
    DATA : WA_FIELDCAT_LN LIKE LINE OF IT_FIELDCAT.
    DATA : IT_EVENTCAT  TYPE SLIS_T_EVENT.
    DATA : WA_EVENTCAT_LN  LIKE LINE OF IT_EVENTCAT.
    DATA : IT_LAYOUT TYPE SLIS_LAYOUT_ALV.
    DATA: S_COL_POS TYPE I.
    DATA : IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
    DATA : WA_FIELDCAT_LN LIKE LINE OF IT_FIELDCAT.
    DATA : IT_EVENTCAT  TYPE SLIS_T_EVENT.
    DATA : WA_EVENTCAT_LN  LIKE LINE OF IT_EVENTCAT.
    DATA : IT_LAYOUT TYPE SLIS_LAYOUT_ALV.
    DATA: S_COL_POS TYPE I.
    DATA : IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.
    DATA : WA_FIELDCAT_LN LIKE LINE OF IT_FIELDCAT.
    DATA : IT_EVENTCAT  TYPE SLIS_T_EVENT.
    DATA : WA_EVENTCAT_LN  LIKE LINE OF IT_EVENTCAT.
    DATA : IT_LAYOUT TYPE SLIS_LAYOUT_ALV.
    DATA: S_COL_POS TYPE I.
    FORM BUILD_FIELDCATALOG.
      PERFORM BUILD_FIELDCAT USING 'MATKL'.
      PERFORM BUILD_FIELDCAT USING 'IDNRK.
      PERFORM BUILD_FIELDCAT USING 'OJTXP.
    PERFORM BUILD_FIELDCAT USING 'MENGE'.
    PERFORM BUILD_FIELDCAT USING 'MEINS'.
    ENDFORM.
    FORM TO BUILD IN FIELD CATALOG FOR ALV FORM
    FORM BUILD_FIELDCAT USING L_FIELDNAME LIKE DD03L-FIELDNAME S_TEXT LIKE DD03P-SCRTEXT_M.
      CLEAR WA_FIELDCAT_LN.
      ADD 1 TO S_COL_POS.
      WA_FIELDCAT_LN-REF_TABNAME  = 'IT_COMP'.
      WA_FIELDCAT_LN-FIELDNAME    = L_FIELDNAME.
      WA_FIELDCAT_LN-SELTEXT_M    = S_TEXT.
      WA_FIELDCAT_LN-COL_POS      = S_COL_POS.
      WA_FIELDCAT_LN-QFIELDNAME   = SPACE.
      WA_FIELDCAT_LN-HOTSPOT      = SPACE.
      WA_FIELDCAT_LN-JUST         = 'R'.
      APPEND WA_FIELDCAT_LN TO IT_FIELDCAT.
    ENDFORM.
    FORM TO BUILD IN FIELD CATALOG FOR ALV FORM
    FORM DATA_DISPLAY.
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      I_CALLBACK_HTML_END_OF_LIST       = ' '
      I_STRUCTURE_NAME                  =
      I_BACKGROUND_ID                   = ' '
       I_GRID_TITLE                      = TEXT-001
      I_GRID_SETTINGS                   =
      IS_LAYOUT                         =
       IT_FIELDCAT                       = IT_FIELDCAT
    IMPORTING
      E_EXIT_CAUSED_BY_CALLER           =
      ES_EXIT_CAUSED_BY_USER            =
      TABLES
        T_OUTTAB                          = IT_COMP
       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.
    GIVE ME SOLUTION FOR THAT ON, VERY URGENT
    THANKS IN ADVANCE
    regards
    ds

    Hi
    declare select-options instead of parameters
    for converting a report to ALV
    create a field catalog.
    for this two option declare a itab with       
    fcat    TYPE slis_t_fieldcat_alv
    and pass the field name,descr etc to fcat and append the same.
    or create structur same as your itab and pass the same with FM
    'REUSE_ALV_FIELDCATALOG_MERGE'
    use either <b>reuse_alv_grid_display or reuse_alv_list_display</b> .
    and pass the itab.
    thanks
    Shiva

Maybe you are looking for

  • Possible heat damage to my MacBook Pro

    Hi, I''m running into an unusual problem that I suspect is caused by heat damage. This is a mid-2009 MacBook Pro, 3.06, 8 gigs RAM, 500 gig 7200 RPM hard drive. The Mac has been trouble free for a couple of years, but in the last 4-5 months has been

  • HELP: best way to share music?

    Here's the deal: I have a MacBook Pro and my wife just got a MacBook Air. All of our music (about 15,600 songs / 81 GB) is currently on my MacBook Pro. I would like to use iTunes Match to get all of this music in the Cloud and off my MacBook Pro. My

  • No sound unless plugged into speakers.  Side controls also don't work.

    Volume side controls do not work and I do not have any sound unless plugged into external speakers.  I have also tried to see if the speakers were muted in the control panel and they are not.

  • Memorex 52 max CDRW  burns but does not playback after installing 7.0

    I have a Memorex 52 MAx CDRW which worked fine with version 6.0, but after installing 7.0 and all recent upgrades it will burn the playlist ok but when attempting to playback recorded or regular cd music, it will skip from one song to the next on the

  • Multiple iPhones in iTunes & Windows Vista

    I sync my iPhone thru iTunes on my laptop and I want to sync my wife's iPhone on the same machine. Will iTunes recognize and support each individual phone? How do I set her phone up in my laptop?