CURRENCY

Syntaxe

Paramètres

Description

Cette instruction permet de modifier la devise (monnaie) d'une instruction de clause «PICTURE».

Remarques

• L'instruction CURRENCY SIGN IS caractere permet de définir un symbole monétaire personnalisé pour être utilisé dans les clauses PICTURE des définitions de variables. Ce symbole sera interprété par COBOL comme une représentation de devise, et pourra être affiché ou imprimé dans des champs numériques.
• Le caractère défini comme symbole monétaire doit être différent des lettres A, B, C, D, E, G, P, R, S, V, X ou Z, car ces lettres ont déjà une signification particulière dans les masques PICTURE. Le choix d'un caractère valide est donc essentiel pour éviter toute ambiguïté lors de la compilation ou de l'exécution.
• Le symbole spécifié via CURRENCY SIGN n'a pas de lien direct avec une devise réelle comme l'euro ou le dollar, mais il permet de représenter visuellement une devise dans les affichages ou les rapports. Il appartient au programmeur d'associer un caractère au symbole monétaire souhaité, comme $, €, ou même #.
• Une fois défini, le caractère peut être utilisé dans une clause PICTURE en tant que symbole de devise, souvent positionné à gauche des chiffres pour donner un rendu clair et formaté des montants. Par exemple, PIC $9(5)V99 affichera un montant avec un symbole $ devant les chiffres.
• Le paramètre caractere ne peut être qu'un caractère unique, ce qui signifie qu'il n'est pas possible de définir une abréviation monétaire comme USD ou EUR directement. Toutefois, on peut contourner cela en utilisant des champs alphanumériques associés si l'on souhaite afficher des codes ISO monétaires.
• Cette clause est généralement placée dans la section SPECIAL-NAMES de l'ENVIRONMENT DIVISION, ce qui reflète son rôle de paramètre de configuration global du programme. Elle agit comme un réglage de format pour tout le code COBOL qui suit.
• Changer le symbole monétaire peut être utile lorsqu'un programme est adapté pour plusieurs pays ou devises, sans avoir à réécrire les définitions de toutes les variables de type PICTURE. Cela apporte une certaine flexibilité pour la localisation ou l'internationalisation des applications COBOL.
• Même si le caractère défini est utilisé comme symbole monétaire, il n'a aucune incidence sur les calculs ou la valeur réelle des variables. Il s'agit uniquement d'un effet visuel ou de présentation, ce qui signifie que les opérations mathématiques ne tiennent pas compte de ce caractère.