carissimo K.Mitnick ho visto il tuo codice fiscale 2.0
non ho trovato nuove revisioni, ma questa
nel caso che il nome sia di due lettere, richiama la stessa
procedura copiaX, per cui il nome diventa parte del cognome.
Personalmente ho aggiunta una nuova procedura identica a copiax(copiaXNome) che al posto del cognome
usa il nome.
ringraziandoti per la cortese attenzione ti saluto cordialmente
Procedure copiaXNome;
begin
if (booleana(nome[1])=2) and (booleana(nome[2])=1) then
begin
insert(nome[2],codice,jj);
insert(nome[1],codice,jj+1);
end
else
insert(nome,codice,jj);
insert('X',codice,jj+2);
end;
Nello48
|