Table of Contents

Codeunit "License Management UTCAP"

ID 70344756
Namespace: CapVision.Core.License
Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

Properties

Name Value
ObsoleteReason Entitlements are replacing the legacy licensing model.
ObsoleteState Pending
ObsoleteTag V24.202410

Methods

TestLicense

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

Effectue un test de licence. Ce test de licence peut être provoqué n'importe où dans le code. Il n'engendre pas de ralentissement de l'application, sauf si la licence est expirée, auquel cas une mise à jour synchrone a lieu. Dans le cas contraire, une demande de mise à jour est faite via l'événement OnQueryBackgroundLicenseUpdate. Il est alors recommandé au propriétaire de répondre à cet événement en faisant une vérification de la licence en tâche de fond.

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
procedure TestLicense()

GetApplicationAreas

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

Renvoie la liste des domaines d'application activés par la licence.

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
procedure GetApplicationAreas(var ApplicationAreas: List of [Text])

Parameters

Name Type Description
ApplicationAreas List of [Text]

GetLicenseType

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

Renvoie le type de licence (free, trial, subscription, perpetual).

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
procedure GetLicenseType(): Text

Returns

Type Description
Text

GetLastUpdateTime

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

Renvoie la date/heure de dernière mise à jour des informations de licence.

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
procedure GetLastUpdateTime(): DateTime

Returns

Type Description
DateTime

GetExpirationDate

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

Renvoie la date d'expiration de la licence.

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
procedure GetExpirationDate(): Date

Returns

Type Description
Date

GetMessage

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

Renvoie le message de licence.

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
procedure GetMessage(var MessageType: Text, var MessageText: Text)

Parameters

Name Type Description
MessageType Text

Type de message (error, warning ou vide si aucun message).

MessageText Text

Contenu du message.

UpdateLicenseInformation

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

Provoque la consultation du serveur de licence et la mise à jour des informations de licence.

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
procedure UpdateLicenseInformation(): Boolean

Returns

Type Description
Boolean

ShowLicenseNotifications

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

Provoque l'affichage de notifications de licence (erreur, avertissement, invitation à souscrire).

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
procedure ShowLicenseNotifications()

ActionSubscribeNow

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

Appelé lorsque l'utilisateur sélectionne l'action Souscrire dans une notification d'expiration de licence. L'application qui souhaiterait gérer cette action doit s'abonner à l'événement OnAfterSubscribeAction.

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
procedure ActionSubscribeNow(Notif: Notification)

Parameters

Name Type Description
Notif Notification

Initialize

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

Initialise cet objet.

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
procedure Initialize(NewLicensedApplication: Enum "Licensed Application UTCAP")

Parameters

Name Type Description
NewLicensedApplication Enum CapVision.Core.License."Licensed Application UTCAP"

Initialize

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

Initialise cet objet.

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
procedure Initialize(NewApplicationLicense: Interface "Application License UTCAP")

Parameters

Name Type Description
NewApplicationLicense Interface CapVision.Core.License."Application License UTCAP"

Events

OnAfterSubscribeAction

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
[BusinessEvent(False)]
local procedure OnAfterSubscribeAction(info: ModuleInfo)

Parameters

Name Type Description
info ModuleInfo

OnQueryBackgroundLicenseUpdate

Obsolete

This element will become obsolete from version V24.202410. Entitlements are replacing the legacy licensing model.

[Obsolete(Entitlements are replacing the legacy licensing model.,V24.202410)]
[BusinessEvent(False)]
local procedure OnQueryBackgroundLicenseUpdate(info: ModuleInfo)

Parameters

Name Type Description
info ModuleInfo

See also