2009 Nov 20 2:41 AM
hello experts!
i have a question regarding at line selection...
i have a report let say my report generate a 24 pages display.
at the last page(page 24) it display the summary.
for example my last page contains this details:
Managers 52
supervisors 20
example i double click the word MANAGER during at line select
it will display the 52 names of manager same page under the word MANAGER. my problem is
when i click the word manager it jumps to page 12 so i have to
scroll down again to page 24....
how can i fix this...
please help...
AT LINE-SELECTION.
SY-LSIND = SY-LSIND - 1.
CLEAR: LV_TEXT1, LV_TEXT2, LV_TEXT3, LV_TEXT4,
WA_LINE1, WA_LINE2, WA_LINE3, WA_LINE4.
READ CURRENT LINE FIELD VALUE CTRL_SUM1-TEXT INTO LV_TEXT1.
READ CURRENT LINE FIELD VALUE CTRL_SUM2-TEXT INTO LV_TEXT2.
READ CURRENT LINE FIELD VALUE CTRL_SUM3-TEXT INTO LV_TEXT3.
READ CURRENT LINE FIELD VALUE SUM_CHANGE-TEXT INTO LV_TEXT4.
IF NOT LV_TEXT1 IS INITIAL.
READ TABLE CTRL_SUM1 INTO WA_LINE1 WITH KEY TEXT = LV_TEXT1
ABKRS = HIDE_ABKRS.
DELETE TABLE MARK_LINE1 FROM WA_LINE1.
IF SY-SUBRC NE 0.
APPEND WA_LINE1 TO MARK_LINE1.
ENDIF.
ELSEIF NOT LV_TEXT2 IS INITIAL.
READ TABLE CTRL_SUM2 INTO WA_LINE2 WITH KEY TEXT = LV_TEXT2
ABKRS = HIDE_ABKRS.
DELETE TABLE MARK_LINE2 FROM WA_LINE2.
IF SY-SUBRC NE 0.
APPEND WA_LINE2 TO MARK_LINE2.
ENDIF.
ELSEIF NOT LV_TEXT3 IS INITIAL.
READ TABLE CTRL_SUM3 INTO WA_LINE3 WITH KEY TEXT = LV_TEXT3
ABKRS = HIDE_ABKRS.
DELETE TABLE MARK_LINE3 FROM WA_LINE3.
IF SY-SUBRC NE 0.
APPEND WA_LINE3 TO MARK_LINE3.
ENDIF.
ELSEIF NOT LV_TEXT4 IS INITIAL.
READ TABLE SUM_CHANGE INTO WA_LINE4 WITH KEY TEXT = LV_TEXT4
ABKRS = HIDE_ABKRS.
DELETE TABLE MARK_LINE4 FROM WA_LINE4.
IF SY-SUBRC NE 0.
APPEND WA_LINE4 TO MARK_LINE4.
ENDIF.
ENDIF.
SET SCREEN 7007.
LEAVE SCREEN
2009 Nov 20 6:29 AM
Hi,
What is the logic you have written at at line selection?
give me the piece of code, so we can analyse.
rgds
Aeda
2009 Nov 20 6:42 AM
Hi,
Just post the code where you have written AT LINE SELECTION....Will check
Regards
Abhii
2009 Nov 20 6:59 AM
AT LINE-SELECTION.
SY-LSIND = SY-LSIND - 1.
CLEAR: LV_TEXT1, LV_TEXT2, LV_TEXT3, LV_TEXT4,
WA_LINE1, WA_LINE2, WA_LINE3, WA_LINE4.
READ CURRENT LINE FIELD VALUE CTRL_SUM1-TEXT INTO LV_TEXT1.
READ CURRENT LINE FIELD VALUE CTRL_SUM2-TEXT INTO LV_TEXT2.
READ CURRENT LINE FIELD VALUE CTRL_SUM3-TEXT INTO LV_TEXT3.
READ CURRENT LINE FIELD VALUE SUM_CHANGE-TEXT INTO LV_TEXT4.
IF NOT LV_TEXT1 IS INITIAL.
READ TABLE CTRL_SUM1 INTO WA_LINE1 WITH KEY TEXT = LV_TEXT1
ABKRS = HIDE_ABKRS.
DELETE TABLE MARK_LINE1 FROM WA_LINE1.
IF SY-SUBRC NE 0.
APPEND WA_LINE1 TO MARK_LINE1.
ENDIF.
ELSEIF NOT LV_TEXT2 IS INITIAL.
READ TABLE CTRL_SUM2 INTO WA_LINE2 WITH KEY TEXT = LV_TEXT2
ABKRS = HIDE_ABKRS.
DELETE TABLE MARK_LINE2 FROM WA_LINE2.
IF SY-SUBRC NE 0.
APPEND WA_LINE2 TO MARK_LINE2.
ENDIF.
ELSEIF NOT LV_TEXT3 IS INITIAL.
READ TABLE CTRL_SUM3 INTO WA_LINE3 WITH KEY TEXT = LV_TEXT3
ABKRS = HIDE_ABKRS.
DELETE TABLE MARK_LINE3 FROM WA_LINE3.
IF SY-SUBRC NE 0.
APPEND WA_LINE3 TO MARK_LINE3.
ENDIF.
ELSEIF NOT LV_TEXT4 IS INITIAL.
READ TABLE SUM_CHANGE INTO WA_LINE4 WITH KEY TEXT = LV_TEXT4
ABKRS = HIDE_ABKRS.
DELETE TABLE MARK_LINE4 FROM WA_LINE4.
IF SY-SUBRC NE 0.
APPEND WA_LINE4 TO MARK_LINE4.
ENDIF.
ENDIF.
SET SCREEN 7007.
LEAVE SCREEN
2009 Nov 20 9:53 AM
SCREEN 700:
PROCESS BEFORE OUTPUT.
MODULE STATUS_7007.
PROCESS AFTER INPUT.
MODULE USER_COMMAND_7007.
MODULE STATUS_7007:
SET PF-STATUS 'MAIN'.
SUPPRESS DIALOG.
LEAVE TO LIST-PROCESSING AND RETURN TO SCREEN 0.
PERFORM EXPLAINER.
IF NOT ( TAB_ABKRS[] IS INITIAL ).
PERFORM NEW_SUMMARY.
SCROLL LIST INDEX 1 TO PAGE SY-CPAGE LINE SY-STARO.
ENDIF.
PERFORM END_REPORT.
2009 Nov 23 1:11 AM
| User | Count |
|---|---|
| 3 | |
| 2 | |
| 2 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 |