This is a multi-part message in MIME format.

---=_forums-1-dub4abce420
Content-Type: text/plain; charset="ISO-8859-1"
Content-Transfer-Encoding: 7bit

Hello,

I'm new to PBDOM object and can't figure out how to read the
value of an attribute inside an xml files.

here is my code

string 		ls_MsgBox, ls_FileName,ls_txt_fic
,ls_baliseXML,ls_no_ord
integer		li_Counter, li_Files,li_num_fic, li_FileNum
//
PBDOM_BUILDER		dom_builder
PBDOM_DOCUMENT	dom_doc
PBDOM_OBJECT		dom_obj[]
PBDOM_ELEMENT		dom_element
PBDOM_ATTRIBUTE 	dom_attribute[]
//
ls_FileName = Space( 255 )
li_Files = DragQueryFile( handle, -1, ls_FileName, 255 )
FOR li_Counter = 1 TO li_Files
	ls_FileName = Space( 255 )
	DragQueryFile( handle, li_Counter - 1, ls_FileName, 255)
//li_FileNum = FileCopy (ls_FileName ,  "C:\jazz.gif",
FALSE)
NEXT
//
dom_builder = CREATE PBDOM_BUILDER
TRY
// Import File and generate XML Document
	dom_doc = dom_Builder.BuildFromFile(ls_FileName)
	dom_doc.getcontent(dom_obj)
CATCH (PBDOM_Exception lpbdom_Except)
	MessageBox( "PBDOM_Exception",
lpbdom_Except.GetExceptionCode())
RETURN
END TRY
ls_no_ord =
dom_doc.GetRootElement().GetAttribute("no_ord").GetText()


Thanks for your help

the xml is attached

Best regards,
Didier.

---=_forums-1-dub4abce420
Content-Type: application/xml; name="ECO_1702_003272004.XML"
Content-Transfer-Encoding: base64
Content-Disposition: attachment; filename="ECO_1702_003272004.XML"

PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiIHN0YW5kYWxv
bmU9Im5vIj8+Cgo8RUNPXzE3MDJfMDAzMjcyMDA0PjxFQ09fMTcwMl8wMDMy
NzIwMDRfcm93Pjxub19vcmQ+MzI3Mjwvbm9fb3JkPjx4dGluc19saWduZV9u
b19saWc+NDwveHRpbnNfbGlnbmVfbm9fbGlnPjx4dGluc19saWduZV9saWdp
ZD4xNDgxNTwveHRpbnNfbGlnbmVfbGlnaWQ+PHh0aW5zX2xpZ25lX2V0YXQ+
RkVSTUU8L3h0aW5zX2xpZ25lX2V0YXQ+PHh0aW5zX2xpZ190ZWNobmlxdWVf
dGVjaWQ+MTQ0NDY8L3h0aW5zX2xpZ190ZWNobmlxdWVfdGVjaWQ+PHh0ZWRp
X3JlZl9zdXBwb3J0X3N1cHA+TEUgRklHQVJPIEVDT05PTUlFPC94dGVkaV9y
ZWZfc3VwcG9ydF9zdXBwPjx4dGVkaV9yZWZfcGxhY2VtZW50X2ludF9wbGFj
PkNPTlRFWFRFPC94dGVkaV9yZWZfcGxhY2VtZW50X2ludF9wbGFjPjx4dGVk
aV9yZWZfZm9ybWF0X2Zvcm0+MS80IFBBR0U8L3h0ZWRpX3JlZl9mb3JtYXRf
Zm9ybT48eHRlZGlfcmVmX3BhcnV0aW9uX2R0cGFyPjIwMDktMDItMTcgMDA6
MDA6MDA8L3h0ZWRpX3JlZl9wYXJ1dGlvbl9kdHBhcj48eHRlZGlfcmVmX2Nv
dWxldXJfY291bD5OT0lSIEVUIEJMQU5DPC94dGVkaV9yZWZfY291bGV1cl9j
b3VsPjx4dGVkaV9yZWZfdHlwZWRpdGlvbl90ZWQ+TkFUSU9OQUxFPC94dGVk
aV9yZWZfdHlwZWRpdGlvbl90ZWQ+PHF0ZT4xPC9xdGU+PHh0aW5zX2xpZ25l
X2NvbW0+PC94dGluc19saWduZV9jb21tPjx4dGluc19saWduZV9kdG1haj4y
MDA5LTAxLTIwIDE1OjM0OjQ2PC94dGluc19saWduZV9kdG1haj48eHRpbnNf
bGlnbmVfdXNlcm1haj5ZLlFVRUlMTEU8L3h0aW5zX2xpZ25lX3VzZXJtYWo+
PGFubm9uY2V1cj5HT1ZFUk5NRU5UIE9GIFRIRSBSRVBVQkxJQyBPRiBNQUNF
RE9OSUE8L2Fubm9uY2V1cj48YW5uX2FkcjE+TSBUT0RPUiBNSUxDRVZTS0k8
L2Fubl9hZHIxPjx4dGNsaV9jbGllbnRfYW5uX2NwPjQ5MzwveHRjbGlfY2xp
ZW50X2Fubl9jcD48eHRjbGlfY2xpZW50X2Fubl9iZD5NQUNFRE9JTkU8L3h0
Y2xpX2NsaWVudF9hbm5fYmQ+PHh0Y2xpX2NsaWVudF9hbm5fdGVsPjM4OTcw
NDczNTIwPC94dGNsaV9jbGllbnRfYW5uX3RlbD48eHRjbGlfY2xpZW50X2Fu
bl9tYWlsPjwveHRjbGlfY2xpZW50X2Fubl9tYWlsPjxhZ3RlY2g+U0FOUzwv
YWd0ZWNoPjx4dGFkdl9hZHJlc3NlX2NvbnRhY3RfYWdjY29udGFjdD48L3h0
YWR2X2FkcmVzc2VfY29udGFjdF9hZ2Njb250YWN0PjxhZ2NfYWRyMT48L2Fn
Y19hZHIxPjxjbGllbnRfYWdjX2NwPjwvY2xpZW50X2FnY19jcD48Y2xpZW50
X2FnY19iZD48L2NsaWVudF9hZ2NfYmQ+PGNsaWVudF9hZ2NfdGVsPjwvY2xp
ZW50X2FnY190ZWw+PGNsaWVudF9hZ2NfbWFpbD48L2NsaWVudF9hZ2NfbWFp
bD48YWdlbmNlPiA8L2FnZW5jZT48YWdfYWRyMT4gPC9hZ19hZHIxPjx4dGNs
aV9jbGllbnRfYWdfY3A+IDwveHRjbGlfY2xpZW50X2FnX2NwPjx4dGNsaV9j
bGllbnRfYWdfYmQ+IDwveHRjbGlfY2xpZW50X2FnX2JkPjx4dGNsaV9jbGll
bnRfYWdfdGVsPiA8L3h0Y2xpX2NsaWVudF9hZ190ZWw+PHh0Y2xpX2NsaWVu
dF9hZ19tYWlsPiA8L3h0Y2xpX2NsaWVudF9hZ19tYWlsPjx4dGluc19saWdf
dGVjaG5pcXVlX2R0cmVsPjwveHRpbnNfbGlnX3RlY2huaXF1ZV9kdHJlbD48
eHRpbnNfbGlnX3RlY2huaXF1ZV9ldGF0dGVjPkFUVEVOVEU8L3h0aW5zX2xp
Z190ZWNobmlxdWVfZXRhdHRlYz48eHRpbnNfbGlnX3RlY2huaXF1ZV90ZWNt
YWo+MjAwOC0xMi0wNCAxMTo1MTo0NzwveHRpbnNfbGlnX3RlY2huaXF1ZV90
ZWNtYWo+PHh0aW5zX2xpZ190ZWNobmlxdWVfdGVjdXNyPlkuUVVFSUxMRTwv
eHRpbnNfbGlnX3RlY2huaXF1ZV90ZWN1c3I+PHh0aW5zX2xpZ190ZWNobmlx
dWVfY29tbXRlYz48L3h0aW5zX2xpZ190ZWNobmlxdWVfY29tbXRlYz48eHRh
bGNfcGxhbl9hbGxvY2F0aW9uX3ByZD5JTlZFU1QgTUFDRURPTklBPC94dGFs
Y19wbGFuX2FsbG9jYXRpb25fcHJkPjxwb2lkcz4zMDwvcG9pZHM+PHh0aW5z
X29yZHJlX25vb3JkPjMyNzI8L3h0aW5zX29yZHJlX25vb3JkPjx4dGluc19s
aWduZV9ub2xpZz40PC94dGluc19saWduZV9ub2xpZz48c3VjY2Vzc2l2aXRl
Pk48L3N1Y2Nlc3Npdml0ZT48eHRlZGlfcmVmX3N1cHBvcnRfY29kZV9zdXBw
b3J0X3RyYWZpYz5FQ088L3h0ZWRpX3JlZl9zdXBwb3J0X2NvZGVfc3VwcG9y
dF90cmFmaWM+PHh0ZWRpX3JlZl9wYXJ1dGlvbl9ub3Bhcj4yMDA3ODwveHRl
ZGlfcmVmX3BhcnV0aW9uX25vcGFyPjxzcGxpdHJ1bj5OPC9zcGxpdHJ1bj48
eHRpbnNfbGlnX3RlY2huaXF1ZV90ZWNuYnZpc3U+MTwveHRpbnNfbGlnX3Rl
Y2huaXF1ZV90ZWNuYnZpc3U+PHZpc3VlbD4wMDAwMDI0MzUxPC92aXN1ZWw+
PHh0aW5zX2xpZ190ZWNobmlxdWVfcmVmdGVjPjwveHRpbnNfbGlnX3RlY2hu
aXF1ZV9yZWZ0ZWM+PGFubmFkdj5HT1ZFUk5NRU5UIE9GIFRIRSBSRVBVQkxJ
QyBPRiBNQUNFRE9OSUE8L2FubmFkdj48YWdhZHY+IDwvYWdhZHY+PGhhdXRl
dXI+MjE5MDwvaGF1dGV1cj48bGFyZ2V1cj4xNDMwPC9sYXJnZXVyPjxuYmNv
bD4zPC9uYmNvbD48cmVmX21lZGlhPlBsYW4gbWVkaWEgOiA1MjE3LTQ8L3Jl
Zl9tZWRpYT48eHRhbGNfcGxhbl9hbGxvY2F0aW9uX2xpYmFubj5JTlZFU1Qg
TUFDRURPTklBPC94dGFsY19wbGFuX2FsbG9jYXRpb25fbGliYW5uPjx4dGFs
Y19wbGFuX2FsbG9jYXRpb25fbGlicHJkPklOVkVTVCBNQUNFRE9OSUE8L3h0
YWxjX3BsYW5fYWxsb2NhdGlvbl9saWJwcmQ+PC9FQ09fMTcwMl8wMDMyNzIw
MDRfcm93PjwvRUNPXzE3MDJfMDAzMjcyMDA0Pgo=

