interactive reporting

Hi all

I am doing interactive report and i have made checkbox for selecting the enteries and using at pfn event.

when i am selecting individual checkbox i m getting proper result but when i am selecting both checkbox i m not get required result.

tables:spfli,sflight.

data: itab like spfli occurs 0 with header line.

data: jtab like sflight occurs 0 with header line.

data mark.

parameters: carrid like spfli-carrid.

initialization.

carrid = 'AA'.

at selection-screen .

select single carrid from spfli into itab where carrid = carrid.

if sy-subrc = 0.

message i001(zmsg2).

else.

message e000(zmsg2).

endif.

start-of-selection.

select * from spfli into corresponding fields of

table itab where carrid = carrid.

loop at itab.

write: / mark as checkbox, itab-carrid , itab-connid , itab-cityfrom.

hide itab-connid.

clear itab-connid.

endloop.

AT PF07.

check not itab-connid is initial.

check mark is initial.

select * from sflight into

corresponding fields of table jtab where

connid = itab-connid.

WINDOW STARTING AT 10 5 ENDING AT 70 50.

DO.

CLEAR mark.

READ LINE SY-INDEX field value mark.

IF SY-SUBRC <> 0.

EXIT.

ENDIF.

CHECK mark = 'X'.

loop at jtab.

write: / jtab-fldate.

endloop.

clear itab-connid.

ENDDO.

clear itab-connid.

AT PF09.

check not itab-connid is initial.

select * from sflight into

corresponding fields of table jtab where

connid = itab-connid.

WINDOW STARTING AT 10 5 ENDING AT 70 50.

DO.

CLEAR mark.

READ LINE SY-INDEX field value mark.

IF SY-SUBRC <> 0.

EXIT.

ENDIF.

CHECK mark = 'X'.

loop at jtab.

write: / jtab-fldate.

endloop.

clear itab-connid.

ENDDO.

clear itab-connid.