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

Responder a