Bematech_FI_VerificaFormasPagamento |
Retorna as formas de pagamento e seus valores acumulados.
Parâmetro:
FormasPagamento: Variável string com 3016 posições para receber as formas programadas.
Possíveis retornos da Função (INTEIRO):
0: Erro de comunicação. 1: OK. -1: Erro de execução da função. -4: O arquivo de inicialização BemaFI32.ini não foi encontrado no diretório de sistema do Windows. -5: Erro ao abrir a porta de comunicação. -8: Erro ao criar ou gravar no arquivo STATUS.TXT ou RETORNO.TXT. -27: Status da impressora diferente de 6,0,0 (ACK, ST1 e ST2).
Observações:
- Essa função retorna as informações das formas de pagamento na seguinte ordem:
Descricao da forma de pagamento.....................: 16 bytes Valor acumulado (2 casas decimais)..................: 20 bytes Valor recebido no último cupom (2 casas decimais)...: 20 bytes Valor indicando se a forma foi usada para a emissão do cupom não fiscal vinculado (1 usado, 0 não usado): 1 byte
- São retornadas 50 formas de pagamento mais a forma "Valor Recebido" e "Troco" obedecendo a ordem descrita anteriormente. As formas de pagamento são separadas por vírgula. Veja exemplo a seguir:
Dinheiro 00000000000000041558000000000000000015580, Cartao Credito 00000000000000039470000000000000000000000, Cheque 00000000000000028940000000000000000000000, Ticket 00000000000000009000000000000000000000000, 00000000000000000000000000000000000000000, 00000000000000000000000000000000000000000, . . . Valor Recebido 00000000000000118968000000000000000015580, Troco 00000000000000000000000000000000000000000
- A impressora permite programar até 49 formas de pagamento, sendo que a forma de pagamento "01" é sempre "Dinheiro". As formas de pagamento que não estiverem programadas estarão com os valores zerados e a descrição em branco (veja exemplo acima).
- Na impressora fiscal YANCO só é permitido programar até 30 formas de pagamento, apenas por Interveção Técnica.
- Nas impressoras fiscais MP-25 FI, MP-50 FI e térmicas serão retornadas somente 20 formas de pagamento que é a quantidade permitida, as demais posições serão retornadas com espaços em branco.
Exemplo:
' Exemplo em Visual Basic FormasPagamento = Space(3016) iRetorno = Bematech_FI_VerificaFormasPagamento(FormasPagamento)
// Exemplo em Delphi for iConta := 1 to 3016 do FormasPagamento := FormasPagamento + ' '; iRetorno := Bematech_FI_VerificaFormasPagamento( FormasPagamento ); |