karlosrapanui

Tenho que gerar 2 cadastros para o mesmo evento, no caso 2400, pois a mesma pessoa é APOSENTADO E PENSÃO de um regime RPPS. Um vai normal e o outro retorna erro 106. Os CPF são iguais, porem com número funcional diferente. Como solucionar isso ?

Estou usando o componente acbresocial para gerar xml de uma tabela ado do meu sistema...... ACBreSocial1.Eventos.SaveToFiles; frmDM_eSocial.ADOqrS1030.First; with frmDM_eSocial.ADOqrS1030 do begin { AQUI ELE ESTA UNINDO } // ACHO EU ACBreSocial1.Enviar(TESocialGrupo(rdgGrupo.ItemIndex + 1)); MemoResp.Lines.Text := ACBreSocial1.WebServices.EnvioLote.RetWS; with ACBreSocial1.WebServices.EnvioLote.RetEnvioLote do begin { ENVIADO COM SUCESSO } if Status.cdResposta in [201, 202] then begin with frmDM_eSocial.ADOqrS1030_update DO begin Close; SQL.Text := ''; SQL.Text := 'UPDATE ESOCIAL_S1030 SET XML = '''+MemoXmlEnvio.Lines.Text+''' WHERE CODS1030 = '+IntToStr(idTabela)+''; // AQUI ELE ESTA GRAVANDO NO CAMPO XML UM UNICO XML COM OS 2 REGISTROS ExecSQL; end; end else begin for i := 0 to Status.Ocorrencias.Count - 1 do begin with Status.Ocorrencias.Items do begin { ERRO } with frmDM_eSocial.ADOqrS1030_update DO begin Close; SQL.Text := ''; SQL.Text := 'UPDATE ESOCIAL_S1030 SET MENSAGEMERROINTEGRIDADE = '''+msgErro+''' WHERE CODS1030 = '+IntToStr(idTabela)+''; ExecSQL; end; end; end; end; end; frmDM_eSocial.ADOqrS1030.Next; end; frmDM_eSocial.ADOqrS1030_update.Close; frmDM_eSocial.ADOqr_lote.Close; Como ainda não estou muito familiarizado com o componente, peço a ajuda de vocês para ver o que acontece... Eu preciso gerar um xml para cada registro. Valeu e obrigado