Go4AS400-Image

The Web Ask Go4AS400
Share  
 
Homepage
See Sitemap
as400_FAQ
See Videos here
Contact me



 

*     STRSDA (Start Screen Design Aid)

 

·      Start the screen design aid by using STRSDA and select option-1.

 

 

                            Screen Design Aid (SDA)                            

 

                                                                               

 Select one of the following:                                                  

                                                                               

      1. Design screens                                                        

      2. Design menus                                                          

      3. Test display files                                                    

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                               

                                                                               

                                                                               

 Selection or command                                                          

===>  1___________________________________________________________________

                                                                               

 F1=Help   F3=Exit   F4=Prompt   F9=Retrieve   F12=Cancel                      

                                          (C) COPYRIGHT IBM CORP. 1981, 2005.  

 

 

 

 

·      Option-1 selection results into the screen below.

 

 

                                Design Screens                                 

                                                                               

 Type choices, press Enter.                                                    

                                                                               

   Source file . . . . . . . .   QRPGLESRC    Name, F4 for list                

                                                                                

     Library . . . . . . . . .   AMIT         Name, *LIBL, *CURLIB             

                                                                               

   Member  . . . . . . . . . .   DSPLY01      Name, F4 for list                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

 F3=Exit     F4=Prompt     F12=Cancel                                          

                                                                     

 

 

·      Press ENTER and select option-1 to add new record.

          

                      Work with Display Records                                

                                                                               

 File  . . . . . . :   QRPGLESRC              Member . . . . . . :   DSPLY01   

   Library . . . . :     AMIT                 Source type  . . . :   DSPF      

                                                                               

 Type options, press Enter.                                                    

   1=Add             2=Edit comments          3=Copy          4=Delete         

   7=Rename          8=Select keywords       12=Design image                   

                                                                                

 Opt  Order    Record        Type      Related Subfile   Date        DDS Error 

                                                                               

  1_

   (No records in file)                                                        

                                                                               

                                                                               

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                         Bottom

 F3=Exit                     F12=Cancel      F14=File-level keywords           

 F15=File-level comments     F17=Subset      F24=More keys                     

                                                                                

 

 

 

·      Option-1 provides the screen to add a new record to the display file.

 

                               Add New Record                                  

                                                                               

 File  . . . . . . :   QRPGLESRC              Member . . . . . . :   DSPLY01   

   Library . . . . :     AMIT                 Source type  . . . :   DSPF      

                                                                                

 Type choices, press Enter.                                                    

                                                                               

   New record  . . . . . . . . . . . . . . .                Name               

                                                                               

   Type  . . . . . . . . . . . . . . . . . .   RECORD       RECORD, USRDFN     

                                                        SFL,    SFLMSG >>> Record types

                                                            WINDOW, WDWSFL     

                                                            PULDWN, PDNSFL     

                                                            MNUBAR             

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

 F3=Exit     F5=Refresh     F12=Cancel  

                                      

                                       

                                       

 

·      There are so many record types available here that you can create. We generally go for record types RECORD, SFL, WINDOW and WDWSFL.

·      Here we select record type RECORD and create HEADER as a new record.

 

 

                               Add New Record                                  

                                                                                

 File  . . . . . . :   QRPGLESRC              Member . . . . . . :   DSPLY01   

   Library . . . . :     AMIT                 Source type  . . . :   DSPF      

                                                                                

 Type choices, press Enter.                                                    

                                                                               

   New record  . . . . . . . . . . . . . . .   HEADER       Name               

                                                                                

   Type  . . . . . . . . . . . . . . . . . .   RECORD       RECORD, USRDFN     

                                                            SFL,    SFLMSG     

                                                            WINDOW, WDWSFL     

                                                            PULDWN, PDNSFL     

                                                            MNUBAR             

                                                                               

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

 F3=Exit     F5=Refresh     F12=Cancel   

                                     

                                                                                

 

 

·      A design blank screen will appear.

·      We put the plane text inside quotes and press ENTER, to display it on the screen.

·      While designing to blank out any character on the screen, never use Backspace/Delete key as it leads to bad alignment of the screen content. Rather we press ‘SPACE’ button to blank out any character.

·      *USER, *DATE, *TIME these are the keyword that you can use to place USER NAME, CURRENT SYSTEM DATE and SYSTEM TIME.

 

 

 

