Diff of /trunk/mqttsparkplug/mqttsparkplug/Sparkplug™ MQTT edge and host/Function Blocks/FB_PrimaryHost/FB_PrimaryHost/PoolManager/allocDevicetoEdge/svnobj [r894] .. [r895]  Maximize  Restore

Switch to unified view

a/trunk/mqttsparkplug/mqttsparkplug/Sparkplug™ MQTT edge and host/Function Blocks/FB_PrimaryHost/FB_PrimaryHost/PoolManager/allocDevicetoEdge/svnobj b/trunk/mqttsparkplug/mqttsparkplug/Sparkplug™ MQTT edge and host/Function Blocks/FB_PrimaryHost/FB_PrimaryHost/PoolManager/allocDevicetoEdge/svnobj
1
Gx_ln!0jü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
1
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
2
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ÐÐ    
2
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ÐÐ  
3
­)ÚÐ-
ÐÐ  
3
­ƒÚÐ-
ÐÐ  
4
­*ÚÐ-ÐÐ  
4
­ÚÐ-ÐÐ  
5
­+ÚÐ-ÐÐ  
5
­ÚÐ-ÐÐ  
6
­,ÚÐ-ÐÐ  
6
­ÚÐ-ÐÐ  
7
­-ÚÐ-ÐÐ  
7
­ÚÐ-ÐÐ  
8
­/ÚÐ-ÐÐ  
8
­ˆÚÐ-ÐÐ  
9
­3ÚÐ-ÐÐ  
9
­ÚÐ-ÐÐ  
10
­4ÚÐ-ÐÐ  
10
­ŠÚÐ-ÐÐ  
11
­0ÚÐ-ÐÐ  
11
­ÚÐ-ÐÐ  
12
­1ÚÐ-ÐÐ  
12
­ŒÚÐ-ÐÐ  
13
­2ÚÐ-ÐÐ  
13
­ÚÐ-ÐÐ  
14
­ÚÐ-ÐÐE
ÐÐ  
14
­ŽÚÐ-ÐÐ  
15
­ÚÐ-ÐÐ  
16
­ÚÐ-ÐÐ  
15
­(ÚÐ-ÐÐ  
17
­ÚÐ-ÐÐ  
16
­ÚÐ-ÐÐ  
18
­ÚÐ-ÐÐ  
17
­ÚÐ-ÐÐ  
19
­ÚÐ-ÐÐ  
18
­ÚÐ-ÐÐ  
20
­ŸÚÐ-ÐÐ  
19
­ÚÐ-ÐÐ  
21
­•ÚÐ-ÐÐ  
20
­   ÚÐ- ÐÐ    
22
­–ÚÐ-ÐÐ  
21
­
23
­ ÚÐ-ÐÐ  
22
ÚÐ-!ÐÐ    
24
­¡ÚÐ-ÐÐ  
23
­ÚÐ-"ÐÐ  
25
­šÚÐ-ÐÐ  
26
­›ÚÐ-ÐÐ  
27
­œÚÐ-ÐÐ  
28
­8ÚÐ-Ð !ÐEÐÐ    
29
­tÚÐ-"ÐÐ  
30
­uÚÐ-#ÐÐ  
31
­vÚÐ-$ÐÐ  
32
­wÚÐ-%ÐÐ  
33
­xÚÐ-&ÐÐ  
24
­ÚÐ- ÐÐ  
34
­yÚÐ-'ÐÐ  
25
­
ÚÐ-#ÐÐ    
35
­zÚÐ-(ÐÐ  
36
­{ÚÐ-)ÐÐ  
37
­|ÚÐ-'ÐÐ  
38
­}ÚÐ-*ÐÐ  
39
­~ÚÐ-+ÐÐ  
26
­ÚÐ-$ÐÐ  
40
­ÚÐ-,ÐÐ  
27
­ÚÐ-%ÐÐ  
41
­ÚÐ--ÐÐ  
28
­ÚÐ- 
42
­ÚÐ-.ÐÐ  
43
­‚ÚÐ-/ÐÐ  
44
­ÚÐ-'