|
Hola :
La cl la he dejado de la siguiente
manera, sabiendo de antemano que las 4 bibliotecas que he incluido en el primer
SAVLIB no me dan ningun problema :
PGM
INZTAP DEV(TAP01) NEWVOL(SERLOG) NEWOWNID('A C A') +
CHECK(*NO) DENSITY(*DEVTYPE) CLEAR(*YES)
MONMSG
MSGID(CPF0000)
SAVLIB LIB(KOE14AF CEDIS2000 GENCEDIS AVROM14)
+
DEV(TAP01)
MONMSG MSGID(CPF3751) EXEC(GOTO
CMDLBL(BIB1))
SAVLIB LIB(ALM14AF)
DEV(TAP01)
BIB1:
MONMSG MSGID(CPF3751) EXEC(GOTO
CMDLBL(BIB2))
SAVLIB LIB(GEN14AF)
DEV(TAP01)
BIB2:
MONMSG MSGID(CPF3751) EXEC(GOTO
CMDLBL(BIB3))
SAVLIB LIB(SEGXXXF)
DEV(TAP01)
BIB3:
DSPTAP DEV(TAP01)
OUTPUT(*PRINT)
ENDPGM
Seria correcto hacerlo asi no ?? .. lo probare hoy a la
noche a ver si termina bien el proceso.
Un saludo.
_______________________________________ Cedis (Centro Distribuidor De
Euskadi) Avda. Cervantes, 51 Pol. Industrial DENAC 48970 - Basauri
(Bizkaia) Tfno.: 944.407.209 Fax : 944.261.022
"Este correo electr�nico contiene informaci�n privada que puede estar
legalmente protegida, parcial o totalmente. Es s�lo para uso del destinatario al
que est� dirigido. Si ha recibido este mensaje por error, le rogamos que lo
notifique al remitente del email y que adem�s borre de su sistema el mensaje as�
como todas sus copias, incluyendo las posibles copias del mismo en su disco
duro, y se abstenga de usar, revelar, distribuir a terceros, imprimir o copiar
ninguna de las partes de este mensaje". "Mezu elektroniko honek informazio
pribatua du, partzialki edo osorik legez babestuta egon daitekeena. Bidali nahi
zaion hartzaileak erabiltzeko bakarrik da. Mezu hau hutsegite baten ondorioz
jaso baduzu, mesedez, mezuaren igorleari jakinaraztea eta mezua eta horren kopia
guztiak ezabatzea eskatzen dizugu, disko gogorrean izan ditzakezunak barne. Eta,
orobat, ez erabili mezu honen zatirik, ez eta erakutsi, beste pertsona batzuei
banatu, inprimatu edo berridatzi ere". "This e-mail contains proprietary
information some or all of which may be legally protected. It is for sole use of
the intended recipient only. If you have received this message by mistake, you
are requested to notify the e-mail sender and erase both the message and any
copies from your system, including hard disk copies. You are further
requested to refrain from using, distributing to third parties, printing or
making copies of any parts of this message".
----- Original Message -----
Sent: Monday, July 26, 2004 11:49
AM
Subject: Re: salvado de bibliotecas
..
Hola :
he leido tu comentario de
monitorizar el CPF3751, y para controlar el salvado correcto de las
bibliotecas , tendrias que aplicarlo a cada biblioteca salvada ?? , es decir
salvar una y si falla o se salva parcialmente saltar a la siguiente, y que no
se quede ahi el proceso retenido, y asi sucesivamente para el n� total de
bibliotecas ??.
un saludo y muchas
gracias.
_______________________________________ Cedis (Centro Distribuidor De
Euskadi) Avda. Cervantes, 51 Pol. Industrial DENAC 48970 - Basauri
(Bizkaia) Tfno.: 944.407.209 Fax : 944.261.022
"Este correo electr�nico contiene informaci�n privada que puede estar
legalmente protegida, parcial o totalmente. Es s�lo para uso del destinatario
al que est� dirigido. Si ha recibido este mensaje por error, le rogamos que lo
notifique al remitente del email y que adem�s borre de su sistema el mensaje
as� como todas sus copias, incluyendo las posibles copias del mismo en su
disco duro, y se abstenga de usar, revelar, distribuir a terceros, imprimir o
copiar ninguna de las partes de este mensaje". "Mezu elektroniko honek
informazio pribatua du, partzialki edo osorik legez babestuta egon daitekeena.
Bidali nahi zaion hartzaileak erabiltzeko bakarrik da. Mezu hau hutsegite
baten ondorioz jaso baduzu, mesedez, mezuaren igorleari jakinaraztea eta mezua
eta horren kopia guztiak ezabatzea eskatzen dizugu, disko gogorrean izan
ditzakezunak barne. Eta, orobat, ez erabili mezu honen zatirik, ez eta
erakutsi, beste pertsona batzuei banatu, inprimatu edo berridatzi ere".
"This e-mail contains proprietary information some or all of which may be
legally protected. It is for sole use of the intended recipient only. If you
have received this message by mistake, you are requested to notify the e-mail
sender and erase both the message and any copies from your system, including
hard disk copies. You are further requested to refrain from using,
distributing to third parties, printing or making copies of any parts of this
message".
----- Original Message -----
Sent: Monday, July 26, 2004 9:50
AM
Subject: Re: salvado de bibliotecas
..
Igualmente que monitorizas el CPF0000 que es un mensaje muy gen�rico, lo
debes hacer para el CPF3751 y definir la acci�n a realizar (a acabar
el proceso, o que te mande un mensaje, etc).
De todas formas, busca en los manuales el significado del este mensaje en
profundidad.
Saludos,
Francisco Rubio Enr�quez Analista Cibernos Consulting,
SAU
Hola :
Ultimamente me esta fallando el proceso de salvado de ciertas
bibliotecas del sistema, cuando voy a mirar en trabajos activos me figura la
copia programada para la noche pero con un mensaje diciendome que no se han
podido salvar una serie de bibliotecas, tal que asi :
Causa . . . .
. : El Programa de Lenguaje de Control (CL) CPYSEG14 en la biblioteca
QGPL ha detectado un error en la sentencia n�mero 600. El texto del
mensaje para CPF3751 es: No se han salvado algunas bibliotecas.
Recuperaci�n. . : Este mensaje de
consulta puede evitarse cambiando el
programa. Supervise el error (mandato MONMSG) y efect�e la recuperaci�n de
error dentro del programa. Para continuar, elija un valor de
respuesta. Elecciones posibles de respuesta al
mensaje. . . . . . . . . . . . . . :
Como se puede supervisar el mandato MONMSG ??
la CL que se lanza para realizar el
proceso es la siguiente :
PGM INZTAP DEV(TAP01) NEWVOL(SERLOG)
NEWOWNID('A C A') + CHECK(*NO) DENSITY(*DEVTYPE) CLEAR(*YES) MONMSG
MSGID(CPF0000) SAVLIB LIB(ALM14AF GEN14AF SEGXXXF KOE14AF +
CEDIS2000 GENCEDIS + AVROM14) DEV(TAP01) DSPTAP DEV(TAP01)
OUTPUT(*PRINT) ENDPGM
Alguien me podria indicar como se podria
evitar este error ??
Muchas gracias y un saludo.
_______________________________________ Cedis (Centro Distribuidor
De Euskadi) Avda. Cervantes, 51 Pol. Industrial DENAC 48970 -
Basauri (Bizkaia) Tfno.: 944.407.209 Fax : 944.261.022
"Este correo electr�nico contiene informaci�n privada que puede
estar legalmente protegida, parcial o totalmente. Es s�lo para uso del
destinatario al que est� dirigido. Si ha recibido este mensaje por error, le
rogamos que lo notifique al remitente del email y que adem�s borre de su
sistema el mensaje as� como todas sus copias, incluyendo las posibles copias
del mismo en su disco duro, y se abstenga de usar, revelar, distribuir a
terceros, imprimir o copiar ninguna de las partes de este mensaje".
"Mezu elektroniko honek informazio pribatua du, partzialki edo osorik
legez babestuta egon daitekeena. Bidali nahi zaion hartzaileak erabiltzeko
bakarrik da. Mezu hau hutsegite baten ondorioz jaso baduzu, mesedez,
mezuaren igorleari jakinaraztea eta mezua eta horren kopia guztiak ezabatzea
eskatzen dizugu, disko gogorrean izan ditzakezunak barne. Eta, orobat, ez
erabili mezu honen zatirik, ez eta erakutsi, beste pertsona batzuei banatu,
inprimatu edo berridatzi ere". "This e-mail contains proprietary
information some or all of which may be legally protected. It is for sole
use of the intended recipient only. If you have received this message by
mistake, you are requested to notify the e-mail sender and erase both the
message and any copies from your system, including hard disk copies.
You are further requested to refrain from using, distributing to third
parties, printing or making copies of any parts of this message".
-- Disclaimer ------------------------------------ Ce message ainsi que les
eventuelles pieces jointes constituent une correspondance privee et
confidentielle a l'attention exclusive du destinataire designe ci-dessus. Si
vous n'etes pas le destinataire du present message ou une personne
susceptible de pouvoir le lui delivrer, il vous est signifie que toute
divulgation, distribution ou copie de cette transmission est strictement
interdite. Si vous avez recu ce message par erreur, nous vous remercions
d'en informer l'expediteur par telephone ou de lui retourner le present
message, puis d'effacer immediatement ce message de votre systeme. *** This
e-mail and any attachments is a confidential correspondence intended only
for use of the individual or entity named above. If you are not the intended
recipient or the agent responsible for delivering the message to the
intended recipient, you are hereby notified that any disclosure,
distribution or copying of this communication is strictly prohibited. If you
have received this communication in error, please notify the sender by phone
or by replying this message, and then delete this message from your system.
|