Patch level :10.0 1044

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
aggiunto il campo contsep alla commessa (serve poi per la gestione nei docs)


git-svn-id: svn://10.65.10.50/branches/R_10_00@22350 c028cbd2-c16b-5b4b-a496-9718f37d4682

ca/ca0600a.h

@@ -65,10 +65,12 @@
 #define H_CMS_MAG         355
 #define F_CMS_DEP         356
 #define F_CMS_DESCDEP     357
-#define F_LISPR           358
+#define F_CMS_LISPR       358
-#define F_DLISPR          359
+#define F_CMS_DLISPR      359
-#define F_LISCN           360
+#define F_CMS_LISCN       360
-#define F_DLISCN          361
+#define F_CMS_DLISCN      361
+#define F_CMS_CONTSEP     362
+#define F_CMS_DESCONTSEP  363
 
 #define F_CMS_CDC1        401
 #define F_CMS_CDC2        402

ca/ca0600a.uml

@@ -558,41 +558,41 @@ BEGIN
   PROMPT 35 20 ""
 END
 
-STRING F_LISPR 4
+STRING F_CMS_LISPR 4
 BEGIN
   FLAGS "UZ"
   PROMPT 2 21 "Listino rilev. preventivo"
   FIELD LISRILPR
   USE &CILIS
-  INPUT CODTAB F_LISPR
+  INPUT CODTAB F_CMS_LISPR
   DISPLAY "Codice" CODTAB
   DISPLAY "Descrizione@50" S0
-  OUTPUT F_LISPR CODTAB
+  OUTPUT F_CMS_LISPR CODTAB
-  OUTPUT F_DLISPR S0
+  OUTPUT F_CMS_DLISPR S0
   CHECKTYPE NORMAL
 END
 
-STRING F_DLISPR 70 40
+STRING F_CMS_DLISPR 70 40
 BEGIN
   FLAGS "D"
   PROMPT 35 21 ""
 END
 
-STRING F_LISCN 4
+STRING F_CMS_LISCN 4
 BEGIN
   FLAGS "UZ"
   PROMPT 2 22 "Listino rilev. consuntivo"
   FIELD LISRILCN
   USE &CILIS
-  INPUT CODTAB F_LISCN
+  INPUT CODTAB F_CMS_LISCN
   DISPLAY "Codice" CODTAB
   DISPLAY "Descrizione@50" S0
-  OUTPUT F_LISCN CODTAB
+  OUTPUT F_CMS_LISCN CODTAB
-  OUTPUT F_DLISCN S0
+  OUTPUT F_CMS_DLISCN S0
   CHECKTYPE NORMAL
 END
 
-STRING F_DLISCN 70 40
+STRING F_CMS_DLISCN 70 40
 BEGIN
   FLAGS "D"
   PROMPT 35 22 ""
@@ -607,6 +607,30 @@ BEGIN
   PROMPT 1 0 "@bConto analitico"
 END
 
+STRING F_CMS_CONTSEP 6
+BEGIN
+  PROMPT 1 8 "Contab. separata "
+  USE &NPENT
+  INPUT CODTAB F_CMS_CONTSEP
+  DISPLAY "Codice@6" CODTAB
+  DISPLAY "Descrizione@50" S0
+  OUTPUT F_CMS_CONTSEP CODTAB
+  OUTPUT F_CMS_DESCONTSEP S0
+  CHECKTYPE NORMAL
+  FIELD CONTSEP
+END
+
+STRING F_CMS_DESCONTSEP 50 48
+BEGIN
+  PROMPT 27 8 ""
+  USE &NPENT KEY 2
+  INPUT S0 F_CMS_DESCONTSEP
+  DISPLAY "Descrizione@50" S0
+  DISPLAY "Codice@6" CODTAB
+  COPY OUTPUT F_CMS_CONTSEP
+  CHECKTYPE NORMAL
+END
+
 ENDPAGE
 
 PAGE "Clienti/Fornitori" 0 0 0 2

ca/commesse.h

@@ -57,6 +57,7 @@
 #define COMMESSE_CODCONTO   "CODCONTO"
 #define COMMESSE_LISRILPR		"LISRILPR"
 #define COMMESSE_LISRILCN		"LISRILCN"
+#define COMMESSE_CONTSEP    "CONTSEP"
 
 #endif
  

ca/f147.dir

@@ -1,3 +1,3 @@
 147
 0
-$commesse||0|474|0|Archivio Commesse|||
+$commesse||0|480|0|Archivio Commesse|||

ca/f147.trr

@@ -1,5 +1,5 @@
 147
-56
+57
 CODCMS|1|20|0|Codice Commessa
 DESCRIZ|1|50|0|Descrizione
 DESCRAGG|11|10|0|Descrizione aggiuntiva
@@ -56,6 +56,7 @@ INDETR|1|1|0|Codice intetraibilita' IVA
 CODCONTO|1|20|0|Codice Conto analitico
 LISRILPR|1|4|0|Listino per la rilevazione ore preventive di default
 LISRILCN|1|4|0|Listino per la rilevazione ore consuntive di default
+CONTSEP|1|6|0|Contabilita' separata
 2
 CODCMS| 
 UPPER(DESCRIZ)|X