PSBs de carga de las bases de datos

PSB de carga de B.D. de perfiles

         PCB   TYPE=DB,                                                X
               DBDNAME=ZTBGDPED,                                       X
               PROCOPT=LS,                                             X
               KEYLEN=50                                               
         SENSEG NAME=REGPER,                                           X
               PARENT=0                                                
         PSBGEN LANG=COBOL,                                            X
               PSBNAME=ZTBGBCPE,                                       X
               CMPAT=YES                                               
         END                                                           

PSB de carga de B.D. de estados

         PCB   TYPE=DB,                                                X
               DBDNAME=ZTBGDESD,                                       X
               PROCOPT=LS,                                             X
               KEYLEN=37                                               
         SENSEG NAME=ESTADO,                                           X
               PARENT=0                                                
         PSBGEN LANG=COBOL,                                            X
               CMPAT=YES,                                              X
               PSBNAME=ZTBGBCES                                        
         END                                                          

PSB de carga de B.D. de log

         PCB   TYPE=DB,                                                X
               DBDNAME=ZTBGDLOD,                                       X
               PROCOPT=L,                                              X
               KEYLEN=30                                               
         SENSEG NAME=REGLOG,                                           X
               PARENT=0                                                
         PSBGEN LANG=COBOL,                                            X
               PSBNAME=ZTBGBCLO                                        
         END                                                           

PSB de carga de B.D. de colas de ficheros

         PCB   TYPE=DB,                                                X
               DBDNAME=ZTBGDQFD,                                       X
               PROCOPT=LS,                                             X
               KEYLEN=50                                               
         SENSEG NAME=REGQF,                                            X
               PARENT=0                                                
         PSBGEN LANG=COBOL,                                            X
               PSBNAME=ZTBGBCQF                                        
         END