La Web del Programador: Comunidad de Programadores
 
    Pregunta:  44291 - EJECUTAR UN PGM JAVA DESDE RPG400/CL400
Autor:  José Antonio D'Alessandro
Necesito conocer la forma de ejecutar un programa JAVA con parámetros desde un programa RPG400 o por medio de un CL400. Hasta el momento puedo realizarlo desde un CL llamando a un archivo de extensión BAT pero no con parámetros. Desde ya agraadezco cualquier ayuda.

  Respuesta:  Miguel Angel Salgado
A continuación un ejemplo del llamado usando instrucciones en FREE

Más adelante un llamado en RPGIII

...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
**-------------------------------------------------------*
** CALLING THE JAVA PROCEDURE FOR ANNULLING THE CURC ID'S
**-------------------------------------------------------*
/free
javcur = jvcurc(sysid:curcid:mvdate:amount:pusrnm1:ppaswd1:
pipadd1:usrlib1);
/end-free
**
C MOVEL JAVCUR JAVCUR1
**
C JAVCUR1 IFEQ 'OK'
**
C DSCURC SETLL RDLYTR
C READ RDLYTR
C *IN72 DOWEQ *OFF
**
C DSCURC IFNE GCURCI

Llamado a programa en java

Definir una estructura de datos con los parámetros necesarios:
D PRMCLC E DS EXTNAME(PCURRCALC)
D FRDAT E EXTFLD(FRMDAT)

Hacer el llamado al programa en cálculo con el parámetro definido previamente:
C CALL 'CURCALC'
C PARM PRMCLC