Jump to content

Delphi chamada_delphi.png acbr.png

C6 chamada_c6.png botao.png

Possível alteração necessária unit pcesConversaoeSocial


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

Recommended Posts

Não estou postando a unit para que possam confirmar a alteração:

Segundo o manual temos duas possibilidades: 1 - produção e 2 - produção restrita. Hoje porém temos:

  TpTpAmb                 = (taProducao, taProducaoRestritaDadosReais, taProducaoRestritaDadosFicticios);
 

Como sugestão ficaria:

  TpTpAmb                 = (taProducao, taProducaoRestrita);

e

function eStpAmbToStr(const t: TptpAmb ): string;
begin
  result := EnumeradoToStr2(t,TGenericosString1_2 );
end;

function eSStrTotpAmb(var ok: boolean; const s: string): TptpAmb;
begin
  result  := TptpAmb( StrToEnumerado2(ok , s, TGenericosString1_2 ) );
end;

 

Sem título.png

Link to comment
Share on other sites

Sim na versão 2.4.1 tem somente dois tipos.

Estou usando por enquanto a 2.

 

Acho para compatibilidade deveria ficar

De:

   TpTpAmb                 = (taProducao, taProducaoRestritaDadosReais, taProducaoRestritaDadosFicticios);

Para:

  TpTpAmb                 = (taProducao, taProducaoRestritaDadosReais);

assim não atrapalharia quem esta usando somente os dois primeiros tipos.

Edited by EdmarFrazao
Link to comment
Share on other sites

Em cada evento tem o Registro/campo

  tpAmb

image.png.55f2419bf671f5060d04eacb2311c88b.png

que esta declarado  na pcesConversaoeSocial

TpTpAmb                 = (taProducao, taProducaoRestritaDadosReais, taProducaoRestritaDadosFicticios);

Hoje na versão 2.4.1 aceita somente

TpTpAmb                 = (taProducao, taProducaoRestritaDadosReais,);

 

 

A ACBreSocial.Configuracoes.WebServices.Ambiente  é outra configuração que esta declarada pncconversao e aceita.

     AACBreSocial.Configuracoes.WebServices.Ambiente    := pcnconversao.taProducao
    AACBreSocial.Configuracoes.WebServices.Ambiente    := pcnconversao.taHomologacao;

 

 

 

Link to comment
Share on other sites

  • Este tópico foi criado há 1570 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.