Additional fields in BAPI "BAPI_0050_CREATE"

[Former Member]

HI,

I need to add additional fields in BAPI "BAPI_0050_CREATE". Basically 4 new fields has to be added.

In BAPi its gievn make use of extension_in but values are not coming .

So plz give any input.

[Former Member]

In EXTENSION_IN you have to pass the structure which is appended with those 4 new fields.

Which is the std table updated with these 4 fields ?

Which structure name you are passing to "STRUCTURE" ?

In VALUEPART1 you need to concatenate all the 4 fields & make sure you leave correct spaces between field values to match max field lengths.

[Former Member]

TRY This way

FORM APPLY_BAPI .

DATA : IND TYPE CHAR6,

DOCUMENTNUMBER type BAPI_0050_FIELDS-DOCUMENT,

DOCUMENTYEAR type BAPI_0050_FIELDS-DOC_YEAR,

FMAREA type BAPI_0050_FIELDS-FM_AREA.

LOOP AT IT_ITAB INTO WA_ITAB.

AT NEW DOCDATE.

READ TABLE IT_COIT INTO WA_COIT WITH KEY FM_AREA = WA_ITAB-FM_AREA

VERSION = WA_ITAB-VERSION

DOCDATE = WA_ITAB-DOCDATE.

IF SY-SUBRC = 0.

WA_HEAD-FM_AREA = WA_COIT-FM_AREA.

WA_HEAD-VERSION = WA_COIT-VERSION.

WA_HEAD-DOCDATE = WA_COIT-DOCDATE.

WA_HEAD-DOCTYPE = WA_COIT-DOCTYPE.

WA_HEAD-PROCESS = WA_COIT-PROCESS.

wa_head-DOCSTATE = '1'.

ENDIF.

APPEND WA_HEAD TO IT_HEAD.

LOOP AT IT_COIT INTO WA_COIT WHERE FM_AREA = WA_HEAD-FM_AREA AND

VERSION = WA_HEAD-VERSION AND

DOCDATE = WA_HEAD-DOCDATE AND

DOCTYPE = WA_HEAD-DOCTYPE AND

PROCESS = WA_HEAD-PROCESS.

WA_ITEM-ITEM_NUM = WA_COIT-ITEM_NUM.

WA_ITEM-FISC_YEAR = WA_COIT-FISC_YEAR.

WA_ITEM-BUDCAT = WA_COIT-BUDCAT .

WA_ITEM-BUDTYPE = WA_COIT-BUDTYPE .

WA_ITEM-FUNDS_CTR = WA_COIT-FUNDS_CTR .

WA_ITEM-CMMT_ITEM = WA_COIT-CMMT_ITEM .

WA_ITEM-TRANS_CURR = WA_COIT-TRANS_CURR .

WA_ITEM-TRANS_CURR_ISO = WA_COIT-TRANS_CURR_ISO .

WA_ITEM-TOTAL_AMOUNT = WA_COIT-TOTAL_AMOUNT .

WA_ITEM-DISTKEY = WA_COIT-DISTKEY .

WA_ITEM-VALTYPE = WA_COIT-VALTYPE .

APPEND WA_ITEM TO IT_ITEM.

ENDLOOP.

• CLEAR : WA_HEAD,WA_ITEM.

CALL FUNCTION 'BAPI_0050_CREATE'

EXPORTING

HEADER_DATA = WA_HEAD

TESTRUN = space

IMPORTING

FMAREA = FMAREA

DOCUMENTYEAR = DOCUMENTYEAR

DOCUMENTNUMBER = DOCUMENTNUMBER

TABLES

ITEM_DATA = IT_ITEM

RETURN = IT_RETURN.

CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.

CLEAR : WA_HEAD,WA_ITEM,IT_ITEM,IT_HEAD.

ENDAT.

ENDLOOP.

ENDFORM. " APPLY_BAPI

Edited by: rajan bhalani on Jan 2, 2009 10:24 AM