Arrancar automáticamente un transcriptor que se paraHola Juan Carlos:
Yo tengo el mismo problema con un Fax-impresora Canon que cuando le da la
gana se desconecta unos segundos de la red y provoca la caída del
transcriptor.
Harto de buscar donde estaba el problema me eché la manta a la cabeza,
asocié una cola de datos a la cola de salida y un CL (que se arranca
automáticamente por IPL) que lo que hace es que cada vez que entra un
listado en esa impresora intenta arrancar el transcriptor.
Ya se que es una burrada pero no encontré otra solución.
Un saludo.
Juanra
PD: A continuación copio/pego el fuente del CL.
/* */
/* CONTROL DISPOSITIVO VP.FAX */
/* */
PGM
DCL VAR(&RCVLON) TYPE(*DEC) LEN(5 0) VALUE(132)
DCL VAR(&RCVTEX) TYPE(*CHAR) LEN(132)
DCL VAR(&RCVESP) TYPE(*DEC) LEN(5 0) VALUE(86400)
ALCOBJ OBJ((JUANRALIB/JRG198C *PGM *EXCL)) WAIT(0)
MONMSG MSGID(CPF1002) EXEC(GOTO CMDLBL(FINAL))
CRTDTAQ DTAQ(JUANRALIB/VP.FAX) MAXLEN(132) +
FORCE(*YES) TEXT('Control dispositivo +
VP.FAX')
MONMSG MSGID(CPF0000) EXEC(GOTO CMDLBL(BUCLE))
ENDWTR WTR(VP.FAX) OPTION(*IMMED)
DLYJOB DLY(30)
CHGOUTQ OUTQ(VP.FAX) DTAQ(JUANRALIB/VP.FAX)
CHGOUTQ OUTQ(VP.FAX) DTAQ(JUANRALIB/VP.FAX)
BUCLE: CALL PGM(QRCVDTAQ) PARM('VP.FAX ' 'JUANRALIB ' +
&RCVLON &RCVTEX &RCVESP)
IF COND(&RCVLON *NE 0) THEN(DO)
DLYJOB DLY(15)
STRPRTWTR DEV(VP.FAX)
MONMSG MSGID(CPF0000)
DLYJOB DLY(10)
ENDDO
GOTO CMDLBL(BUCLE)
FINAL: ENDPGM
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] En nombre de Juan Carlos
Paredes
Enviado el: miércoles, 20 de diciembre de 2006 11:07
Para: Forum Help 400
Asunto: Arrancar automáticamente un transcriptor que se para
Buenos días, Foro:
¿Sabéis si existe alguna forma de arrancar automáticamente un transcriptor
cuando se para? De lo que se trata es de que tan pronto como un
transcriptor determinado se pare, por la razón que sea, se vuelva a
arrancar automáticamente.
Gracias.
Juan Carlos.
__________________________________________________
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://listas.combios.es/mailman/listinfo/forum.help400
