Estoy programando un CL para que haga una copia completa desasistida cada domingo :-P
Sergi Sitjes
Resp. Sistemes d'Informaci�
GENEBRE, S.A.
E-mail: [EMAIL PROTECTED]
Web: http://www.genebre.es
Tel: +34 93 298 80 02
Fax: +34 93 298 80 07
| "Orlando Varas"
<[EMAIL PROTECTED]>
Enviado por: [EMAIL PROTECTED] 21/03/2005 16:00
|
|
Solo por curiosidad ... porqu� no usas la opci�n 21 del men� Salvar ????
Saludos
Orlando Varas Molina
[EMAIL PROTECTED]
[EMAIL PROTECTED]
21-03-05 10:44 a.m.
Por favor, responda a forum.help400
Para: [email protected]@[EMAIL PROTECTED]
cc:
Asunto: Re: Mareado ya con la copia completa
OK, voy a probarlo este domingo.
Gracias!
Sergi Sitjes
Resp. Sistemes d'Informaci�
GENEBRE, S.A.
E-mail: [EMAIL PROTECTED]
Tel: +34 93 298 80 02
Fax: +34 93 298 80 07
alex martinez <[EMAIL PROTECTED]>
Enviado por: [EMAIL PROTECTED]
21/03/2005 10:51
Por favor, responda a
Para
cc
Asunto
Re: Mareado ya con la copia completa
Hola:
Haz primero el SAVSYS e indica el par�metro CLEAR(*ALL) en todos los
mandatos de Salvar.
Salu2
On Mon, 21 Mar 2005 10:02:01 +0100, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote:
>
> Hola,
>
> A ver si alguien me puede "iluminar" porque ya estoy negro :-(
> Tengo montado un CL para hacer copias completas cada domingo y despu�s de
> mil pruebas me he encallado. Os adjunto el CL y el mensaje que me da, a ver
> si alguien sabe ver como solucionarlo.
>
> PGM
> ENDSBS SBS(*ALL) DELAY(60) BCHTIMLMT(180)
> MONMSG MSGID(CPF0000)
> DLYJOB DLY(300)
> INZTAP DEV(TAP01) NEWVOL(TOTAL) NEWOWNID(GENEBRE) +
> CHECK(*NO) DENSITY(*SLR60)
> MONMSG MSGID(CPF0000)
> SAVLIB LIB(*NONSYS) DEV(TAP01) ENDOPT(*LEAVE) +
> ACCPTH(*YES) OUTPUT(*PRINT)
> MONMSG MSGID(CPF0000)
> SAVDLO DLO(*ALL) FLR(*ANY) DEV(TAP01) +
> ENDOPT(*LEAVE) OUTPUT(*PRINT)
> MONMSG MSGID(CPF0000)
> SAVSYS DEV(TAP01) ENDOPT(*LEAVE) OUTPUT(*PRINT)
> MONMSG MSGID(CPF0000)
> SAV DEV('/QSYS.LIB/TAP01A.DEVD') OBJ(('/*') +
> ('/QSYS.LIB' *OMIT) ('/QDLS' *OMIT)) +
> ENDOPT(*UNLOAD) UPDHST(*YES)
> MONMSG MSGID(CPF0000)
>
> ENDPGM
>
> Me ejecuta todos los comandos hasta llegar al SAVSYS, momento en que me da
> este mensaje:
> Message . . . . : Active file found on this volume (C I R).
>
> Cause . . . . . : An output volume open operation found an existing file
>
> (sequence number 1 label QFILE on volume TOTAL device TAP01) with an
> ending
> date (in the HDR1 label) greater than the current system date, at the
>
> location where the new file must be created. The output file QSYSTAP in
> QSYS
> will write over the existing data file with an ending date of *PERM.
>
> Recovery . . . : Do one of the following: -- Use C to cancel
> processing.
> -- Use I to write over the existing data file and all other files beyond
> it
> on the current volume. -- Load a different volume on the tape drive and
> use
> R to try again. Possible choices for replying to message . . . . . . . . .
> .
> . . . . . : C -- Cancel processing I -- Ignore error and write over
>
> existing data file R -- Try volume open operation again
>
> 03/20/05 23:02:03.497416 QWTCCCNJ QSYS 05C4 *EXT
>
>
> Tiene pinta de ser el par�metro EXPDATE, pero no se que ponerle :-?
>
> Gracias!
>
> Sergi Sitjes
> Resp. Sistemes d'Informaci�
> GENEBRE, S.A.
> E-mail: [EMAIL PROTECTED]
> Web: http://www.genebre.es
> Tel: +34 93 298 80 02
> Fax: +34 93 298 80 07
_____________________________________________________
Forum.HELP400 es un servicio m�s de NEWS/400.
� Publicaciones Help400, S.L. - Todos los derechos reservados
_____________________________________________________
Para darte de baja, env�a el mensaje resultante de pulsar
