Pesquisar na Comunidade

Olá, estou com um pequeno problema que não consigo corrigir, veja só:Estar gerando um espaço entre as tag <InfNFe> e <chNFe> - <infDoc> - <infMunDescarga> <cMunDescarga>2102325</cMunDescarga> <xMunDescarga>BURITICUPU</xMunDescarga> - <infNFe> <chNFe>21150305517740000113550010000257341000257345</chNFe> - <infUnidTransp> Observação:Ainda não atualizei para trunk2 Parte do fonte: TabGlobal.CSDESCAR_CT.First; if not TabGlobal.CSDESCAR_CT.IsEmpty then begin while not TabGlobal.CSDESCAR_CT.Eof do begin with infCTe.Add do begin chCTe := TabGlobal.CSDESCAR_CT.fieldByName('chcte2').AsString; // Informações das Unidades de Transporte (Carreta/Reboque/Vagão) with infUnidTransp.Add do begin //TpcnUnidTransp = ( utRodoTracao, utRodoReboque, utNavio, utBalsa, utAeronave, utVagao, utOutros ); if DDADOS_UNID_TRANSP.TPUNIDTRANSP.Conteudo='1' then tpUnidTransp := utRodoTracao else if DDADOS_UNID_TRANSP.TPUNIDTRANSP.Conteudo='2' then tpUnidTransp := utRodoReboque else if DDADOS_UNID_TRANSP.TPUNIDTRANSP.Conteudo='3' then tpUnidTransp := utNavio else if DDADOS_UNID_TRANSP.TPUNIDTRANSP.Conteudo='4' then tpUnidTransp := utBalsa else if DDADOS_UNID_TRANSP.TPUNIDTRANSP.Conteudo='5' then tpUnidTransp := utAeronave else if DDADOS_UNID_TRANSP.TPUNIDTRANSP.Conteudo='6' then tpUnidTransp := utVagao else if DDADOS_UNID_TRANSP.TPUNIDTRANSP.Conteudo='7' then tpUnidTransp := utOutros; idUnidTransp := DDADOS_UNID_TRANSP.DUNIDTRANSP.Conteudo; //'ABC1234'; // informar a placa se rodoviário // DDADOS_CT_LACRE_TRAN.First; while not DDADOS_CT_LACRE_TRAN.Eof do begin with lacUnidTransp.Add do begin nLacre :=DDADOS_CT_LACRE_TRAN.NLACRE.Conteudo; //'123'; end; DDADOS_CT_LACRE_TRAN.Next; end; // Informações das Unidades de carga (Containeres/ULD/Outros) with infUnidCarga.Add do begin if DDADOS_UNID_CARGA.TPUNIDCARGA.Conteudo='1' then tpUnidCarga := ucContainer else if DDADOS_UNID_CARGA.TPUNIDCARGA.Conteudo='2' then tpUnidCarga := ucULD else if DDADOS_UNID_CARGA.TPUNIDCARGA.Conteudo='3' then tpUnidCarga := ucPallet else if DDADOS_UNID_CARGA.TPUNIDCARGA.Conteudo='4' then tpUnidCarga := ucOutros; idUnidCarga :=DDADOS_UNID_CARGA.DUNIDCARGA.Conteudo; //'AB45'; // informar o numero da unidade da carga // DDADOS_CT_LACRE_CARGA.First; while not DDADOS_CT_LACRE_CARGA.Eof do begin with lacUnidCarga.Add do begin nLacre := DDADOS_CT_LACRE_CARGA.NLACRE.Conteudo; //'123'; end; DDADOS_CT_LACRE_CARGA.Next; end; qtdRat := DDADOS_UNID_CARGA.QUANT_RATEADA.Conteudo; end; qtdRat := DDADOS_UNID_CARGA.QUANT_RATEADA.Conteudo; end; end; // fim do with TabGlobal.CSDESCAR_CT.Next; end; Obrigado, Leão 21150908512503000158580010000000011000000015-mdfe.xml