Bematech_FI_VendeItemDepartamento

Bematech_FI_VendeItemDepartamento

Essa função permite a venda de itens com entrada de departamento, desconto e unidade de medida.

Parâmetros:

Codigo: STRING até 49 caracteres com o código do produto.

Descricao: STRING até 201 caracteres com a descrição do produto.

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)

ValorUnitario: STRING com até 9 dígitos para o valor (tres casas decimais).

Quantidade: STRING com até 7 dígitos para a quantidade. Na venda com departamento a quantidade é fracionária e são 3 casas decimais.

Acrescimo: STRING com o acréscimo por valor com até 10 dígitos (2 casas decimais).

Desconto: STRING com o desconto por valor com até 10 dígitos (2 casas decimais).

IndiceDepartamento: STRING com o índice do departamento com 2 dígitos.

UnidadeMedida: STRING com 2 caracteres para a unidade de medida. Caso não seja passado nenhum caracter a unidade não é impressa.

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

0: Erro de comunicação.

1: OK.

-2: Parâmetro inválido na função.

-3: Alíquota não programada.

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

• Obedece as mesmas situações descrita na função Bematech_FI_VendeItem.

• Deve ser informado "01" no parâmetro "IndiceDepartamento", obrigatoriamente, para os modelos de ECF térmicos, MP-25 FI e MP-50 FI.

Exemplo:

' Exemplo em Visual Basic

iRetorno = Bematech_FI_VendeItemDepartamento("123", "Caneta", "1200", "0,25", "10", "0", "0", "01", "UN")

// Exemplo em Delphi

cCodigo    := '123';

cDescricao := 'Caneta';

cAliquota  := '1200';

cValor     := '0,250';

cQtde      := '10,000';

cAcresc    := '0';

cDesc      := '0';

cIndice    := '01';

cUnidade   := 'UN';

iRetorno := Bematech_FI_VendeItemDepartamento( pchar( cCodigo ), pchar( cDescricao ), pchar( cAliquota ), pchar( cValor ), pchar( cQtde ), pchar( cAcresc ), pchar( cDesc ), pchar( cIndice ), pchar( cUnidade ) );