Retorna as formas de pagamento e seus valores acumulados.
Parâmetro:
FormasPagamento: Variável string com 3016 posições para receber as formas programadas + 1 posição para o NULL.
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: |
Descrição 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). |
| · | 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(3017)
iRetorno = Bematech_FI_VerificaFormasPagamento(FormasPagamento)
// Exemplo em Delphi
for iConta := 1 to 3017 do FormasPagamento := FormasPagamento + ' ';
iRetorno := Bematech_FI_VerificaFormasPagamento( FormasPagamento );
|