Bematech_FIR_RegistroVendaSerial |
Retorna os registros de venda da mesa pela porta serial.
Parâmetro:
Mesa: STRING com o número da Mesa com até 4 dígitos.
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. -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 dos registros de venda no seguinte formato:
Mesa.............................................................: 4 bytes Valor unitário...................................................: 8 bytes Flag de acréscimo ou desconto ("A" - acréscimo "D" - desconto)...: 1 byte Valor do acréscimo/desconto......................................: 8 bytes Quantidade.......................................................: 6 bytes Código...........................................................: 14 bytes Descrição........................................................: 17 bytes Alíquota.........................................................: 2 bytes Flag de registro/cancelamento ("R" – registro "C" - cancelamento): 1 byte
Será retornada a posição onde foi gravada a alíquota, iniciando em "00". Por exemplo:
- para a alíquota T01 será retornada a posição "00"; - para a alíquota T02 será retornada a posição "01"; - para a alíquota T03 será retornada a posição "02";
e, assim, sucessivamente.
- para a alíquota de Isenção (II) será retornada a posição "16"; - para a alíquota de Substituição Tributária (FF) será retornada a posição "17" e; - para a alíquota de Não Incidência (NN) será retornada a posição "18".
Exemplo:
' Exemplo em Visual Basic iRetorno = Bematech_FIR_RegistroVendaSerial("0001")
// Exemplo em Delphi cMesa := '0001'; iRetorno := Bematech_FIR_RegistroVendaSerial( pchar( cMesa ) ); |