Creo que el proyecto de Rapinto da error al abrir el documento Word.
A mi me ha funcionado haciendo las siguientes correcciones
He comentado la línea que viene en el ejemplo
Código COBOL:
* INVOKE DOCUMENT "OPEN" USING WORDFILE RETURNING ACTIVEDOCUMENT.
Y he añadido las siguientes:
Código COBOL:
INVOKE DOCUMENT "Open" USING WORDFILE
INVOKE WORD "GET-ActiveDocument" RETURNING ACTIVEDOCUMENT.