Patch level :4.0 /10.0

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :conai in corso d'opera


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

tp/tp0900.cpp

@@ -51,6 +51,8 @@ bool TDichiarazione_CONAI_mask::on_field_event(TOperable_field& o, TField_event
 /////////////////////////////////////////////////////////////
 class TDichiarazione_CONAI_report : public TReport
 {
+protected:
+virtual bool use_mask() { return false; }
 public:
   TDichiarazione_CONAI_report() {}
 };
@@ -61,11 +63,28 @@ public:
 
 class TDichiarazione_CONAI_csv_recordset : public TCSV_recordset
 {
+protected:
+  //virtual const TVariant& get(const char* field_name) const;
 public:
 	TDichiarazione_CONAI_csv_recordset();
 };
 
 
+/*const TDichiarazione_CONAI_csv_recordset::get(const char* field_name) const
+{
+	if (*field_name == '#')
+	{
+		if (strcmp(field_name, "#RAGSOC") == 0)
+		{
+			TVariant& var = get_tmp_var();
+			var = mask.;
+		}
+    return var;
+  }
+  return NULL_VARIANT;
+}*/
+
+
 TDichiarazione_CONAI_csv_recordset::TDichiarazione_CONAI_csv_recordset() 
 : TCSV_recordset("CSV(,)\n")
 {
@@ -583,6 +602,7 @@ void TDichiarazione_CONAI::elabora(const TMask& mask) const
 	TDichiarazione_CONAI_report rep;
 	bool ok = rep.load(nome_report);
   //setta il recordset...
+  csv->set_var("#EMAIL", TVariant("CAZZO"), true);
   rep.set_recordset(csv);
   //..e poi carica i valori sulla maschera nel report!!!!
   rep.mask2report(mask);
@@ -601,6 +621,7 @@ void TDichiarazione_CONAI::elabora(const TMask& mask) const
 void TDichiarazione_CONAI::main_loop()
 {
   TDichiarazione_CONAI_mask mask;
+  mask.field(F_FIRM).check(RUNNING_CHECK);
   while (mask.run() == K_ENTER)
   {
     elabora(mask);

tp/tp0900a.h

@@ -6,8 +6,7 @@
 #define F_PAIV          103
 #define F_COFI          104
 #define F_DENCOM        105
-#define F_INDRES        106
+#define F_INDIR         106
-#define F_CIVRES        107
 
 #define F_PERIODO       111
 #define F_ANNO          112

tp/tp0900a.uml

@@ -34,10 +34,13 @@ NUMBER F_FIRM 5
 BEGIN
   PROMPT 2 1 ""
   USE LF_NDITTE
+  JOIN LF_ANAG TO LF_NDITTE KEY 1 INTO TIPOA=TIPOA CODANAGR=CODANAGR
   INPUT CODDITTA F_FIRM
   OUTPUT F_RAGSOC RAGSOC
-  CHECKTYPE REQUIRED
+  OUTPUT F_PAIV LF_ANAG->PAIV
+  OUTPUT F_COFI LF_ANAG->COFI
   FLAGS "DF"
+  CHECKTYPE FORCED
 END
 
 STRING F_RAGSOC 60
@@ -47,26 +50,12 @@ BEGIN
   FIELD #RAGSOC
 END
 
-STRING F_PAIV 16
-BEGIN
-  PROMPT 2 2 "iva"
-  FLAGS "D"
-  FIELD #PAIV
-END
-
-STRING F_COFI 16
-BEGIN
-  PROMPT 45 2 "cofi"
-  FLAGS "D"
-  FIELD #COFI
-END
-
 GROUPBOX DLG_NULL 78 3
 BEGIN
   PROMPT 1 3 "@bPeriodo da considerare"
 END
 
-RADIOBUTTON F_PERIODO 38
+RADIOBUTTON F_PERIODO 39
 BEGIN
   PROMPT 2 3 ""
   ITEM "1|Annuale"     MESSAGE HIDE,F_TRIMESTRE|HIDE,F_MESE
@@ -154,6 +143,24 @@ BEGIN
   FIELD #RESP
 END
 
+STRING F_PAIV 16
+BEGIN
+  PROMPT 2 16 "IVA "
+  FIELD #PAIV
+END
+
+STRING F_COFI 16
+BEGIN
+  PROMPT 25 16 "C.F."
+  FIELD #COFI
+END
+
+STRING F_INDIR 60 33
+BEGIN
+  PROMPT 2 17 "Indirizzo "
+  FIELD #INDIR
+END
+
 RADIOBUTTON F_PRODUT 27
 BEGIN
   PROMPT 51 15 "Iscritto in quanto:"

tp/tp0900ca.rep

@@ -27,7 +27,8 @@
   <field x="54.25" y="17.75" type="Stringa" width="16" pattern="1">
    <source>#TEL</source>
   </field>
-  <field x="76" y="17.75" type="Stringa" width="16" pattern="1">
+  <field x="76" y="17.75" type="Stringa" width="18" pattern="1">
+   <font face="Arial Narrow" size="8" />
    <source>#EMAIL</source>
   </field>
  </section>

tp/tp0900es.rep

@@ -13,7 +13,7 @@
    <source>#RAGSOC</source>
   </field>
   <field x="18" y="18.75" type="Stringa" width="30" pattern="1">
-   <source>#INDRES</source>
+   <source>#INDIR</source>
   </field>
   <field x="20" y="19.75" type="Stringa" width="16" pattern="1">
    <source>#PAIV</source>
@@ -27,7 +27,8 @@
   <field x="54.25" y="20.75" type="Stringa" width="16" pattern="1">
    <source>#TEL</source>
   </field>
-  <field x="76" y="20.75" type="Stringa" width="16" pattern="1">
+  <field x="76" y="20.75" type="Stringa" width="18" pattern="1">
+   <font face="Arial Narrow" size="8" />
    <source>#EMAIL</source>
   </field>
  </section>
@@ -85,31 +86,40 @@
   <field border="1" x="81.25" y="0.06" type="Linea" pattern="1" />
   <field border="1" x="91.6" y="0.06" type="Linea" pattern="1" />
   <field border="1" x="11.5" y="1.06" type="Linea" width="80" height="0" pattern="1" />
-  <field x="11.5" y="1.5" type="Testo" width="80" pattern="1" text="Si dichiara che i dati di cui sopra corrispondono alle nostre registrazioni e che siamo ">
+  <field x="11.5" y="1.75" type="Testo" width="80" pattern="1" text="(*) Attenzione: ricordiamo che in questo modulo non devono essere inseriti i quantitativi relativi alle cessioni tra produttori">
+   <font italic="1" face="Arial Narrow" bold="1" size="8" />
+  </field>
+  <field x="11.5" y="3" type="Testo" width="20" pattern="1" text="Il dichiarante:">
+   <font face="Courier New" bold="1" size="8" />
+  </field>
+  <field x="11.5" y="3.75" type="Testo" width="80" pattern="1" text="con la sottoscrizione della presente, si dichiara a tuttti gli effetti responsabile della ">
    <font face="Courier New" size="8" />
   </field>
-  <field x="11.5" y="2.25" type="Testo" width="80" pattern="1" text="disponibili a favorire eventuali precisazioni e documentazione che Conai dovesse richiedere.">
+  <field x="11.5" y="4.5" type="Testo" width="81" pattern="1" text="veridicita' dei dati forniti a Conai e si impegna a comunicare tempestivamente le variazioni">
    <font face="Courier New" size="8" />
   </field>
-  <field x="12" y="4.75" type="Testo" width="10" pattern="1" text="Data">
+  <field x="11.5" y="5.37" type="Testo" width="80" pattern="1" text="che dovessero intervenire, per quanto di sua possibile conoscenza.">
    <font face="Courier New" size="8" />
   </field>
-  <field x="65.5" y="4.75" type="Testo" align="center" width="20" pattern="1" text="Timbro e firma">
+  <field x="12" y="7" type="Testo" width="10" pattern="1" text="Data">
    <font face="Courier New" size="8" />
   </field>
-  <field x="12" y="6.25" type="Data" width="14" pattern="1">
+  <field x="65.5" y="7" type="Testo" align="center" width="20" pattern="1" text="Timbro e firma">
+   <font face="Courier New" size="8" />
+  </field>
+  <field x="12" y="8.5" type="Data" width="14" pattern="1">
    <source>#SYSTEM.DATE</source>
   </field>
-  <field border="1" x="11.5" y="7.75" type="Linea" width="15" height="0" pattern="1" />
+  <field border="1" x="11.5" y="10" type="Linea" width="15" height="0" pattern="1" />
-  <field border="1" x="68.25" y="7.75" type="Linea" width="15" height="0" pattern="1" />
+  <field border="1" x="68.25" y="10" type="Linea" width="15" height="0" pattern="1" />
-  <field border="1" x="11" y="9" type="Linea" width="80" height="0" pattern="1" />
+  <field border="1" x="11" y="11.25" type="Linea" width="80" height="0" pattern="1" />
-  <field x="11.5" y="9.5" type="Testo" width="80" pattern="1" text="Conai informa che i dati comunicati sono trattati da personale incaricato nel rispetto della legge sotto richiamata ed in ogni caso ">
+  <field x="11.5" y="11.75" type="Testo" width="80" pattern="1" text="Conai informa che i dati comunicati sono trattati da personale incaricato nel rispetto della legge sotto richiamata ed in ogni caso ">
    <font face="Courier New" size="7" />
   </field>
-  <field x="11.5" y="10.25" type="Testo" width="80" pattern="1" text="per permettere il regolare svolgimento delle attivita' previste dalle disposizioni dello Statuto, del Regolamento e delle">
+  <field x="11.5" y="12.5" type="Testo" width="80" pattern="1" text="per permettere il regolare svolgimento delle attivita' previste dalle disposizioni dello Statuto, del Regolamento e delle">
    <font face="Courier New" size="7" />
   </field>
-  <field x="11.5" y="11" type="Testo" width="80" pattern="1" text="attivita' previste dalle disposizioni dello Statuto, del Regolamento e delle deliberazioni degli organi consortili. (Ai sensi della legge n. 675&#2F;96, ex. art. 10 e 13)">
+  <field x="11.5" y="13.25" type="Testo" width="80" pattern="1" text="attivita' previste dalle disposizioni dello Statuto, del Regolamento e delle deliberazioni degli organi consortili. (Ai sensi della legge n. 675&#2F;96, ex. art. 10 e 13)">
    <font face="Courier New" size="7" />
   </field>
   <field x="29.5" type="Numero" align="right" width="10" id="101" pattern="1" hide_zero="1" text="##.###,@@@">