E CRF 1 2 80
C MOVE CRF,1 CAM80 80
C Z-ADD80 LONG 155
C CALL 'QCMDEXC'
C PARM CAM80
C PARM LONG
C MOVE CRF,2 CAM80
C CALL 'QCMDEXC'
C PARM CAM80
C PARM LONG
C MOVE *ON *INLR
**
CRTPF QTEMP/ARCHI1 SRCFILE(BIBLIOTECA/QDDSSRC) SRCMBR(ARCHI1) OPTION(*NOSRC)
CRTPF QTEMP/ARCHI2 SRCFILE(BIBLIOTECA/QDDSSRC) SRCMBR(ARCHI2) OPTION(*NOSRC)
_____
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of VALENCIA
Informatique
Sent: Viernes, 18 de Mayo de 2007 09:46 a.m.
To: forum.help400
Subject: Pregunta sobre RPG
Importance: High
Estimados foreros....
Como se hace para ejecutar un mandato de CL en un programa RPG??.
Muchas gracias de adelanto.
Lo recompensaremos con unas copillas.
Un saludo
______________________________
Rafael Gil -- Víctor Alejandre
Dto. Informatica
ID-Logistics España
__________________________________________________
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