--- a/branches/develop/mqttsparkplug/mqttsparkplug/Sparkplug™ MQTT edge and host/Function Blocks/FB_Payload_1/FB_Payload/Pool/ClaimNextFreePropertyValue/svnobj
+++ b/branches/develop/mqttsparkplug/mqttsparkplug/Sparkplug™ MQTT edge and host/Function Blocks/FB_Payload_1/FB_Payload/Pool/ClaimNextFreePropertyValue/svnobj
@@ -1,20 +1,37 @@
-Gx_l,!0…jüo3w°NÔÑ;€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
2IF _COL_Element <> 0 THENH    IF __QUERYPOINTER( _COL_Element,N                         pObject ) THENb        ClaimNextFreePropertyValue REF= pObject^;r        ClaimNextFreePropertyValue.InitializeStructure();    ELSEn        eError := ERROR.PayloadNotACollectionOfStorage;    END_IFELSEt    eError := ERROR.PayloadNotEnoughPropertySetValuesPool;END_IFInterfaceL{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}’METHOD ClaimNextFreePropertyValue : REFERENCE TO FB_PayloadPropertyValue;VAR_OUTPUT 	eError : ERROR;END_VARVAR\	pObject : POINTER TO FB_PayloadPropertyValue;ÐÐÐEÐÐ	
-­1ÚÐ-
ÐÐ	
-­2ÚÐ-ÐÐ	
-­3ÚÐ-ÐÐ	
-­4ÚÐ-ÐÐ	
-­5ÚÐ-ÐÐ	
-­6ÚÐ-ÐÐ	
-­7ÚÐ-ÐÐ	
-­8ÚÐ-ÐÐ	
-­9ÚÐ-ÐÐ	
-­:ÚÐ-ÐÐ	
-­ÚÐ-ÐÐEÐÐ	
-­ÚÐ-ÐÐ	
-­+ÚÐ-ÐÐ	
-­,ÚÐ-ÐÐ	
-­;ÚÐ-ÐÐ	
-­=ÚÐ-ÐÐ	
-­<ÚÐ-ÐÐ	
-­ÚÐ-
\ No newline at end of file
+Gx_l9!0…jüoÀ
+e3Qúêõ2System.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
^//Try and get a Property from the existing pool~PropertySetValuesPool.ItterateNext( itfElement => _COL_Element,N                          HasNext => );2IF _COL_Element <> 0 THENH    IF __QUERYPOINTER( _COL_Element,N                         pObject ) THENb        ClaimNextFreePropertyValue REF= pObject^;r        ClaimNextFreePropertyValue.InitializeStructure();    ELSEn        eError := ERROR.PayloadNotACollectionOfStorage;    END_IFELSEl	//No free object? No worries, we will just create oneª	pObject := PropertySetValuesFactory.Create(itfData := initData, eError => FBFError);*	IF pObject <> 0 THEN\	    ClaimNextFreePropertyValue REF= pObject^;Ä		//Better add it to the MetricPool and "itterate" it, so future generations of payload can use itš		PropertySetValuesPool.AppendElem(itfElement := ClaimNextFreePropertyValue); N		PropertySetValuesPool.ItterateNext();!END_IF"Interface#L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}$’METHOD ClaimNextFreePropertyValue : REFERENCE TO FB_PayloadPropertyValue;%VAR_OUTPUT& 	eError : ERROR;'END_VAR(VAR)\	pObject : POINTER TO FB_PayloadPropertyValue;*:	initData        : DummyData;+:	FBFError        : FBF.ERROR;ÐÐÐEÐÐ	
+­@ÚÐ-
ÐÐ	
+­AÚÐ-ÐÐ	
+­BÚÐ-ÐÐ	
+­CÚÐ-ÐÐ	
+­DÚÐ-ÐÐ	
+­EÚÐ-ÐÐ	
+­FÚÐ-ÐÐ	
+­GÚÐ-ÐÐ	
+­HÚÐ-ÐÐ	
+­IÚÐ-ÐÐ	
+­JÚÐ-ÐÐ	
+­KÚÐ-ÐÐ	
+­LÚÐ-ÐÐ	
+­MÚÐ-ÐÐ	
+­NÚÐ-ÐÐ	
+­OÚÐ-ÐÐ	
+­PÚÐ-ÐÐ	
+­QÚÐ-ÐÐ	
+­RÚÐ-ÐÐ	
+­SÚÐ-ÐÐ	
+­TÚÐ- ÐÐ	
+­UÚÐ-ÐÐ	
+­VÚÐ-ÐÐ	
+­WÚÐ-ÐÐ	
+­>ÚÐ-!Ð"#ÐE	ÐÐ	
+­ÚÐ-$ÐÐ	
+­+ÚÐ-%ÐÐ	
+­,ÚÐ-&ÐÐ	
+­;ÚÐ-'ÐÐ	
+­=ÚÐ-(ÐÐ	
+­<ÚÐ-)ÐÐ	
+­ZÚÐ-*ÐÐ	
+­[ÚÐ-+ÐÐ	
+­ÚÐ-'
\ No newline at end of file