[r7]: / trunk / library / Integration Test / XmlData / svnobj  Maximize  Restore  History

Download this file

5 lines (5 with data), 3.9 kB

Gx_lN!0…jüoå
4¨HĄAa¹ASystem.StringL{6f9dac99-8de1-4efc-8465-68ac443b7d08}SpecialFuncL{0db3d7bb-cde0-4416-9a7b-ce49a0124323}NoneImplementationL{3b83b776-fb25-43b8-99f2-3c507c9143fc}TextDocument	L{f3878285-8e4f-490b-bb1b-9acbb7eb04db}
TextLinesL{a5de0b0b-1cb5-4913-ac21-9d70293ec00d}Id
longTagTextIF xInit THEN’	XmlControl.SetBuffer(pString := ADR(Buffer), iSizeOf := SIZEOF(Buffer)); 	xInit := FALSE;END_IFIF xCreate THEN2	// generate xml content  	//WriteTest1(); 	//WriteTest2(); 	//WriteTest3();	WriteTest4(); $	xCreate := FALSE;END_IF;IF xWrite THEN,	// write it to a file	Write2File(); "	xWrite := FALSE;!IF xRead THEN"l	// Read a parameter by reading a file into the buffer#	ParaRead();$Interface%L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}&PROGRAM XmlData'VAR(:	FileControl : fbFileControl;)‚	stFileAccessMode : SysFile.ACCESS_MODE := SysFile.AM_WRITE_PLUS;*`	szFilename : STRING := 'XmlControl/output.xml';+	,6	XmlControl : fbXmlControl;-†	//Buffer : ARRAY [0..GVL_Param_XmlControl.udiMaxFileSize] OF BYTE;.l	Buffer : STRING(GVL_Param_XmlControl.udiMaxFileSize);/		0,	xInit: BOOL := TRUE;	12	xCreate : BOOL := FALSE;20	xWrite : BOOL := FALSE;3 	sTag : STRING; 4 	sPara : STRING;5&	sTagPara : STRING;6.	xRead : BOOL := FALSE;72	iStateRead : DINT := 0; 8END_VAR9"UniqueIdGenerator:1126;POULevel<L{8e575c5b-1d37-49c6-941b-5c0ec7874787}=Standard> ChildObjectGuids?8System.Collections.ArrayList@,AddAttributeSubsequentAboolŠŠ-ŠŠ	E
ŠŠ
­ŚŠ-ŠŠ
­ŚŠ-ŠŠ
­ŚŠ-ŠŠ
­ŚŠ-ŠŠ
­&ŚŠ-ŠŠ
­*ŚŠ-ŠŠ
­EŚŠ-ŠŠ
­eŚŠ-ŠŠ
­fŚŠ-ŠŠ
­dŚŠ-ŠŠ
­(ŚŠ-ŠŠ
­.ŚŠ-ŠŠ
­+ŚŠ-ŠŠ
­NŚŠ-ŠŠ
­OŚŠ-ŠŠ
­MŚŠ-ŠŠ
­SŚŠ- ŠŠ
­TŚŠ-ŠŠ
­_ŚŠ-!ŠŠ
­`ŚŠ-"ŠŠ
­bŚŠ-#ŠŠ
­aŚŠ-Š$%Š	E
ŠŠ
­ŚŠ-&ŠŠ
­ŚŠ-'ŠŠ
­GŚŠ-(ŠŠ
­JŚŠ-)ŠŠ
­HŚŠ-*ŠŠ
­KŚŠ-+ŠŠ
­ŚŠ-,ŠŠ
­ŚŠ--ŠŠ
­	ŚŠ-.ŠŠ
­UŚŠ-/ŠŠ
­ŚŠ-0ŠŠ
­-ŚŠ-1ŠŠ
­QŚŠ-2ŠŠ
­WŚŠ-+ŠŠ
­YŚŠ-3ŠŠ
­ZŚŠ-4ŠŠ
­[ŚŠ-5ŠŠ
­\ŚŠ-+ŠŠ
­^ŚŠ-6ŠŠ
­XŚŠ-7ŠŠ
­*ŚŠ-8Š9-:Š;<-=>?Š@A­