topic Re: at line selection query in Application Development and Automation Discussions

at line selection query

Former Member — Fri, 20 Nov 2009 02:41:19 GMT

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...

Re: at line selection query

NAeda — Fri, 20 Nov 2009 06:29:25 GMT

Hi,

What is the logic you have written at at line selection?

give me the piece of code, so we can analyse.

rgds

Aeda

Re: at line selection query

Former Member — Fri, 20 Nov 2009 06:42:55 GMT

Hi,

Just post the code where you have written AT LINE SELECTION....Will check

Regards

Abhii

Re: at line selection query

Former Member — Fri, 20 Nov 2009 06:59:58 GMT

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.

SET SCREEN 7007.

LEAVE SCREEN

Re: at line selection query

Former Member — Fri, 20 Nov 2009 09:53:40 GMT

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.

Re: at line selection query

Former Member — Mon, 23 Nov 2009 01:11:57 GMT

solved already