*USER                  'PARTY INFORMATION ENQUIRY SCREEN'              *DATE   

                                                                       *TIME   

                                                                               

                                                                               

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

 Work screen for record HEADER: Press Help for function keys.

                 

 

 

 

 

·      PRESS ENTER. The design screen looks like this.

 

 

 

UUUUUUUUUU              PARTY INFORMATION ENQUIRY SCREEN               DD/DD/DD

                                                                       TT:TT:TT

                                                                               

                                                                               

                                                                               

                                                                                                                                                            

                                                                               

                                                                               

 

 

·      To align center any text, we use ‘AC’ which overlaps the very first character of the sentence that we want to center and press ENTER to see the affect. Here the text “PARTY INFORMATION ENQUIRY SCREEN” will be aligned into the center.

     e.g.            

 

UUUUUUUUUU             ACARTY INFORMATION ENQUIRY SCREEN               DD/DD/DD

                                                                       TT:TT:TT

                                                                                

                                                                               

                                                                                                                                                               

 

 

·         To move the content to the left use ‘<’. No. of ‘<’ denotes the spaces you want to travel to the left on the screen for the text.

e.g.

 

 

UUUUUUUUUU       <<<<<<PARTY INFORMATION ENQUIRY SCREEN                DD/DD/DD

                                                                       TT:TT:TT

                                                                               

                                                                               

                                                                               

 

RESULT:

                                                                                

                                                                               

                                                                               

UUUUUUUUUU       PARTY INFORMATION ENQUIRY SCREEN                      DD/DD/DD

                                                                       TT:TT:TT

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

 

·      Similarly, to move the content to the right use ‘>’. No. of ‘>’ denotes the spaces you want to travel to the left on the screen for the text.

·      SHIFT-F2 displays the ruler and the same to hide the ruler.

·      Use ‘D’ in front of the field to delete the field.

·      Use ‘H’ in front of the field to highlight any text in white on the screen.

 

 

·      To change any attribute of the screen field just put ‘*’ in front of the field and press ENTER, as shown below:

 

UUUUUUUUUU            *PARTY INFORMATION ENQUIRY SCREEN                DD/DD/DD

                                                                       TT:TT:TT

                                                                               

                                                                                

                                                                               

 

                                                                              

                                

·      Press ENTER.

·      Select the display attribute as ‘Y’ and color attribute as ‘Y’.

 

 

                             Select Field Keywords                             

                                                                               

 Constant  . . . :   PARTY INFORMATION ENQUIRY SCREEN                          

 Length  . . . . :   32                   Row . . . :  1    Column . . . :  25 

                                                                               

 Type choices, press Enter.                                                     

                                     Y=Yes   For Field Type                    

   Display attributes  . . . . . . .  Y      All except Hidden                 

   Colors  . . . . . . . . . . . . .  Y      All except Hidden                 

                                                                               

                                                                               

                                                                                

   General keywords  . . . . . . . .  _      All types                         

                                                                               

                                                                               

                                                                               

                                                                               

                                                                               

                                                                                

TEXT keyword  . . . . . . . . . .  ______________________________________________________

                                                                               

                                                                               

 F3=Exit   F4=Display Selected Keywords   F12=Cancel    

                      

                                                                                                                               

 

 

·      There are various attribute that we can find here.

HI = To highlight the text with the color specified in color attribute

RI = To highlight the text background with the color specified in color attribute

CS = To provide a column separator at each position of the characters of a field

ND = The text will not be displayed on screen.

UL = Underline will be associated with the text

PC = To position the cursor at the beginning of the field. If specified for more than one field,

         then the cursor is poisoned to the beginning of the very first field.

PR = To make the field protected

 

All these attribute are dependent on the associated indicator if any. E.g. the for ND attribute if we set an indicator 12, then when indicator *In12 is *On then only the text will not be displayed else it will be displayed.

 

