topic Re: Dump in BAPI PO in Application Development and Automation Discussions

Dump in BAPI PO

Former Member — Mon, 03 Mar 2008 20:06:59 GMT

Hi experts ,

I am getting dump in BAPI PO when i am want to create more than 3 ite m level data in the purchase order.

The error is :

A RAISE statement in the program "CL_HANDLE_MANAGER_MM==========CP" raised the

exception

condition "FAILURE".

I am sending my code also pls check out and help me up since this is my first bapi.


*&---------------------------------------------------------------------*
*& Report  ZBAPI_BAP1
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT  ZBAPI_BAPI1.


************************exporting parameters************************
TYPES : BEGIN OF EXPORT_STRUCT ,
* HEADER LEVEL DATA
        COM_CODE TYPE BUKRS,
        VENDOR TYPE LIFNR ,
        LANGU(2) ,
        PURCH_ORG TYPE EKORG,
        PURCH_GROUP TYPE BKGRP,
        DOC_DATE(10),
        END OF EXPORT_STRUCT.


TYPES : BEGIN OF EXPORT_ITEM ,
        PO_ITEM TYPE EBELP,
        MAT_NO TYPE MATNR,
        SHORT_TEXT TYPE TXZ01,
        QUANTITY TYPE BSTMG,
        PLANT TYPE EWERK,
        MATL_GROUP TYPE MATKL,
        NET_PRICE TYPE BAPICUREXT,

        END OF EXPORT_ITEM.


*TABLE TYPES

 TYPES : DAT_TYPE1 TYPE STANDARD TABLE OF EXPORT_STRUCT,
         DAT_TYPE2 TYPE STANDARD TABLE OF EXPORT_ITEM,
*         PO_HEADER TYPE STANDARD TABLE OF BAPIMEPOHEADER,
*         PO_HEADERX TYPE STANDARD TABLE OF BAPIMEPOHEADERX,
*         PO_ITEM TYPE STANDARD TABLE OF BAPIMEPOITEM,
*         PO_ITEMX TYPE STANDARD TABLE OF BAPIMEPOITEMX,
*         PA_ACCOUNT TYPE STANDARD TABLE OF BAPIMEPOACCOUNT,
*         PA_ACCOUNTX TYPE STANDARD TABLE OF BAPIMEPOACCOUNTX,
*         PO_ADD_DELIVERY TYPE STANDARD TABLE OF BAPIMEPOADDRDELIVERY,
         RET TYPE STANDARD TABLE OF BAPIRET2.

*INTERNAL TABLES
DATA : IT_UPLOAD TYPE DAT_TYPE1, "THIS TABLE GETS THE DATA FROM PRESEN.SERVER
       IT_UPLOAD_ITEM TYPE DAT_TYPE2,
       IT_PO_HEADER TYPE BAPIMEPOHEADER, "  BAPIMEPOHEADER,  " PO_HEADER
       IT_PO_HEADERX TYPE BAPIMEPOHEADERX  ,"PO_HEADERX
       IT_ITEM TYPE  BAPIMEPOITEM  OCCURS 0 WITH HEADER LINE," PO_ITEM , "
       IT_ITEMX TYPE   BAPIMEPOITEMX OCCURS 0 WITH HEADER LINE, "  PO_ITEMX  , "
       IT_RET TYPE RET. "  BAPIRET2 . " OCCURS 0 WITH HEADER LINE.

*WORK AREAS
DATA : WA TYPE EXPORT_STRUCT,
       WA_IT TYPE EXPORT_ITEM,
       WA_ITEM TYPE BAPIMEPOITEM,
       WA_ITEMX TYPE BAPIMEPOITEMX.

*PARAMETRS
PARAMETERS : FILPATH(30)  TYPE  C,
             FILPATH1(30) TYPE C.

DATA : F_PATH TYPE STRING,
       F_PATH1 TYPE STRING,
       X TYPE C VALUE 'X',
       CNT TYPE I VALUE '1'.


DATA : TRUN LIKE BAPIFLAG-BAPIFLAG.

START-OF-SELECTION.

F_PATH = FILPATH.
F_PATH1 = FILPATH1.

*GUI_UPLOAD FOR HEADER LEVEL DATA
CALL FUNCTION 'GUI_UPLOAD'
  EXPORTING
    filename                      = F_PATH
   FILETYPE                      = 'ASC'
   HAS_FIELD_SEPARATOR           = 'X'
*   HEADER_LENGTH                 =
*   READ_BY_LINE                  = 'X'
*   DAT_MODE                      = ' '
*   CODEPAGE                      = ' '
*   IGNORE_CERR                   = ABAP_TRUE
*   REPLACEMENT                   = '#'
*   CHECK_BOM                     = ' '
*   VIRUS_SCAN_PROFILE            =
*   NO_AUTH_CHECK                 = ' '
* IMPORTING
*   FILELENGTH                    =
*   HEADER                        =
  tables
    data_tab                      = IT_UPLOAD
