Ver Mensaje Individual
  #4
Antiguo 2 de febrero de 2022, 20:45
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 21.08.2026 18:08
Posts Posts: 365
Likes enviados Enviados: 252
Likes recibidos Recibidos: 243

@Ale, el archivo cobol85.cbr es una archivo de texto , los editas con cualquier editor como bloc de notas o notepad etc ....
te quedaria algo asi ejemplo:
Código COBOL:
  1. [MainForm.Entry]
  2. SerialPortOpen=Sam4sFiscaldriver.dll
  3. SerialBaudset=Sam4sFiscaldriver.dll  
  4. AbrirTique=Sam4sFiscaldriver.dll

Luego dentro de tu aplicacion llamas a la funcion :

Código COBOL:
  1. WORKING-STORAGE SECTION.
  2.  01  Respuesta-Impresor       PIC S9(9) COMP-5.
  3.  01  Puerta                               PIC S9(9) COMP-5.
  4.  01  Funcion                             PIC X(50).
  5.  PROCEDURE DIVISION.
  6.      
  7.      MOVE "SerialPortOpen"   TO Funcion.              
  8.      MOVE 1                              TO Puerta. *>  COM1
  9.  
  10.      CALL Funcion  STDCALL  USING BY VALUE Puerta returning Respuesta-Impresor.

Hay muchos ejemplos en el foro de como implementarlo , bajate alguno y miralos .
Saludos
fastpho is offline   Responder Con Cita