Equivalente al comando System de RM Cobol

[apetro]

Buenos Dias
Estoy tratando de pasar algunos programas que tengo en RM85 a Netcobol

Desde un formulario llamo a un programa que utiliza 6 ficheros y ejecuta algunos comandos System.

Ese programa lo he compilado con Pgem sin errores y he obtenido un .obj al cual llamo desde el form.

Cuando compilo el form me da el siguiente error
adm.obj error LNK 2001 unresolved external symbol _SYSTEM
FATAL ERROR LNK1120

No he encontrado la forma de transformar el .obj en .exe para probar si funciona como lo hacia en RM.

Desde ya agradezco la ayuda que puedan brindarme.

[Josber]

Lo puedes hacer con Execute ó ExecuteSync, por ejemplo


STRING "notepad.exe "
FILE-TEXT
DELIMITED BY SIZE INTO FICTEXT
END-STRING
INVOKE POW-SELF "Execute" USING FICTEXT POW-SWSHOWMAXIMIZED


La diferencia entre uno y otro es que ExecuteSync no te deja volver al programa hasta que no se ha completado y cerrado el comando, (o llamada) y Execute si deja.

POW-SWSHOWMAXIMIZED es para que lo ejecute a pantalla completa, lo puedes cambiar por POW-SWHIDE, POW-SWSHOWNORMAL y POW-SWSHOWMINIMIZED.

Un saludo.-