e-Social S-1005 erro de preenchimento tag contPCD

[anderson.mendonca]

Caros colegas,

As opções de preenchimento da tag contPCD do evento S-1005 são 0,1, 2 e 9.
Estou informando o número 9 (nove) e o XML está gerando esta tag com o conteúdo 3.
Alguém saberia me dizer o que estou fazendo de errado?

Obrigado.

 

[Paulo Aguiar Junior]

@anderson.mendonca

Boa tarde!

Como você está preenchendo o campo? Coloca o trecho do código...

 

[anderson.mendonca]

Paulo Aguiar Junior, obrigado por responder.

O usuário configura este campo com as opções 0, 1, 2 ou 9.

    evtTabEstab.infoEstab.DadosEstab.infoTrab.infoPCD.contPCD :=
      tpContPCD(Dtm_eSocial.Qry_Empresasemp_esocial_pcd_indic_contrat.AsInteger);

O conteúdo de Dtm_eSocial.Qry_Empresasemp_esocial_pcd_indic_contrat.AsInteger é 9.

 

[anderson.mendonca]

Paulo Aguiar Junior, consegui corrigir o problema desta forma:

    if Dtm_eSocial.Qry_Empresasemp_esocial_pcd_indic_contrat.AsInteger = 1 then
      evtTabEstab.infoEstab.DadosEstab.infoTrab.infoPCD.contPCD := tpContPCD(1)
    else if Dtm_eSocial.Qry_Empresasemp_esocial_pcd_indic_contrat.AsInteger = 2 then
      evtTabEstab.infoEstab.DadosEstab.infoTrab.infoPCD.contPCD := tpContPCD(2)
    else if Dtm_eSocial.Qry_Empresasemp_esocial_pcd_indic_contrat.AsInteger = 9 then
      evtTabEstab.infoEstab.DadosEstab.infoTrab.infoPCD.contPCD := tpContPCD(3)
    else
      evtTabEstab.infoEstab.DadosEstab.infoTrab.infoPCD.contPCD := tpContPCD(0);

Muito obrigado por responder.

 

[Felipe E. Resende Mesquita]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.