on 05-22-2009 6:44 AM
Hi,
What does BADI BBP_DETERMINE_LOGSYS do.
Please let me know the steps to implement the same anthe usage as well.
Thanks,
Manu
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.
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.