Ver Mensaje Individual
  #37
Antiguo 28 de abril de 2017, 15:51
fastpho
El Foro es mi casa
Innovación: Por aportar innovaciones - Issue reason: SQLite + OO Cobol class Concurso: Primer puesto: Ganador/a del Primer puesto en un concurso - Issue reason: Acceso a datos Cobol vía web 
Última Actividad 30.09.2026 19:12
Posts Posts: 365
Likes enviados Enviados: 252
Likes recibidos Recibidos: 243

Hola Kuk instale el paquete EpsonFiscalDriver_01.09.00.exe , quite la lib del proyecto pero cuando compilo me da el siguiente error :

Linking C:\epsontm\epsontm900.exe ...
APPEPSON.obj : error LNK2001: unresolved external symbol _FUNC@4
C:\epsontm\epsontm900.exe : fatal error LNK1120: 1 unresolved externals

** The build has failed **

este es el archivo que cree cobol85.cbr que contiene :

[APPEPSON.ENTRY]
setComPort=EpsonFiscalDriver.DLL
AddDataField=EpsonFiscalDriver.DLL

Código COBOL:
  1.  ENVIRONMENT     DIVISION.
  2.  DATA            DIVISION.
  3.  WORKING-STORAGE SECTION.
  4.  01  FUNC  PIC X(10).
  5.  01  sPort         PIC S9(9) COMP-5.
  6.  01  InBuffer      PIC X(250).
  7.  01  BufferLen     PIC S9(9) COMP-5.  
  8.  PROCEDURE       DIVISION.
  9.      MOVE "setComPort" TO FUNC.
  10.      MOVE 1 TO sPort *> activamos COM1
  11.    
  12.      CALL "FUNC" WITH  STDCALL   USING BY VALUE sPort
  13.    
fastpho is offline   Responder Con Cita