Bematech_FIR_RegistraVenda

Faz um registro de venda na mesa informada e cadastra o item no cardápio com o código informado se ele ainda não existir.

Parâmetros:

Mesa: STRING com o número da Mesa até 4 dígitos.

Codigo: STRING com o código do item até 14 dígitos.

Descricao: STRING com a descrição do item até 17 caracteres.

Aliquota: STRING com o valor ou o índice da alíquota tributária. Se for o valor deve ser informado com o tamanho de 4 caracteres ou 5 com a vírgula. Se for o índice da alíquota deve ser 2 caracteres. Ex. (18,00 para o valor ou 05 para o índice).

Quantidade: STRING com até 6 dígitos (são três casas decimais).

ValorUnitario: STRING com até 8 dígitos (são duas casas decimais).

FlagAcrescimoDesconto: "A" para acréscimo ou "D" para desconto.

ValorAcrescimoDesconto: STRING com até 8 dígitos (são duas casas decimais). Se não tiver acréscimo nem desconto use "0" no valor.

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ção:

- Esta função já cadastra o item no cardápio ao ser enviado para a impressora, não existe mais o camando para enviar cardápio para a impressora. A impressora verifica se o item já está cadastrado se não estiver o item será cadastrado no cardápio.

Exemplo:

' Exemplo em Visual Basic

iRetorno = Bematech_FIR_RegistraVenda("0001", "123", "Coca-Cola", "17,00", "3,000", "1,00", "A", "0")

// Exemplo em Delphi

cMesa           := '0001';

cCodigo         := '123';

cDescricao      := 'Coca-Cola';

cAliquota       := '17,00';

cQtde           := '3,000';

cValor          := '1,00';

cAcresDesc      := 'A';

cValorAcresDesc := '0';

iRetorno := Bematech_FIR_RegistraVenda( pchar( cMesa ),

                                       pchar( cCodigo ),

                                       pchar( cDescricao ),

                                       pchar( cAliquota ),

                                       pchar( cQtde ),

                                       pchar( cValor ),

                                       pchar( cAcresDesc ),

                                       pchar( cValorAcresDesc ) );