ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Forum AtoutFox : Re: importer um fichier XML   

Sujet

rss Flux RSS des derniers messages

Vous devez vous identifier pour pouvoir poser une question ou répondre.

mer. 28 septembre 2022, 18h45
mplaza2
Venezuela Venezuela

atoutfox.public.association

Re: importer um fichier XML

*
* en utilisant nfxml
https://github.com/vfpx/nfxml
*

create cursor LINHAS ( ;
  CODLOCALENTREGA V(3),;
  DESCRICAO V(28),;
  LINEORDERNUMBER V(7),;
  LINHA V(1),;
  NUMDOC V(17),;
  QUANTIDADE V(3),;
  REFERENCIA V(11))

create cursor embalagem ( codembalagem v(10), total v(12))

create cursor etiquetas ( ;
  DATAREQUERIDAFINAL V(8),;
  DATAREQUERIDAINICIAL V(9),;
  QUANTIDADEREQUERIDA V(1),;
  TIPOREQUISICAO V(1))


oData = nfXmlRead( getXml() )

insert into linhas from name oxml.vfpdataset.documento.linhas

insert into embalagem from name oxml.vfpdataset.documento.linhas.embalagem

for each oEtiqueta in oxml.vfpdataset.documento.linhas.etiquetas
  insert into etiquetas from name m.oEtiqueta
endfor

select linhas
edit normal nowait

select etiquetas
go top
browse normal nowait

select embalagem
edit normal nowait

keyboard "{alt+w}{a}"








function getxml()

local xml

text to xml noshow
<VFPDataSet>
<Documento>
<Linhas>
<linha>1</linha>
<referencia>Z3505505000</referencia>
<descricao>CASQUILLO ADP AR NATU EVOL J</descricao>
<quantidade>302</quantidade>
<lineordernumber>5061850</lineordernumber>
<codlocalentrega >GOU</codlocalentrega>
<numdoc>20220722327506185</numdoc>
<Embalagem>
<codembalagem>Z20CAR12</codembalagem>
<total>3000</total>
</Embalagem>
<Etiquetas>
<tiporequisicao>4</tiporequisicao>
<quantidaderequerida >3</quantidaderequerida>
<datarequeridainicial>20220831</datarequeridainicial>
<datarequeridafinal>20220831</datarequeridafinal>
</Etiquetas>
<Etiquetas>
<tiporequisicao>4</tiporequisicao>
<quantidaderequerida>0</quantidaderequerida>
<datarequeridainicial>20220905</datarequeridainicial>
<datarequeridafinal>20220911</datarequeridafinal>
</Etiquetas>
<Etiquetas>
<tiporequisicao>4</tiporequisicao>
<quantidaderequerida>3</quantidaderequerida>
<datarequeridainicial> 20220926</datarequeridainicial>
<datarequeridafinal>20221002</datarequeridafinal>
</Etiquetas>
<Etiquetas>
<tiporequisicao>4</tiporequisicao>
<quantidaderequerida>3</quantidaderequerida>
<datarequeridainicial>20221010</datarequeridainicial>
<datarequeridafinal>20221016</datarequeridafinal>
</Etiquetas>
<Etiquetas>
<tiporequisicao>4</tiporequisicao>
<quantidaderequerida>0</quantidaderequerida>
<datarequeridainicial>20221017</datarequeridainicial>
<datarequeridafinal>20221023</datarequeridafinal>
</Etiquetas>
<Etiquetas>
<tiporequisicao>4</tiporequisicao>
<quantidaderequerida>3</quantidaderequerida>
<datarequeridainicial> 20221107</datarequeridainicial>
<datarequeridafinal>20221113</datarequeridafinal>
</Etiquetas>
</Linhas>
</Documento>
</VFPDataSet>
ENDTEXT

return m.xml


Permalink : http://www.atoutfox.org/nntp.asp?ID=0000020020
20 088 messages dans le forum • Liste complète des messages

Publicité

Les pubs en cours :


www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2024.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3