Selection routine in info package

Question

Hi gurus,
I need to load last month's data in to BW if I am executing the IP in this month.
that is if Iam executing in Feb 2009 then it should load Jan 2009,
and if Iam executing on JAn 2009 then it should pick data for Dec 2008,
For this logic I had written like,
data: TEMP_DATE TYPE DATE,
      TEMP_MONTH TYPE CHAR(6).
TEMP_DATE = SY-DATUM.
TEMP_MONTH = sydatum+2(6).
L_T_RANGE-IOBJNM = 0CALMONTH.
L_T_RANGE-SIGN = 'I'.
L_T_RANGE-OPTION = 'EQ'.
L_T_RANGE-LOW = TEMP_MONTH - 1.
L_T_RANGE-HIGH = TEMP_MONTH.
APPEND L_T_RANGE.
Is this OK or I need to change,
Thanks,
Pavan

Answer 1

Hi Pavan,
This is an example How to ... Write Infopackage selection Routine
1.Create an Infopackage
2. Go to selections tab and choose Type: 6 u2013 ABAP Routine.You can see following available options(F4 Help).
3. Give disruption, and hit enter, now you will move to following screen.
4. Write Code between begin of Routine and End of Routine.
5. See below sample code to select date range from Previous 6 days to Current date.
6. L_T_Range table is of Type structure RSSDLRANGE.
a. RSSDLRANGE contains SIGN, OPTION, LOW, HIGH
We need to populate these fields to pass range dynamically.
Sample Code:
***$$ begin of routine - insert your code only below this line -
Data: l_idx like sy-tabix.
Data: date_low like sy-datum.
Date_low = sy-datum u2013 6.u201D(To get 6 days back).
read table l_t_range with key
fieldname = 'CRDAT'.
l_idx = sy-tabix.
Pass Range values to L_T_Range Table.
Move date_low to L_T_Range -Low.
Move sy-datum to L_T_Range -High.
L_T_Range -Sign = u2018Iu2019. *****(Here: I u2013 Include, E u2013 Exclude)
L_T_Range -Option = u2018BTu2019.****( Here: BT u2013 Between )
modify l_t_range index l_idx.
p_subrc = 0.
Regards
Sudheer