4D Doc Center : WR LIRE REFERENCE

4D Write v14

WR LIRE REFERENCE


WR LIRE REFERENCE ( zone ; info1 ; info2 ; nom ; type ; formatNum ; formatDate ; formatHeure )

Paramètre	Type	Description
zone	Entier long	4D Write area
info1	Entier	Première information relative à la référence
info2	Entier	Deuxième information relative à la référence
nom	Chaîne	Nom de la référence
type	Entier	Type de la référence
formatNum	Chaîne	Format d’affichage numérique
formatDate	Entier	Numéro du format de la date
formatHeure	Entier	Numéro du format de l’heure

Description

Est appelée “référence” toute commande 4D, variable 4D ou référence à un champ insérée dans une zone 4D Write.

La commande WR LIRE REFERENCE retourne dans type le type de la référence sélectionnée (voir à ce propos la description de la routine WR SELECTIONNER), et dans info1, info2 et nom diverses informations concernant la référence (ces informations dépendent de la valeur de type).
Vous pouvez également connaître le format d’affichage des références de type numérique, Date ou Heure insérées.

Si type est égal à 1, vous êtes en présence d’une référence de type champ.
Dans ce cas, info1 désignera la table à laquelle appartient le champ, info2 désignera le champ et nom sera vide.
Si type est égal à 2, vous êtes en présence d’une référence de type variable ou d’une expression. Dans ce cas, info1 et info2 prendront pour valeur 0, et nom contiendra le nom de la variable ou de l’expression.
Si l’objet sélectionné n’est pas une référence, type retourne 0.

Le paramètre formatNum retourne une chaîne contenant le format numérique associé à l’expression numérique (Numérique, Entier ou Entier long) sélectionnée. Si aucun format n’est associé à l’expression ou si elle n’est pas de type numérique, une chaîne vide est retournée.

Le paramètre formatDate retourne le numéro du format de date éventuellement associé à l’expression sélectionnée, si elle est de type date. Dans le cas contraire, la valeur 0 est retournée. Sinon, vous pouvez comparer la valeur reçue aux constantes 4D suivantes, placées dans le thème "Formats d'affichage des dates" :

Constante	Type	Valeur	Commentaire
Système date court	Entier long	1	06/12/2006
Système date abrégé	Entier long	2	mer. 25 déc. 2006
Système date long	Entier long	3	mercredi 6 décembre 2006
Interne date court spécial	Entier long	4	06/12/06 (mais 06/12/1896 ou 06/12/2096)
Interne date long	Entier long	5	6 décembre 2006
Interne date abrégé	Entier long	6	6 déc 1996
Interne date court	Entier long	7	06/12/2006

Le paramètre formatHeure retourne le numéro du format d’heure éventuellement associé à l’expression sélectionnée, si elle est de type heure. Dans le cas contraire, la valeur 0 est retournée. Sinon, vous pouvez comparer la valeur reçue aux constantes 4D suivantes, placées dans le thème "Formats d'affichage des heures" :

Constante	Type	Valeur	Commentaire
h mn s	Entier long	1	01:02:03
h mn	Entier long	2	01:02
Heures minutes secondes	Entier long	3	1 heure 2 minutes 3 secondes
Heures minutes	Entier long	4	1 heure 2 minutes
h mn Matin Après Midi	Entier long	5	1:02 du matin

Exemple 1

Reportez-vous à l’exemple de la routine WR SELECTIONNER.

Exemple 2

Cette méthode indique si l’objet sélectionné par l’utilisateur est une référence, ainsi que son type :

 WR LIRE REFERENCE(Lettre;$Table;$Champ;$Nom;$Type)

 Au cas ou

    :($Type=0) `Pas de référence

       ALERTE("La sélection ne contient pas de référence.")

    :($Type=1)

       ALERTE("La sélection contient le champ "+Nom du champ($Table;$Nom))

    :($Type=2)

       ALERTE("La sélection contient l'expression nommée "+$Name)

 Fin de cas