How to call one report2 from report1 using report1 selection screen

Question

hi experts,
iam presently working in report1.
now, from my report1, i want to call report2 with report1 selection screen.
how to call?
thanks in advance.

Answer 1

Below is an sample example, from where i am calling transaction MB5B (Report-RM07MLBD).
Here i am using selection screen data from report ZTEST and passing it to RM07MLBD.
REPORT  ZTEST
DATA : listtab LIKE abaplist OCCURS 1.
DATA : listtab_tmp LIKE abaplist OCCURS 1.
DATA : N TYPE n.
*DATA mseg_wa TYPE mseg.
*SELECT-OPTIONS s_matnr for mseg_wa-matnr.
*SELECT-OPTIONS S_WERKS for Mseg_wa-WERKS.
PARAMETERS : S_MATNR LIKE MSEG-MATNR,
             S_WERKS LIKE MSEG-WERKS,
             S_CHARG LIKE MSEG-CHARG.
DATA MKPF_WA TYPE MKPF.
SELECT-OPTIONS S_BUDAT FOR MKPF_WA-BUDAT.
REFRESH listtab.
CALL FUNCTION 'LIST_FREE_MEMORY'
TABLES
listobject = listtab.
SUBMIT RM07DOCS using SELECTION-SCREEN '1000'
WITH matnr = S_MATNR
WITH werks = S_WERKS
WITH charg = S_CHARG
WITH budat-low = S_BUDAT-low
WITH budat-high = S_BUDAT-high EXPORTING LIST TO MEMORY AND RETURN .
CALL FUNCTION 'LIST_FROM_MEMORY'
TABLES
listobject = listtab
EXCEPTIONS
not_found = 1
OTHERS = 2.
IF sy-subrc = 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
DESCRIBE TABLE listtab LINES n .
CALL FUNCTION 'WRITE_LIST'
EXPORTING
write_only = 'X'
TABLES
listobject = listtab
EXCEPTIONS
empty_list = 1
OTHERS = 2.
IF sy-subrc = 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.