Diff of /branches/develop/mqttsparkplug/mqttsparkplug/Sparkplug™ MQTT edge and host/Function Blocks/FB_PrimaryHost/FB_PrimaryHost/PoolManager/allocDevicetoEdge/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/allocDevicetoEdge/svnobj
+++ b/branches/develop/mqttsparkplug/mqttsparkplug/Sparkplug™ MQTT edge and host/Function Blocks/FB_PrimaryHost/FB_PrimaryHost/PoolManager/allocDevicetoEdge/svnobj
@@ -1,28 +1,44 @@
-Gx_ln!0…jüo͇ÎÉ!y(Ja¾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 groupID and assign its nameRIF NOT THIS^._DevicePool.ListIsEmpty THENä    _itfElement := THIS^._DevicePool.HeadElem.RemoveElem(); //Remove it, but now it is not part of a group anymorex    IF __QUERYPOINTER( _itfElement,  _fb_RemoteDevice ) THEN”        _fb_RemoteDevice^( itfRemoteEdge := itfEdge, Name := DeviceName );b        allocDevicetoEdge REF= _fb_RemoteDevice^;    ELSEX		eError := ERROR.HostNotEnoughBlankDevices;	END_IFELSEV	eError := ERROR.HostNotEnoughBlankDevices;END_IFInterfaceL{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}p// Will try to allocate a new Device with the given namepMETHOD allocDevicetoEdge :  REFERENCE TO FB_RemoteDeviceVAR_IN_OUT:    DeviceName : WSTRING;    4    itfEdge : IRemoteEdge; END_VAR!VAR_OUTPUT"&    eError : ERROR;#VAR$<    _itfElement    : IElement;%d    _fb_RemoteDevice : POINTER TO FB_RemoteDevice;ÐÐÐEÐÐ	
-­)ÚÐ-
ÐÐ	
-­*ÚÐ-ÐÐ	
-­+ÚÐ-ÐÐ	
-­,ÚÐ-ÐÐ	
-­-ÚÐ-ÐÐ	
-­/ÚÐ-ÐÐ	
-­3ÚÐ-ÐÐ	
-­4ÚÐ-ÐÐ	
-­0ÚÐ-ÐÐ	
-­1ÚÐ-ÐÐ	
-­2ÚÐ-ÐÐ	
-­ÚÐ-ÐÐE
ÐÐ	
-­(ÚÐ-ÐÐ	
-­ÚÐ-ÐÐ	
-­ÚÐ-ÐÐ	
-­ÚÐ-ÐÐ	
-­ÚÐ-ÐÐ	
-­	ÚÐ- ÐÐ	

-ÚÐ-!ÐÐ	
-­ÚÐ-"ÐÐ	
-­ÚÐ- ÐÐ	

ÚÐ-#ÐÐ	
-­ÚÐ-$ÐÐ	
-­ÚÐ-%ÐÐ	
-­ÚÐ- 
\ No newline at end of file
+Gx_l!0…jüoWFKœ#±éÄbSystem.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 groupID and assign its nameRIF NOT THIS^._DevicePool.ListIsEmpty THENâ    itfElement := THIS^._DevicePool.HeadElem.RemoveElem(); //Remove it, but now it is not part of a group anymorev    IF __QUERYPOINTER( itfElement,  pfb_RemoteDevice ) THEN”        pfb_RemoteDevice^( itfRemoteEdge := itfEdge, Name := DeviceName );b        allocDevicetoEdge REF= pfb_RemoteDevice^;    ELSEJ		newObjectFromThinAirPlease := TRUE;	END_IFELSEH	newObjectFromThinAirPlease := TRUE;END_IFDIF newObjectFromThinAirPlease THENb	//No metric? No worries, we will just create oneª	pfb_RemoteDevice := _DevicesFactory.Create(itfData := initData, eError => FBFError);<	IF pfb_RemoteDevice <> 0 THENž		//No need to add it to the pool... we add it instead when we assign the ownerX		eError := ERROR.HostNotEnoughBlankDevices; Interface!L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}"p// Will try to allocate a new Device with the given name#pMETHOD allocDevicetoEdge :  REFERENCE TO FB_RemoteDevice$VAR_IN_OUT%:    DeviceName : WSTRING;    &4    itfEdge : IRemoteEdge;'END_VAR(VAR_OUTPUT)&    eError : ERROR;*VAR+T    itfElement                 : IElement;,x    pfb_RemoteDevice           : POINTER TO FB_RemoteDevice;-P	initData                   : DummyData;.P	FBFError                   : FBF.ERROR;/F	newObjectFromThinAirPlease : BOOL;ÐÐÐEÐÐ	
+­ƒÚÐ-
ÐÐ	
+­„ÚÐ-ÐÐ	
+­…ÚÐ-ÐÐ	
+­†ÚÐ-ÐÐ	
+­‡ÚÐ-ÐÐ	
+­ˆÚÐ-ÐÐ	
+­‰ÚÐ-ÐÐ	
+­ŠÚÐ-ÐÐ	
+­‹ÚÐ-ÐÐ	
+­ŒÚÐ-ÐÐ	
+­ÚÐ-ÐÐ	
+­ŽÚÐ-ÐÐ	
+­ÚÐ-ÐÐ	
+­ÚÐ-ÐÐ	
+­‘ÚÐ-ÐÐ	
+­’ÚÐ-ÐÐ	
+­“ÚÐ-ÐÐ	
+­ŸÚÐ-ÐÐ	
+­•ÚÐ-ÐÐ	
+­–ÚÐ-ÐÐ	
+­ ÚÐ-ÐÐ	
+­¡ÚÐ-ÐÐ	
+­šÚÐ-ÐÐ	
+­›ÚÐ-ÐÐ	
+­œÚÐ-ÐÐ	
+­8ÚÐ-Ð !ÐEÐÐ	
+­tÚÐ-"ÐÐ	
+­uÚÐ-#ÐÐ	
+­vÚÐ-$ÐÐ	
+­wÚÐ-%ÐÐ	
+­xÚÐ-&ÐÐ	
+­yÚÐ-'ÐÐ	
+­zÚÐ-(ÐÐ	
+­{ÚÐ-)ÐÐ	
+­|ÚÐ-'ÐÐ	
+­}ÚÐ-*ÐÐ	
+­~ÚÐ-+ÐÐ	
+­ÚÐ-,ÐÐ	
+­€ÚÐ--ÐÐ	
+­ÚÐ-.ÐÐ	
+­‚ÚÐ-/ÐÐ	
+­ÚÐ-'
\ No newline at end of file