Diff of /branches/develop/mqttsparkplug/mqttsparkplug/Sparkplug™ MQTT edge and host/Function Blocks/FB_PrimaryHost/FB_PrimaryHost/PoolManager/allocMetric/svnobj [r890] .. [r891]  Maximize  Restore

Switch to side-by-side view

--- a/branches/develop/mqttsparkplug/mqttsparkplug/Sparkplug™ MQTT edge and host/Function Blocks/FB_PrimaryHost/FB_PrimaryHost/PoolManager/allocMetric/svnobj
+++ b/branches/develop/mqttsparkplug/mqttsparkplug/Sparkplug™ MQTT edge and host/Function Blocks/FB_PrimaryHost/FB_PrimaryHost/PoolManager/allocMetric/svnobj
@@ -1,28 +1,42 @@
-Gx_l×!0…jüo	n]‚j‘)©è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
Ò// steal an object from the pool, register it with the Edge / Device / RemoteTemplate and assign its nameRIF NOT THIS^._MetricPool.ListIsEmpty THENä    _itfElement := THIS^._MetricPool.HeadElem.RemoveElem(); //Remove it, but now it is not part of a group anymorej    IF __QUERYPOINTER( _itfElement, _fb_Metric ) THENp        _fb_Metric^( itfMetricOwner := itfMetricOwner );J        allocMetric REF= _fb_Metric^;    ELSEX		eError := ERROR.HostNotEnoughBlankMetrics;^		allocMetric REF= GVL_sparkplug.InvalidMetric;	END_IFELSEV	eError := ERROR.HostNotEnoughBlankMetrics;\	allocMetric REF= GVL_sparkplug.InvalidMetric;END_IFInterfaceL{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}p// Will try to allocate a new Metric with the given nameVMETHOD allocMetric : REFERENCE TO FB_MetricVAR_INPUT D    itfMetricOwner : IMetricOwner;!END_VAR"VAR_OUTPUT#&    eError : ERROR;$VAR%@    _itfElement      : IElement;&X    _fb_Metric       : POINTER TO FB_Metric;ÐÐÐEÐÐ	
-­@ÚÐ-
ÐÐ	
-­AÚÐ-ÐÐ	
-­BÚÐ-ÐÐ	
-­CÚÐ-ÐÐ	
-­EÚÐ-ÐÐ	
-­FÚÐ-ÐÐ	
-­LÚÐ-ÐÐ	
-­MÚÐ-ÐÐ	
-­NÚÐ-ÐÐ	
-­GÚÐ-ÐÐ	
-­IÚÐ-ÐÐ	
-­JÚÐ-ÐÐ	
-­KÚÐ-ÐÐ	
-­ÚÐ-ÐÐEÐÐ	
-­HÚÐ-ÐÐ	
-­6ÚÐ-ÐÐ	
-­7ÚÐ-ÐÐ	
-­8ÚÐ- ÐÐ	
-­9ÚÐ-!ÐÐ	
-­:ÚÐ-"ÐÐ	
-­;ÚÐ-#ÐÐ	
-­<ÚÐ-!ÐÐ	
-­=ÚÐ-$ÐÐ	
-­>ÚÐ-%ÐÐ	
-­?ÚÐ-&ÐÐ	
-­ÚÐ-!
\ No newline at end of file
+Gx_l!0…jüoüFÚ/á³àSSystem.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
Ò// steal an object from the pool, register it with the Edge / Device / RemoteTemplate and assign its nameRIF NOT THIS^._MetricPool.ListIsEmpty THENâ    itfElement := THIS^._MetricPool.HeadElem.RemoveElem(); //Remove it, but now it is not part of a group anymoreh    IF __QUERYPOINTER( itfElement, pfb_Metric ) THENp        pfb_Metric^( itfMetricOwner := itfMetricOwner );J        allocMetric REF= pfb_Metric^;    ELSEJ		newObjectFromThinAirPlease := TRUE;	END_IFELSEH	newObjectFromThinAirPlease := TRUE;END_IFDIF newObjectFromThinAirPlease THENb	//No metric? No worries, we will just create onež	pfb_Metric := _MetricsFactory.Create(itfData := initData, eError => FBFError);0	IF pfb_Metric <> 0 THENd		pfb_Metric^( itfMetricOwner := itfMetricOwner );D	    allocMetric REF= pfb_Metric^; ž		//No need to add it to the pool... we add it instead when we assign the owner!d        eError := ERROR.HostNotEnoughBlankMetrics;"^		allocMetric REF= GVL_sparkplug.InvalidMetric;#    END_IF$Interface%L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}&p// Will try to allocate a new Metric with the given name'VMETHOD allocMetric : REFERENCE TO FB_Metric(VAR_INPUT)D    itfMetricOwner : IMetricOwner;*END_VAR+VAR_OUTPUT,&    eError : ERROR;-VAR.T    itfElement                 : IElement;/l    pfb_Metric                 : POINTER TO FB_Metric;0P	initData                   : DummyData;1P	FBFError                   : FBF.ERROR;2F	newObjectFromThinAirPlease : BOOL;ÐÐÐEÐÐ	
+­íÚÐ-
ÐÐ	
+­îÚÐ-ÐÐ	
+­ïÚÐ-ÐÐ	
+­ðÚÐ-ÐÐ	
+­ñÚÐ-ÐÐ	
+­òÚÐ-ÐÐ	
+­óÚÐ-ÐÐ	
+­ôÚÐ-ÐÐ	
+­õÚÐ-ÐÐ	
+­öÚÐ-ÐÐ	
+­÷ÚÐ-ÐÐ	
+­øÚÐ-ÐÐ	
+­ùÚÐ-ÐÐ	
+­úÚÐ-ÐÐ	
+­ûÚÐ-ÐÐ	
+­üÚÐ-ÐÐ	
+­ýÚÐ-ÐÐ	
+­þÚÐ-ÐÐ	
+­ÿÚÐ-ÐÐ	
+­ÚÐ- ÐÐ	
+­ÚÐ-ÐÐ	
+­ÚÐ-!ÐÐ	
+­ÚÐ-"ÐÐ	
+­ÚÐ-#ÐÐ	
+­bÚÐ-Ð$%ÐEÐÐ	
+­ßÚÐ-&ÐÐ	
+­àÚÐ-'ÐÐ	
+­áÚÐ-(ÐÐ	
+­âÚÐ-)ÐÐ	
+­ãÚÐ-*ÐÐ	
+­äÚÐ-+ÐÐ	
+­åÚÐ-,ÐÐ	
+­æÚÐ-*ÐÐ	
+­çÚÐ--ÐÐ	
+­èÚÐ-.ÐÐ	
+­éÚÐ-/ÐÐ	
+­êÚÐ-0ÐÐ	
+­ëÚÐ-1ÐÐ	
+­ìÚÐ-2ÐÐ	
+­ÚÐ-*
\ No newline at end of file