* EXCEPTIONS
*   FILE_OPEN_ERROR               = 1
*   FILE_READ_ERROR               = 2
*   NO_BATCH                      = 3
*   GUI_REFUSE_FILETRANSFER       = 4
*   INVALID_TYPE                  = 5
*   NO_AUTHORITY                  = 6
*   UNKNOWN_ERROR                 = 7
*   BAD_DATA_FORMAT               = 8
*   HEADER_NOT_ALLOWED            = 9
*   SEPARATOR_NOT_ALLOWED         = 10
*   HEADER_TOO_LONG               = 11
*   UNKNOWN_DP_ERROR              = 12
*   ACCESS_DENIED                 = 13
*   DP_OUT_OF_MEMORY              = 14
*   DISK_FULL                     = 15
*   DP_TIMEOUT                    = 16
*   OTHERS                        = 17
          .
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.



*GUI_UPLOAD FOR ITEM LEVEL DATA
CALL FUNCTION 'GUI_UPLOAD'
  EXPORTING
    filename                      = F_PATH1
   FILETYPE                      = 'ASC'
   HAS_FIELD_SEPARATOR           = 'X'
*   HEADER_LENGTH                 = 0
*   READ_BY_LINE                  = 'X'
*   DAT_MODE                      = ' '
*   CODEPAGE                      = ' '
*   IGNORE_CERR                   = ABAP_TRUE
*   REPLACEMENT                   = '#'
*   CHECK_BOM                     = ' '
*   VIRUS_SCAN_PROFILE            =
*   NO_AUTH_CHECK                 = ' '
* IMPORTING
*   FILELENGTH                    =
*   HEADER                        =
  tables
    data_tab                      = IT_UPLOAD_ITEM
* EXCEPTIONS
*   FILE_OPEN_ERROR               = 1
*   FILE_READ_ERROR               = 2
*   NO_BATCH                      = 3
*   GUI_REFUSE_FILETRANSFER       = 4
*   INVALID_TYPE                  = 5
*   NO_AUTHORITY                  = 6
*   UNKNOWN_ERROR                 = 7
*   BAD_DATA_FORMAT               = 8
*   HEADER_NOT_ALLOWED            = 9
*   SEPARATOR_NOT_ALLOWED         = 10
*   HEADER_TOO_LONG               = 11
*   UNKNOWN_DP_ERROR              = 12
*   ACCESS_DENIED                 = 13
*   DP_OUT_OF_MEMORY              = 14
*   DISK_FULL                     = 15
*   DP_TIMEOUT                    = 16
*   OTHERS                        = 17
          .
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.



LOOP AT IT_UPLOAD INTO WA.

********POPULATING THE HEADER DATA *********************
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
  EXPORTING
    input         = WA-VENDOR
 IMPORTING
   OUTPUT        = WA-VENDOR
          .
*
*IT_PO_HEADER-PO_NUMBER   = WA-PONUMBER.
IT_PO_HEADER-COMP_CODE = WA-COM_CODE.
IT_PO_HEADER-doc_tyPE = 'NB'.
IT_PO_HEADER-LANGU = WA-LANGU.
IT_PO_HEADER-VENDOR = WA-VENDOR.
IT_PO_HEADER-PURCH_ORG = WA-PURCH_ORG.
IT_PO_HEADER-PUR_GROUP = WA-PURCH_GROUP.


*****MARK X *****

IT_PO_HEADERX-PO_NUMBER =  X.
IT_PO_HEADERX-DOC_TYPE = X.
IT_PO_HEADERX-COMP_CODE = X.
IT_PO_HEADERX-LANGU = X.
IT_PO_HEADERX-VENDOR = X.
IT_PO_HEADERX-PURCH_ORG = X.
IT_PO_HEADERX-PUR_GROUP = X.
ENDLOOP.




DATA : C1 TYPE I VALUE '0'.
DATA : WA_IT2 TYPE EXPORT_ITEM.


*********populating item leve data ***********
LOOP AT IT_UPLOAD_ITEM INTO WA_IT.

WA_IT2 = WA_IT.
AT NEW PO_ITEM.

*C1 = C1 + 1.
IT_ITEM-PO_ITEM = WA_IT2-PO_ITEM.
IT_ITEM-MATERIAL = WA_IT2-MAT_NO.
IT_ITEM-SHORT_TEXT = WA_IT2-SHORT_TEXT.
IT_ITEM-PLANT = WA_IT2-PLANT.
IT_ITEM-QUANTITY = WA_IT2-QUANTITY.
IT_ITEM-NET_PRICE =  WA_IT2-NET_PRICE.
APPEND IT_ITEM.

