Jump to content

Seja-Profissional-Saiba-mais.png Beneficios_banner.png

 

click.png

click.png

click.png

click.png

click.png

click.png

click.png click.png click.png

click.png

click.png

click.png

Erro no evento S1280 Valor de tpIndSubstPatrOpPort


RenatoE
Go to solution Solved by EMBarbosa,
  • Este tópico foi criado há 244 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

Boa tarde, fiz a atualização porem encontrei um erro

ACBreSocial:

no evento 1280:

unit pcesS1280;
procedure TEvtInfoComplPer.GerarInfoSubstPatr;
    Gerador.wCampo(tcStr, '', 'indSubstPatr',   1, 1, 1, eSIndSubstPatrOpPortStr(InfoSubstPatr.indSubstPatr));


eSIndSubstPatrOpPortStr(InfoSubstPatr.indSubstPatr) ele recebe 3 valores      =   tpIndSubstPatrOpPort    = (spVazio, spIntegralmenteSubstituida, spParcialmenteSubstituida);

no momento que você envia spIntegralmenteSubstituida, ele estava colocando valor 2 sendo que o valor correto é 1

--------------------------------------------------------------------

O erro se encontra
na unit pcesConversaoeSocial;

na função com erro

function eSIndSubstPatrOpPortStr(const t: tpIndSubstPatrOpPort 😞 string;
begin
  result := EnumeradoToStr2(t,TGenericosString1_2 );
end;

Tem que alterar para Correção

function eSIndSubstPatrOpPortStr(const t: tpIndSubstPatrOpPort 😞 string;
begin
  result := EnumeradoToStr2(t,TGenericosString0_2 );
end;

 
Alterando aqui o valor passa a ser 1 como o correto, o motivo porque ele tem 3 valores  (spVazio, spIntegralmenteSubstituida, spParcialmenteSubstituida)

Quando tiver algum erro posso reportar no DISCORD?


pcesConversaoeSocial.pas

 

Att,

Renato

 

http://www.edsonbill.com

Link to comment
Share on other sites

  • 3 months later...
  • Consultores
  • Solution
Em 10/02/2021 at 15:54, RenatoE disse:

Boa tarde, fiz a atualização porem encontrei um erro

ACBreSocial:

no evento 1280:

unit pcesS1280;
procedure TEvtInfoComplPer.GerarInfoSubstPatr;
    Gerador.wCampo(tcStr, '', 'indSubstPatr',   1, 1, 1, eSIndSubstPatrOpPortStr(InfoSubstPatr.indSubstPatr));


eSIndSubstPatrOpPortStr(InfoSubstPatr.indSubstPatr) ele recebe 3 valores      =   tpIndSubstPatrOpPort    = (spVazio, spIntegralmenteSubstituida, spParcialmenteSubstituida);

no momento que você envia spIntegralmenteSubstituida, ele estava colocando valor 2 sendo que o valor correto é 1

--------------------------------------------------------------------

O erro se encontra
na unit pcesConversaoeSocial;

na função com erro

function eSIndSubstPatrOpPortStr(const t: tpIndSubstPatrOpPort 😞 string;
begin
  result := EnumeradoToStr2(t,TGenericosString1_2 );
end;

Tem que alterar para Correção

function eSIndSubstPatrOpPortStr(const t: tpIndSubstPatrOpPort 😞 string;
begin
  result := EnumeradoToStr2(t,TGenericosString0_2 );
end;

 
Alterando aqui o valor passa a ser 1 como o correto, o motivo porque ele tem 3 valores  (spVazio, spIntegralmenteSubstituida, spParcialmenteSubstituida)

Quando tiver algum erro posso reportar no DISCORD?


pcesConversaoeSocial.pas

 

Acredito que isso já esteja correto no SVN atual devido as alterações para o Layout Simples.

Queira verificar e dar um retorno caso necessário.

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

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

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link to comment
Share on other sites

  • Este tópico foi criado há 244 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

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...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.