Ir para conteúdo
  • Cadastre-se

dev botao

Novo Layout e Ambiente de Testes


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

Recommended Posts

Bom dia, estou tentando ler o XML convertendo dados para os tipos esperados, usando as funções de conversão, porém, da erro:

[dcc32 Error] uESocial.pas(791): E2033 Types of actual and formal var parameters must be identical

evtInfoEmpregador.InfoEmpregador.InfoCadastro.IndConstr         := eSStrToIndConstrutora(vLeitor.rCampo(tcStr, 'indConstr'));

function eSStrToIndConstrutora(var ok: boolean; const s: string): TpIndConstr;
begin
  result := TpIndConstr( StrToEnumerado2(ok , s, TGenericosString0_1 ) );
end;

pesquisando na internet, só deu certo se tiro a palavra reservada "var" da function e passo o parâmetro "true" na chamada da função:

function eSStrToIndConstrutora(ok: boolean; const s: string): TpIndConstr;
begin
  result := TpIndConstr( StrToEnumerado2(ok , s, TGenericosString0_1 ) );
end;

evtInfoEmpregador.InfoEmpregador.InfoCadastro.IndConstr         := eSStrToIndConstrutora(True,vLeitor.rCampo(tcStr, 'indConstr'));

alguém sabe como resolver sem mexer no código da classe ACBr?

 

Se quiser ir rápido, vá sozinho.
Se quiser ir longe, vá em grupo.
Provérbio Africano.

2023 ano XXVI

Link para o comentário
Compartilhar em outros sites

  • Moderadores
Em 22/12/2017 at 11:28, Zottis disse:

Bom dia, estou tentando ler o XML convertendo dados para os tipos esperados, usando as funções de conversão, porém, da erro:

[dcc32 Error] uESocial.pas(791): E2033 Types of actual and formal var parameters must be identical

evtInfoEmpregador.InfoEmpregador.InfoCadastro.IndConstr         := eSStrToIndConstrutora(vLeitor.rCampo(tcStr, 'indConstr'));

function eSStrToIndConstrutora(var ok: boolean; const s: string): TpIndConstr;
begin
  result := TpIndConstr( StrToEnumerado2(ok , s, TGenericosString0_1 ) );
end;

pesquisando na internet, só deu certo se tiro a palavra reservada "var" da function e passo o parâmetro "true" na chamada da função:

function eSStrToIndConstrutora(ok: boolean; const s: string): TpIndConstr;
begin
  result := TpIndConstr( StrToEnumerado2(ok , s, TGenericosString0_1 ) );
end;

evtInfoEmpregador.InfoEmpregador.InfoCadastro.IndConstr         := eSStrToIndConstrutora(True,vLeitor.rCampo(tcStr, 'indConstr'));

alguém sabe como resolver sem mexer no código da classe ACBr?

 

Sim crie uma variável local booleana e passe ali. 

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

  • 1 mês depois ...

Boa tarde.

estou testando o esocial e tive um problema com o tpIndMatProc .  Para acertar, precisei criar mais uma opção que se refere a contribuição sindical. no manual constam as seguintes alternativas 

1 - Tributária; 2 - Autorização de trabalho de menor; 3 - Dispensa, ainda que parcial, de contratação de pessoa com deficiência (PCD); 4 - Dispensa, ainda que parcial, de contratação de aprendiz; 5 - Segurança e Saúde do Trabalho; 6 - Conversão de Licença Saúde em Acidente de Trabalho; 7 - FGTS; 8 - Contribuição sindical; 99 - Outros assuntos.

e na unit eSocial_Conversao uma opção a menos

impTributariaouRelativaFGTS, impAutorizacaoTrabalhadorMenor, impDispensaPCD,  impDispensaAprendiz, impSegurancaoeSaudeTrabalhador, impConversaoLicencaSaudeAcidenteTrabalho,    impOutros

 

grata

Link para o comentário
Compartilhar em outros sites

21 minutos atrás, maryog disse:

Boa tarde.

estou testando o esocial e tive um problema com o tpIndMatProc .  Para acertar, precisei criar mais uma opção que se refere a contribuição sindical. no manual constam as seguintes alternativas 

1 - Tributária; 2 - Autorização de trabalho de menor; 3 - Dispensa, ainda que parcial, de contratação de pessoa com deficiência (PCD); 4 - Dispensa, ainda que parcial, de contratação de aprendiz; 5 - Segurança e Saúde do Trabalho; 6 - Conversão de Licença Saúde em Acidente de Trabalho; 7 - FGTS; 8 - Contribuição sindical; 99 - Outros assuntos.

e na unit eSocial_Conversao uma opção a menos

impTributariaouRelativaFGTS, impAutorizacaoTrabalhadorMenor, impDispensaPCD,  impDispensaAprendiz, impSegurancaoeSaudeTrabalhador, impConversaoLicencaSaudeAcidenteTrabalho,    impOutros

 

grata

Evite postar em topicos que não são sobre o assunto, deveria ser um tópico sobre S-1070

 

e Nos fontes atuais já estão contemplados os códigos veja unit pcesConversaoeSocial

 tpIndMatProc            = (impTributaria, impAutorizacaoTrabalhadorMenor, impDispensaPCD,
                             impDispensaAprendiz, impSegurancaoeSaudeTrabalhador, impConversaoLicencaSaudeAcidenteTrabalho,
                             impFGTS,impContribuicaoSindical, impOutros);

Link para o comentário
Compartilhar em outros sites

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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...