Při analýze, reportování nebo ladění serverové aplikace můžete chtít znát počet dostupných klientů, počet spotřebovaných připojení, datum vypršení platnosti a mnoho dalších informací.
Nyní můžete pomocí verze 4D v16 R4 získat podrobné informace o aktivní licenci spuštěného produktu 4D (například 4D Server). Např:
- verze,
- platforma,
- počet dostupných a spotřebovaných připojení pro 4D Write Pro,
- počet dostupných a spotřebovaných připojení pro 4D Client,
- datum vypršení platnosti,
- …
Stačí zavolat příkaz Get license info new příkaz, který vrátí objekt:
C_OBJECT($obj)
$obj :=Get license info
Zde je například objekt vrácený pro licenci 4D Server:
{ "name": "4D Server v16 R3", "licenseNumber": "xxxx", "version": "16R3", "userName": "John DOE", "userMail": "john.doe@alpha.com", "companyName": "Alpha", "platforms": ["macOS", "windows"], "expirationDate": {"day":1, "month":1, "year":2018}, "products":[ { // Expansion of 15 4D Write - 4D Write Pro connections "allowedCount": 15, "id": 808464697, "name": "4D Write - 4D Write Pro", "rights": [ { // 5 connections until December 1st, 2017 "count": 5, "expirationDate": {"day":1, "month":12, "year":2017} }, { // 10 connections until November 1st, 2017 "count": 10, "expirationDate": {"day":1, "month":11, "year":2017} } ], // 12 4D Write - 4D Write Pro licenses currently used "usedCount": 12 }, {...} ] }