a/branches/develop/mqttsparkplug/mqttsparkplug/Sparkplug™ MQTT edge and host/Function Blocks/FB_Payload_1/FB_Payload/Pool/ClaimNextFreeMetric/svnobj b/branches/develop/mqttsparkplug/mqttsparkplug/Sparkplug™ MQTT edge and host/Function Blocks/FB_Payload_1/FB_Payload/Pool/ClaimNextFreeMetric/svnobj
1
Gx_lñ
!0…jüox
1
Gx_lá
!0…jüoh
2
¨&z™QΔó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
2
ã5>UQ+:H—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
3
longTagText
Z//Try and get a metric from the existing pooljMetricsPool.ItterateNext( itfElement => _COL_Element,N                          HasNext => );2IF _COL_Element <> 0 THENH    IF __QUERYPOINTER( _COL_Element,^                         MyPayloadMetric ) THENd        ClaimNextFreeMetric REF= MyPayloadMetric^;d        ClaimNextFreeMetric.InitializeStructure();    ELSEn        eError := ERROR.PayloadNotACollectionOfStorage;    END_IFELSEb //No metric? No worries, we will just create one¦    MyPayloadMetric := MetricsFactory.Create(itfData := initData, eError => FBFError);: IF MyPayloadMetric <> 0 THEN^     ClaimNextFreeMetric REF= MyPayloadMetric^;Ä       //Better add it to the MetricPool and "itterate" it, so future generations of payload can use itx    MetricsPool.AppendElem(itfElement := ClaimNextFreeMetric); :    MetricsPool.ItterateNext();!END_IF"Interface#L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}$tMETHOD ClaimNextFreeMetric : REFERENCE TO FB_PayloadMetric%VAR_OUTPUT&&    eError : ERROR;'END_VAR(VAR)d    MyPayloadMetric : POINTER TO FB_PayloadMetric;*J initData        : PayloadMetricData;+: FBFError        : FBF.ERROR;ÐÐÐEÐÐ  
3
longTagText
Z//Try and get a metric from the existing pooljMetricsPool.ItterateNext( itfElement => _COL_Element,N                          HasNext => );2IF _COL_Element <> 0 THENH    IF __QUERYPOINTER( _COL_Element,^                         MyPayloadMetric ) THENd        ClaimNextFreeMetric REF= MyPayloadMetric^;d        ClaimNextFreeMetric.InitializeStructure();    ELSEn        eError := ERROR.PayloadNotACollectionOfStorage;    END_IFELSEb //No metric? No worries, we will just create one¦    MyPayloadMetric := MetricsFactory.Create(itfData := initData, eError => FBFError);: IF MyPayloadMetric <> 0 THEN^     ClaimNextFreeMetric REF= MyPayloadMetric^;Ä       //Better add it to the MetricPool and "itterate" it, so future generations of payload can use itx    MetricsPool.AppendElem(itfElement := ClaimNextFreeMetric); :    MetricsPool.ItterateNext();!END_IF"Interface#L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}$tMETHOD ClaimNextFreeMetric : REFERENCE TO FB_PayloadMetric%VAR_OUTPUT&&    eError : ERROR;'END_VAR(VAR)d    MyPayloadMetric : POINTER TO FB_PayloadMetric;*: initData        : DummyData;+: FBFError        : FBF.ERROR;ÐÐÐEÐÐ  
4
­’ÚÐ-
ÐÐ  
4
­’ÚÐ-
ÐÐ  
5
­…ÚÐ-ÐÐ  
5
­…ÚÐ-ÐÐ  
6
­†ÚÐ-ÐÐ  
6
­†ÚÐ-ÐÐ  
7
­‡ÚÐ-ÐÐ  
7
­‡ÚÐ-ÐÐ  
8
­ˆÚÐ-ÐÐ  
8
­ˆÚÐ-ÐÐ  
...
...
24
­¡ÚÐ- ÐÐ  
24
­¡ÚÐ- ÐÐ  
25
­ÚÐ-ÐÐ  
25
­ÚÐ-ÐÐ  
26
­žÚÐ-ÐÐ  
26
­žÚÐ-ÐÐ  
27
­šÚÐ-ÐÐ  
27
­šÚÐ-ÐÐ  
28
­ÚÐ-!Ð"#ÐE   ÐÐ  
28
­ÚÐ-!Ð"#ÐE   ÐÐ  
29
­|ÚÐ-$ÐÐ  
29
­£ÚÐ-$ÐÐ  
30
­ÚÐ-%ÐÐ  
30
­¤ÚÐ-%ÐÐ  
31
­ÚÐ-&ÐÐ  
31
­¥ÚÐ-&ÐÐ  
32
­ÚÐ-'ÐÐ  
32
­¦ÚÐ-'ÐÐ  
33
­ƒÚÐ-(ÐÐ  
33
­§ÚÐ-(ÐÐ  
34
­ÚÐ-)ÐÐ  
34
­¨ÚÐ-)ÐÐ  
35
­ÚÐ-*ÐÐ  
35
­©ÚÐ-*ÐÐ  
36
­ÚÐ-+ÐÐ  
36
­ªÚÐ-+ÐÐ  
37
­ÚÐ-'
37
­ÚÐ-'