RE: Issue with subfiles

[JFeador@xxxxxxxxxx]

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.