Tips: Ejecutar un objeto java gx desde un objeto rpg gx

El tip consiste en ejecutar el mandato RUNJVA desde un rpg gx sin necesidad de crear un programa CL a mano

Fuente RPG GX

variable &CmdJava Char(350)

&CmdJava = 'CHGJOB CCSID(37)' // no investigue mucho, pero sin esto no funciona ;)
&CmdJava = concat('RUNJVA CLASS(namejavaobj) ,
concat(" CLASSPATH('",
concat('//dirpackagegx/db2_classes.jar:',
concat('//dirpackagegx/gxclassr.jar:',
concat('//dirpackagegx/packagenamejavagx.jar:',
concat('//dirpackagegx/iText.jar:',
concat('//dirpackagegx/jt400.jar', "') PROP((java.awt.headless true)) GCHINL(262144)" )))))))

call('qcmdexc', &CmdJava, 350)