Download this file
1 2 3 4 5
ClaimNextFreeParameter := ParametersPool[ParametersPoolFreeIndex]; ParametersPoolFreeIndex := ParametersPoolFreeIndex +1; ELSE eError := ERROR.PayloadNotEnoughParametersPool; END_IF