Retrieve MSGD Source Code (RTVMSGF)

page d'accueil
Boite à outils

Cette page a été mise à jour le 25 septembre 2021. 
Contact

Welcome page
Tools box

Versionning 

last version : The SaveFiles

Cet outil construit le code source d'un message-file et de tous ses messages This tool builds the source code of a message-file and all of its messages

Command interface:


                       Retrieve MSGD Source Code (RTVMSGF)                      
                                                                                
 Type choices, press Enter.                                                     
                                                                                
 MSGF to scan . . . . . . . . . .   jpltools      Name, generic*, *ALL          
   Library  . . . . . . . . . . .     jpltools    Name, *CURLIB                 
 Output Source File . . . . . . .   QMSGF         Name                          
   Library  . . . . . . . . . . .     QTEMP       Name                          
 output source member . . . . . .   *MSGF         Name, *MSGF                   
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                         Bottom 
 F3=Exit   F4=Prompt   F5=Refresh   F12=Cancel   F13=How to use this display    
 F24=More keys                                                                  
                                                                                

the output is a file member in qtemp:

                           Work with Members Using PDM                 AMIE74   
                                                                                
 File  . . . . . .   QMSGF                                                      
   Library . . . .     QTEMP                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      Type        Text                                              
 5    JPLTOOLS    CLLE        Messages used in the JPLTools                     
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                         Bottom 
 Parameters or command                                                          
 ===>                                                                           
 F3=Exit          F4=Prompt             F5=Refresh            F6=Create         
 F9=Retrieve      F10=Command entry     F23=More options      F24=More keys     
                                                                                
 Columns . . . :    1 100                                      Browse                                                   QTEMP/QMSGF 
 SEU==>                                                                                                                    JPLTOOLS 
 FMT **  ...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8 ...+... 9 ...+... 0                        
        *************** Beginning of data ***************************************************************************************   
0001.00 PGM                                                                                                      092521             
0002.00 CRTMSGF MSGF(JPLTOOLS/JPLTOOLS) TEXT('Messages used in the JPLTools')                                    092521             
0003.00 ADDMSGD MSGID(AAA0001) MSGF(JPLTOOLS/JPLTOOLS)  MSG('Hello, bad boy. It''s time-                         092521             
0004.00  to wake up, there is job that expects')                                                                 092521             
0005.00 ADDMSGD MSGID(DIV0001) MSGF(JPLTOOLS/JPLTOOLS)  MSG('Unattended error when read-                         092521             
0006.00 ing a file - call support')  SECLVL('This error is common when 2 users try to u-                         092521             
0007.00 pdate the same information at the same time . Look at joblog for previous messa-                         092521             
0008.00 ges')                                                                                                    092521             
0009.00 ADDMSGD MSGID(DMP0001) MSGF(JPLTOOLS/JPLTOOLS)  MSG('program &9/&28 in module &-                         092521             
0010.00 29 at statement &4 got message &7 : &10')  SECLVL('program=&1, &N status=&2, &N-                         092521             
0011.00  prevStatus=&3, &N SrcStmt=&4, &N Routine=&5, &N parms=&6,&N msgid=&7,&N =&8,&N-                         092521             
0012.00  pgmlib=&9,&N msgdta=&10,&N rnx9001except=&11,&N FileInError=&12,&N =&13,&N Sta-                         092521             
0013.00 rtDate=&14,&N =&15,&N FileStatus=&16,&N JobName=&17,&N JobUser=&18,&N JobNbr=&1-                         092521             
0014.00 9,&N filler=&20,&N StartTime=&21,&N CompileDate=&22,&N CompileTime=&23,&N Compi-                         092521             
0015.00 leLevel=&24,&N CompileSrcFil=&25,&N CompileSrcLib=&26,&N CompileSrcMbr=&27,&N p-                         092521             
0016.00 gm=&28,&N mod=&29,&N SourceId1=&30,&N SourceId2=&31,&N CurrentUser=&32,&N ExtEr-                         092521             
0017.00 ror=&33,&N XmlElt=&34,&N TheEnd=&35,&N') FMT((*CHAR 10 0)(*CHAR 5 0)(*CHAR 5 0)-                         092521             
0018.00 (*CHAR 8 0)(*CHAR 8 0)(*CHAR 3 0)(*CHAR 7 0)(*CHAR 34 0)(*CHAR 10 0)(*CHAR 80 0-                         092521             
0019.00 )(*CHAR 4 0)(*CHAR 10 0)(*CHAR 6 0)(*CHAR 8 0)(*CHAR 10 0)(*CHAR 35 0)(*CHAR 10-                         092521             
                                                                                                                                    
 F3=Exit   F5=Refresh   F9=Retrieve   F10=Cursor   F11=Toggle   F12=Cancel                                                          
 F16=Repeat find        F24=More keys