Hi KS,
Thanks for helping me so far.
I have tried the code.
I get this message BAPI: Individual check for creating the object WBS Element 30112-01 required.
Message type is S. CNIF_PI(004).
Then I get a dump at BAPI_TRANSACTION_COMMIT, : pre commit did not run successfully.
BAPI should be rolled-back.
Here is the code.
CALL FUNCTION 'BAPI_PS_INITIALIZATION'.
L_PROJECT = '30112'.
* Lwa_WBS-WBS_UP = '30112-01'.
Lwa_WBS-WBS_LEFT = SPACE.
Lwa_WBS-WBS_ELEMENT = '30112-01'.
Lwa_WBS-DESCRIPTION = 'TEST'."PRPSS-POST1.
Lwa_WBS-PROJ_TYPE = '02'."PRPSS-PRART.
Lwa_WBS-WBS_PLANNING_ELEMENT = 'X'."PRPSS-PLAKZ.
Lwa_WBS-WBS_ACCOUNT_ASSIGNMENT_ELEMENT = space. "PRPSS-BELKZ.
Lwa_WBS-COMPANY_CODE = '0010'."PRPSS-PBUKR.
Lwa_WBS-CONTROLLING_AREA = '0010'."PRPSS-PKOKR.
Lwa_WBS-RESPSBL_CCTR_CONTROLLING_AREA = '0010'."PRPSS-FKOKR.
Lwa_WBS-RESPSBL_CCTR = '3000'."PRPSS-FKSTL.
Lwa_WBS-CURRENCY = 'GBP'."PRPSS-PWPOS.
Lwa_WBS-USER_FIELD_KEY = 'Z1'."PRPSS-SLWID.
APPEND lwa_wbs to LT_WBS.
CALL FUNCTION 'BAPI_BUS2054_CREATE_MULTI'
EXPORTING
I_PROJECT_DEFINITION = L_PROJECT
TABLES
IT_WBS_ELEMENT = LT_WBS
ET_RETURN = LT_RETURN.
READ TABLE LT_RETURN INTO lwa_return WITH KEY TYPE = 'E'.
IF SY-SUBRC EQ 0.
* MESSAGE E001 WITH LT_RETURN-MESSAGE.
MESSAGE 'PEEKINDI' TYPE 'E'.
ENDIF.
CALL FUNCTION 'BAPI_PS_PRECOMMIT'.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.
This individual check, I am not understanding. Can you please comment if I had missed any fields?
Also can you please help with some code, if you have already.
Thanks,
Anil
Message was edited by: Anil Supraj