VP SET CUSTOM FUNCTIONS

4D v19


VP SET CUSTOM FUNCTIONS ( vpAreaName ; ObjFormule )

Paramètre	Type	Description
vpAreaName	Texte	Nom de la zone 4D View Pro dans le formulaire
ObjFormule	Objet	Objet Formule

Description

La commande VP SET CUSTOM FUNCTIONS désigne les formules 4D qui peuvent être appelées directement à partir de formules 4D View Pro. Les fonctions personnalisées n'étant pas stockées dans le document, la commande VP SET CUSTOM FUNCTIONS doit être exécutée dans l'événement formulaire Sur chargement.

Les formules spécifiées par VP SET CUSTOM FUNCTIONS apparaissent dans un menu pop-up lorsque la première lettre de leur nom est saisie. Voir Saisie d'une formule, d'une fonction ou d'une référence.

Note : Si VP SET CUSTOM FUNCTIONS est appelée plusieurs fois dans la même zone et la même session, seul le dernier appel est pris en compte.

Passez le nom de la zone 4D View Pro dans vpAreaName. Si vous passez un nom qui n'existe pas, une erreur est retournée.

Dans le paramètre objFormule, passez un objet contenant les formules 4D pouvant être appelées par des formules 4D View Pro et des propriétés supplémentaires. Chaque propriété customFunction passée dans objFormule devient le nom d'une fonction dans la zone 4D View Pro.

Propriété

Type

Description

<customFunction>

Objet

Fonctions personnalisées à définir dans 4D View Pro

formula

Objet

Objet formule 4D (obligatoire). Voir Formule

parameters

Collection d'objecs

Collection de paramètres (dans l'ordre dans lequel ils sont définis dans la formule)

[ ].name

Texte

Nom du paramètre à afficher dans 4D View Pro

[ ].type

Numérique

Type de paramètre. Types pris en charge :

Constante
Est un booléen
Est un entier long
Est un numérique
Est un objet
Est un texte
Est une date
Est une heure

Si type est omis ou si la valeur par défaut (-1) est passée, la valeur est automatiquement envoyée avec son type, à l'exception des valeurs date ou heure qui sont envoyées en tant qu'objet (voir la section Paramètres).

Si type est Est un objet, l'objet a la même structure que l'objet retourné par VP Get value.

summary

Texte

Description de la formule à afficher dans 4D View Pro

minParams

Numérique

Nombre minimal de paramètres

maxParams

Numérique

Nombre maximal de paramètres. Passer un nombre supérieur à la longueur de parameters permet de déclarer les paramètres "optionnels" avec un type par défaut

ATTENTION

Si une formule porte le même nom qu'une fonction définie par la commande VP SET ALLOWED METHODS, la formule est créée et la méthode est ignorée.
Dès que la commande VP SET CUSTOM FUNCTIONS est appelée, les méthodes autorisées par FIXER METHODES AUTORISEES sont ignorées dans la zone 4D View Pro.
Dès que la commande VP SET CUSTOM FUNCTIONS est appelée, les fonctions dépendant des commandes FIXER TITRES TABLES et FIXER TITRES CHAMPS sont ignorées dans la zone 4D View Pro.

Exemple

Vous souhaitez utiliser des objets Formule dans une zone 4D View Pro pour ajouter des chiffres, récupérer le sexe et le nom de famille d'un client :

 Au cas ou

    :(Evenement formulaire code=Sur chargement)</p><p>

       var $o : Object

 

       $o:=Creer objet

 

  // Définir la fonction “ajouternum“ d'une méthode nommée "ajouternum"

       $o.ajouternum:=Creer objet

       $o.ajouternum.formula:=Formule(ajouternum)

       $o.ajouternum.parameters:=Creer collection

       $o.ajouternum.parameters.push(Creer objet("name";"num1";"type";Est un entier long))

       $o.ajouternum.parameters.push(Creer objet("name";"num2";"type";Est un entier long))

 

  // Définir la fonction “NomClient“ d'un champ de base de données

       $o.NomClient:=Creer objet

       $o.NomClient.formula:=Formule([Clients]nom)

       $o.NomClient.summary:="Nom de famille du client courant"

 

  // Définir la fonction “label“ d'une expression 4D avec un paramètre

       $o.label:=Creer objet

       $o.label.formula:=Formule(ds.Customers.get($1).label)

       $o.label.parameters:=Creer collection

       $o.label.parameters.push(Creer objet("name";"ID";"type";Est un entier long))

 

  // Définir la fonction “Titre“ d'une variable nommée "Titre"

       $o.Titre:=Creer objet

       $o.Titre.formula:=Formule(Titre)

 

       VP SET CUSTOM FUNCTIONS("ViewProArea";$o)

 

 fin de cas

Voir aussi

Références de champ
Références de méthodes projet
VP SET ALLOWED METHODS