root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level :4.0 /10.0

Browse Source 
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
This commit is contained in:
luca 2008-02-27 16:05:21 +00:00
parent 491b4066d5
commit 4a99baf29b
5 changed files with 70 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
tp/tp0900.cpp
View File

@ -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);

3
tp/tp0900a.h
View File

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

39
tp/tp0900a.uml
View File

@ -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:"

3
tp/tp0900ca.rep
View File

@ -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>

36
tp/tp0900es.rep
View File

@ -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="68.25" y="7.75" type="Linea" width="15" height="0" pattern="1" />
<field border="1" x="11" y="9" 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 border="1" x="11.5" y="10" 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="11.25" type="Linea" width="80" height="0" pattern="1" />
<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="##.###,@@@">