Dispongo del programa RUNJOBCMD (gentiliza de David Ong y adaptado por Javier
Mora García), aprovecho para darles las gracias por su colaboración.
Desde la versión 5.4, tengo entendido que se ha anulado el parámetro EXITPGM
del comando TRCJOB, donde se invocaba al programa RUNJOBCMDR,
y he leído que en lugar del comando TRCJOB se ha de utilizar el API QWCJBITP,
pero no sé qué modificaciones tengo que hacer en la CL porque desconozco el
funcionamiento de las API's y los EXITPGM del Sistema. Les agradezco la ayuda.
Extracto del CL RUNJOBCMDC
/* Interrumpe el trabajo receptor y se ejecuta el mandato en aquel. */
STRSRVJOB JOB(&JOBNO/&USER/&JOBNAME)
TRCJOB SET(*ON) TRCTYPE(*FLOW) MAXSTG(1024) +
EXITPGM(RUNJOBCMDR)
Este correo electrónico contiene información privada y estrictamente
confidencial. Si usted no es el destinatario del presente mensaje no está
autorizado a leerlo, retenerlo o difundirlo. Si usted ha recibido este mensaje
por error, le rogamos lo comunique al remitente y borre dicho mensaje y
cualquier documento adjunto que pudiera contener.
This e-mail is privileged, confidential and contains private information. Any
reading, retention, distribution or copying of this communication by any person
other than its intended recipient is prohibited. If you receive this message by
mistake, please inform the sender and delete the message and attachments from
your system.
__________________________________________________
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
