From fb8edbc545f6d4b98e53de29b9e5f0fb8c456229 Mon Sep 17 00:00:00 2001
From: cris <cris@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Tue, 17 May 2005 11:12:26 +0000
Subject: [PATCH] Patch level         : 1.7 at Files correlati     :
 at0100a.msk Ricompilazione Demo : [ ] Commento            : spostato codice
 CT in prima pagina con possibilita di ricerca

git-svn-id: svn://10.65.10.50/trunk@13093 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 at/at0100a.uml | 44 ++++++++++++++++++++++----------------------
 1 file changed, 22 insertions(+), 22 deletions(-)

diff --git a/at/at0100a.uml b/at/at0100a.uml
index 61e4780eb..9542055cc 100755
--- a/at/at0100a.uml
+++ b/at/at0100a.uml
@@ -42,7 +42,28 @@ END
 
 BUTTON F_RICPARZ 23 1
 BEGIN
-   PROMPT 50 1 "Ricerca parziale"
+   PROMPT 26 1 "Ricerca parziale"
+END
+
+STRING F_CODCT 6
+BEGIN
+  PROMPT 60 1 "Cod. CT "
+  FIELDS CODCT
+  FLAGS "U"
+  KEY 7
+  MESSAGE COPY,5@
+  USE LF_SOGGETTI KEY 7
+  INPUT CODCT F_CODCT
+  DISPLAY "Codice CT" CODCT
+  DISPLAY "Codice@8" CODICE
+  DISPLAY "Cognome@25" COGNOME
+  DISPLAY "Nome@25" NOME
+  DISPLAY "Nato il@10" DATANASC
+  DISPLAY "Sez." CODSEZ
+  DISPLAY "Sot." CODSOT
+  DISPLAY "C." CATDON
+  OUTPUT F_CODICE CODICE
+  HELP "Codice Centro Trasfusionale"
 END
 
 STRING F_COGNOME 25
@@ -697,27 +718,6 @@ BEGIN
   HELP "Numero cartella clinica"
 END
 
-STRING F_CODCT 6
-BEGIN
-  PROMPT 25 8 "Cod. CT "
-  FIELDS CODCT
-  FLAGS "U"
-  KEY 7
-  MESSAGE COPY,5@
-  USE LF_SOGGETTI KEY 7
-  INPUT CODCT F_CODCT
-  DISPLAY "Codice CT" CODCT
-  DISPLAY "Codice@8" CODICE
-  DISPLAY "Cognome@25" COGNOME
-  DISPLAY "Nome@25" NOME
-  DISPLAY "Nato il@10" DATANASC
-  DISPLAY "Sez." CODSEZ
-  DISPLAY "Sot." CODSOT
-  DISPLAY "C." CATDON
-  OUTPUT F_CODICE CODICE
-  HELP "Codice Centro Trasfusionale"
-END
-
 STRING F_TESSSSN 10
 BEGIN
   PROMPT 42 8 "SSN "