[Harbour] XML from xHarbour compatibility

2009-05-29 Thread rafa
This code running into xHarbour, but under Harbour, show this error; Error description:Error BASE/1004 No exported method: NTYPE Args: [ 1] = U nil Stack Calls === Called from ->NTYPE(0) Called from ../../txml.prg->TXMLITERATORREGEX:FIND(0) Called from e_xml.prg->GCONFIGHA

Re: [Harbour] XML from xHarbour compatibility

2009-05-29 Thread Xavi
rafa, METHOD New( ) CLASS gConfigHarbour Local oNode, oIter, oNodeLib, cLib, cCheck ::Super:New( ) if ::lOk oNode := ::oDoc:FindFirst( ::cNode ) if oNode != NIL oIter := TXmlIteratorRegex( oNode ) oIter := TXmlIteratorRegex():New( oNode ) -- Xavi rafa escribió

Re: [Harbour] XML from xHarbour compatibility

2009-05-29 Thread rafa
Xavi escribió: > rafa, > >> METHOD New( ) CLASS gConfigHarbour >>Local oNode, oIter, oNodeLib, cLib, cCheck >> >>::Super:New( ) >> >>if ::lOk >> oNode := ::oDoc:FindFirst( ::cNode ) >> if oNode != NIL >> oIter := TXmlIteratorRegex( oNode ) > > oIter := TXmlIteratorR

Re: [Harbour] XML from xHarbour compatibility

2009-05-29 Thread Viktor Szakáts
>>> METHOD New( ) CLASS gConfigHarbour >>>    Local oNode, oIter, oNodeLib, cLib, cCheck >>> >>>    ::Super:New( ) >>> >>>    if ::lOk >>>       oNode := ::oDoc:FindFirst( ::cNode ) >>>       if oNode != NIL >>>          oIter := TXmlIteratorRegex( oNode ) >> >> oIter := TXmlIteratorRegex():New( oN