DSPOBJREF - Display Object References

This command requires V4R2 or later and that object observability is intact.
 
 
 Object . . . . . . . . . . . . . OBJ                      ;                    
   Library  . . . . . . . . . . .                  *LIBL     
   Object type  . . . . . . . . .                         
                         + for more values                 
                                                   *LIBL     
                                                          
 Program library  . . . . . . . . PGMLIB                   
                         + for more values                 
 Unique program names . . . . . . UNIQUEPGM      *YES
 Output . . . . . . . . . . . . . OUTPUT         *       
 Special Lib Seq *ALLUSR  . . . . SPCLIBSEQ      *NONE     
                         + for more values                 

                          Additional Parameters
 Programs to include  . . . . . . PGM            *ALL      
 Include indirect references  . . INDREF         *YES
 Object usage . . . . . . . . . . USAGE          *ALL   
                                                        
 Run priority . . . . . . . . . . RUNPTY         50

There are panel group help text for (all fields of) this command.

This command will "scan" through the requested libraries for any references to the specified object(s) (file, data area, program, service program). It will find references to logical files if the object you name is a physical file, and it will let you search for a special usage of a file (input/output/update).

It can find the unique program names referencing the object in question, scanning some of the libraries in a given sequence (SPCLIBSEQ). This program will not run under security level 40 or greater, unless you patch it to "System state".

Example display:
                          Display Object References                            

                                                                                
 Program libraries :  TSTLIB    NEWLIB     OPRLIB                              
                                                                                
 Object usage  . . :  *ALL                                                      
                                                                                
 Type option, press Enter.                                                      
   5=Display program   8=Object description                                     
                                                                                
   Obj/Lib/Pgm  Type       Use  Description                                     
   PCUS01       PF              V1I00C01  Customer file                         
     CUST       RPGLE      IU   V1I00C05  Customer routines                     
     RBOK04     RPGLE      I    V1I00C32  Booking/Check-in of passengers        
     RBOK29     RPGLE      I    V1I00C07  Booking of passengers for customer    
     RBOK32     RPGLE      I    V1I00C05  Booking/Check-in of passengers (cu    
     RCMS25     RPGLE      I    V1I00C01  Maintenance of crew qualification     
     REVT001    RPGLE      I    V1I00C06  Event handler for flight schedule     
     REVT006    RPGLE      I    V1I00C04  Book cargo from SAGA TOPS             
     RFLI02     RPGLE      I    V1I00C02  Work with customers                   
     RFLI139    RPGLE      IOU  V1I00C08  Customer update                       
     RFLI67     RPGLE      I    V1I00C04  Print Ad hoc order confirmation     + 
                                                                                
 F3=Exit  F12=Cancel                                                           
                                                                                

Freeware
Download (162 KB)
Download for V5R4 (236 KB)
Download for V6R1 (470 KB)

To install:

  • create an empty save file on your AS/400
  • start an ftp session and log on to you AS/400
  • set binary transfer mode with the bin ftp command
  • Unzip dspobjref.zip using WinZip
  • put dspobjref.sav to the save file you just created
  • restore all objects from the save file to the library of your choice, save library is UTLSYS
25th August 2010