[r2]: / trunk / Functions / REAL_TO_STRING_X / svnobj  Maximize  Restore  History

Download this file

5 lines (5 with data), 3.2 kB

Gx_lI!0…jüoÀ	H¤Jða ã]System.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
longTagTextÒ(*=======================================================================================================$REAL_TO_STRING_X()VAuthor: Tim Van Meppelen, Pro Electric Inc.(timv@proelectric.com"Date: Nov 2, 2018ÈStandard REAL_TO_STRING function will always add a decimal place even if the input is a whole numberjthis function will drop the ".0" on the string outputÔ========================================================================================================*)DTempVar:= REAL_TO_STRING(In_REAL);^IF (RIGHT(STR:= TempVar, SIZE:= 2) = '.0') THEN–	REAL_TO_STRING_X:= DELETE(STR:= TempVar, LEN:= 2, POS:= LEN(TempVar) - 1);ELSE8	REAL_TO_STRING_X:= TempVar;END_IFInterface L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}!DFUNCTION REAL_TO_STRING_X : STRING"VAR_INPUT# 	In_REAL:		REAL;$END_VAR%VAR&$	TempVar:		STRING;'"UniqueIdGenerator(39)POULevel*L{8e575c5b-1d37-49c6-941b-5c0ec7874787}+Standard, ChildObjectGuids-8System.Collections.ArrayList.,AddAttributeSubsequent/boolÐÐ-ÐÐ	E
ÐÐ
­ÚÐ-ÐÐ
­	ÚÐ-ÐÐ
­
ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ÚÐ-ÐÐ
­ ÚÐ-ÐÐ
­#ÚÐ-ÐÐ
­$ÚÐ-ÐÐ
­!ÚÐ-ÐÐ
­ÚÐ-Ð Ð	E
ÐÐ
­ÚÐ-!ÐÐ
­ÚÐ-"ÐÐ
­ÚÐ-#ÐÐ
­ÚÐ-$ÐÐ
­ÚÐ-%ÐÐ
­%ÚÐ-&ÐÐ
­ÚÐ-$ÐÐ
­ÚÐ-Ð'-(Ð)*-+,-Ð./­