From ae9859ed5c62dcef46c9ee629daedec4fe55294e Mon Sep 17 00:00:00 2001
From: Alessandro Bonazzi <alexbonazzi5652@gmail.com>
Date: Wed, 28 Aug 2024 22:38:59 +0200
Subject: [PATCH] Patch level         : 12.00 1330 Files correlati     :
 cg0700a.msk ve0100o.msk f18.dir f18.trr

Commento:

Sistemati clienti occasionali
---
 src/cg/cg0700a.h   | 25 +++++++++++++------------
 src/cg/cg0700a.uml | 41 ++++++++++++++++++++++++-----------------
 2 files changed, 37 insertions(+), 29 deletions(-)

diff --git a/src/cg/cg0700a.h b/src/cg/cg0700a.h
index 77287152d..60e4babc6 100755
--- a/src/cg/cg0700a.h
+++ b/src/cg/cg0700a.h
@@ -15,15 +15,16 @@
 #define O_STATONAS  112
 #define O_COMUNENAS 113
 #define O_DENCOMNAS 114
-#define O_STATOPAIV 115
-#define O_REFERENTE 116
-#define O_BYMAIL		117
-#define O_MAIL			118
-#define O_DOCMAIL		119
-#define O_PEC				120
-#define O_PTEL			121
-#define O_TEL				122
-#define O_PTEL2			123
-#define O_TEL2			124
-#define O_PTEL3			125
-#define O_TEL3			126
\ No newline at end of file
+#define O_LOCALITA  115
+#define O_STATOPAIV 116
+#define O_REFERENTE 117
+#define O_BYMAIL		118
+#define O_MAIL			119
+#define O_DOCMAIL		120
+#define O_PEC				121
+#define O_PTEL			122
+#define O_TEL				123
+#define O_PTEL2			124
+#define O_TEL2			125
+#define O_PTEL3			126
+#define O_TEL3			127
diff --git a/src/cg/cg0700a.uml b/src/cg/cg0700a.uml
index 4da533627..9488512bc 100755
--- a/src/cg/cg0700a.uml
+++ b/src/cg/cg0700a.uml
@@ -72,7 +72,7 @@ BEGIN
   VALIDATE PI_FUNC O_STATOPAIV
 END
 
-GROUPBOX DLG_NULL 71 5
+GROUPBOX DLG_NULL 80 5
 BEGIN
   PROMPT 1 5 "@bDati residenza"
 END
@@ -100,12 +100,12 @@ BEGIN
   DISPLAY "Codice" CODTAB
   DISPLAY "Denominazione@50" S0
   OUTPUT O_STATO CODTAB 
-  //CHECKTYPE NORMAL
+  CHECKTYPE NORMAL
 END
 
 STRING O_COMUNE 4
 BEGIN
-  PROMPT 27 7 "Comune "
+  PROMPT 15 7 "Comune "
   FIELD COM
   FLAGS "U"
   USE LF_COMUNI
@@ -118,21 +118,13 @@ BEGIN
   OUTPUT O_COMUNE COM
   OUTPUT O_DENCOM DENCOM
   OUTPUT O_CAP CAPCOM
-  //CHECKTYPE NORMAL
+  CHECKTYPE NORMAL
   ADD RUN ba4 -0
 END
 
-NUMBER O_CAP 5
+STRING O_DENCOM 50 45
 BEGIN
-  PROMPT 56 7 "C.A.P. "
-  HELP "CAP della residenza della persona"
-  FIELD CAP
-  FLAGS "ZF"
-END
-
-STRING O_DENCOM 50
-BEGIN
-  PROMPT 2 8 "Denominazione   "
+  PROMPT 30 7 ""
   HELP "Nome del comune di residenza della persona"
   USE LF_COMUNI KEY 2
   INPUT STATO O_STATO
@@ -145,7 +137,22 @@ BEGIN
   ADD RUN ba4 -0
 END
 
-GROUPBOX DLG_NULL 71 4
+STRING O_LOCALITA 35
+BEGIN
+  PROMPT 2 8 "Localita'     "
+  FIELD LOCALITA
+  HELP "Localita' del recapito"
+END
+
+NUMBER O_CAP 5
+BEGIN
+  PROMPT 56 8 "C.A.P. "
+  HELP "CAP della residenza della persona"
+  FIELD CAP
+  FLAGS "ZF"
+END
+
+GROUPBOX DLG_NULL 80 4
 BEGIN
   PROMPT 1 10 "@bDati nascita"
 END
@@ -187,7 +194,7 @@ BEGIN
   COPY DISPLAY O_COMUNE
   OUTPUT O_COMUNENAS COM
   OUTPUT O_DENCOMNAS DENCOM
-  //CHECKTYPE NORMAL
+  CHECKTYPE NORMAL
 END
 
 STRING O_DENCOMNAS 50
@@ -197,7 +204,7 @@ BEGIN
   INPUT DENCOM O_DENCOMNAS
   COPY DISPLAY O_DENCOM
   COPY OUTPUT O_COMUNENAS
-  //CHECKTYPE NORMAL
+  CHECKTYPE NORMAL
 END
 
 STRING O_REFERENTE 50