<?xml version="1.0" encoding="utf-8"?> <ROOT> <REFERENCES> <HOBJ_REF> <uid>PICTURES</uid> <name>PICTURES</name> <objType>SYSTEM</objType> <valType>NAN</valType> </HOBJ_REF> </REFERENCES> <CFGRECORDS> <TObjItemData> <Id>1325541</Id> <Name>S.XML_VIEW</Name> <Descript/> <Typ>PICTURE</Typ> <ParentId>PICTURES</ParentId> <Value_Type>Int</Value_Type> <ModifyTime>10.06.2009 11:29:28.581</ModifyTime> <Text_Palette/> <Read_Only>False</Read_Only> <TECH_UNIT/> <UseLimits>False</UseLimits> <VHL>1.00000000000000E+02</VHL> <HL>1.00000000000000E+02</HL> <LL>0.00000000000000E+00</LL> <VLL>0.00000000000000E+00</VLL> <VHL_ID/> <HL_ID/> <LL_ID/> <VLL_ID/> <Hysterezia>0.00000000000000E+00</Hysterezia> <TransPalIdx>0</TransPalIdx> <Hidden>False</Hidden> <uuid>C23794DF80D0C04B8CAB5BE3F3C39AA3</uuid> </TObjItemData> <TPictureData> <DX>673</DX> <DY>821</DY> <MIN_DX>0</MIN_DX> <MIN_DY>0</MIN_DY> <BACKCOLOR>4</BACKCOLOR> <bOldCoordSyst>False</bOldCoordSyst> <bUseGradient>False</bUseGradient> <bInvertColors>True</bInvertColors> <backColor2>0</backColor2> <patternBr>2</patternBr> <BITMAPFILE/> <bitmapStyle>stretch</bitmapStyle> <bmpPattern/> <bmpLogo/> <posLogo>tPL_right_up</posLogo> <userHelp/> <posType>0</posType> <posAt>0</posAt> <skupina>tPaintNormal</skupina> <transform>tZoom</transform> <windowType>tWT_MDI</windowType> <dockPos>tDP_Top</dockPos> <modality>False</modality> <applModality>False</applModality> <unvisible>False</unvisible> <log_close>False</log_close> <refresh_in_hi>True</refresh_in_hi> <rdReOpen>True</rdReOpen> <scrollsInZoom>True</scrollsInZoom> <javaThreadType>tJT_OWN</javaThreadType> <bTC>False</bTC> <layersNum>1</layersNum> <layers_Arr> <Layer_0>0.00000000000000E+00</Layer_0> <Layer_1>0.00000000000000E+00</Layer_1> <Layer_2>0.00000000000000E+00</Layer_2> <Layer_3>0.00000000000000E+00</Layer_3> <Layer_4>0.00000000000000E+00</Layer_4> <Layer_5>0.00000000000000E+00</Layer_5> <Layer_6>0.00000000000000E+00</Layer_6> <Layer_7>0.00000000000000E+00</Layer_7> <Layer_8>0.00000000000000E+00</Layer_8> </layers_Arr> <goEnter>1</goEnter> <goEsc>2</goEsc> <odkaz1/> <odkaz2/> <odkaz3/> <homeIsntNr>0</homeIsntNr> <prevIsntNr>0</prevIsntNr> <nextIsntNr>0</nextIsntNr> </TPictureData> <tDisplayData> <grObjectNr>2</grObjectNr> <objectId/> <locVarId>2</locVarId> <objectNr>1</objectNr> <objectFnct>0</objectFnct> <objectIndex>0</objectIndex> <objectItem>0</objectItem> <redrawMode>0</redrawMode> <color>0</color> <bObjIsLocVar>True</bObjIsLocVar> <bObjIdxIsLocVar>False</bObjIdxIsLocVar> </tDisplayData> <tDisplayData> <grObjectNr>3</grObjectNr> <objectId/> <locVarId>0</locVarId> <objectNr>1</objectNr> <objectFnct>0</objectFnct> <objectIndex>0</objectIndex> <objectItem>0</objectItem> <redrawMode>0</redrawMode> <color>0</color> <bObjIsLocVar>False</bObjIsLocVar> <bObjIdxIsLocVar>False</bObjIdxIsLocVar> </tDisplayData> <tDisplayData> <grObjectNr>4</grObjectNr> <objectId/> <locVarId>0</locVarId> <objectNr>1</objectNr> <objectFnct>0</objectFnct> <objectIndex>0</objectIndex> <objectItem>0</objectItem> <redrawMode>0</redrawMode> <color>0</color> <bObjIsLocVar>False</bObjIsLocVar> <bObjIdxIsLocVar>False</bObjIdxIsLocVar> </tDisplayData> <tDisplayData> <grObjectNr>5</grObjectNr> <objectId/> <locVarId>0</locVarId> <objectNr>1</objectNr> <objectFnct>0</objectFnct> <objectIndex>0</objectIndex> <objectItem>0</objectItem> <redrawMode>0</redrawMode> <color>0</color> <bObjIsLocVar>False</bObjIsLocVar> <bObjIdxIsLocVar>False</bObjIdxIsLocVar> </tDisplayData> <tDisplayData> <grObjectNr>6</grObjectNr> <objectId/> <locVarId>6</locVarId> <objectNr>0</objectNr> <objectFnct>0</objectFnct> <objectIndex>0</objectIndex> <objectItem>0</objectItem> <redrawMode>0</redrawMode> <color>0</color> <bObjIsLocVar>True</bObjIsLocVar> <bObjIdxIsLocVar>False</bObjIdxIsLocVar> </tDisplayData> <tPictureDataBin> <objNr>2</objNr> <order>1</order> <Data><![CDATA[1.typ='GENIUS' 1.zoomed=TRUE 1.layers[1]=TRUE 1.layers[2]=TRUE 1.layers[3]=TRUE 1.layers[4]=TRUE 1.layers[5]=TRUE 1.layers[6]=TRUE 1.layers[7]=TRUE 1.layers[8]=TRUE 1.layers[9]=TRUE 1.layers[10]=TRUE 1.refvarid= 0 1.x= 100 1.y= 24 1.bkeepright=FALSE 1.bkeepbottom=FALSE 1.bfloatwidth=FALSE 1.bfloatheight=FALSE 1.bscalewidth=FALSE 1.bscaleheight=FALSE 1.bplacewidth=FALSE 1.bplaceheight=FALSE 1.bplacewidth2=FALSE 1.bplaceheight2=FALSE 1.colorp_idx= 15 1.colorb_idx= 0 1.patternb= 0 1.tooltip='' 1.linetype=SOLID 1.linewend= 0 1.linejoin= 2 1.linewidth= 1 1.buse=FALSE 1.metadata='' 1.dx= 550 1.dy= 20 1.round= 0 1.pristroj='CTRL_EFIELD' ]]></Data> </tPictureDataBin> <tPictureDataBin> <objNr>3</objNr> <order>2</order> <Data><![CDATA[1.typ='GENIUS' 1.zoomed=TRUE 1.layers[1]=TRUE 1.layers[2]=TRUE 1.layers[3]=TRUE 1.layers[4]=TRUE 1.layers[5]=TRUE 1.layers[6]=TRUE 1.layers[7]=TRUE 1.layers[8]=TRUE 1.layers[9]=TRUE 1.layers[10]=TRUE 1.refvarid= 3 1.x= 360 1.y= 54 1.bkeepright=FALSE 1.bkeepbottom=FALSE 1.bfloatwidth=FALSE 1.bfloatheight=FALSE 1.bscalewidth=FALSE 1.bscaleheight=FALSE 1.bplacewidth=FALSE 1.bplaceheight=FALSE 1.bplacewidth2=FALSE 1.bplaceheight2=FALSE 1.colorp_idx= 15 1.colorb_idx= 0 1.patternb= 0 1.tooltip='' 1.linetype=SOLID 1.linewend= 0 1.linejoin= 2 1.linewidth= 1 1.buse=FALSE 1.metadata='' 1.dx= 90 1.dy= 20 1.round= 0 1.pristroj='CTRL_BUTTON' ]]></Data> </tPictureDataBin> <tPictureDataBin> <objNr>4</objNr> <order>3</order> <Data><![CDATA[1.typ='GENIUS' 1.zoomed=TRUE 1.layers[1]=TRUE 1.layers[2]=TRUE 1.layers[3]=TRUE 1.layers[4]=TRUE 1.layers[5]=TRUE 1.layers[6]=TRUE 1.layers[7]=TRUE 1.layers[8]=TRUE 1.layers[9]=TRUE 1.layers[10]=TRUE 1.refvarid= 4 1.x= 460 1.y= 54 1.bkeepright=FALSE 1.bkeepbottom=FALSE 1.bfloatwidth=FALSE 1.bfloatheight=FALSE 1.bscalewidth=FALSE 1.bscaleheight=FALSE 1.bplacewidth=FALSE 1.bplaceheight=FALSE 1.bplacewidth2=FALSE 1.bplaceheight2=FALSE 1.colorp_idx= 15 1.colorb_idx= 0 1.patternb= 0 1.tooltip='' 1.linetype=SOLID 1.linewend= 0 1.linejoin= 2 1.linewidth= 1 1.buse=FALSE 1.metadata='' 1.dx= 110 1.dy= 20 1.round= 0 1.pristroj='CTRL_BUTTON' ]]></Data> </tPictureDataBin> <tPictureDataBin> <objNr>5</objNr> <order>4</order> <Data><![CDATA[1.typ='GENIUS' 1.zoomed=TRUE 1.layers[1]=TRUE 1.layers[2]=TRUE 1.layers[3]=TRUE 1.layers[4]=TRUE 1.layers[5]=TRUE 1.layers[6]=TRUE 1.layers[7]=TRUE 1.layers[8]=TRUE 1.layers[9]=TRUE 1.layers[10]=TRUE 1.refvarid= 5 1.x= 10 1.y= 84 1.bkeepright=FALSE 1.bkeepbottom=FALSE 1.bfloatwidth=FALSE 1.bfloatheight=FALSE 1.bscalewidth=FALSE 1.bscaleheight=FALSE 1.bplacewidth=FALSE 1.bplaceheight=FALSE 1.bplacewidth2=FALSE 1.bplaceheight2=FALSE 1.colorp_idx= 15 1.colorb_idx= 0 1.patternb= 0 1.tooltip='' 1.linetype=SOLID 1.linewend= 0 1.linejoin= 2 1.linewidth= 1 1.buse=FALSE 1.metadata='' 1.dx= 640 1.dy= 720 1.round= 0 1.pristroj='CTRL_TREE' ]]></Data> </tPictureDataBin> <tPictureDataBin> <objNr>6</objNr> <order>5</order> <Data><![CDATA[1.typ='TEXT' 1.zoomed=TRUE 1.layers[1]=TRUE 1.layers[2]=TRUE 1.layers[3]=TRUE 1.layers[4]=TRUE 1.layers[5]=TRUE 1.layers[6]=TRUE 1.layers[7]=TRUE 1.layers[8]=TRUE 1.layers[9]=TRUE 1.layers[10]=TRUE 1.refvarid= 0 1.x= 20 1.y= 74 1.bkeepright=FALSE 1.bkeepbottom=FALSE 1.bfloatwidth=FALSE 1.bfloatheight=FALSE 1.bscalewidth=FALSE 1.bscaleheight=FALSE 1.bplacewidth=FALSE 1.bplaceheight=FALSE 1.bplacewidth2=FALSE 1.bplaceheight2=FALSE 1.colorp_idx= 15 1.colorb_idx= 0 1.patternb= 0 1.tooltip='' 1.linetype=SOLID 1.linewend= 0 1.linejoin= 2 1.linewidth= 1 1.buse=FALSE 1.metadata='' 1.dx= 117 1.dy= 15 1.round= 0 1.textpos=TPATPOS 1.texttype=TTNORMAL 1.textstyle=TSTEXT 1.center= 1 1.vcenter= 1 1.angle= 0 1.colort_idx= 15 1.colort2= 10 1.text='Number of XML nodes = {V}' ]]></Data> </tPictureDataBin> <tPictureDataBin> <objNr>7</objNr> <order>6</order> <Data><![CDATA[1.typ='TEXT' 1.zoomed=TRUE 1.layers[1]=TRUE 1.layers[2]=TRUE 1.layers[3]=TRUE 1.layers[4]=TRUE 1.layers[5]=TRUE 1.layers[6]=TRUE 1.layers[7]=TRUE 1.layers[8]=TRUE 1.layers[9]=TRUE 1.layers[10]=TRUE 1.refvarid= 0 1.x= 20 1.y= 40 1.bkeepright=FALSE 1.bkeepbottom=FALSE 1.bfloatwidth=FALSE 1.bfloatheight=FALSE 1.bscalewidth=FALSE 1.bscaleheight=FALSE 1.bplacewidth=FALSE 1.bplaceheight=FALSE 1.bplacewidth2=FALSE 1.bplaceheight2=FALSE 1.colorp_idx= 15 1.colorb_idx= 0 1.patternb= 0 1.tooltip='' 1.linetype=SOLID 1.linewend= 0 1.linejoin= 2 1.linewidth= 1 1.buse=FALSE 1.metadata='' 1.dx= 69 1.dy= 12 1.round= 0 1.textpos=TPATPOS 1.texttype=TTNORMAL 1.textstyle=TSTEXT 1.center= 1 1.vcenter= 1 1.angle= 0 1.colort_idx= 15 1.colort2= 10 1.text='FileName:' ]]></Data> </tPictureDataBin> <tDispSpecDataBin> <objNr>2</objNr> <Data><![CDATA[1.pristroj='CTRL_EFIELD' 1.bgroup=FALSE 1.bscaption='' 1.neflimit= 32 1.nsblow= 1 1.nsbhigh= 99 1.lbtype=TLB_LIST 1.befmulti=FALSE 1.brightaligned=FALSE 1.binitvisible=TRUE 1.binitdisabled=FALSE 1.bwordwrap=TRUE 1.btransparent=FALSE 1.bexpandsttext=FALSE 1.bpushlike=FALSE 1.bpassword=FALSE ]]></Data> </tDispSpecDataBin> <tDispSpecDataBin> <objNr>3</objNr> <Data><![CDATA[1.pristroj='CTRL_BUTTON' 1.bgroup=FALSE 1.bscaption='Choice file' 1.neflimit= 32 1.nsblow= 1 1.nsbhigh= 99 1.lbtype=TLB_LIST 1.befmulti=FALSE 1.brightaligned=FALSE 1.binitvisible=TRUE 1.binitdisabled=FALSE 1.bwordwrap=TRUE 1.btransparent=FALSE 1.bexpandsttext=FALSE 1.bpushlike=FALSE 1.bpassword=FALSE ]]></Data> </tDispSpecDataBin> <tDispSpecDataBin> <objNr>4</objNr> <Data><![CDATA[1.pristroj='CTRL_BUTTON' 1.bgroup=FALSE 1.bscaption='OpenFile' 1.neflimit= 32 1.nsblow= 1 1.nsbhigh= 99 1.lbtype=TLB_LIST 1.befmulti=FALSE 1.brightaligned=FALSE 1.binitvisible=TRUE 1.binitdisabled=FALSE 1.bwordwrap=TRUE 1.btransparent=FALSE 1.bexpandsttext=FALSE 1.bpushlike=FALSE 1.bpassword=FALSE ]]></Data> </tDispSpecDataBin> <tDispSpecDataBin> <objNr>5</objNr> <Data><![CDATA[1.pristroj='CTRL_TREE' 1.bgroup=FALSE 1.bscaption='' 1.neflimit= 32 1.nsblow= 1 1.nsbhigh= 99 1.lbtype=TLB_LIST 1.befmulti=FALSE 1.brightaligned=FALSE 1.binitvisible=TRUE 1.binitdisabled=FALSE 1.bwordwrap=TRUE 1.btransparent=FALSE 1.bexpandsttext=FALSE 1.bpushlike=FALSE 1.bpassword=FALSE ]]></Data> </tDispSpecDataBin> <tScriptLocalVar> <Name>_fileName</Name> <Id>2</Id> <forObject>ObjNone</forObject> <vTyp>Txt</vTyp> <typ>Local</typ> <refVal>0</refVal> <structId/> <desc/> <filter>NoFilter</filter> <stTextID/> <txtPalIdx>0</txtPalIdx> </tScriptLocalVar> <tScriptLocalVar> <Name>_BTN_OPENDLG</Name> <Id>3</Id> <forObject>ObjButton</forObject> <vTyp>Int</vTyp> <typ>RefID</typ> <refVal>1</refVal> <structId/> <desc/> <filter>NoFilter</filter> <stTextID/> <txtPalIdx>0</txtPalIdx> </tScriptLocalVar> <tScriptLocalVar> <Name>_BTN_OPENFILE</Name> <Id>4</Id> <forObject>ObjButton</forObject> <vTyp>Int</vTyp> <typ>RefID</typ> <refVal>2</refVal> <structId/> <desc/> <filter>NoFilter</filter> <stTextID/> <txtPalIdx>0</txtPalIdx> </tScriptLocalVar> <tScriptLocalVar> <Name>_TREE</Name> <Id>5</Id> <forObject>ObjTree</forObject> <vTyp>Int</vTyp> <typ>RefID</typ> <refVal>3</refVal> <structId/> <desc/> <filter>NoFilter</filter> <stTextID/> <txtPalIdx>0</txtPalIdx> </tScriptLocalVar> <tScriptLocalVar> <Name>_itemHandle</Name> <Id>6</Id> <forObject>ObjNone</forObject> <vTyp>Int</vTyp> <typ>Local</typ> <refVal>0</refVal> <structId/> <desc/> <filter>NoFilter</filter> <stTextID/> <txtPalIdx>0</txtPalIdx> </tScriptLocalVar> <tScriptDef_Full> <script><![CDATA[;------------------------------------------------------------------------------- ;-- PROJECT: DEMO ;-- DESCRIPTION: Simple demo. Read and show XML document structure ;------------------------------------------------------------------------------- ;-- (c) IPESOFT 1993, 2009. All rights reserved. ;-- ;-- This software is proprietary to and embodies the confidential ;-- technology of IPESOFT. Possession, use, or copying of this ;-- software and media is authorized only pursuant to a ;-- valid written license from IPESOFT or an authorized sublicensor. ;-- ;-- http://www.ipesoft.sk ;------------------------------------------------------------------------------- INT _hXML ; Global XML document handle ENTRY BTN_OPENDLG_OnClick _fileName := %HI_FileDialog(@TRUE, "*.xml", "Open XML File", "c:\", "XML Document") END BTN_OPENDLG_OnClick PROCEDURE ApplyNodes(IN INT _parentElm, IN INT _elm) ; INT _currElmHandle ; _currElmHandle := _itemHandle _itemHandle := _itemHandle + 1 ; %HI_AddTreeItem(_TREE, %XML_NodeName(_elm) + ": " + %XML_NodeValue(_elm), _parentElm, _currElmHandle) ; INT _childs, _nrChilds, _childNode, _idx ; -- ATRIBUTTES _childs := %XML_Attributes(_elm) _nrChilds := %XML_Length(_childs) FOR _idx = 0 TO _nrChilds-1 DO_LOOP _childNode := %XML_Item(_childs, _idx) %HI_AddTreeItem(_TREE, %XML_NodeName(_childNode) + "= " + %XML_NodeValue(_childNode), _currElmHandle, _itemHandle) _itemHandle := _itemHandle + 1 END_LOOP ; -- CHILD NODES _childs := %XML_ChildNodes(_elm) _nrChilds := %XML_Length(_childs) ; FOR _idx = 0 TO _nrChilds-1 DO_LOOP _childNode := %XML_Item(_childs, _idx) CALL ApplyNodes(_currElmHandle, _childNode) END_LOOP ; END ApplyNodes ENTRY BTN_OPENFILE_OnClick ; BOOL _bOk TEXT _err ; IF _hXML\VLD THEN %HI_DeleteAll(_TREE) _bOk := %XML_FreeDocument(_hXML) ENDIF ; _itemHandle := 1 TEXT _features _features := "http://xml.org/sax/features/namespace-prefixes 1" _hXML := %XML_OpenDocument(_fileName, @FALSE, _features) IF !_hXML\VLD THEN _err := %XML_GetLastErrorMessage() RETURN ENDIF ; %HI_LockUpdate(_TREE, @TRUE) CALL ApplyNodes(0, _hXML) %HI_LockUpdate(_TREE, @FALSE) ; END BTN_OPENFILE_OnClick BEGIN _hXML := %SetInvalid(0) END ]]></script> </tScriptDef_Full> </CFGRECORDS> <MEMBEROFRESGROUP> <member>Home_s\76B9AE41CB62CDB49A3B76935FA90885</member> </MEMBEROFRESGROUP> <CRC>7fcd8632cdbc437e8a82d375be7e6b31</CRC> <OBJLIFELOGS> <tObjLifeLogData> <name>S.XML_VIEW</name> <state>OLA_CHANGED</state> <modify_time>10.06.2009 10:51:11.028</modify_time> <user_name>s</user_name> <process_name>ws1bcon3.GRE</process_name> <computer_name>ws1bcon3</computer_name> <comment_text/> </tObjLifeLogData> <tObjLifeLogData> <name>S.XML_VIEW</name> <state>OLA_CHANGED</state> <modify_time>10.06.2009 10:52:01.735</modify_time> <user_name>s</user_name> <process_name>ws1bcon3.GRE</process_name> <computer_name>ws1bcon3</computer_name> <comment_text/> </tObjLifeLogData> <tObjLifeLogData> <name>S.XML_VIEW</name> <state>OLA_CHANGED</state> <modify_time>10.06.2009 10:52:43.836</modify_time> <user_name>s</user_name> <process_name>ws1bcon3.GRE</process_name> <computer_name>ws1bcon3</computer_name> <comment_text/> </tObjLifeLogData> <tObjLifeLogData> <name>S.XML_VIEW</name> <state>OLA_CHANGED</state> <modify_time>10.06.2009 10:52:53.219</modify_time> <user_name>s</user_name> <process_name>ws1bcon3.GRE</process_name> <computer_name>ws1bcon3</computer_name> <comment_text/> </tObjLifeLogData> <tObjLifeLogData> <name>S.XML_VIEW</name> <state>OLA_CHANGED</state> <modify_time>10.06.2009 11:24:49.454</modify_time> <user_name>s</user_name> <process_name>ws1bcon3.GRE</process_name> <computer_name>ws1bcon3</computer_name> <comment_text/> </tObjLifeLogData> <tObjLifeLogData> <name>S.XML_VIEW</name> <state>OLA_CHANGED</state> <modify_time>10.06.2009 11:29:24.286</modify_time> <user_name>s</user_name> <process_name>ws1bcon3.GRE</process_name> <computer_name>ws1bcon3</computer_name> <comment_text/> </tObjLifeLogData> <tObjLifeLogData> <name>S.XML_VIEW</name> <state>OLA_CHANGED</state> <modify_time>10.06.2009 11:29:28.581</modify_time> <user_name>s</user_name> <process_name>ws1bcon3.GRE</process_name> <computer_name>ws1bcon3</computer_name> <comment_text/> </tObjLifeLogData> </OBJLIFELOGS> </ROOT>