Re: Display subfile page number

[John Rusling <jrusling@xxxxxxxxxxxxxxxxxxx>]

Tim,

How about in the subfile record, add a sfpage# field in
position 76 for example, 

Assuming the subfile displays 12 lines onscreen for each page...

Then, as you are loading the load-all subfile, have a workpage#
that you increment whenever you've read 12 records.

Then for rrn 1,13,25,37 etc you move the workpage# into the sfpage#
for any other values move zero into the sfpage#.

The page # would always be on the screen in the topmost line
of the subfile.

I'm shooting out my u-know-what here, but hey, if it works. <g>

John B


> Am I just missing this, or is there a subfile page number field
> that I can retrieve and/or display in an RPG 4 (not ILE) program?
>
> It's a load-all SFL and the SFL is handling the page up/down.
>
> I just want a simple page number field that updates when the
> user pages down or up.
>
> It's their flagship O/E program and I'd really rather not rip the
> guts out of the subfile processing.
>
> Ideas? TIA.