Spostati alcuni campi

git-svn-id: svn://10.65.10.50/trunk@2352 c028cbd2-c16b-5b4b-a496-9718f37d4682

ba/ba3700a.uml

@@ -96,10 +96,25 @@ BEGIN
   FLAGS "R"
 END
 
-LIST F_TIPO_RATA 25
+LIST F_RATE_DIFF 1 28
 BEGIN
-   PROMPT 5 6 "Tipo rata      "
+  PROMPT 5 6 "Rate           "
-   HELP "Tipo rata da utilizzare per le scadenze"
+  ITEM  "1|Differenziate"                   MESSAGE "X",909|DISABLE,F_NUM_RATE
+  ITEM  "2|Uguali (obbligate dalla 2a)"     MESSAGE "",909|ENABLE,F_NUM_RATE     
+  ITEM  "3|Uguali dalla prossima modifica"  MESSAGE "X",909|DISABLE,F_NUM_RATE
+  ITEM  "4|Uguali finche' possibile"        MESSAGE "X",909|DISABLE,F_NUM_RATE
+END
+
+NUMBER F_INT_RATE 3
+BEGIN
+  PROMPT 49 6 "Intervallo rate "
+  HELP "Giorni di intervallo tra una data e l'altra"
+  FLAGS "R"
+END
+
+LIST F_TIPO_RATA 1 28
+BEGIN
+  PROMPT 5 7 "Tipo rata      "
   ITEM "1|Rimessa diretta o contanti"           
   ITEM "2|Tratta"           
   ITEM "3|Ricevuta bancaria"
@@ -112,27 +127,10 @@ BEGIN
   FIELD S4
 END
 
-NUMBER F_INT_RATE 3
-BEGIN
-  PROMPT 49 6 "Intervallo rate "
-  HELP "Giorni di intervallo tra una data e l'altra"
-  FLAGS "R"
-END
-
-
-LIST F_RATE_DIFF 25
-BEGIN
-  PROMPT 5 7 "Rate           "
-  HELP "Descrizione del meccanismo di generazione rate "
-  ITEM  "1|Differenziate"                   MESSAGE "X",909|DISABLE,F_NUM_RATE
-  ITEM  "2|Uguali (obbligate dalla 2a)"     MESSAGE "",909|ENABLE,F_NUM_RATE     
-  ITEM  "3|Uguali dalla prossima modifica"  MESSAGE "X",909|DISABLE,F_NUM_RATE
-  ITEM  "4|Uguali finche' possibile"        MESSAGE "X",909|DISABLE,F_NUM_RATE
-END
-
 STRING F_ULT_CLASS 1
 BEGIN
   PROMPT 53 7 "Ult. class. "
+  FLAGS "U"
   USE %CLR
   INPUT CODTAB[1,1] F_TIPO_RATA SELECT 
   INPUT CODTAB[2,2] F_ULT_CLASS
@@ -141,53 +139,9 @@ BEGIN
   DISPLAY "Descrizione@50" S0
   OUTPUT F_ULT_CLASS CODTAB[2,2]
   CHECKTYPE NORMAL 
-  HELP "Codice default per ulteriore classificazione della data" 
   FIELD S5
 END
 
-/**********************************************************************
- * nuova versione, forse inutile; per ora teniamo la vecchia e vediamo
- * cosa dicono
- 
-LIST F_RATE_DIFF 12
-BEGIN
-  PROMPT 5 7 "Rate          "
-  HELP "Descrizione delle rate "
-  ITEM  "1|Differenziate" MESSAGE DISABLE,F_EQUAL_FROM
-  ITEM  "2|Uguali"        MESSAGE ENABLE,F_EQUAL_FROM
-//  ITEM  "3|Uguali dall'ultima modificata"
-//  ITEM  "4|Uguali finche' possibile"
-END
-
-LIST F_EQUAL_FROM 14
-BEGIN 
-  PROMPT 35 7 "a partire da"
-  ITEM "1|Rata numero... "   MESSAGE ENABLE,F_START_RATA
-  ITEM "2|Ultima modificata" MESSAGE DISABLE,F_START_RATA
-END
-
-NUMBER F_START_RATA 2
-BEGIN
-    PROMPT 65 7 ""
-END
-
-STRING F_ULT_CLASS 3
-BEGIN
-  PROMPT 5 9 "Ulteriore classificazione"
-  USE %CLR
-  INPUT CODTAB[1,1] F_TIPO_RATA SELECT 
-  INPUT CODTAB[2,2] F_ULT_CLASS
-  DISPLAY "Tipo pagamento" CODTAB[1,1]
-  DISPLAY "Classificazione" CODTAB[2,2]
-  DISPLAY "Descrizione@50" S0
-  OUTPUT F_ULT_CLASS CODTAB[2,2]
-  CHECKTYPE NORMAL 
-  HELP "Codice default per ulteriore classificazione della data"
-END
-
-********************************************************************/
-     
-
 NUMBER F_FIXSCAD_1 2
 BEGIN
    PROMPT 5 9 "Giorni scadenza fissi (1) "
@@ -227,8 +181,8 @@ BEGIN
   PROMPT 0 11 ""
   ITEM "N.ro giorni rata"
   ITEM "Percentuale"
-  ITEM "Tipo pag." 
+  ITEM "Tipo@1" 
-  ITEM "Ult. classif."
+  ITEM "Ult. class.@1"
   ITEM "Descrizione@50"
 END
 
@@ -241,22 +195,17 @@ PAGE "" -1 -1 78 15
 NUMBER 101 4
 BEGIN
   PROMPT 4 1 "Numero giorni             "
-  HELP "Numero di giorni per la scadenza"
-  FLAGS "R"
 END
 
 NUMBER 102 6 2
 BEGIN
   PROMPT 4 3 "Percentuale               "
-  HELP "Percentuale della rata"
+  PICTURE ".2"
-  FLAGS "R"
 END
 
-
 NUMBER 103 1
 BEGIN
   PROMPT 4 5 "Tipo pagamento  "
-  HELP "Tipo di pagamento per la rata"
   SHEET "Codice|Tipo pagamento@32"
   INPUT 103
   OUTPUT 103