Sous-programmes SETCUR (Devise référentiel principal)

Renvoie la devise du référentiel général principal (si CAS=1) ou du référentiel analytique principal (si CAS=2)

Liste des critères

Paramètre	Intitulé paramètre	Type
CAS	Cas	Integer, Par valeur
SOCIETE	Code société	Char, Par valeur