---=_forums-1-dub4abce420--

Check out my article in PBDJ: "Taking PowerBuilder's PBDOM Out for a
Spin" at http://pbdj.sys-con.com/node/107057.

Regards
Arthur

dchambon wrote:

> Hello,
> 
> I'm new to PBDOM object and can't figure out how to read the
> value of an attribute inside an xml files.
> 
> here is my code
> 
> string 		ls_MsgBox, ls_FileName,ls_txt_fic
> ,ls_baliseXML,ls_no_ord
> integer		li_Counter, li_Files,li_num_fic, li_FileNum
> //
> PBDOM_BUILDER		dom_builder
> PBDOM_DOCUMENT	dom_doc
> PBDOM_OBJECT		dom_obj[]
> PBDOM_ELEMENT		dom_element
> PBDOM_ATTRIBUTE 	dom_attribute[]
> //
> ls_FileName = Space( 255 )
> li_Files = DragQueryFile( handle, -1, ls_FileName, 255 )
> FOR li_Counter = 1 TO li_Files
> 	ls_FileName = Space( 255 )
> 	DragQueryFile( handle, li_Counter - 1, ls_FileName, 255)
> //li_FileNum = FileCopy (ls_FileName ,  "C:\jazz.gif",
> FALSE)
> NEXT
> //
> dom_builder = CREATE PBDOM_BUILDER
> TRY
> // Import File and generate XML Document
> 	dom_doc = dom_Builder.BuildFromFile(ls_FileName)
> 	dom_doc.getcontent(dom_obj)
> CATCH (PBDOM_Exception lpbdom_Except)
> 	MessageBox( "PBDOM_Exception",
> lpbdom_Except.GetExceptionCode())
> RETURN
> END TRY
> ls_no_ord =
> dom_doc.GetRootElement().GetAttribute("no_ord").GetText()
> 
> 
> Thanks for your help
> 
> the xml is attached
> 
> Best regards,
> Didier.

Hi arthur,

in fact I started from your article to write my code but as
am new to PBDOM I must have missed something :-(

Can you tell me what's wrong in my code ?

Regards,
Didier.

Didier

I'm using GetAttributeValue ( ls_Attribute ). You can find the
functions in the HTML Books Chapter 14, PBDOM node objects.

Arthur
dchambon wrote:

> Hi arthur,
> 
> in fact I started from your article to write my code but as
> am new to PBDOM I must have missed something :-(
> 
> Can you tell me what's wrong in my code ?
> 
> Regards,
> Didier.

Hello,

I still don't figure out how to read attribute :-(

For example I need the value of the attribute "no_ord"

helppppp

regards
Didier

I gave a look at your XML. You're actually want to read the value of
the element "no_ord" and not an attribute. You have the following
options, where you might make your code more generic.

Arthur

//one option is:
dom_doc.getcontent(dom_obj)			
// -> Returns an array of two XML elements (XML and ECO_1702_003272004)
dom_obj[2].getcontent(dom_obj)		
// Returns one element (ECO_1702_003272004_row)
dom_obj[1].getcontent(dom_obj)		
// Returns your elements (no_ord, .. )
ls_no_ord = dom_obj[1].GetText()

// or you do
dom_element =
dom_doc.GetRootElement().GetChildElement("ECO_1702_003272004_row" )
ls_no_ord = dom_element.GetChildElement("no_ord" ).GetText()


dchambon wrote:

> Hello,
> 
> I still don't figure out how to read attribute :-(
> 
> For example I need the value of the attribute "no_ord"
> 
> helppppp
> 
> regards
> Didier

Arthur,

Merci beaucoup !!!

Best regards,
Didier.