RE: Odd subfile paging behavior

[Scott Mildenberger <SMildenberger@xxxxxxxxxxxxxxxxxx>]

I don't remember specifying the PAGEDOWN keyword, maybe that is causing your issue.  Does the working format have that?

> From the DDS manual

"If the operating system is performing the page function for subfiles (SFLSIZ value does not equal
SFLPAG value), you do not need to specify these keywords."

Scott

-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Mark Murphy/STAR BASE Consulting Inc.
Sent: Tuesday, March 10, 2015 10:48 AM
To: Midrange Systems Technical Discussion
Subject: Odd subfile paging behavior

Or, what would cause the Pagedown key to return to your program every time rather than when the system is on the last page?

I have two subfiles defined the exact same way. One works properly, the other does not.

Here is the control format for the one that fails:
     A          R JQCFMC
     A                                      TEXT('Quote comments control format-
     A                                      ')
     A                                      SFLCTL(JQCFMB)
     A                                      SFLSIZ(0015)
     A                                      SFLPAG(0014)
     A                                      RTNCSRLOC(*RECNAME &CSRRCD &CSRFLD)
     A                                      RTNCSRLOC(*WINDOW  &CSRROW &CSRPOS)
     A                                      CSRLOC(CSRROW CSRPOS)
     A                                      OVERLAY
     A                                      SFLCSRRRN(&SFLCSR)
     A N50                                  SFLDSP
     A N50                                  SFLDSPCTL
     A  50                                  SFLCLR
     A  51                                  SFLEND(*MORE)
     A N51                                  PAGEDOWN(08)
     A            SFLCSR         5S 0H
     A            CSRRCD        10A  H
     A            CSRFLD        10A  H
     A            CSRROW         3S 0H
     A            CSRPOS         3S 0H
     A            JQCRN          4S 0H      SFLRCDNBR(CURSOR)

I am loading two pages of records to start with, and it initially displays the first page. If I press pagedown, it loads and positions to page 3. Positions to page three because the program positions to the new page on page down. But it shouldn't be dropping back to the program until it pages to page 2 first. In the feedback area, the field showing minimum subfile record on the page (at position 378) correctly indicates record 1 the first time Pagedown is pressed. Correctly because that is the first subfile record on the display. I guess it could be incorrect because in order for the PageDown key to return to the program it should say 15, but it says 1. If I page back up to the top, or anywhere in the subfile for that matter, and press PageDown, it immediately comes back to the program. The feedback field is correct for the first subfile record on the screen. The frustrating thing is this used to work, and I don't remember changing anything that would make it stop working. Th  e other thing that is strange, is that it works fine if SFLEND is on. Then it pages to the second page before telling me that I have paged beyond the end of the subfile. And SFLROLVAL is not specified anywhere on the subfile.

Mark Murphy
STAR BASE Consulting, Inc.
mmurphy@xxxxxxxxxxxxxxx
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.