Bematech_FIR_FechaCupomRestaurante

 

Fecha o cupom fiscal na impressora restaurante com acréscimo ou desconto, usando apenas uma forma de pagamento.

 

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 ou "D" para desconto.

 

TipoAcrescimoDesconto: Indica se o acréscimo ou desconto é por valor ou por percentual. "$" para desconto por valor ou "%" 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é 490 caracteres.

 

Retornos da Função (INTEIRO):

 

0 - Erro de comunicação.

1 - Ok.

-2 - Parâmetro inválido.

-4 - Arquivo ini não encontrado ou parâmetro inválido para o nome da porta.

-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 dessa 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. Para fechar o cupom usando mais de uma forma de pagamento você deve usar as mesmas funções usadas na impressora fiscal normal: Bematech_FI_IniciaFechamentoCupom para iniciar o fechamento do cupom, a Bematech_FI_EfetuaFormaPagamento várias vezes até usar todas as formas e a Bematech_FI_TerminaFechamentoCupom para fechar o cupom fiscal.

 

Exemplo:

 

' Exemplo em Visual Basic

iRetorno = Bematech_FIR_FechaCupomRestaurante("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_FIR_FechaCupomRestaurante( pchar( cFormaPgto ),

                                               pchar( cAcresDesc ),

                                               pchar( cTipoAcresDesc ),

                                               pchar( cValorAcresDesc ),

                                               pchar( cValorPago ),

                                               pchar( cMsgPromocional ) );