Bematech_FI_FechaCupom

Fecha o cupom fiscal com a impressão da mensagem promocional.

Parâmetros:

FormaPagamento: STRING com o nome da forma de pagamento com no máximo 16 caracteres.

AcrescimoDesconto: Indica se haverá acréscimo ou desconto no cupom. 'A' para acréscimo e 'D' para desconto.

TipoAcrescimoDesconto: Indica se o acréscimo ou desconto é por valor ou por percentual. '$' para desconto por valor e '%' para percentual.

ValorAcrescimoDesconto: STRING com no máximo 14 dígitos para acréscimo ou desconto por valor e 4 dígitos para acréscimo ou desconto por percentual.

ValorPago: STRING com o valor pago com no máximo 14 dígitos.

Mensagem: STRING com a mensagem promocional com até 384 caracteres (8 linhas X 48 colunas), para a impressora fiscal MP-20 FI II, e 320 caracteres (8 linhas X 40 colunas), para a impressora fiscal MP-40 FI II.

Possíveis retornos da Função (INTEIRO):

0: Erro de comunicação.

1: OK.

-2: Parâmetro inválido na 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.

-27: Status da impressora diferente de 6,0,0 (ACK, ST1 e ST2).

Observações:

- O cupom deve estar aberto.

- Pelo menos 1 (um) item deve ter sido vendido e não pode ter sido cancelado.

- A utilização essa função elimina a obrigatoriedade de uso das funções Bematech_FI_IniciaFechamentoCupom, Bematech_FI_EfetuaFormaPagamento e Bematech_FI_TerminaFechamentoCupom que estão implementadas internamente na função.

- Na impressora fiscal YANCO, se a forma de pagamento não estiver cadastrada na impressora, a função retorna erro. A programação das formas de pagamento é feita, somente, por Interveção Técnica.

Exemplo:

' Exemplo em Visual Basic

iRetorno = Bematech_FI_FechaCupom("Dinheiro", "A", "$", "0000", "35,00", "Obrigado, volte sempre !!!")

// Exemplo em Delphi

cFormaPgto      := 'Dinheiro';

cAcresDesc      := 'A';

cTipoAcresDesc  := '$';

cValorAcresDesc := '0000';

cValorPago      := '35,00';

cMsgPromocional := 'Obrigado, volte sempre !!!';

iRetorno := Bematech_FI_FechaCupom( pchar( cFormaPgto ),

                                   pchar( cAcresDesc ),

                                   pchar( cTipoAcresDesc ),

                                   pchar( cValorAcresDesc ),

                                   pchar( cValorPago ),

                                   pchar( cMsgPromocional ) );