Dump in BAPI PO

Former Member · ‎2008 Mar 03

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

Former Member · ‎2008 Mar 03

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

Rob

Former Member · ‎2008 Mar 03

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

Former Member · ‎2008 Mar 04

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.

Former Member · ‎2008 Mar 07

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,

Former Member · ‎2008 Mar 07

Hi ,

my email-id is [email protected]

i just started writing the BAPI for PO .

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

Regards

Meghana Kapoor

Former Member · ‎2008 Mar 07

Hi GP ,

my email-id is [email protected]

i just started writing the BAPI for PO .

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

Regards

Meghana Kapoor

By Category

Related Content

Activity Groups

Industry Groups

Influence and Feedback Groups

Interest Groups

Location Groups

Customer Only Groups

Forums

Related Resources

Products

Learning and Support

About

My SAP Profile

My SAP Profile

Dump in BAPI PO