drvedia1981, en el fichero COBOL85.CBR pones:
Código:
[MainForm.Entry]
ConfiguraTaxaSerial=InterfaceEpsonNF.dll
En tu programa haces:
Código COBOL:
WORKING-STORAGE SECTION.
01 RESP PIC S9(9) COMP-5.
01 NPORT PIC S9(9) COMP-5.
01 FUNC PIC X(50) VALUE "ConfiguraTaxaSerial".
PROCEDURE DIVISION.
MOVE 19200 TO NPORT
CALL FUNC WITH STDCALL USING BY VALUE NPORT RETURNING RESP