4D View v16PV FIXER FORMAT |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
4D View v16
PV FIXER FORMAT
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| PV FIXER FORMAT ( zone ; format ; chaîne ) | ||||||||
| Paramètre | Type | Description | ||||||
| zone | Entier long |
|
Zone 4D View | |||||
| format | Entier long |
|
Numéro du format | |||||
| chaîne | Chaîne |
|
Chaîne du format | |||||
Voici une variante de l’exemple de la commande PV Ajouter format : le format est, dans ce cas, froidement remplacé. Le nouveau format n'est pas créé si l'ancien n'est pas présent.
TABLEAU ENTIER LONG($TabNumFormats;0) `Tableau des numéros de format(s)
TABLEAU TEXTE($TabChainesFormats;0) `Tableau des chaînes de format(s)
C_ENTIER LONG($Position) `Position du format à modifier dans les tableaux de numéros et de noms
PV LIRE LISTE FORMATS(Zone;$TabNumFormats;$TabChainesFormats) `Liste des formats disponibles
$Position:=Chercher dans tableau($TabChainesFormats;"$###,##0.00")
Si($Position#-1) `Format disponible pour la zone ?
PV FIXER FORMAT(Zone;$TabNumFormats{$Position};"### ##0,00 EUR") `Modification du format
Fin de si
Produit : 4D View
Thème : PV Style
Numéro :
15881
Nom intl. : PV SET FORMAT
Créé : 4D View 6.8
4D View - Langage ( 4D View v16)
Ajouter un commentaire