Diff of /trunk/d-logg/d-logg/Generic/IoDrvFB/DumpJSON/svnobj [000000] .. [r7]  Maximize  Restore

Switch to side-by-side view

--- a
+++ b/trunk/d-logg/d-logg/Generic/IoDrvFB/DumpJSON/svnobj
@@ -0,0 +1,88 @@
+Gx_lŠ:!0…jüoI2y#4BÀx^ÇSystem.StringL{f8a58466-d7f6-439f-bbb8-d4600e41d099}ImplementationL{3b83b776-fb25-43b8-99f2-3c507c9143fc}TextDocumentL{f3878285-8e4f-490b-bb1b-9acbb7eb04db}TextLinesL{a5de0b0b-1cb5-4913-ac21-9d70293ec00d}	Id
+longTagText
hJSON := SysFile.SysFileOpen(filename, SysFile.ACCESS_MODE.AM_WRITE, 0);XIF hJSON <> SysTypes.RTS_INVALID_HANDLE THEN^	timestamp := SysTimeRtc.SysTimeRtcGet(Result);$	puts(hJSON, '{');p	putval(hJSON, 'Timestamp', UDINT_TO_STRING(timestamp));’	putval(hJSON, 'C1_S1',  REAL_TO_STRING(THIS^._instance.udtInput.C0_S1));’	putval(hJSON, 'C1_S2',  REAL_TO_STRING(THIS^._instance.udtInput.C0_S2));’	putval(hJSON, 'C1_S3',  REAL_TO_STRING(THIS^._instance.udtInput.C0_S3));’	putval(hJSON, 'C1_S4',  REAL_TO_STRING(THIS^._instance.udtInput.C0_S4));’	putval(hJSON, 'C1_S5',  REAL_TO_STRING(THIS^._instance.udtInput.C0_S5));’	putval(hJSON, 'C1_S6',  REAL_TO_STRING(THIS^._instance.udtInput.C0_S6));’	putval(hJSON, 'C1_S7',  REAL_TO_STRING(THIS^._instance.udtInput.C0_S7));’	putval(hJSON, 'C1_S8',  REAL_TO_STRING(THIS^._instance.udtInput.C0_S8));’	putval(hJSON, 'C1_S9',  REAL_TO_STRING(THIS^._instance.udtInput.C0_S9));”	putval(hJSON, 'C1_S10', REAL_TO_STRING(THIS^._instance.udtInput.C0_S10));”	putval(hJSON, 'C1_S11', REAL_TO_STRING(THIS^._instance.udtInput.C0_S11));”	putval(hJSON, 'C1_S12', REAL_TO_STRING(THIS^._instance.udtInput.C0_S12));”	putval(hJSON, 'C1_S13', REAL_TO_STRING(THIS^._instance.udtInput.C0_S13));”	putval(hJSON, 'C1_S14', REAL_TO_STRING(THIS^._instance.udtInput.C0_S14)); ”	putval(hJSON, 'C1_S15', REAL_TO_STRING(THIS^._instance.udtInput.C0_S15));!”	putval(hJSON, 'C1_S16', REAL_TO_STRING(THIS^._instance.udtInput.C0_S16));"#’	putval(hJSON, 'C2_S1',  REAL_TO_STRING(THIS^._instance.udtInput.C1_S1));$’	putval(hJSON, 'C2_S2',  REAL_TO_STRING(THIS^._instance.udtInput.C1_S2));%’	putval(hJSON, 'C2_S3',  REAL_TO_STRING(THIS^._instance.udtInput.C1_S3));&’	putval(hJSON, 'C2_S4',  REAL_TO_STRING(THIS^._instance.udtInput.C1_S4));'’	putval(hJSON, 'C2_S5',  REAL_TO_STRING(THIS^._instance.udtInput.C1_S5));(’	putval(hJSON, 'C2_S6',  REAL_TO_STRING(THIS^._instance.udtInput.C1_S6));)’	putval(hJSON, 'C2_S7',  REAL_TO_STRING(THIS^._instance.udtInput.C1_S7));*’	putval(hJSON, 'C2_S8',  REAL_TO_STRING(THIS^._instance.udtInput.C1_S8));+’	putval(hJSON, 'C2_S9',  REAL_TO_STRING(THIS^._instance.udtInput.C1_S9));,”	putval(hJSON, 'C2_S10', REAL_TO_STRING(THIS^._instance.udtInput.C1_S10));-”	putval(hJSON, 'C2_S11', REAL_TO_STRING(THIS^._instance.udtInput.C1_S11));.”	putval(hJSON, 'C2_S12', REAL_TO_STRING(THIS^._instance.udtInput.C1_S12));/”	putval(hJSON, 'C2_S13', REAL_TO_STRING(THIS^._instance.udtInput.C1_S13));0”	putval(hJSON, 'C2_S14', REAL_TO_STRING(THIS^._instance.udtInput.C1_S14));1–	putval(hJSON, 'C2_S15', DWORD_TO_STRING(THIS^._instance.udtInput.C1_S15));2–	putval(hJSON, 'C2_S16', DWORD_TO_STRING(THIS^._instance.udtInput.C1_S16));3Ì	putval(hJSON, 'C1_A1',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A0 AND 16#01) <> 0)));4Ì	putval(hJSON, 'C1_A2',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A0 AND 16#02) <> 0)));5Ì	putval(hJSON, 'C1_A3',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A0 AND 16#04) <> 0)));6Ì	putval(hJSON, 'C1_A4',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A0 AND 16#08) <> 0)));7Ì	putval(hJSON, 'C1_A5',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A0 AND 16#10) <> 0)));8Ì	putval(hJSON, 'C1_A6',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A0 AND 16#20) <> 0)));9Ì	putval(hJSON, 'C1_A7',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A0 AND 16#40) <> 0)));:Ì	putval(hJSON, 'C1_A8',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A0 AND 16#80) <> 0)));;Ì	putval(hJSON, 'C1_A9',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A1 AND 16#01) <> 0)));<Ì	putval(hJSON, 'C1_A10', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A1 AND 16#02) <> 0)));=Ì	putval(hJSON, 'C1_A11', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A1 AND 16#04) <> 0)));>Ì	putval(hJSON, 'C1_A12', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A1 AND 16#08) <> 0)));?Ì	putval(hJSON, 'C1_A13', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A1 AND 16#10) <> 0)));@Ì	putval(hJSON, 'C1_A14', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A1 AND 16#20) <> 0)));AÌ	putval(hJSON, 'C1_A15', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A1 AND 16#40) <> 0)));BÌ	putval(hJSON, 'C1_A16', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C0_A1 AND 16#80) <> 0)));CÌ	putval(hJSON, 'C2_A1',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A0 AND 16#01) <> 0)));DÌ	putval(hJSON, 'C2_A2',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A0 AND 16#02) <> 0)));EÌ	putval(hJSON, 'C2_A3',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A0 AND 16#04) <> 0)));FÌ	putval(hJSON, 'C2_A4',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A0 AND 16#08) <> 0)));GÌ	putval(hJSON, 'C2_A5',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A0 AND 16#10) <> 0)));HÌ	putval(hJSON, 'C2_A6',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A0 AND 16#20) <> 0)));IÌ	putval(hJSON, 'C2_A7',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A0 AND 16#40) <> 0)));JÌ	putval(hJSON, 'C2_A8',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A0 AND 16#80) <> 0)));KÌ	putval(hJSON, 'C2_A9',  INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A1 AND 16#01) <> 0)));LÌ	putval(hJSON, 'C2_A10', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A1 AND 16#02) <> 0)));MÌ	putval(hJSON, 'C2_A11', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A1 AND 16#04) <> 0)));NÌ	putval(hJSON, 'C2_A12', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A1 AND 16#08) <> 0)));OÌ	putval(hJSON, 'C2_A13', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A1 AND 16#10) <> 0)));PÌ	putval(hJSON, 'C2_A14', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A1 AND 16#20) <> 0)));QÌ	putval(hJSON, 'C2_A15', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A1 AND 16#40) <> 0)));RÌ	putval(hJSON, 'C2_A16', INT_TO_STRING(BOOL_TO_INT((THIS^._instance.udtInput.C1_A1 AND 16#80) <> 0)));S,	puts(hJSON, '"":0}');T:	SysFile.SysFileClose(hJSON);UEND_IFVInterfaceWL{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}X,METHOD DumpJSON : BOOLYVAR_INPUTZ@	filename : REFERENCE TO STRING;[END_VAR\VAR].	hJSON: RTS_IEC_HANDLE;^&	timestamp : UDINT;_0	Result: RTS_IEC_RESULT;ÐÐÐEKÐÐ	
+­ÚÐ-
ÐÐ	
+­ÚÐ-ÐÐ	
+­eÚÐ-ÐÐ	
+­bÚÐ-ÐÐ	
+­fÚÐ-ÐÐ	
+­wÚÐ-ÐÐ	
+­xÚÐ-ÐÐ	
+­yÚÐ-ÐÐ	
+­zÚÐ-ÐÐ	
+­{ÚÐ-ÐÐ	
+­|ÚÐ-ÐÐ	
+­}ÚÐ-ÐÐ	
+­~ÚÐ-ÐÐ	
+­ÚÐ-ÐÐ	
+­€ÚÐ-ÐÐ	
+­ÚÐ-ÐÐ	
+­‚ÚÐ-ÐÐ	
+­ƒÚÐ-ÐÐ	
+­„ÚÐ-ÐÐ	
+­…ÚÐ- ÐÐ	
+­†ÚÐ-!ÐÐ	
+­—ÚÐ-"ÐÐ	
+­‡ÚÐ-#ÐÐ	
+­ˆÚÐ-$ÐÐ	
+­‰ÚÐ-%ÐÐ	
+­ŠÚÐ-&ÐÐ	
+­‹ÚÐ-'ÐÐ	
+­ŒÚÐ-(ÐÐ	
+­ÚÐ-)ÐÐ	
+­ŽÚÐ-*ÐÐ	
+­ÚÐ-+ÐÐ	
+­ÚÐ-,ÐÐ	
+­‘ÚÐ--ÐÐ	
+­’ÚÐ-.ÐÐ	
+­“ÚÐ-/ÐÐ	
+­”ÚÐ-0ÐÐ	
+­•ÚÐ-1ÐÐ	
+­–ÚÐ-2ÐÐ	
+­˜ÚÐ-"ÐÐ	
+­ªÚÐ-3ÐÐ	
+­«ÚÐ-4ÐÐ	
+­¬ÚÐ-5ÐÐ	
+­­ÚÐ-6ÐÐ	
+­®ÚÐ-7ÐÐ	
+­¯ÚÐ-8ÐÐ	
+­°ÚÐ-9ÐÐ	
+­±ÚÐ-:ÐÐ	
+­²ÚÐ-;ÐÐ	
+­³ÚÐ-<ÐÐ	
+­´ÚÐ-=ÐÐ	
+­µÚÐ->ÐÐ	
+­¶ÚÐ-?ÐÐ	
+­·ÚÐ-@ÐÐ	
+­¸ÚÐ-AÐÐ	
+­¹ÚÐ-BÐÐ	
+­ºÚÐ-"ÐÐ	
+­»ÚÐ-CÐÐ	
+­¼ÚÐ-DÐÐ	
+­½ÚÐ-EÐÐ	
+­¾ÚÐ-FÐÐ	
+­¿ÚÐ-GÐÐ	
+­ÀÚÐ-HÐÐ	
+­ÁÚÐ-IÐÐ	
+­ÂÚÐ-JÐÐ	
+­ÃÚÐ-KÐÐ	
+­ÄÚÐ-LÐÐ	
+­ÅÚÐ-MÐÐ	
+­ÆÚÐ-NÐÐ	
+­ÇÚÐ-OÐÐ	
+­ÈÚÐ-PÐÐ	
+­ÉÚÐ-QÐÐ	
+­ÊÚÐ-RÐÐ	
+­ÌÚÐ-SÐÐ	
+­ÚÐ-TÐÐ	
+­ÚÐ-UÐVWÐE
+ÐÐ	
+­ÚÐ-XÐÐ	
+­ÚÐ-YÐÐ	
+­ÚÐ-ZÐÐ	
+­ÚÐ-[ÐÐ	
+­ÚÐ-"ÐÐ	
+­ÚÐ-\ÐÐ	
+­ÚÐ-]ÐÐ	
+­dÚÐ-^ÐÐ	
+­ÍÚÐ-_ÐÐ	
+­ÚÐ-[
\ No newline at end of file