Recato
Prueba de esta forma inserta un CMFOLDER1, CMFILE1 en tu form
Código COBOL:
WORKING STORAGE.
01 FOLDER-NAME PIC X(256).
PROCEDURE DIVISION.
MOVE "path" OF CmFolder1 TO FOLDER-NAME.
INVOKE POW-SELF "Execute" USING "C:\zzz\Cambio_Path.bat"
invoke pow-self "THRUEVENTS".
MOVE FOLDER-NAME TO "Path" OF CmFile1.