|
Hi Doug... Just code these function key indicators on a separate record, and do a write to that record before you do the EXFMT to the subfile control... A*%%TS SD 20041123 170003 DPALME REL-V5R2M0 5722-WDS A*%%EC A DSPSIZ(24 80 *DS3) A R RECSFL SFL A*%%TS SD 20041123 163819 DPALME REL-V5R2M0 5722-WDS A NOTES 75A B 3 5 A R RECCTL SFLCTL(RECSFL) A*%%TS SD 20041123 170003 DPALME REL-V5R2M0 5722-WDS A SFLSIZ(0016) A SFLPAG(0015) A CA12(12) A 51 SFLDSP A 51 SFLDSPCTL A 52 SFLCLR A 1 24'THIS IS THE CONTROL RECORD HEADER' A R RECCMD A 24 11'F3=Exit' A COLOR(WHT) A 24 23'F6=Add Record' A COLOR(WHT) A 24 41'F7=Error Descriptions' A COLOR(WHT) Jerry L. Feador Sr. Programmer/Analyst Kia Motors America, Inc. (949) 595-5810 -----Original Message----- From: rpg400-l-bounces+jfeador=kiausa.com@xxxxxxxxxxxx [mailto:rpg400-l-bounces+jfeador=kiausa.com@xxxxxxxxxxxx]On Behalf Of Douglas W. Palme Sent: Wednesday, November 24, 2004 8:50 AM To: RPG programming on the AS400 / iSeries Subject: Issue with subfiles A friend of mine sent me some printouts helping walk me through the process of creating a subfile via the SDA tool. It seems pretty easy to do at least from a basic viewpoint.....I am not going to be doing anything heavy in subfiles at this point just because they are so complicated and there are other areas that I want to fully master before getting into this can of worms. However, I do have one question that hopefully someone here can assist me with. Below is a copy of the subfile DDS, the one thing this does not have is a section at the bottom of the screen to give the user some indication of which function key to use to cancel or scroll through the records....I would ask him but unfortunately he's out of the country on vacation (honeymoon) until after the first of the year. If someone would be kind enough to assist me with adding some type of "footer" where I can add some constant text for the user such as 'F12=CANCEL' 'PGDN - SCROLL DOWN' 'PGUP - SCROLL UP' and it will be displayed on each screen I would appreciate it. A*%%TS SD 20041123 170003 DPALME REL-V5R2M0 5722-WDS A*%%EC A DSPSIZ(24 80 *DS3) A R RECSFL SFL A*%%TS SD 20041123 163819 DPALME REL-V5R2M0 5722-WDS A NOTES 75A B 3 5 A R RECCTL SFLCTL(RECSFL) A*%%TS SD 20041123 170003 DPALME REL-V5R2M0 5722-WDS A SFLSIZ(0016) A SFLPAG(0015) A CA12(12) A 51 SFLDSP A 51 SFLDSPCTL A 52 SFLCLR A 1 24'THIS IS THE CONTROL RECORD HEADER' -- This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/rpg400-l.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
