From 2d0f23a121625500da0744c250aad815d0340757 Mon Sep 17 00:00:00 2001
From: mtollari <mtollari@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Wed, 28 Jun 2017 13:00:52 +0000
Subject: [PATCH] Patch level         : 12.0 412 Files correlati     : Commento
            : Aggiornato programma tabella stati

git-svn-id: svn://10.65.10.50/branches/R_10_00@23882 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 src/ba/batbsta.h   |  1 +
 src/ba/batbsta.uml | 48 ++++++++++++++++++++++++++++++----------------
 2 files changed, 32 insertions(+), 17 deletions(-)

diff --git a/src/ba/batbsta.h b/src/ba/batbsta.h
index a5506c532..b34b47b60 100755
--- a/src/ba/batbsta.h
+++ b/src/ba/batbsta.h
@@ -8,3 +8,4 @@
 #define FLD_SANMARINO     107
 #define FLD_UNICO         108
 #define FLD_ISTAT         109
+#define FLD_ISO			  110
diff --git a/src/ba/batbsta.uml b/src/ba/batbsta.uml
index f64e0cb65..488883537 100755
--- a/src/ba/batbsta.uml
+++ b/src/ba/batbsta.uml
@@ -6,15 +6,15 @@ ENDPAGE
 
 PAGE "Stati" -1 -1 78 13
 
-GROUPBOX DLG_NULL 75 7
+GROUPBOX DLG_NULL 75 5
 BEGIN
- PROMPT 1 0 ""
+ PROMPT 0 0 ""
  FLAGS "R"
 END
 
 NUMBER FLD_TABSTA_CODTAB 3
 BEGIN
-  PROMPT 2 2 "Codice        "
+  PROMPT 1 1 "Codice        "
   FIELD CODTAB
   FLAGS "RZ"
   KEY 1
@@ -30,7 +30,7 @@ END
 
 STRING FLD_TABSTA_S0 50
 BEGIN
-  PROMPT 2 4 "Denominazione "
+  PROMPT 1 2 "Denominazione "
   FIELD S0
   KEY 2
   USE %STA KEY 2
@@ -43,9 +43,16 @@ BEGIN
   CHECKTYPE REQUIRED
 END
 
+STRING FLD_TABSTA_S2 20
+BEGIN
+  PROMPT 1 3 "Nazionalità   "
+  FIELD S2
+  HELP "Nazionalità corrispondente a questo stato"
+END
+
 STRING FLD_TABSTA_S7 3
 BEGIN
-  PROMPT 2 8 "Valuta        "
+  PROMPT 1 5 "Valuta "
   FIELD S7
   FLAGS "U"
   USE %VAL
@@ -60,7 +67,7 @@ END
 
 STRING FLD_TABSTA_S7_TABVAL_S0 50
 BEGIN
-  PROMPT 24 8 ""
+  PROMPT 18 5 ""
   USE %VAL KEY 2
   CHECKTYPE NORMAL
   INPUT S0 FLD_TABSTA_S7_TABVAL_S0
@@ -71,28 +78,27 @@ BEGIN
   HELP "Valuta corrente dello stato"
 END
 
-STRING FLD_TABSTA_S2 20
-BEGIN
-  PROMPT 2 11 "Nazionalità   "
-  FIELD S2
-  HELP "Nazionalità corrispondente a questo stato"
-END
-
 BOOLEAN FLD_BLACKLIST
 BEGIN
-  PROMPT 2 13 "Paese a fiscalità agevolata (Black List)"
+  PROMPT 1 6 "Paese a fiscalità agevolata (Black List)"
   FIELD B0
 END
 
 BOOLEAN FLD_SANMARINO
 BEGIN
-  PROMPT 2 14 "San Marino"
+  PROMPT 45 6 "San Marino"
   FIELD B1
 END
 
+GROUPBOX DLG_NULL 75 5
+BEGIN
+ PROMPT 0 7 "Codici"
+ FLAGS "R"
+END
+
 NUMBER FLD_UNICO 3
 BEGIN
-  PROMPT 51 13 "Codice UNICO "
+  PROMPT 1 8 "UNICO              "
   FLAGS "Z"
   FIELD S8
   HELP "Codice stato da indicare sul modello UNICO e sullo Spesometro. Es. Svizzera=071"
@@ -100,12 +106,20 @@ END
 
 NUMBER FLD_ISTAT 3
 BEGIN
-  PROMPT 51 14 "Codice ISTAT "
+  PROMPT 1 9 "ISTAT              "
   FLAGS "Z"
   FIELD S9
   HELP "Codice ISTAT dello stato. Es. Svizzera=241 "
 END
 
+STRING FLD_ISO 2
+BEGIN
+  PROMPT 1 10 "ISO 3166-1 alpha-2 "
+  FLAGS "Z"
+  FIELD S10
+  HELP "Codice ISO di 2 caratteri Es. IT, UK, DE"
+END
+
 ENDPAGE
 
 ENDMASK