ServerInfoEx - Can not retrieve type of license

Hi all,

I'm trying ti retrieve the type of license of Citect clients with the above code.

But the function always returns 0 (Full license).

I'm using Citect Version 8.20 Update 25 and clients have floating licenses installed.

iCount = 1;
iClients = ServerInfoEx("Server", 1, "Alarm", "MyCluster");
WHILE iCount <= iClients DO
sName = ServerInfoEx(IntToStr(iCount), 2, "Alarm", "MyCluster");

iClientsLic = ServerInfoEx(IntToStr(iCount), 7, "Alarm", "MyCluster")

      SELECT CASE sName
         CASE "CTC1"
    CTC1_ScadaLic = iClientsLic;
         CASE "CTC2"
    CTC2_ScadaLic = iClientsLic;

END SELECT

iCount = iCount + 1;
END

Best Regards

Nuno Baeta