Sangria Com a FS800i da Daruma

[AutomoSistema]

Bom dia a todos, estou tendo problema no método sangria com a impressora fiscal da daruma modelo fs800i

local tb_valor := "10,20"
local tb_msg := "Brasil"

nLib32 := LoadLibrary( "DarumaFrameWork.dll" ) // aqui carrega a dll da impressora fiscal
iretorno := DllCall( nLib32, 32 , "iSangria_ECF_Daruma" , tb_valor , tb_msg )

o interessante é só com este método que dá erro, fico grato pela ajuda

[wmanesco]

Não conheço muito bem essa ecf/dll mas o parametro do valor não deve ser passado como numérico ao invés de string?

[AutomoSistema]

Sim, deve ser como uma string e é ai que não vai e dá este erro[img]c:\loja\sangria.jpg[/img]

[wmanesco]

Não deu para ver a imagem que vc anexou

[lucimauro]

Bom dia.

Nessa caso o parâmetro valor da sangria deve ser passado como abaixo.
tp_valor:=strzero(valor,11,2) e não com 10,00 como você esta passando

Tente assim.

[AutomoSistema]

Boa tarde, a mensagem que tenho de retorno é esta

[wmanesco]

A DLL da daruma geralmente grava um arquivo de log, se o seu não estiver gravando, deve ativar AUDITORIA no xml que a dll cria, exemplo:
Tenta olhar este log para ver se tem mais informações do erro

Código: Selecionar todos

