diff --git a/at/at0200a.uml b/at/at0200a.uml
index 4e4902158..25b271443 100755
--- a/at/at0200a.uml
+++ b/at/at0200a.uml
@@ -199,6 +199,8 @@ BEGIN
   PROMPT 2 2 "Cognome e nome "
   USE LF_SOGGETTI KEY 2
   INPUT COGNOME F_S_COGNOME
+  INPUT NOME F_S_NOME
+  INPUT DATANASC F_S_DATANASC
   DISPLAY "Cognome@25" COGNOME
   DISPLAY "Nome@25" NOME
   DISPLAY "Nato il@10" DATANASC
@@ -227,29 +229,7 @@ END
 STRING F_S_NOME 25
 BEGIN
   PROMPT 46 2 ""
-  USE LF_SOGGETTI KEY 2
-  INPUT COGNOME F_S_COGNOME
-  INPUT NOME F_S_NOME
-  DISPLAY "Cognome@25" COGNOME
-  DISPLAY "Nome@25" NOME
-  DISPLAY "Nato il@10" DATANASC
-  DISPLAY "Codice@8" CODICE
-  DISPLAY "Sez." CODSEZ
-  DISPLAY "Sot." CODSOT
-  DISPLAY "C." CATDON
-  DISPLAY "Tessera" TESSAVIS
-  DISPLAY "Gr.AB0" GRUPPOAB0
-  DISPLAY "Rh " RHANTID
-  DISPLAY "Int.SI" INTSI
-  OUTPUT F_S_CODICE CODICE
-  OUTPUT F_S_COGNOME COGNOME
-  OUTPUT F_S_NOME NOME
-  OUTPUT F_S_DATANASC DATANASC
-  OUTPUT F_S_CODSEZ CODSEZ
-  OUTPUT F_S_CODSOT CODSOT
-  OUTPUT F_S_CATDON CATDON
-  OUTPUT F_S_TESSAVIS TESSAVIS
-  OUTPUT F_S_INTSI INTSI
+  COPY ALL F_S_COGNOME
   HELP "Nome del soggetto"
 //  CHECKTYPE NORMAL
   ADD RUN at0 -0