Re: PGUP/PGDWN Indicator Assistance

It sounds like this is a load-all subfile. I like those. Neat, fast, clean.

In this scenario, perhaps setting the Y/N key as an auto-enter field can give you the response you want. You'll want to couple that with returning the RRN number of the record so you'll know which subfile record to update.

Perhaps another approach besides the paging keys would work well here, though? Consider removing the page up/down keywords and use the Enter key (or any other of the white keys) as the processing trigger. Build a small subroutine that processes the entire subfile, adding/updating/deleting the data records, and then either updating each existing subfile row or reloading the entire subfile. Either way is quick, and much easier to program. That lets them page up and down, changing choices, doing it all at once and not having constant screen refreshes.

In any event, either ploy should work for you.

On 3/4/2016 12:14 PM, RWesh@xxxxxxxxxxx wrote:

Good Afternoon

I was hoping someone could explain to me how to properly code for an
instance when the user presses the Page Up or Page Down key while in a
subfile.

I have the following in my DDS

A DSPSIZ(24 80 *DS3)
A PRINT
A CA01(01 'MAIN MENU')
A CA02(02 'NEXT QUERY')
A CA03(03 'PREVIOUS')
A PAGEUP(81 'PAGE UP')
A PAGEDOWN(82 'PAGE DOWN')

This allows me to utilize *IN81 and *IN82 however it seems like my code is
only run when the keys hit the end of the subfile.

For example, I have code that should evaluate a Y/N field in a subfile
record and turn on a protect indicator when one of the Page keys are
pressed.
If my subfile has 3 records the logic only runs when I press Page Down on
the third record OR when I press Page Up on the first record. Nothing
occurs in between.

The screen only shows 1 subfile record at a time.

Please note I am coding in RPG III.

Thank you for any assistance that can be provided.





This document should only be read by those persons to whom it is addressed and is not intended to be relied upon by any person without subsequent written confirmation of its contents. Accordingly, Sumitomo Machinery Corporation disclaims all responsibility and accept no liability (including in negligence) for the consequences for any person acting, or refraining from acting, on such information prior to the receipt by those persons of subsequent written confirmation. If you have received this e-mail message in error, please notify us immediately by telephone. Please also destroy and delete the message from your computer. Any form of reproduction, dissemination, copying, disclosure, modification, distribution and/or publication of this e-mail message is strictly prohibited.