nome puntato

[andrea_napoli]

spero che possa essere utile a qualcuno

CF_Nome_puntato

parametro= testo

Casi (ContaParole (testo) > 0;
Superiore ( Sinistra (testo; 1)) & "." & CF_Nome_puntato (ParoleaDestra (testo ; ContaParole (testo) -1)) ; "")

Restituisce A.M.C. se il testo è "Anna Maria Carolina"

buona giornata a tutti

[raybaudi]

Ciao

sono contento che qualcuno cominci a scrivere in questo Forum

Anche perchè in questo modo si possono scabiare le idee.

Per esempio, in questo caso, NON c'è bisogno di una funzione ricorsiva perchè basta utilizzare il calcolo:

Filtro ( Proprio ( CercaeSost ( Refila ( anagrafico ) ; ["'"; " " ] ; [" " ; ". "] ) ) & "." ; "ABCDEFGHJKILMNOPQRSTUVWXYZ." )

Dal punto di vista poi della semplificazione del tuo calcolo, questo può essere scritto:

Casi (
ContaParole ( testo ) ;
Superiore ( Sinistra ( testo ; 1 ) ) & "." & CF_Nome_puntato ( ParoleaDestra ( testo ; ContaParole ( testo ) -1 ) )
)

cioè eliminando:
1) > 0
2) ;""

[PIG-NAH]

Ritenendo giusta l'obiezione di ray penso vada modificata come segue :

CF_Nome_separatore ( testo ; separatore )

Casi (ContaParole (testo) ;
Superiore ( Sinistra (testo; 1)) & separatore & CF_Nome_separatore (ParoleaDestra (testo ; ContaParole (testo) -1); separatore) )

Restituisce Le iniziali come prima separate dal valore che inseriamo nel separatore 8)