GARANTIR DESCONTO

Fórum Criar xml usando TXMLDocument #388291

11/10/2010

0

Boa noite a todos. Alguem poderia me dar uma luz de como criar o xml abaixo através do TXMLDocument. Desde ja agradeço a força   Osvaldo       <?xml version="1.0" encoding="ISO-8859-1" ?> - <lote idArquivo="090734635" xmlns="http://www.serpro.gov.br/exportacaoweb/schema/LoteRegistroExportacao.html" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.serpro.gov.br/exportacaoweb/schema/LoteRegistroExportacao.html LoteRegistroExportacao.xsd">   <qtdREs>1</qtdREs> - <registro-exportacao>   <adicao-re-lote>N</adicao-re-lote>   <nr-processo-exportador />   <cpf-exportador />   <cnpj-exportador>00000000000191</cnpj-exportador> - <enquadramento>   <codigo>80000</codigo>   </enquadramento>   <data-limite />   <percentual-margem-nao-sacada>0.0</percentual-margem-nao-sacada>   <numero-processo />   <rc-vinculado />   <rv-vinculado />   <re-vinculado />   <di-vinculado />   <nome-importador>Importador</nome-importador>   <endereco-importador>Endereco Teste</endereco-importador>   <pais-destino>097</pais-destino>   <pais-importador>097</pais-importador> - <instrumento-comercial>   <tipo-instrumento>-1</tipo-instrumento>   <codigo>-1</codigo>   </instrumento-comercial>   <orgao-rf-despacho>0817700</orgao-rf-despacho>   <orgao-rf-embarque>0817700</orgao-rf-embarque>   <condicao-venda>CFR</condicao-venda>   <modalidade-transacao>1</modalidade-transacao>   <moeda>220</moeda> - <re-base>   <valor-total-condicao-venda>1000.0</valor-total-condicao-venda>   <valor-sem-cobertura>0.0</valor-sem-cobertura>   <valor-com-cobertura>1000.0</valor-com-cobertura>   <valor-consignacao>0.0</valor-consignacao>   </re-base>   <condicao-fabricante>S</condicao-fabricante>   <mercadoria-destaque>1803100000</mercadoria-destaque>   <naladi-2002>18031000</naladi-2002>   <descricao-unidade-medida-comercial>FAVAS</descricao-unidade-medida-comercial>   <prazo-pagamento>10</prazo-pagamento> - <item-mercadoria>   <descricao>item 1</descricao>   <valor-condicao-venda>100.0</valor-condicao-venda>   <valor-local-embarque>10.0</valor-local-embarque>   <quantidade-comercializada>10.0</quantidade-comercializada>   <quantidade-estatistica>10.0</quantidade-estatistica>   <numero-peso-liquido>10.0</numero-peso-liquido>   </item-mercadoria> - <item-mercadoria>   <descricao>item 2</descricao>   <valor-condicao-venda>200.0</valor-condicao-venda>   <valor-local-embarque>30.0</valor-local-embarque>   <quantidade-comercializada>20.0</quantidade-comercializada>   <quantidade-estatistica>20.0</quantidade-estatistica>   <numero-peso-liquido>20.0</numero-peso-liquido>   </item-mercadoria>   <percentual-comissao-agente>0.0</percentual-comissao-agente>   <tipo-comissao />   <categoria-cota />   <observacao />   <indicador-ccptc />   <indicador-insumo-ccptc />   <indicador-ccrom /> - <fabricante>   <cpf-cnpj>00000000000191</cpf-cnpj>   <sigla-uf-fabric>DF</sigla-uf-fabric>   <qtd-estatistica-fabric>30.0</qtd-estatistica-fabric>   <peso-liquido-fabric>30.0</peso-liquido-fabric>   <valor-moeda-local-embarque>40.0</valor-moeda-local-embarque>   <obs-fabric />   </fabricante>   </registro-exportacao>   </lote>
Osvaldo Anjo

Osvaldo Anjo

Responder

Posts

19/03/2013

Samuel Basso

Olá.

Segue código exemplo, talvez ajude:
var
XMLEnvio: TXMLDocument;

XMLEnvio := TXMLDocument.Create(nil);
XMLEnvio.Active := True;
XMLEnvio.AddChild(Produtos).AddChild(Chave).NodeValue := TERR69AB6587d$we;

XMLEnvio.DocumentElement.AddChild(Produto);
XMLEnvio.DocumentElement.ChildNodes[Produto].AddChild(referencia).NodeValue := 100;
XMLEnvio.DocumentElement.ChildNodes[Produto].AddChild(qtd_estoque).NodeValue := 100;

XMLEnvio.DocumentElement.AddChild(Produto);
XMLEnvio.DocumentElement.ChildNodes[Produto].AddChild(referencia).NodeValue := 800;
XMLEnvio.DocumentElement.ChildNodes[Produto].AddChild(qtd_estoque).NodeValue := 35;
XMLEnvio.SaveToFile(ExtractFileDir(Application.ExeName) + \temp.xml);
Responder

Gostei + 0

19/03/2013

Douglas

Amigo,

o link abaixo, explica muito bem

como trabalhar com XML Document.

Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar