Histórico da Página

Função: XmlGetParent

Retorna

um

nó

que

representa

o

nó

pai

do

elemento

especificado

por

parâmetro.

Sintaxe

XmlGetParent(

 [ oNode ] )

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
oNode

Objeto

bloco de código

Indica o nó no qual será utilizado como referência para o retorno do nó pai.

X

X

Retorno

Observações

• Pode-se

• utilizar essa função para subir na estrutura do objeto XML - EXtensible Markup Language (Linguagem extensível de formatação).
• Se for usado como retorno o mesmo objeto passado em

• <oNode>, seu conteúdo será substituído pelo conteúdo do elemento procurado, não sendo possível recuperar a informação anterior.

Exemplos

Bloco de código
language cpp theme Eclipse linenumbers true collapse false

/* No exemplo seguinte usamos a função para nos posicionar no elemento <Itens>. Usando o comando SAVE
criamos um arquivo teste.xml ao final da execução do programa. */

#INCLUDE "TOTVS.CH"

#INCLUDE "XMLXFUN.CH"

User Function ExeXML1()

Local cError := ""

Local cWarning := ""

Local oScript

//Gera o Objeto XML ref. ao script

oScript := XmlParser( GeraXML(), "_", @cError, @cWarning )

oScript :=

XmlParent

XmlGetParent( oScript:_PEDIDO:_ITENS:_ITEM[1] )

//Tranforma o Objeto XML em arquivo

SAVE oScript XMLFILE "\teste.xml"

Return oScript

Static Function GeraXML() // Script XML a gerar objeto

Local cScript := '<?xml version="1.0" encoding="UTF-8"?>'

cScript += "<pedido>"

cScript += " <NomeCliente>Microsiga Software S/A</NomeCliente>"

cScript += " <Endereco>Av. Braz Leme</Endereco>"

cScript += " <Numero>1361</Numero>"

cScript += " <Data>22-03-2005</Data>"

cScript += " <Itens>"

cScript += " <Item>"

cScript += " <Produto>Prothues</Produto>"

cScript += " <Quantidade>1</Quantidade>"

cScript += " <Preco>100.00</Preco>"

cScript += " </Item>"

cScript += " <Item>"

cScript += " <Produto>ERP</Produto>"

cScript += " <Quantidade>0</Quantidade>"

cScript += " <Preco>0</Preco>"

cScript += " </Item>"

cScript += " </Itens>"

cScript += "</pedido>"

Return cScript

Abrangência

Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10

 

Veja também

• Tratamento de XML