cancel
Showing results for 
Search instead for 
Did you mean: 

BADI BBP_DETERMINE_LOGSYS

Former Member
0 Kudos

Hi,

What does BADI BBP_DETERMINE_LOGSYS do.

Please let me know the steps to implement the same anthe usage as well.

Thanks,

Manu

Accepted Solutions (0)

Answers (1)

Answers (1)

former_member183819
Active Contributor
0 Kudos

method IF_EX_BBP_DETERMINE_LOGSYS~CONTRACT_LOGSYS_DETERMINE.

DATA: ls_partner TYPE bbp_pds_partner,

ls_ORG type bbp_pds_org.

  • use the purchase org to determine if the document should be sent

  • to a backend system

read table IT_ORG into ls_org index 1.

if ls_org-proc_org_id = '50000027'.

cv_logsys = 'QW8CLNT250'.

elseif ls_org-proc_org_id = '50000953'.

cv_logsys = 'QPTCLNT100'.

endif.

endmethod.

OR :

method IF_EX_BBP_DETERMINE_LOGSYS~DETERMINE_LOGSYS.

data: ztprod type zprod1.

data result(4).

data tline TYPE LINE OF bbpt_detlogsys_item.

loop at item_data into tline.

case sy-uname.

when 'BUYER3'.

if tline-product eq '69E2D3C8AF4B5C4CBDCC73A50C58EFA2' or

tline-product eq '6BB856ADA25D584FA0B5A2FDCDA27766' or

tline-product eq 'F31AD68E8EDCE646A9C7ECC4F24CE464' or

tline-product eq 'ABC0320E1A37E743B75406DF0B7C53BF' or

tline-product eq '3C0665006B2D2A43B3A1CC74B560E8A9' or

tline-product eq '8F97635441496647A69CD021A5FFF4D2'.

tline-be_co_code = '1000'.

tline-logical_system = 'F47CLNT800'.

tline-BE_PUR_ORG = 'O 50000660'.

tline-BE_PUR_GROUP = 'O 50000662'.

modify item_data from tline.

endif.

when others.

select single * from zprod1 into ztprod where product eq tline-product.

if sy-subrc eq 0.

tline-be_co_code = '3000'.

tline-logical_system = 'F47CLNT800'.

modify item_data from tline.

elseif tline-product is initial.

tline-be_co_code = '3000'.

tline-logical_system = 'F47CLNT800'.

tline-BE_PUR_ORG = 'O 50000612'.

tline-BE_PUR_GROUP = 'O 50000614'.

modify item_data from tline.

endif.

endcase.

endloop.

endmethod.

copied from SRM wiki.