Formules

  • Affichage dans une pièce de vente du montant ligne en TTC que l’option TTC de l’entête de pièce soit cochée ou non.

If [PcvIsTTC] then print format([PlvMtNet], "-###,###,##0.00") else print format([PlvMtNet]*(1+[PlvGTaxTaux]/100), "-###,###,##0.00") end

(Cette base de formule peut être utilisée pour afficher automatiquement les lignes en ttc ou ht quelque soit l’option qui est cochée. Et permet de ne pas avoir à créer plusieurs modèles.)

(il faut penser à cocher la case “Rien si valeur nulle” pour ne pas voir apparaître “0,00” sur les lignes de texte)

Pour le HT cela donnerait:

If [PcvIsTTC] then print format([PlvMtNet]/(1+[PlvGTaxTaux]/100), "-###,###,##0.00") else print format([PlvMtNet], "-###,###,##0.00") end

  • Affichage automatique du libellé “Facture” ou “avoir”

if([PcvMtTotal]>=0) then print "Facture n° " else print "Avoir n° " end

(Placer cette formule dans un champ texte devant le champ “[PcvCode]”. Si le montant total de la facture est supérieur à 0 alors on affichera “Facture”. Dans le cas contraire, on affichera “Avoir”.)

  • Affichage automatique du libellé “Facture” ou “Invoice” selon la langue

if([PcvGLagCode] = "EN") then print "Invoice" else print "Facture n°" end

  • Fonctionnement avancé

Il est aussi possible dans 8print d’utiliser certaines fonctions de realbasic. La formule ci-dessous permet par exemple de supprimer les lettres du champ référence pour ne conserver que les chiffres :

dim wst as string dim wi as integer dim test as integer dim retour as string wst = [PcvRef] wi = 0 for wi = 1 to len(wst) test = asc(mid(wst, wi, 1)) if test >= asc("0") and test <= asc("9") then retour = retour + mid(wst, wi, 1) end next print retour