Orario Testuale

E' l'area in cui è possibile condividere funzioni personalizzate nate dalla creatività e l'esperienza degli sviluppatori FileMaker

Moderatore: Moderatori

Rispondi
raybaudi
Messaggi: 3616
Iscritto il: sabato 7 febbraio 2004, 1:00
Località: Roma
Contatta:

Orario Testuale

Messaggio da raybaudi » venerdì 10 febbraio 2006, 18:18

Converte un campo ora in testo.
Accertatevi di definire il campo Orario, nelle opzioni di verifica, come "ora del giorno".
La funzione non è ricorsiva.

OrarioTestuale ( orario )

esempio di utilizzo:
INPUT OrarioTestuale ( "19:07" )
OUTPUT diciannove e zero sette

Codice: Seleziona tutto

Consenti([
ore = RicavaComeNumero ( Sinistra ( orario ; Posizione ( orario ; ":" ; 1 ; 1 ) - 1 ) );
minuti = Destra ( "0" & Mezzo (  orario ; Posizione (  orario  ; ":" ; 1 ; 1 )  +  1; 2 ); 2 )
];
CercaeSost ( ore ; 
["10" ; "dieci"];
["11" ; "undici"];
["12" ; "dodici"];
["13" ; "tredici"];
["14" ; "quattordici"];
["15" ; "quindici"];
["16" ; "sedici"];
["17" ; "diciassette"];
["18" ; "diciotto"];
["19" ; "diciannove"];
["20" ; "venti"];
["21" ; "ventuno"];
["22" ; "ventidue"];
["23" ; "ventitre"];
["0" ; "ventiquattro"];
["1" ; "una"];
["2" ; "due"];
["3" ; "tre"];
["4" ; "quattro"];
["5" ; "cinque"];
["6" ; "sei"];
["7" ; "sette"];
["8" ; "otto"];
["9" ; "nove"]
)
 & " e " & 
CercaeSost ( minuti ; 
["00" ; "zero zero"];
["01" ; "zero uno"];
["02" ; "zero due"];
["03" ; "zero tre"];
["04" ; "zero quattro"];
["05" ; "zero cinque"];
["06" ; "zero sei"];
["07" ; "zero sette"];
["08" ; "zero otto"];
["09" ; "zero nove"];
["10" ; "dieci"];
["11" ; "undici"];
["12" ; "dodici"];
["13" ; "tredici"];
["14" ; "quattordici"];
["15" ; "quindici"];
["16" ; "sedici"];
["17" ; "diciassette"];
["18" ; "diciotto"];
["19" ; "diciannove"];
["20" ; "venti"];
["21" ; "ventuno"];
["22" ; "ventidue"];
["23" ; "ventitre"];
["24" ; "ventiquattro"];
["25" ; "venticinque"];
["26" ; "ventisei"];
["27" ; "ventisette"];
["28" ; "ventotto"];
["29" ; "ventinove"];
["30" ; "trenta"];
["31" ; "trentuno"];
["32" ; "trentadue"];
["33" ; "trentatre"];
["34" ; "trentaquattro"];
["35" ; "trentacinue"];
["36" ; "trentasei"];
["37" ; "trentasette"];
["38" ; "trentotto"];
["39" ; "trentanove"];
["40" ; "quaranta"];
["41" ; "quarantuno"];
["42" ; "quarantadue"];
["43" ; "quarantatre"];
["44" ; "quarantaquattro"];
["45" ; "quarantacinque"];
["46" ; "quarantasei"];
["47" ; "quarantasette"];
["48" ; "quarantotto"];
["49" ; "quarantanove"];
["50" ; "cinquanta"];
["51" ; "cinquantuno"];
["52" ; "cinquantadue"];
["53" ; "cinquantatre"];
["54" ; "cinquantaquattro"];
["55" ; "cinquantacinque"];
["56" ; "cinquantasei"];
["57" ; "cinquantasette"];
["58" ; "cinquantotto"];
["59" ; "cinquantanove"]
)
)
Raybaudi FMP 12 Adv. Windows XP SP3

Rispondi