Skip to Content
0
Former Member
Jun 03, 2005 at 11:12 PM

ABAP Code in transfer and update rules

25 Views

Hi all,

Can anyone explain me what this code does

loop at DATA_PACKAGE.

Select single /BIC/ZBRODSEG into DATA_PACKAGE-/BIC/ZBRODSEG

From /BIC/MZSEGMENT

Where /BIC/ZSEGMENT = DATA_PACKAGE-/bic/zsegment.

CALL FUNCTION 'ZBW_GET_PRICE_NEW'

EXPORTING

facility = DATA_PACKAGE-/bic/zfacilty

slsmod = DATA_PACKAGE-/bic/zslsmod

date = DATA_PACKAGE-/BIC/ZORDDATE

brodseg = DATA_PACKAGE-/bic/zbrodseg

dealer = DATA_PACKAGE-/bic/zdlrcode

segment= DATA_PACKAGE-/bic/zsegment

IMPORTING

RESULT1= DATA_PACKAGE-/BIC/ZP3

RESULT2= DATA_PACKAGE-/bic/ZP4

EXCEPTIONS

no_price_found = 1

invalid_price_type = 2

dealer_data_not_found = 3

OTHERS = 4.

DATA_PACKAGE-currency = 'USD'.

modify DATA_PACKAGE.

endloop.

I appreciate your help.

thanks,

Sabrina.