Jump to content
Fivewin Brasil

ecf icash


jose hilton

Recommended Posts

Bom dia

Estou tentando tirar um X nesta empressora ICASH IF-ECF

mas nao consigo sooocooorooo

mim ajudem por favor URGENTE

#include 'fivewin.ch'

#include "winapi.ch"

static cdll,CPORTA

function main()

local retorno

X:="COM1"

CDLL:=LOADLIB32("ICASH.dll")

CPORTA:=ICASH_Abre("1")

MSGINFO(CPORTA,"ABRE")

PRIV ESTADO :=SPACE(2)

ICASH_LeituraX(estado)

ICASH_FECHA()

RETURN NIL

DLL32 Function ICASH_Abre(ICASH_PortaSerial As STRING) As _INT PASCAL LIB "icash.dll"

DLL32 Function ICASH_LeituraX(cporta AS STRING,ICASH_Estado AS STRING) AS LONG PASCAL lib "icash.dll"

DLL32 Function ICASH_Fecha(CPORTA AS 8) AS 7 PASCAL Lib "icash.dll"

DLL32 Function ICASH_AvancaLinha(ICASH_Numero AS 8,ICASH_Estado AS 8) AS 7 PASCAL Lib "iCash.dll"

Hilton

www.josehiltonribeiro@oi.com.br

planetabeleza.perovaz@hotmail.com.br

fw 192. blinker 7.0

Link to comment
Share on other sites

  • 3 months later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
×
×
  • Create New...