Hi Dinesh,
Here code .
REPORT zods_lat_req.
PARAMETERS: dta TYPE RSINFOCUBE OBLIGATORY.
DATA: w_date TYPE sy-datum,
partnr TYPE numc10,
insert_recs TYPE rsnumrecord.
DATA: wjob(50) TYPE c.
CLEAR: w_date, partnr,insert_recs, wjob.
SELECT MAX( datum_anf ) FROM rsstatmanpart INTO w_date WHERE
dta EQ dta.
IF sy-subrc EQ 0.
SELECT partnr insert_recs FROM rsstatmanpart INTO (partnr, insert_recs)
WHERE dta EQ dta AND
datum_anf EQ w_date.
ENDSELECT.
IF sy-subrc EQ 0.
IF insert_recs >= 0.
* RSDODSACT1 program not available in my system, you may use alternative
*
ELSE.
EXIT.
ENDIF.
ENDIF.
Thank you,
Nanda
ENDIF.