A voir également:
- Crystal report et appel de fonction spécifiqu
- Fonction si et - Guide
- Nommez une application d'appel vidéo ou de visioconférence - Guide
- Crystal report viewer - Télécharger - Gestion de données
- Crystal report download - Télécharger - Présentation
- Crystal disk - Télécharger - Informations & Diagnostic
1 réponse
stringVar array t;
t:=split(totext({TMAR.ValAssur},2,'',','),',');
if tonumber(t[2]) =0 then
replace(ucase(towords (tonumber(replace(t[1],' ','')),0) + ' ' + 'DIRHAMS'),'UN MILLIER','MILLE')
else
replace(ucase(towords (tonumber(replace(t[1],' ','')),0) + ' ' + 'DIRHAMS' + ' ' +towords (tonumber(t[2]),0))+ ' ' + 'CENTIMES','UN MILLIER','MILLE')
t:=split(totext({TMAR.ValAssur},2,'',','),',');
if tonumber(t[2]) =0 then
replace(ucase(towords (tonumber(replace(t[1],' ','')),0) + ' ' + 'DIRHAMS'),'UN MILLIER','MILLE')
else
replace(ucase(towords (tonumber(replace(t[1],' ','')),0) + ' ' + 'DIRHAMS' + ' ' +towords (tonumber(t[2]),0))+ ' ' + 'CENTIMES','UN MILLIER','MILLE')
Bragon
Bravo! Fonction parfaitement écrite. Super boulot!