Title: Luis Alberto Mariotti
javier, te paso un CLP que utilizo para tal efecto.  Lo primero que hace es finalizar el sistema y queda el programa a la espera del INTRO para el SAVSYS.

antes de confirmar el SAVSYS, visualizo los mensajes de la cola del operador para ver que el sistema envie el mensaje de "condicion restringida".

A partir de alli, confirmo y el SAVSYS se ejecuta.  Los comandos son todos los que ejecuta el SAVSYS dese menu

Lo unico que deberias cambiar es el nombre del dispositivo si no es TAP01

Si el backup te da un error, tendrias que iniciar el subsitema QCTL

Espero que te sirva

Saludos


            PGM                                                          
/*-------------------------------------------------------------------*/  
/* Ejecucion del backup de SISTEMA                                   */  
/*-------------------------------------------------------------------*/  
            ?          ENDSYS OPTION(*IMMED)                             
            MONMSG     MSGID(CPF0000)                                    
                                                                         
             CHGMSGQ    MSGQ(QSYSOPR) DLVRY(*BREAK)                      
            MONMSG     MSGID(CPF0000)                                    
                                                                         
            ?          SAVSYS DEV(TAP01) ENDOPT(*LEAVE) DTACPR(*YES)     
                                                                         
            SAVLIB     LIB(*NONSYS) DEV(TAP01) ENDOPT(*LEAVE) +          
                         ACCPTH(*YES) DTACPR(*YES)                       
            SAVDLO     DLO(*ALL) FLR(*ANY) DEV(TAP01) +             
                         ENDOPT(*LEAVE) DTACPR(*YES)                
                                                                    
            SAV        DEV('/qsys.lib/tap01.devd') OBJ(('/*') +     
                         ('/qsys.lib' *OMIT) ('/qdls' *OMIT)) +     
                         ENDOPT(*UNLOAD) UPDHST(*YES) DTACPR(*YES)  
                                                                    
            CHGMSGQ    MSGQ(QSYSOPR) DLVRY(*HOLD)                   
            MONMSG     MSGID(CPF0000)                               
                                                                    
            STRSBS     SBSD(*LIBL/QCTL)                             
                                                                    
            ENDPGM                                                  

Javier Mora escribió:
Hola a todos:

	Sobre este tema ya se ha hablado en alguna ocasión en el foro, 

http://www.mail-archive.com/[email protected]/msg01149.html

pero lo encontrado no me ha sido de mucha ayuda. Mi intención es realizar un
salvado completo del sistema por la noche y en modo desatendido, incluyendo
un SAVSYS. Se que este mandato se tiene que hacer en modo restringido y
desde la consola (si no me equivoco en el subsistema QCTL).

¿Alguien lo ha conseguido hacer? ¿Cómo?

	Un salulo y gracias a todos por vuestras sugerencia,


	Javier Mora
	Dpto. Informática
	Dialsur S.A.U.


__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400


  

--

Ing.  Luis Alberto Mariotti

 

TE 0342-4552071 (Int 210)

email: [EMAIL PROTECTED]

 

Centro Privado de Computos SA

San Martin 3067/71 - S3000FSM

Santa Fe, Argentina

web www.cpc.com.ar

 

__________________________________________________ Forum.HELP400 es un servicio más de NEWS/400. © Publicaciones Help400, S.L. - Todos los derechos reservados http://www.help400.es _____________________________________________________ Para darte de baja visita la siguente URL: http://coyote.combios.es/mailman/listinfo/forum.help400

Responder a