Remerciez-le!

Remerciez @Admin pour avoir partagé cet document gratuitement, de la manière la plus simple, en partageant sur les réseaux sociaux.

Fonctions dans les objets calculés Instruction de boucles et conditionnelles Si

Fonctions dans les objets calculés Instruction de boucles et conditionnelles Si … Alors … Sinon … FinSi Suivant … Autre … FinSuivant Pour … Jusque … FinPour Fonctions communes Alerte(texte) Annee Arrondi(Valeur ; Nb_Decimales) ArrondiFin(Valeur ; Arrondi) ArrondiInf(Valeur ; Nb_Decimales) ArrondiInfFin(Valeur ; Arrondi) ArrondiSup(Valeur ; Nb_Decimales) ArrondiSupFin(Valeur ; Arrondi) Bip() CDLText(Date) CVNDate(Nombre) CDNum(Date) CDText(Date) CVDate(Texte) CVLDate(Texte) CVNum(Texte) CVText(Valeur) Date(Jour ; Mois ; Année) DateJour() Droite(Texte ; Longueur) Gauche(Texte ; Longueur) Jour(Date) Longueur(Texte) Mois(Date) NbreAnnee(Date_Début ; Date_Fin) NbreMois(Date_Début ; Date_Fin) NbreJour(Date_Début ; Date_Fin) PartEnt(Valeur) Pourcent(Valeur) Opérateurs de comparaison ET OU Opérateurs arithmétiques Opérateurs de comparaison Mise en forme conditionnelle Objet.Style() = Objet.CouleurCrayon() = Objet.CouleurFond() = Instruction de boucles et conditionnelles. Les instructions conditionnelles et de boucle sont regroupées dans cette catégorie de fonction : Si … Alors … Sinon … FinSi Il s’agit d’une instruction conditionnelle qui permet de faire des tests. La syntaxe de cette fonction est la suivante : Si [Condition] Alors [Valeur si condition vraie] Sinon [Valeur si condition fausse] Finsi Exemple : Formule qui teste la date système pour souhaiter une bonne année si le mois de la date système est janvier : Si Mois(DateJour()) = 1 Alors Resultat = "Bonne année" Sinon Resultat = "" FinSi Des instructions Si … Alors … Sinon … Finsi peuvent être imbriquées en nombre limité seulement par le nombre de caractères admis par la zone de saisie de la formule. A chaque Si doit correspondre un Finsi. L’instruction Sinon peut être omise. S'il s'agit du même champs qui est testé avec plusieurs valeurs, il est conseiller d'utiliser l'instruction conditionnelle : Suivant … Autre … FinSuivant Suivant … Autre … FinSuivant Cette fonction permet d’effectuer des tests et d’exécuter des instructions de manière automatique. Elle permet de remplacer les instructions conditionnelles Si…Alors…Sinon…FinSi à imbrications multiples et de simplifier la syntaxe. La syntaxe de cette fonction est la suivante : Suivant [Condition] : [Valeur si condition vraie]; [Condition] : { [Valeur si condition vraie]; [Valeur si condition vraie] }; Autre : { [Valeur si condition vraie]; [Valeur si condition vraie] } FinSuivant Dans le cas où il existe plusieurs résultats, il sera obligatoires de les mettre entre accolades. Pour insérer des accolades utilisez les combinaisons de touches : Sur Macintosh : Sur Windows : Exemple : Formule qui teste la date système pour souhaiter une bonne année si le mois de la date système est janvier, Bonne Fête Nationale en bleu si le mois de la date système est avril et le pays du client est France, un Joyeux Noël en rouge si le mois de la date système est décembre et Rien pour les autres mois : Suivant Mois(DateJour()) = 1: Resultat = "Bonne Année"; Mois(DateJour()) = 7: { Objet.CouleurCrayon() = Bleu; Resultat = "Joyeuses Fête Nationale" }; Mois(DateJour()) = 12: { Objet.CouleurCrayon() = Rouge; Resultat = "Joyeux Noël" }; Autre: Resultat = "" FinSuivant Pour … Jusque … FinPour Cette fonction permet d'effectuer des boucles et d'exécuter les instructions jusqu'à ce que le compteur atteigne la valeur Fin. La syntaxe de cette fonction est la suivante : Pour [Compteur = Début] Jusque [Fin] [Instruction à exécuter] FinPour Exemple : Formule qui teste toutes les devises pour retrouver la devise d'équivalence, indiquer dans une variable le cours de la devise d'équivalence pour le multiplier à une information libre de type tiers. Pour Num = 1 Jusque 32 Si OptDossier.IntituleDevise(CVText(Num))=Dossier.DeviseEquiv Alors CoursEquiv= OptDossier.IntituleDevise(CVText(Num)) Finsi FinPour Resultat = CompteT.InfoLibValeur("1")*CoursEquiv Fonctions communes Alerte(texte) Cette fonction permet d'afficher dans un message à l'écran le résultat. Cette fonction est utile pour connaître quel est le résultat renvoyé par un champs de mise en page avant de réaliser une condition sur ce champs. Exemple : Formule qui affiche le nom du dépôt de livraison client lors de l'impression d'un document de ventes : Alerte(DocVteEntete.DepotLivr) Lors de l'impression du document, le message d'alerte suivant apparaîtra : Annee(Date) Cette fonction permet d’extraire l’année d’une date. Exemple : Formule qui extrait l'année de la date de création du tiers : Resultat = Annee(Client.DateCreationSoc) Si la date de création de société du client est le 15/12/1995, le résultat donne une valeur de type Valeur, Montant ou Quantité qui sera 95. Arrondi(Valeur ; Nb_Decimales) Cette fonction arrondit une valeur à un nombre de décimales défini dans la formule. Exemple : Formule qui arrondi à 0 décimale le montant de l’encours maximum du client : Resultat = Arrondi(Client.EncoursMaxi;0) Pour un encours maximum de 12 320.62, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 321. Exemple : Formule qui arrondi à 2 décimales le montant de l’encours maximum du client : Resultat = Arrondi(Client.EncoursMaxi;2) Pour un encours maximum de 12 320.623, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 320.62. Exemple : Formule qui arrondi à la centaine le montant de l’encours maximum du client : Resultat = Arrondi(Client.EncoursMaxi;100) Pour un encours maximum de 12 320.62, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 300. ArrondiFin(Valeur ; Arrondi) Cette fonction arrondit une valeur au multiple la plus proche de la valeur de fin spécifiée. La formule de calcul est la suivante : ArrondiFin = [Valeur entière la plus proche de (Valeur / Arrondi) ] x Arrondi Exemple : Formule qui arrondi à l'unité la plus proche le montant de l’encours maximum du client : Resultat = ArrondiFin(Client.EncoursMaxi;1) Pour un encours maximum de 12 327.62, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 328. Exemple : Formule qui arrondi à la valeur multiple de 2 le montant de l’encours maximum du client : Resultat = ArrondiFin(Client.EncoursMaxi;2) Pour un encours maximum de 12 327.62, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 328. Exemple : Formule qui arrondi à la valeur multiple de 5 le montant de l’encours maximum du client : Resultat = ArrondiFin(Client.EncoursMaxi;5) Pour un encours maximum de 12 327.62, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 330. ArrondiInf(Valeur ; Nb_Decimales) Cette fonction arrondit au nombre inférieur une valeur en fonction du nombre de décimales défini dans la formule. Exemple : Formule qui arrondi au nombre entier inférieur le montant de l’encours maximum du client : Resultat = ArrondiInf(Client.EncoursMaxi;0) Pour un encours maximum de 12 320.62, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 320. Exemple : Formule qui arrondi à 2 décimales inférieur le montant de l’encours maximum du client : Resultat = ArrondiInf(Client.EncoursMaxi;2) Pour un encours maximum de 12 320.623, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 320.62. Exemple : Formule qui arrondi à la centaine inférieure le montant de l’encours maximum du client : Resultat = ArrondiInf(Client.EncoursMaxi;100) Pour un encours maximum de 12 370.62, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 300. ArrondiInfFin(Valeur ; Arrondi) Arrondit la valeur indiquée au nombre inférieur pour la valeur spécifiée. Cette fonction arrondit une valeur au multiple inférieur de la valeur de fin spécifiée. La formule de calcul est la suivante : ArrondiInfFin = [Valeur entière inférieur de (Valeur / Arrondi) ] x Arrondi Exemple : Formule qui arrondi à l'unité inférieure le montant de l’encours maximum du client : Resultat = ArrondiInfFin(Client.EncoursMaxi;1) Pour un encours maximum de 12 327.62, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 327. Exemple : Formule qui arrondi à la valeur multiple de 2 inférieur le montant de l’encours maximum du client : Resultat = ArrondiInfFin(Client.EncoursMaxi;2) Pour un encours maximum de 12 327.62, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 326. Exemple : Formule qui arrondi à la valeur multiple de 5 inférieur le montant de l’encours maximum du client : Resultat = ArrondiInfFin(Client.EncoursMaxi;5) Pour un encours maximum de 12 327.62, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 325. ArrondiSup(Valeur ; Nb_Decimales) Cette fonction arrondit au nombre supérieur une valeur en fonction du nombre de décimales défini dans la formule. Exemple : Formule qui arrondi à l'entier supérieur le montant de l’encours maximum du client : Resultat = ArrondiSup(Client.EncoursMaxi;0) Pour un encours maximum de 12 320.62, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 321. Exemple : Formule qui arrondi à 2 décimales supérieur le montant de l’encours maximum du client : Resultat = ArrondiSup(Client.EncoursMaxi;2) Pour un encours maximum de 12 320.623, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 320.63. Exemple : Formule qui arrondi à la centaine supérieure le montant de l’encours maximum du client : Resultat = ArrondiSup(Client.EncoursMaxi;100) Pour un encours maximum de 12 320.62, le résultat donne une valeur de type Valeur, Montant ou Quantité sera 12 400. ArrondiSupFin(Valeur ; Arrondi) Cette fonction arrondit une valeur au multiple supérieur de la valeur de fin spécifiée. La formule de calcul est la suivante : ArrondiSupFin = [Valeur entière supérieure de (Valeur / Arrondi) ] x Arrondi Exemple : Formule qui arrondi uploads/s3/ fonction-des-objets-calcules.pdf