HI,
try the below code here 2 select statements. looking up the 2 DSO's.
TYPES : begin of ty_ds200,
HE_STUDNT TYPE /BI0/OIHE_STUDNT,
HE_STAGE TYPE /BI0/OIHE_STAGE,
END OF ty_ds200 .
data : lt_ds200 type TABLE OF ty_ds200,
ls_ds200 type ty_ds200 .
TYPES : BEGIN OF ty_dso400 ,
HE_STUDNT TYPE /BI0/OIHE_STUDNT,
/BIC/ZLC_GEO TYPE /BIC/OIZLC_GEO,
END OF ty_dso400 .
data : lt_dso400 TYPE TABLE OF ty_dso400 ,
ls_dso400 TYPE TY_dso400 .
--------------------------------------------------------------------------------------
if RESULT_PACKAGE is NOT INITIAL .
SELECT HE_STUDNT HE_PRGRM HE_STAGE from /BI0/AHE_DS0200 into TABLE
lt_ds200
FOR ALL ENTRIES IN RESULT_PACKAGE
WHERE HE_STUDNT = RESULT_PACKAGE-HE_STUDNT.
SELECT HE_STUDNT HE_STORGP HE_STORGA HE_STCAMP from
/BI0/AHE_DS0400
INTO TABLE lt_dso400 for ALL ENTRIES IN RESULT_PACKAGE
WHERE HE_STUDNT = RESULT_PACKAGE-HE_STUDNT
and DATETO = '99991231'.
loop at RESULT_PACKAGE ASSIGNING <RESULT_FIELDS> .
READ TABLE lt_ds200 into ls_ds200 WITH KEY HE_STUDNT =
<RESULT_FIELDS>-HE_STUDNT .
Hope it will help.
Thanks,
Phani.