RE: QZDASOINIT

[Steve.VanPortfliet@xxxxxxxxxxxxxxxx]

Yes.  I realized it could cause a problem with the backup.  Also, I think 
abended jobs may leave a lock on file SYSCTL that need to be cleared.  The 
following program runs prior to the backup.  Hope it helps.....


             PGM                                                 
             DCL        VAR(&JOB)    TYPE(*CHAR) LEN(10)         
             DCL        VAR(&USER)   TYPE(*CHAR) LEN(10)         
             DCL        VAR(&NUMBER) TYPE(*CHAR) LEN(6)          
             DCLF       FILE(SPOOL132)                           
                                                                 
             WRKOBJLCK  OBJ(SYSCTL) OBJTYPE(*FILE) OUTPUT(*PRINT)
             CPYSPLF    FILE(QPDSPOLK) TOFILE(SPOOL132)          
 READ:       RCVF                                                
             MONMSG     MSGID(CPF0864 CPF4101) EXEC(GOTO +       
                          CMDLBL(ENDFILE))                       
             CHGVAR     VAR(&JOB) VALUE(%SST(&SPOOL132 15 10))   
                                                                 
             IF         COND(%SUBSTRING(&JOB 1 10) *EQ 'QZDASOINIT') +
                          THEN(DO)                                    
             CHGVAR     VAR(&USER)   VALUE(%SST(&SPOOL132 26 10))     
             CHGVAR     VAR(&NUMBER) VALUE(%SST(&SPOOL132 37 6))      
                                                                      
             ENDJOB     JOB(&NUMBER/&USER/&JOB) OPTION(*IMMED)        
                                                                      
             ENDDO                                                    
                                                                      
             GOTO       CMDLBL(READ)                                  
ENDFILE:                                                              
                                                                      
             ENDPGM  

                                                 

-----Original Message-----
From: Chris Neely [mailto:cneely@conagrapoultry.com]
Sent: Monday, October 23, 2000 9:05
To: MAPICS-L@MIDRANGE.COM
Subject: QZDASOINIT




 Is there anyone taking steps programatically to insure that no browser jobs
start in subsystem Qserver and prevent the backup from getting dedicated mode?
What method do you recommend?


Thanks


+---
| This is the MAPICS Mailing List!
| To submit a new message, send your mail to MAPICS-L@midrange.com.
| To subscribe to this list send email to MAPICS-L-SUB@midrange.com.
| To unsubscribe from this list send email to MAPICS-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: dshaw@spartan.com
+---
+---
| This is the MAPICS Mailing List!
| To submit a new message, send your mail to MAPICS-L@midrange.com.
| To subscribe to this list send email to MAPICS-L-SUB@midrange.com.
| To unsubscribe from this list send email to MAPICS-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: dshaw@spartan.com
+---