Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Interactive Report?

Former Member
0 Likes
620

hello there,

I placed a Input/Output field on the interactive report ... and if I enter any page number in the Input/Output it shuld take me to that page of the INTERACTIVE REPORT

also I want to c the current page number /total count of pages...

can anyone help me wid this query

thanks

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
594

Hi

Try to use the statament SCROLL LIST TO PAGE <PAGE> To show a certain page.

See this tip to write page/total page:

REPORT ZLTEST3 NO STANDARD PAGE HEADING LINE-COUNT 65LINE-SIZE 80.

DATA: NUM_PAGES_C(10) TYPE C.

PERFORM WRITE.

PERFORM GET_TOTAL_PAGENO.

TOP-OF-PAGE.

WRITE:/(SY-LINCT) 'TEST - TEST' CENTERED.

WRITE: / SY-DATUM, 60 SY-PAGNO,'of', '*****'.

SKIP.

&----


*& Form WRITE

&----


FORM WRITE.

DO 200 TIMES.

WRITE:/ 'TEST', SY-LINNO.

ENDDO.

ENDFORM. " WRITE

&----


*& Form GET_TOTAL_PAGENO

&----


FORM GET_TOTAL_PAGENO.

WRITE SY-PAGNO TO NUM_PAGES_C LEFT-JUSTIFIED.

DO SY-PAGNO TIMES.

READ LINE 2 OF PAGE SY-INDEX.

REPLACE '*****' WITH NUM_PAGES_C INTO SY-LISEL.

MODIFY LINE 2 OF PAGE SY-INDEX.

ENDDO.

ENDFORM. " GET_TOTAL_PAGENO

Max

5 REPLIES 5
Read only

Former Member
0 Likes
594

use sy-pagno

Read only

Former Member
0 Likes
595

Hi

Try to use the statament SCROLL LIST TO PAGE <PAGE> To show a certain page.

See this tip to write page/total page:

REPORT ZLTEST3 NO STANDARD PAGE HEADING LINE-COUNT 65LINE-SIZE 80.

DATA: NUM_PAGES_C(10) TYPE C.

PERFORM WRITE.

PERFORM GET_TOTAL_PAGENO.

TOP-OF-PAGE.

WRITE:/(SY-LINCT) 'TEST - TEST' CENTERED.

WRITE: / SY-DATUM, 60 SY-PAGNO,'of', '*****'.

SKIP.

&----


*& Form WRITE

&----


FORM WRITE.

DO 200 TIMES.

WRITE:/ 'TEST', SY-LINNO.

ENDDO.

ENDFORM. " WRITE

&----


*& Form GET_TOTAL_PAGENO

&----


FORM GET_TOTAL_PAGENO.

WRITE SY-PAGNO TO NUM_PAGES_C LEFT-JUSTIFIED.

DO SY-PAGNO TIMES.

READ LINE 2 OF PAGE SY-INDEX.

REPLACE '*****' WITH NUM_PAGES_C INTO SY-LISEL.

MODIFY LINE 2 OF PAGE SY-INDEX.

ENDDO.

ENDFORM. " GET_TOTAL_PAGENO

Max

Read only

0 Likes
594

Thanks for the answers

let me check that and reply u back mike

Read only

0 Likes
594

thanks for the reply mike the problem is solved....

i got a question for u again...

this time its frm BDC...

i have taken 8 mandatory fields nd i uploaded the legacy data... and if the client wants to make another feild as mandatory and wud want to add to the database how can it b done without modifying the progarm code...

Read only

0 Likes
594

Hi

If you program don't fill this new field you can't do it without to change the code.

Max