Jump to content

SUPER OFERTA!
Compre o Delphi com 45% de desconto

botao_delphi.png

110.png

Curso Gratuito para todos Usuários
+ Super Treinamento Assinando o SAC Anual

botao_campanha_thulio.png

sem_ttulo-620.fw_-e1583866078274.png 

Curso Dominando o ACBrMonitor
Novo Módulo Soluções de Varejo
Assine o SAC ACBr em qualquer plano e tenha acesso

Saiba Mais

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba Mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

theiller

Falha ACBrEPCBlocos StrToInd_Rec

Recommended Posts

Favor corrigir falha na conversão de texto pra tipo:

Unit: ACBrEPCBlocos

Function: StrToInd_Rec

AValue = '03'

 

function StrToInd_Rec(const AValue: string):TACBrInd_Rec;
begin
  if AValue = '01' then
    Result := crCliente
  else if AValue = '02' then
    Result :=  crAdministradora
  else if AValue = '03' then
    Result :=   crTituloDeCredito
  else if AValue = '04' then
    Result :=    crDocumentoFiscal
  else if AValue = '05' then
    Result :=   crItemVendido
  else if AValue = '99' then
    Result :=   crOutros
    else
     raise Exception.Create(format('Valor informado [%s] deve estar entre (01,02,03,04,05 e 99)',[AValue]));
end;

StrToInd_Rec_03.png

Share this post


Link to post
Share on other sites

Boa tarde.

Você chegou a realizar a alteração? Se sim, por favor anexe a unit alterada.

Att.

  • Like 1

Consultora SAC ACBr

Juliana Tamizou
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...