RenatoE

Boa tarde, Descobri o erro. Segue o XML com sucesso de um funcionário com 2 Vinculo.
Qualquer duvida pode manda mensagem.

13850175500000xxxxxxxxxxxx90700002-S-1200-1.xml

@PEDRO ANTONIO STOCO NETO o que eles me passaram, foi para que eu olha-se o manual.
@Alisson Souza Pereira eu olhei o manual, na parte de "12.4. Adiantamento de Retenção (exclusivamente para DCTFWeb 13º Salário) Créditos Vinculáveis→Deduções→Adiantamento de Retenção"
  

Eu avisei meu cliente para fazer isso e depois entrar em contato com eSocial novamente se der o erro de retorno.
 
 
@Neto Matos de uma olhada no manual o link esta logo a cima.

@Italo Jurisato Junior eu arrumei aqui de uma olhada no fonte que eu fiz. e me fala se esta OK 
Italo eu coloquei no  pcesCommon.pas   --->>  FExtrangeiroSN : Boolean; --->> motivo quando ele chegava "GerarEndereco" estava sempre passando FALSE ai ficava BRASIL sempre
TTrabalhador = class(TPersistent) private FCpfTrab: string; FNisTrab: string; FNmTrab: string; FSexo: string; FRacaCor: integer; FEstCiv: integer; FGrauInstr: string; FNmSoc: string; FIndPriEmpr: tpSimNao; FNascimento: TNascimento; FDocumentos: TDocumentos; FEndereco: TEndereco; FTrabEstrangeiro: TTrabEstrangeiro; FInfoDeficiencia: TInfoDeficiencia; FDependente: TDependenteCollection; FAposentadoria: TAposentadoria; FContato: TContatoTrabalhador; FExtrangeiroSN : Boolean; public constructor Create; destructor Destroy; override; property CpfTrab: string read FCpfTrab write FCpfTrab; property NisTrab: string read FNisTrab write FNisTrab; property NmTrab: string read FNmTrab write FNmTrab; property Sexo: string read FSexo write FSexo; property RacaCor: integer read FRacaCor write FRacaCor; property EstCiv: integer read FEstCiv write FEstCiv; property GrauInstr: string read FGrauInstr write FGrauInstr; property nmSoc: string read FNmSoc write FNmSoc; property IndPriEmpr: tpSimNao read FIndPriEmpr write FIndPriEmpr; property Nascimento: TNascimento read FNascimento write FNascimento; property Documentos: TDocumentos read FDocumentos write FDocumentos; property Endereco: TEndereco read FEndereco write FEndereco; property TrabEstrangeiro: TTrabEstrangeiro read FTrabEstrangeiro write FTrabEstrangeiro; property InfoDeficiencia: TInfoDeficiencia read FInfoDeficiencia write FInfoDeficiencia; property Dependente: TDependenteCollection read FDependente write FDependente; property Aposentadoria: TAposentadoria read FAposentadoria write FAposentadoria; property Contato: TContatoTrabalhador read FContato write FContato; property ExtrangeiroSN: Boolean read FExtrangeiroSN write FExtrangeiroSN; end; procedure TeSocialEvento.GerarEndereco(pEndereco: TEndereco; pExterior: boolean); begin Gerador.wGrupo('endereco'); if not pExterior then GerarEnderecoBrasil(pEndereco.Brasil) else GerarEnderecoExterior(pEndereco.Exterior); Gerador.wGrupo('/endereco'); end; e dentro do evento S2200 e S2300 tem que colocar se ele é exterior ou não
S2300
EvtTSVInicio.Trabalhador.ExtrangeiroSN := True
S2200
EvtAdmissao.Trabalhador.ExtrangeiroSN := True;
 
Verifica e me da uma posição
pcesCommon.pas
pcesGerador.pas