Regarding BAPI_REQUISITION_CREATE

Former Member — Mon, 09 Mar 2009 14:32:11 GMT

HI All,

Iam trying to create purchase requisition using BAPI_REQUISITION_CREATE,the following is the code and flat file but is going to dump. showing a message that 'Enter a valid date'.could anybody make me know how to solve the issue.

tables:bapiebanc.

data: begin of itab occurs 0,

doc_type type BAPIEBANC-doc_type,

PUR_GROUP type bapiebanc-PUR_GROUP,

material type bapiebanc-material,

plant type bapiebanc-plant,

mat_grp type bapiebanc-matgrp,

quantity type bapiebanc-quantity,

unit type bapiebanc-unit,

deliv_date type

bapiebanc-deliv_date,

end of itab.

data: it_items like bapiebanc occurs 0 with header line.

data:it_ret2 like bapiret2 occurs 0 with header line.

data:i_msg type string.

parameters:p_file TYPE IBIPPARMS-PATH obligatory.

**---f4 help for the file from PC

at selection-screen on value-request for p_file.

perform get_f4help.

start-of-selection.

perform upload_file.

perform call_bapi.

&----

*& Form GET_F4HELP

&----

FORM GET_F4HELP .

CALL FUNCTION 'F4_FILENAME'

EXPORTING

PROGRAM_NAME = SYST-CPROG

DYNPRO_NUMBER = SYST-DYNNR

IMPORTING

FILE_NAME = P_FILE .

ENDFORM. " GET_F4HELP

&----

*& Form UPLOAD_FILE

&----

FORM UPLOAD_FILE .

DATA:V_FILE TYPE STRING.

MOVE P_FILE TO V_FILE.

CALL FUNCTION 'GUI_UPLOAD'

EXPORTING

FILENAME = v_file

FILETYPE = 'ASC'

HAS_FIELD_SEPARATOR = 'X'

TABLES

DATA_TAB = itab.

IF SY-SUBRC ne 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

endif.

ENDFORM. " UPLOAD_FILE

&----

*& Form CALL_BAPI

&----

text

----

--> p1 text
<-- p2 text

----

FORM CALL_BAPI .

loop at itab.

move-corresponding itab to it_items.

append it_items.

clear it_items.

CALL FUNCTION 'BAPI_REQUISITION_CREATE'

EXPORTING
SKIP_ITEMS_WITH_ERROR =
AUTOMATIC_SOURCE = 'X'
IMPORTING
NUMBER =

TABLES

REQUISITION_ITEMS = it_items

REQUISITION_ACCOUNT_ASSIGNMENT =
REQUISITION_ITEM_TEXT =
REQUISITION_LIMITS =
REQUISITION_CONTRACT_LIMITS =
REQUISITION_SERVICES =
REQUISITION_SRV_ACCASS_VALUES =

RETURN = it_ret2

REQUISITION_SERVICES_TEXT =
REQUISITION_ADDRDELIVERY =
EXTENSIONIN =

append it_ret2.

endloop.

loop at it_ret2.

CALL FUNCTION 'FORMAT_MESSAGE'

EXPORTING

ID = it_ret2-id

LANG = '-D'

NO = it_ret2-NUMBER

V1 = it_ret2-MESSAGE_V1

V2 = it_ret2-MESSAGE_V2

V3 = it_ret2-MESSAGE_V3

V4 = it_ret2-MESSAGE_V4

IMPORTING

MSG = i_msg.

EXCEPTIONS
NOT_FOUND = 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.

write:/ i_msg.

endloop.

flat file:

NB 001 99-110 1100 100 EA 10032009

NB 001 100-110 1100 120 EA 10032009

thanks in advance

mahesh

Re: Regarding BAPI_REQUISITION_CREATE

Former Member — Mon, 09 Mar 2009 14:37:42 GMT

HI,

Check the deliv_date formats in the ITAB after uploading the data from the application server.

Re: Regarding BAPI_REQUISITION_CREATE

Former Member — Tue, 10 Mar 2009 04:47:12 GMT

Hi Avinash,

thanks for your reply.

but the thing is we have to send date in yyyy:mm:dd format for bapi from flat file.

regards

prasanna kumar

Re: Regarding BAPI_REQUISITION_CREATE

Former Member — Tue, 10 Mar 2009 05:30:22 GMT

Hello


loop at itab.
  move-corresponding itab to it_items.
  concatenate itab+4(4) itab+2(2) itab(2) into it_items-deliv_date.
  append it_items.
 ...
endloop.

topic Re: Regarding BAPI_REQUISITION_CREATE in Application Development and Automation Discussions

Regarding BAPI_REQUISITION_CREATE

Re: Regarding BAPI_REQUISITION_CREATE

Re: Regarding BAPI_REQUISITION_CREATE

Re: Regarding BAPI_REQUISITION_CREATE