Re: PGUP/PGDWN Indicator Assistance

[Booth Martin <booth@xxxxxxxxxxxx>]

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.