Ü  User Defined Option

 

Go to WRKMBRPDM. Now to create the user defined option for the source member, just follow the steps below:

ü  SHIFT-F4

ü  F6-CREATE

ü  We are going to create user defined option SD for the command STRDBG PGM(lib/Pgm) UPDPRD(*Yes)  OPMSRC(*Yes)

ü  To create option SD write the corresponding command for option SD.

ü  In the command below &L represents library and &N represents object.

 

                        Display User-Defined Option                            
                                                                               
 Press Enter to continue.                                                      
                                                                               
   Option  . . . . . . . . :   SD                                              
                                                                                
   Command . . . . . . . . :   STRDBG PGM(&L/&N) UPDPROD(*YES)                    
                                                                               
                                                                                
                                                                               
                                                                           
                                                                               
                                                                                
                                                                               
 F3=Exit       F12=Cancel 

                                                                               

 

After the option is created you can simply use option SD instead of writing the command STRDBG on command line

 

                           Work with Members Using PDM                 PUB1    
                                                                               
 File  . . . . . .   QRPGLESRC                                                 
   Library . . . .     IROBO1               Position to  . . . . .             
                                                                               
 Type options, press Enter.                                                    
  2=Edit         3=Copy  4=Delete 5=Display       6=Print     7=Rename         
  8=Display description  9=Save  13=Change text  14=Compile  15=Create module...
                                                                               
 Opt  Member      Date        Text                                             
 SD   DTAQ0_RPG   04/21/13    DATA QUEUE RPGLE                                 
      DTAQ00_RPG  04/21/13    DATA QUEUE RPGLE                                 
      DTAQ01_RPG  04/21/13    DATA QUEUE RPGLE                                 
      DTAQ1_RPG   04/21/13    DATA QUEUE RPGLE                                 
      EXFMT_PGM   03/14/13    EXFMT TEST                                       
      INZRPG      01/20/13    inz keyword                                      
                                                                        More...
 Parameters or command                                                         
 ===>                                                                          
 F11=Display names and dates                F12=Cancel         F13=Repeat      
 F14=Display type        F15=Sort date      F23=More options   F24=More keys 

                                                        

Press F4 after the option:

                      

                              Start Debug (STRDBG)                              
                                                                               
 Type choices, press Enter.                                                    
                                                                                
 Program  . . . . . . . . . . . . PGM          > DTAQ0_RPG                     
   Library  . . . . . . . . . . .                  *LIBL                       
                           + for more values                                   
                                                   *LIBL                       
 Default program  . . . . . . . . DFTPGM         *PGM                          
 Maximum trace statements . . . . MAXTRC         200                           
 Trace full . . . . . . . . . . . TRCFULL        *STOPTRC                      
 Update production files  . . . . UPDPROD      > *YES                          
 OPM source level debug . . . . . OPMSRC         *NO                           
 Service program  . . . . . . . . SRVPGM         *NONE                         
   Library  . . . . . . . . . . .                                              
                           + for more values                                   
                                                                                
                                                                               
                                                                               
                                                                                
                                                                        More...
 F3=Exit   F4=Prompt   F5=Refresh   F10=Additional parameters   F12=Cancel     
 F13=How to use this display        F24=More keys   

 











User Comments:



Copyright © www.go4as400.com, 2013-2023. Copyright notice   Terms of services   Privacy policy