Tomador de Servico ( Outros ) nao esta aparecendo no CTE

[walter faria]

Bom dia 

estou preenchendo os dados Toma03, Toma4 no CTE e nao esta aparecendo os dados no CTE 
Alguem sabe o pq ?

Obrigado

abaixo a imagem do XML ( parte dele )




 

[BigWings]

Está informando a tag toma4.IE ou a toma4.xNome?

Pelo que vejo nos fontes a única condição para não gerar o grupo toma4 é informar essas duas tags em branco.

[walter faria]

Boa tarde 
estou sim , veja o codigo

         //Toma4
         Ide.indIEToma:= inContribuinte;
         if sqlXMLIETomador.AsString = 'ISENTO' then
         begin
          Ide.indIEToma:= inIsento;
          Ide.Toma4.IE      := 'ISENTO';
         end
         else
         if sqlXMLIETomador.AsString = 'VAZIO' then
         begin
          Ide.indIEToma:= inNaoContribuinte;
          Ide.Toma4.IE      := '';
         end
         else
         if sqlXMLIETomador.AsString <> '' then
         begin
          Ide.indIEToma:= inContribuinte;
          Ide.Toma4.IE := sqlXMLIETomador.AsString;
         end
         else
          Ide.indIEToma:= inNaoContribuinte;

         Ide.Toma4.CNPJCPF           := sqlXMLCNPJTomador.AsString;
         Ide.Toma4.xNome             := sqlXMLNomeTomador.AsString;
         Ide.Toma4.xFant             := sqlXMLNomeTomador.AsString;
         Ide.Toma4.fone              := '00000000'; //copy(TelefoneRemetente, 1, 12);
         Ide.Toma4.EnderToma.xLgr    := sqlXMLEnderecoTomador.AsString;
         Ide.Toma4.EnderToma.nro     := sqlXMLNumeroTomador.AsString;
         Ide.Toma4.EnderToma.xCpl    := sqlXMLComplTomador.AsString;
         Ide.Toma4.EnderToma.xBairro := Formatar(sqlXMLBairroTomador.AsString, 3, true, 'X');
         Ide.Toma4.EnderToma.cMun    := sqlXMLIbgeTomador.AsInteger;
         Ide.Toma4.EnderToma.xMun    := sqlXMLCidadeTomador.AsString;
         Ide.Toma4.EnderToma.CEP     := StrToIntDef(RemoverCaracter(sqlXMLCepTomador.AsString), 0);
         Ide.Toma4.EnderToma.UF      := sqlXMLUFTomador.AsString;
         Ide.Toma4.EnderToma.cPais   := 1058;
         Ide.Toma4.EnderToma.xPais   := 'BRASIL';

         Ide.toma4.toma := tmOutros;// tmExpedidor;