§  Note: If you specify UL, HI, and RI attributes for the same field, the field will not be displayed same while using attribute ND.

                       

                                                                               

                           Select Display Attributes                           

                                                                               

 Constant  . . . :   PARTY INFORMATION ENQUIRY SCREEN                          

 Length  . . . . :   32                   Row . . . :  1    Column . . . :  25 

                                                                                

 Type choices, press Enter.                                                    

                                              Keyword   Y=Yes   Indicators/+   

   Field conditioning . . . . . . . . . . .                                    

   Program-to-system field  . . . . . . . .                                    

   Display attributes:                        DSPATR                           

     High intensity . . . . . . . . . . . .     HI                             

     Reverse image  . . . . . . . . . . . .     RI        Y     11             

     Column separators  . . . . . . . . . .     CS                             

     Blink  . . . . . . . . . . . . . . . .     BL                              

     Nondisplay . . . . . . . . . . . . . .     ND                             

     Underline  . . . . . . . . . . . . . .     UL                             

     Position cursor  . . . . . . . . . . .     PC                              

     Set modified data tag  . . . . . . . .     MDT                       

     Protect field  . . . . . . . . . . . .     PR

                           

                                                                               

                                                                               

                                                                               

                                                                                

 F3=Exit   F12=Cancel       

                                                  

                                                                               

 

·      Now we select the color attribute.

 

 

                                 Select Colors                                 

                                                                               

 Constant  . . . :   PARTY INFORMATION ENQUIRY SCREEN                          

 Length  . . . . :   32                   Row . . . :  1    Column . . . :  25 

                                                                               

 Type choices, press Enter.                                                    

                                                                               

                                          Keyword   Order   Indicators/+       

                                                    (1-7)                      

   Colors:                                COLOR                                

     Blue . . . . . . . . . . . . . . .     BLU                                

     Green  . . . . . . . . . . . . . .     GRN                                

     Pink . . . . . . . . . . . . . . .     PNK                                

     Red  . . . . . . . . . . . . . . .     RED                                

     Turquoise  . . . . . . . . . . . .     TRQ                                

     White  . . . . . . . . . . . . . .     WHT                                

     Yellow . . . . . . . . . . . . . .     YLW       1                        

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

 F3=Exit   F12=Cancel 

 

                                                        

                                                                               

·         Press ENTER. The screen below shows the display attribute HI and color attribute effect on the heading.

 

 

 

UUUUUUUUUU             PARTY INFORMATION ENQUIRY SCREEN                DD/DD/DD

                                                                       TT:TT:TT

                                                                               

                                                                               

                                

                                              

 

 

                   

·      PRESS F3 and save it. The newly created record will be shown in the Display file records list as shown below.

 

                      Work with Display Records                                

                                                                                

 File  . . . . . . :   QRPGLESRC              Member . . . . . . :   DSPLY01   

   Library . . . . :     AMIT                 Source type  . . . :   DSPF      

                                                                               

 Type options, press Enter.                                                    

   1=Add             2=Edit comments          3=Copy          4=Delete         

   7=Rename          8=Select keywords       12=Design image                   

                                                                               

 Opt  Order    Record        Type      Related Subfile   Date        DDS Error 

                                                                                

         10    HEADER        RECORD                      02/08/13              

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                         Bottom

 F3=Exit                     F12=Cancel      F14=File-level keywords           

 F15=File-level comments     F17=Subset      F24=More keys                      

 Record HEADER added to member DSPLY01.

                                       

 

 

 

 

·      Now we will add another record ‘FOOTER’ that will appear at the bottom. Take option-1 to add a new record named as ‘FOOTER’

 

 

                               Add New Record                                  

                                                                               

 File  . . . . . . :   QRPGLESRC              Member . . . . . . :   DSPLY01   

   Library . . . . :     AMIT                 Source type  . . . :   DSPF      

                                                                               

 Type choices, press Enter.                                                    

                                                                                

   New record  . . . . . . . . . . . . . . .   FOOTER       Name               

                                                                               

   Type  . . . . . . . . . . . . . . . . . .   RECORD       RECORD, USRDFN     

                                                            SFL,    SFLMSG     

                                                            WINDOW, WDWSFL     

                                                            PULDWN, PDNSFL     

                                                            MNUBAR             

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                               

 F3=Exit     F5=Refresh     F12=Cancel                                         

                                             

 

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                               

                                                                               

                                                                               

 'F3 = EXIT     F12 = PREVIOUS'                                                

 

 

 

 

·      Press ENTER

 

                                                                               

                                                                               

                                                                               

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                               

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

                                                                                

                                                                               

                                                                               

  F3 = EXIT     F12 = PREVIOUS