Skip to Content
0
Former Member
Jan 19, 2006 at 11:55 PM

help with start routine

14 Views

Hi,

<b>I am new to ABAP.Can anyone help me wih this code</b>

<b>The following code is in start routine</b>

LOOP AT DATA_PACKAGE.

SELECT /BIC/ZPACTGY /BIC/ZMPIINIR FROM /BIC/PZCONDTYP

INTO IT_ZCONDTYP

WHERE /BIC/ZCONDTYP = DATA_PACKAGE-/BIC/ZCONDTYP.

IF ( IT_ZCONDTYP-/BIC/ZPACTGY Eq 'VVR12' OR

IT_ZCONDTYP-/BIC/ZPACTGY Eq 'VVR13' or

IT_ZCONDTYP-/BIC/ZPACTGY Eq 'VVR14' or

IT_ZCONDTYP-/BIC/ZPACTGY Eq 'VVV10' or

IT_ZCONDTYP-/BIC/ZMPIINIR Eq 'Y' or

( IT_ZCONDTYP-/Bic/zcondtyp ge 'Y100'

and IT_ZCONDTYP-/Bic/zcondtyp le 'Y199' ) ).

APPEND DATA_PACKAGE.

ENDIF.

endselect.

ENDLOOP.

<b>what I am trying to accomplish is I want my data which is in the internal table to satisfy the following conditions. and place it in internal table .(or whatever is correct)</b>

IT_ZCONDTYP-/BIC/ZPACTGY Eq 'VVR12' OR

IT_ZCONDTYP-/BIC/ZPACTGY Eq 'VVR13' or

IT_ZCONDTYP-/BIC/ZPACTGY Eq 'VVR14' or

IT_ZCONDTYP-/BIC/ZPACTGY Eq 'VVV10' or

IT_ZCONDTYP-/BIC/ZMPIINIR Eq 'Y' or

( IT_ZCONDTYP-/Bic/zcondtyp ge 'Y100'

and IT_ZCONDTYP-/Bic/zcondtyp le 'Y199' ) ).

<b>and read this from another transfer routine</b>

CLEAR RESULT.

READ TABLE IT_ZCONDTYP WITH KEY

/BIC/ZCONDTYP = COMM_STRUCTURE-/BIC/ZCONDTYP

BINARY SEARCH.

IF SY-SUBRC EQ 0.

RESULT = IT_ZCONDTYP-/BIC/ZCONDTYP.

ENDIF.

This is mostly related to BW.So if someone can give their opinion on how to achieve this I will be very grateful.

thanks,

Kal