Modifiche per nuovo regime agricolo dal 1998:

aggiunto campo per codice IVA di compensazione


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

cg/cg0100.cpp

@@ -262,6 +262,7 @@ void CG0100_application::init_insert_mode(TMask& m)
       indbil = pconti.get_int(PCN_INDBIL);
     }
     ivd_enable =  (s1 == 0) && s2.empty() && s3.empty() && s4.empty();
+    m.show(FLD_CM1_IVACOMP, indbil == RICAVI);
   }
   m.show(FLD_CM1_RICSER, indbil == PASSIVITA || indbil == RICAVI);
   if (conto != 0)

cg/cg0100.h

@@ -30,6 +30,7 @@
 #define FLD_CM1_NUMIVDH                 122
 #define FLD_CM1_RICSER                  123
 #define FLD_CM1_DESCRANALISI            124
+#define FLD_CM1_IVACOMP                 125
 
 #define FLD_CM2_STSOTTBIL               200
 #define FLD_CM2_STSOTTAB                201

cg/cg0100a.uml

@@ -319,6 +319,25 @@ BEGIN
   ITEM "1|Servizi"
 END
 
+STRING FLD_CM1_IVACOMP 4
+BEGIN
+  PROMPT 1 11 "Cod. IVA compensazione "
+  FIELD IVACOMP
+  GROUP 1 2
+  USE %IVA
+  FLAGS "U"
+  INPUT CODTAB FLD_CM1_IVACOMP
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Descrizione@50" S0
+  DISPLAY "Tipo" S1
+  DISPLAY "%@5" R0
+  DISPLAY "Vent." S6
+  DISPLAY "Sospeso" B2
+  OUTPUT FLD_CM1_IVACOMP CODTAB
+  CHECKTYPE NORMAL
+  VALIDATE ZEROFILL_FUNC 2
+END
+
 LIST FLD_CM1_TMCF 1 13
 BEGIN
   PROMPT 1 11 "Tipo sottoconti             "