*********MARK X*************
IT_ITEMX-PO_ITEM = WA_IT2-PO_ITEM.
IT_ITEMX-PO_ITEMX = 'X'.
IT_ITEMX-MATERIAL = 'X'.
IT_ITEMX-SHORT_TEXT = 'X'.
IT_ITEMX-PLANT = 'X'.
IT_ITEMX-QUANTITY = 'X'.
IT_ITEMX-NET_PRICE = 'X'.
APPEND IT_ITEMX.


ENDAT.

*ENDAT.
*clear it_item.
ENDLOOP.


*LOOP AT IT_ITEM. "  into wa_item.
*at new po_item.
CALL FUNCTION 'BAPI_PO_CREATE1'
  EXPORTING
    poheader                     = IT_PO_HEADER
    POHEADERX                    = IT_PO_HEADERX
*   POADDRVENDOR                 =
  TESTRUN                      = TRUN
*   MEMORY_UNCOMPLETE            =
*   MEMORY_COMPLETE              =
*   POEXPIMPHEADER               =
*   POEXPIMPHEADERX              =
*   VERSIONS                     =
*   NO_MESSAGING                 =
*   NO_MESSAGE_REQ               =
*   NO_AUTHORITY                 =
*   NO_PRICE_FROM_PO             =
* IMPORTING
*   EXPPURCHASEORDER             =
*   EXPHEADER                    =
*   EXPPOEXPIMPHEADER            =
 TABLES
   RETURN                       = IT_RET
   POITEM                       = IT_ITEM
   POITEMX                      = IT_ITEMX.
*   POADDRDELIVERY               =
*   POSCHEDULE                   =
*   POSCHEDULEX                  =
*   POACCOUNT                    =
*   POACCOUNTPROFITSEGMENT       =
*   POACCOUNTX                   =
*   POCONDHEADER                 =
*   POCONDHEADERX                =
*   POCOND                       =
*   POCONDX                      =
*   POLIMITS                     =
*   POCONTRACTLIMITS             =
*   POSERVICES                   =
*   POSRVACCESSVALUES            =
*   POSERVICESTEXT               =
*   EXTENSIONIN                  =
*   EXTENSIONOUT                 =
*   POEXPIMPITEM                 =
*   POEXPIMPITEMX                =
*   POTEXTHEADER                 =
*   POTEXTITEM                   =
*   ALLVERSIONS                  =
*   POPARTNER                    =
.
*
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
 EXPORTING
   WAIT          = 'X'.
* IMPORTING
*   RETURN        =
*endat.
*CLEAR : IT_ITEM , IT_ITEMX.
*ENDLOOP.
   WRITE : 'end'.

Code Formatted by: Alvaro Tejada Galindo on Mar 4, 2008 12:01 PM

Re: Dump in BAPI PO

Former Member — Mon, 03 Mar 2008 20:29:29 GMT

Can you include the portion of the dump that includes the problem portion of the code.

Rob

Re: Dump in BAPI PO

Former Member — Mon, 03 Mar 2008 22:21:10 GMT

It would be a good idea to look at the BAPI documentation for 'BAPI_PO_CREATE1' for maybe missing some required entries (eg; dont see units for quantity and price in your code) and also analyze your dump in ST22

Re: Dump in BAPI PO

Former Member — Tue, 04 Mar 2008 17:00:51 GMT

Hi Meghna,

CL_HANDLE_MANAGER_MM is the administrative class used while Purchase order processing.

We need to analyse dump more closely to see why that BAPI is failing.

G@urav.

Re: Dump in BAPI PO

Former Member — Fri, 07 Mar 2008 03:58:05 GMT

Hi Meghana,

I think there's a lot to work out in your code...

In the Initial Part itself.. I want to know one thing.. Whether you able to get the file access path or you type the entire length of the file location...

I think you will type the entire path for file location..

you can modify your code for file access , simply like this..

PARAMETERS p_file TYPE ibipparms-path.

call the AT SELECTION-SCREEN VALUE REQUEST.

for the p_file.. with the value request function module..

FM : 'F4_FILENAME'

Pass the o/p from F4 FM to GUI FM..

This is quite simple way..

I dont Find time to go a head and look a granular level.

Give your mail id .. i will send you a sample bapi code.. by which you can understand how to work out...

Regards,

Re: Dump in BAPI PO

Former Member — Fri, 07 Mar 2008 17:59:35 GMT

Hi ,

my email-id is meghana.kapoor@gmail.com

i just started writing the BAPI for PO .

if you send me the sample piece of code it would be great.

Regards

Meghana Kapoor

Re: Dump in BAPI PO

Former Member — Fri, 07 Mar 2008 18:00:41 GMT

Hi GP ,

my email-id is meghana.kapoor@gmail.com

i just started writing the BAPI for PO .

if you send me the sample piece of code it would be great.

Regards

Meghana Kapoor