<ECF>
<AguardarBitmapRZ>0</AguardarBitmapRZ>
<AguardarImpressao>1</AguardarImpressao>
<ArquivoLeituraX>LeituraX.ser</ArquivoLeituraX>
<ArredondarTruncar>A</ArredondarTruncar>
<Auditoria>1</Auditoria> --> ESTE AQUI DEVE ESTAR 1
<CaracterSeparador>;</CaracterSeparador>
<ControleAutomatico>1</ControleAutomatico>
<DelayEntreBytes>010</DelayEntreBytes>
<EncontrarECF>1</EncontrarECF>
<EmErroBuscarPorta>0</EmErroBuscarPorta>
<EnviarAvisoAoUsuario>0</EnviarAvisoAoUsuario>
<EnviarErroAoUsuario>0</EnviarErroAoUsuario>
<FarmaciaPopular>0</FarmaciaPopular>
<GerandoRelatorio>0</GerandoRelatorio>
<LegendaInmetro>0</LegendaInmetro>
<LMFCompleta>0</LMFCompleta>
<MaxFechamentoAutomatico>0</MaxFechamentoAutomatico>
<MensagemApl1>DarumaFramework - Mensagem No Programada</MensagemApl1>
<MensagemApl2>DarumaFramework - Mensagem No Programada</MensagemApl2>
<MensagemAviso>AVISO: [O PAPEL ESTA ACABANDO!!]. INSIRA NOVA BOBINA DE PAPEL.</MensagemAviso>
<ModoGaveta>0</ModoGaveta>
<NaoAvisarPoucoPapel>0</NaoAvisarPoucoPapel>
<NomeUltimoCMD>rVerificarImpressoraLigada_ECF_Daruma</NomeUltimoCMD>
<PortaSerial>COM1</PortaSerial>
<ReceberAvisoEmArquivo>0</ReceberAvisoEmArquivo>
<ReceberDescricaoAvisoEmArquivo>0</ReceberDescricaoAvisoEmArquivo>
<ReceberDescricaoErroEmArquivo>0</ReceberDescricaoErroEmArquivo>
<ReceberErroEmArquivo>0</ReceberErroEmArquivo>
<ReceberInfoEstendida>1</ReceberInfoEstendida>
<ReceberInfoEstendidaEmArquivo>0</ReceberInfoEstendidaEmArquivo>
<ReducaoZAutomatica>1</ReducaoZAutomatica>
<RetornarAvisoErro>0</RetornarAvisoErro>
<SangriaMensagem></SangriaMensagem>
<SangriaValor>100</SangriaValor>
<SerialByteAByte>0</SerialByteAByte>
<SinalSonoroIniciar>1</SinalSonoroIniciar>
<SuprimentoMensagem></SuprimentoMensagem>
<SuprimentoValor>100</SuprimentoValor>
<TipoUltimoDocumento>4</TipoUltimoDocumento>
<TituloMensagem>[DarumaFramework]</TituloMensagem>
<Velocidade>9600</Velocidade>
<VelocidadeAntiga>9600</VelocidadeAntiga>
<Wine>0</Wine>
<CF>
<BMP>0</BMP>
<CupomAdicionalDllConfig>111111111100000000000</CupomAdicionalDllConfig>
<CupomAdicionalDllTitulo>Cupom Adicional</CupomAdicionalDllTitulo>
<CupomMania>0</CupomMania>
<FormaPgto>Dinheiro</FormaPgto>
<IdentificaConsumidorFormatado></IdentificaConsumidorFormatado>
<MensagemFormaPagamento></MensagemFormaPagamento>
<MensagemPromocional></MensagemPromocional>
<MinasLegal>0</MinasLegal>
<ModoPreVenda>0</ModoPreVenda>
<Quantidade>0</Quantidade>
<TamanhoMinimoDescricao>15</TamanhoMinimoDescricao>
<TipoDescAcresc>D%</TipoDescAcresc>
<UnidadeMedida>un</UnidadeMedida>
<ValorDescAcresc>0.00</ValorDescAcresc>
</CF>
<CCD>
<DocOrigem>000097</DocOrigem>
<FormaPgto>Cheque</FormaPgto>
<LinhasTEF>20</LinhasTEF>
<Parcelas>01</Parcelas>
<Valor>000000100000</Valor>
</CCD>
<CHEQUE>
<XLinha1>10</XLinha1>
<XLinha2>10</XLinha2>
<XLinha3>10</XLinha3>
<YLinha1>10</YLinha1>
<YLinha2>20</YLinha2>
<YLinha3>30</YLinha3>
</CHEQUE>
<REDUCAOZ>
<AvisarOperacoesReducaoZ>0</AvisarOperacoesReducaoZ>
<AvisarReducaoZ>0</AvisarReducaoZ>
<Relatorios></Relatorios>
<PeriodoInicial></PeriodoInicial>
<PeriodoFinal></PeriodoFinal>
<ChavePrivada></ChavePrivada>
<ExecutarAntesOuDepois>1</ExecutarAntesOuDepois>
<MensagemAviso>Geracao de relatorio sera executada automaticamente apos a reducao Z, favor nao desligar a impressora</MensagemAviso>
<RetornarInformacao></RetornarInformacao>
<TimeOutReducaoZ>30</TimeOutReducaoZ>
</REDUCAOZ>
<SINTEGRA>
<Bairro>Jerei</Bairro>
<CEP>12345.123</CEP>
<Cod_Convenio>1</Cod_Convenio>
<Cod_Finalidade>1</Cod_Finalidade>
<Cod_Natureza>1</Cod_Natureza>
<Complemento>Complemento</Complemento>
<Contato_Nome>Nome Contato</Contato_Nome>
<Contato_Telefone>(12) 1234-1234</Contato_Telefone>
<Fax>(12) 1234-1234</Fax>
<Logradouro>Logradouro</Logradouro>
<Municipio>Municipio</Municipio>
<Numero>12345</Numero>
<UF>XX</UF>
</SINTEGRA>
<ATOCOTEPE>
<Automatico>0</Automatico>
</ATOCOTEPE>
</ECF>

[AutomoSistema]

Bom dia, bom o arquivo auditoria já criei, porem não sei como olhar, tem como por gentileza me ajudar?

[AutomoSistema]

Todos os outros métodos que venho trabalhando com a impressora vêm funcionado normalmente com a exerção dos métodos da sangria e suprimento. Pergunto será que não é problema da dll?

[wmanesco]

Posso tentar olhar o arquivo, manda o arquivo auditoria após você simular o erro.

Olha, acredito que não. Qual versão está utilizando da DLL?

Em ultimo caso você pode tentar entrar em contato com o suporte da própria daruma que é excelente.

[wmanesco]

Tenta passar um valor assim:

Código: Selecionar todos

cVal := "00000010.00"

Pois no manual diz que este campo tem 11 caracteres, não sei se é isso. Seria mais um chute mesmo.