Patch level : 12.00 1382
Files correlati : cg7.exe cg7400c.png cg7400x.png cg7a00a.rep cg7a00a.msk cg7c00a.rep cg7c00a.msk cg7e00b.png cg7h00b.png cg7400a.png cg7400a.rep cg7400a.msk cg7400b.png cg7500a.png cg7600a.png cg7700a.png
cg7700b.png cg7800a.png cg7900a.png cg7900b.png cg7a00a.png cg7b00a.png cg7c00a.png cg7d00a.png cg7e00a.png cg7f00a.png cg7g00a.png cg7g00b.png cg7h00a.png cgmenu.men
Bug :
Commento:
Quadri Dichiarazione IVA 2025
Aggiunto quadro VL
This commit is contained in:
parent
390b466309
commit
b04527bac7
BIN
src/cg/Campi di input quadro VL.docx
Normal file
BIN
src/cg/Campi di input quadro VL.docx
Normal file
Binary file not shown.
BIN
src/cg/IVA_2023_mod.docx
Normal file
BIN
src/cg/IVA_2023_mod.docx
Normal file
Binary file not shown.
BIN
src/cg/IVA_Annuale_2025_istr.docx
Normal file
BIN
src/cg/IVA_Annuale_2025_istr.docx
Normal file
Binary file not shown.
127356
src/cg/IVA_Annuale_2025_istr.pdf
Normal file
127356
src/cg/IVA_Annuale_2025_istr.pdf
Normal file
File diff suppressed because one or more lines are too long
BIN
src/cg/IVA_Annuale_2025_mod.pdf
Normal file
BIN
src/cg/IVA_Annuale_2025_mod.pdf
Normal file
Binary file not shown.
BIN
src/cg/[Confronto - Nuovo] IVA_Annuale_2025_mod.pdf
Normal file
BIN
src/cg/[Confronto - Nuovo] IVA_Annuale_2025_mod.pdf
Normal file
Binary file not shown.
@ -9,13 +9,15 @@ int main(int argc,char** argv)
|
||||
switch (r)
|
||||
{
|
||||
default:
|
||||
case 0: cg7100(argc, argv); break; // gestore stampe generico modulo FE (stampe particolari CG)
|
||||
case 1: cg7200(argc, argv); break; // lista fatture per imponibile
|
||||
case 2: cg7300(argc, argv); break; // gestore tabelle di modulo CG
|
||||
case 3: cg7400(argc,argv); break; // Quadro VA- VB
|
||||
case 5: cg7600(argc,argv); break; // Quadro VE
|
||||
case 6: cg7700(argc,argv); break; // Quadro VF
|
||||
case 7: cg7800(argc,argv); break; // Quadro VJ
|
||||
case 0: cg7100(argc, argv); break; // gestore stampe generico modulo FE (stampe particolari CG)
|
||||
case 1: cg7200(argc, argv); break; // lista fatture per imponibile
|
||||
case 2: cg7300(argc, argv); break; // gestore tabelle di modulo CG
|
||||
case 3: cg7400(argc,argv); break; // Quadro VA
|
||||
case 5: cg7600(argc,argv); break; // Quadro VE
|
||||
case 6: cg7700(argc,argv); break; // Quadro VF
|
||||
case 7: cg7800(argc, argv); break; // Quadro VJ
|
||||
case 9: cg7a00(argc, argv); break; // Quadro VL
|
||||
case 11: cg7c00(argc, argv); break; // Quadro VT
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
@ -5,3 +5,5 @@ int cg7400(int argc, char* argv[]);
|
||||
int cg7600(int argc, char* argv[]);
|
||||
int cg7700(int argc, char* argv[]);
|
||||
int cg7800(int argc, char* argv[]);
|
||||
int cg7a00(int argc, char* argv[]);
|
||||
int cg7c00(int argc, char* argv[]);
|
||||
@ -12,18 +12,18 @@
|
||||
|
||||
#include "cg7400a.h"
|
||||
|
||||
class TQuadro_VIAB_recordset : public TQuadro_IVA_recordset
|
||||
class TQuadro_VA_recordset : public TQuadro_IVA_recordset
|
||||
{
|
||||
|
||||
protected:
|
||||
virtual void load(const char repid);
|
||||
|
||||
public:
|
||||
TQuadro_VIAB_recordset(TQuadro_IVA_mask * mask, const char* use, const int year, const char repid) : TQuadro_IVA_recordset(mask, use, year, repid) { load(repid); }
|
||||
virtual ~TQuadro_VIAB_recordset() {}
|
||||
TQuadro_VA_recordset(TQuadro_IVA_mask * mask, const char* use, const int year, const char repid) : TQuadro_IVA_recordset(mask, use, year, repid) { load(repid); }
|
||||
virtual ~TQuadro_VA_recordset() {}
|
||||
};
|
||||
|
||||
void TQuadro_VIAB_recordset::load(const char repid)
|
||||
void TQuadro_VA_recordset::load(const char repid)
|
||||
{
|
||||
const TRectype & ditta = cache().get(LF_NDITTE, app().get_firm());
|
||||
const TString4 tipoa(ditta.get(NDT_TIPOA));
|
||||
@ -49,13 +49,13 @@ void TQuadro_VIAB_recordset::load(const char repid)
|
||||
const TString16 datanasc = anafis.get(ANF_DATANASC);
|
||||
const TRectype & comuni = cache().get(LF_COMUNI, anafis.get(ANF_COMNASC));
|
||||
|
||||
set("VI3.1", anagr.get(ANA_RAGSOC).left(30));
|
||||
set("VI3.2", anagr.get(ANA_RAGSOC).mid(30));
|
||||
set("VI3.1", anagr.get(ANA_RAGSOC).sleft(30));
|
||||
set("VI3.2", anagr.get(ANA_RAGSOC).smid(30));
|
||||
set_bool("VI3.3",anafis.get(ANF_SESSO) == "M");
|
||||
set_bool("VI3.4", anafis.get(ANF_SESSO) == "F");
|
||||
set("VI3.5", datanasc.left(2));
|
||||
set("VI3.6", datanasc.mid(3));
|
||||
set("VI3.7", datanasc.right(4));
|
||||
set("VI3.5", datanasc.sleft(2));
|
||||
set("VI3.6", datanasc.smid(3));
|
||||
set("VI3.7", datanasc.sright(4));
|
||||
set("VI3.8", comuni.get(COM_DENCOM));
|
||||
set("VI3.9", comuni.get(COM_PROVCOM));
|
||||
}
|
||||
@ -69,19 +69,26 @@ void TQuadro_VIAB_recordset::load(const char repid)
|
||||
|
||||
if (ditta.get(NDT_DICHP).full())
|
||||
{
|
||||
const TRectype & anaint = cache().get(LF_ANAG, ditta.get(NDT_FIRMAT));
|
||||
const TRectype & anafis = cache().get(LF_ANAGFIS, ditta.get(NDT_FIRMAT));
|
||||
TString16 firmat = prefix().firm().get(NDT_FIRMAT);
|
||||
TToken_string key(prefix().firm().get(NDT_TIPOF));
|
||||
|
||||
if (key.blank())
|
||||
key = "F";
|
||||
key.add(firmat);
|
||||
|
||||
const TRectype & anaint = cache().get(LF_ANAG, key);
|
||||
const TRectype & anafis = cache().get(LF_ANAGFIS, firmat);
|
||||
const TString16 datanasc = anafis.get(ANF_DATANASC);
|
||||
const TString16 dataint = ditta.get(NDT_DECCARINT);
|
||||
const TRectype & comuni = cache().get(LF_COMUNI, anafis.get(ANF_COMNASC));
|
||||
|
||||
set("VI4.1", anaint.get(ANA_COFI));
|
||||
// set("VI4.2", ditta.get(NDT_CARINT)); aggiungere carica intermediario
|
||||
// ???? set("VI4.2", ditta.get(NDT_CARINT));
|
||||
set("VI4.3", anagr.get(ANA_PAIV));
|
||||
set("VI4.4", anaint.get(ANA_RAGSOC).left(30));
|
||||
set("VI4.5", anaint.get(ANA_RAGSOC).mid(30));
|
||||
set_bool("VI4.6", anaint.get(ANF_SESSO) == "M");
|
||||
set_bool("VI4.7", anaint.get(ANF_SESSO) == "F");
|
||||
set_bool("VI4.6", anafis.get(ANF_SESSO) == "M");
|
||||
set_bool("VI4.7", anafis.get(ANF_SESSO) == "F");
|
||||
set("VI4.8", datanasc.left(2));
|
||||
set("VI4.9", datanasc.mid(3));
|
||||
set("VI4.10", datanasc.right(4));
|
||||
@ -93,30 +100,29 @@ void TQuadro_VIAB_recordset::load(const char repid)
|
||||
set("VI8.6", dataint.mid(3));
|
||||
set("VI8.7", dataint.right(4));
|
||||
}
|
||||
|
||||
set("VA2.1", ditta.get(NDT_CODATTPREV));
|
||||
set("VA10.1", anagr.get(ANA_EVECC));
|
||||
}
|
||||
|
||||
class TQuadro_VIAB_app : public TQuadro_IVA_app
|
||||
class TQuadro_VA_app : public TQuadro_IVA_app
|
||||
{
|
||||
virtual char last_quadro_report() const { return 'c'; }
|
||||
|
||||
public:
|
||||
virtual TQuadro_IVA_recordset * app_recordset(const char* use, const int year, const char repid) { return new TQuadro_VIAB_recordset(mask(), use, year, repid); }
|
||||
virtual TQuadro_IVA_recordset * app_recordset(const char* use, const int year, const char repid) { return new TQuadro_VA_recordset(mask(), use, year, repid); }
|
||||
void load_sheet(TSheet_field & sf);
|
||||
|
||||
TQuadro_VIAB_app() : TQuadro_IVA_app("Stampa Quadro VC", "cg7400a") {}
|
||||
virtual ~TQuadro_VIAB_app() {}
|
||||
TQuadro_VA_app() : TQuadro_IVA_app("Stampa Quadro VA", "cg7400a") {}
|
||||
virtual ~TQuadro_VA_app() {}
|
||||
};
|
||||
|
||||
void TQuadro_VIAB_app::load_sheet(TSheet_field & sf)
|
||||
void TQuadro_VA_app::load_sheet(TSheet_field & sf)
|
||||
{
|
||||
}
|
||||
|
||||
int cg7400(int argc, char* argv[])
|
||||
{
|
||||
TQuadro_VIAB_app a;
|
||||
a.run(argc, argv, TR("Quadro VC"));
|
||||
TQuadro_VA_app a;
|
||||
a.run(argc, argv, TR("Quadro VA"));
|
||||
return 0;
|
||||
}
|
||||
@ -2,7 +2,8 @@
|
||||
#define F_TIPODICH 202
|
||||
#define F_DITTE 203
|
||||
#define F_REPORTS 204
|
||||
|
||||
#define F_FIRM 205
|
||||
#define F_DFIRM 206
|
||||
|
||||
#define DLG_ALLFIRMS 251
|
||||
#define DLG_ALLREPORTS 252
|
||||
|
||||
Binary file not shown.
|
Before Width: | Height: | Size: 181 KiB After Width: | Height: | Size: 442 KiB |
@ -1,216 +1,101 @@
|
||||
<?xml version="1.0" encoding="UTF-8" ?>
|
||||
<report name="cg7400a" lpi="6">
|
||||
<description>Stampa quadro VC</description>
|
||||
<report libraries="" page_merge="" save_printer="" name="cg7400a" use_printer_font="" orientation="" page_split="" lpi="6" command="" class="">
|
||||
<description>Stampa quadro VA</description>
|
||||
<font face="Courier New" size="12" />
|
||||
<section type="Head" pattern="1" />
|
||||
<section type="Head" level="1" pattern="1" />
|
||||
<section type="Body" pattern="1">
|
||||
<section type="Body" level="1" pattern="1">
|
||||
<field type="Immagine" width="83" height="72" pattern="1">
|
||||
<source>"c:\u\r_12_00\src\cg\cg7400a.png"</source>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="1" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field deactivated="" type="Immagine" hidden="" image_resize_type="" link="" dynamic_height="" shade_offset="" width="83" codval="" height="72" id="" pattern="1" hide_zero="" text="">
|
||||
<source>"cg7400a.png"</source>
|
||||
</field>
|
||||
</section>
|
||||
<field y="1" type="Numero" align="right" width="6" pattern="8">
|
||||
<source>CODDITTA</source>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<font face="Courier New" size="10" />
|
||||
<field x="4" y="1" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="Anno" />
|
||||
<field x="22" y="1" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="50" codval="" id="" pattern="1" hide_zero="" text=" ">
|
||||
<font face="Courier New" size="12" />
|
||||
<source>#SYSTEM.RAGSOC</source>
|
||||
</field>
|
||||
<field x="51" y="12.25" type="Numero" align="right" width="11" id="101" pattern="1" text="###.###.###">
|
||||
<source>VE01.1</source>
|
||||
<postscript description="B1.101 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="45" y="3" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="48" codval="" id="" pattern="1" hide_zero="" text=" ">
|
||||
<font face="Courier New" size="12" />
|
||||
<source>#SYSTEM.CFPI_SPACED</source>
|
||||
</field>
|
||||
<field x="65.5" y="12.25" type="Numero" align="right" width="11" id="102" pattern="1" text="###.###.###">
|
||||
<source>VE01.2</source>
|
||||
<postscript description="B1.102 POSTSCRIPT">MESSAGE ADD,B1.2302</postscript>
|
||||
<field x="63.75" y="9" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="0 1" />
|
||||
<field x="14" y="1" deactivated="" type="Stringa" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="6" codval="" id="100" pattern="1" hide_zero="" text=" ">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="51" y="13.4" type="Numero" align="right" width="11" id="201" pattern="1" text="###.###.###">
|
||||
<source>VE02.1</source>
|
||||
<postscript description="B1.201 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="51.5" y="12.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="101" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL01.1</source>
|
||||
</field>
|
||||
<field x="65.5" y="13.4" type="Numero" align="right" width="11" id="202" pattern="1" text="###.###.###">
|
||||
<source>VE01.2</source>
|
||||
<postscript description="B1.202 POSTSCRIPT">MESSAGE ADD,B1.2302</postscript>
|
||||
<field x="66" y="13.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="201" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL02.1</source>
|
||||
</field>
|
||||
<field x="51" y="14.4" type="Numero" align="right" width="11" id="301" pattern="1" text="###.###.###">
|
||||
<source>VE03.1</source>
|
||||
<postscript description="B1.301 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="52" y="14.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="301" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL01.3</source>
|
||||
</field>
|
||||
<field x="65.5" y="14.4" type="Numero" align="right" width="11" id="302" pattern="1" text="###.###.###">
|
||||
<source>VE03.2</source>
|
||||
<postscript description="B1.302 POSTSCRIPT">MESSAGE ADD,B1.2302</postscript>
|
||||
<field x="66" y="16.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="401" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL04.1</source>
|
||||
</field>
|
||||
<field x="51" y="15.4" type="Numero" align="right" width="11" id="401" pattern="1" text="###.###.###">
|
||||
<source>VE04.1</source>
|
||||
<postscript description="B1.401 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="66" y="17.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="801" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL08.1</source>
|
||||
</field>
|
||||
<field x="65.5" y="15.4" type="Numero" align="right" width="11" id="402" pattern="1" text="###.###.###">
|
||||
<source>VE04.2</source>
|
||||
<postscript description="B1.402 POSTSCRIPT">MESSAGE ADD,B1.2302</postscript>
|
||||
<field x="66" y="18.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="802" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL08.2</source>
|
||||
</field>
|
||||
<field x="51" y="16.5" type="Numero" align="right" width="11" id="501" pattern="1" text="###.###.###">
|
||||
<source>VE05.1</source>
|
||||
<postscript description="B1.501 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="52" y="19.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="901" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL09.1</source>
|
||||
</field>
|
||||
<field x="65.5" y="16.5" type="Numero" align="right" width="11" id="502" pattern="1" text="###.###.###">
|
||||
<source>VE05.2</source>
|
||||
<postscript description="B1.502 POSTSCRIPT">MESSAGE ADD,B1.2302</postscript>
|
||||
<field x="66" y="21.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1001" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL10.1</source>
|
||||
</field>
|
||||
<field x="51" y="17.5" type="Numero" align="right" width="11" id="601" pattern="1" text="###.###.###">
|
||||
<source>VE06.1</source>
|
||||
<postscript description="B1.601 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="66" y="22.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1002" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL10.2</source>
|
||||
</field>
|
||||
<field x="65.5" y="17.5" type="Numero" align="right" width="11" id="602" pattern="1" text="###.###.###">
|
||||
<source>VE06.2</source>
|
||||
<postscript description="B1.602 POSTSCRIPT">MESSAGE ADD,B1.2302</postscript>
|
||||
<field x="66" y="23.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1101" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL11.1</source>
|
||||
</field>
|
||||
<field x="51" y="18.5" type="Numero" align="right" width="11" id="701" pattern="1" text="###.###.###">
|
||||
<source>VE07.1</source>
|
||||
<postscript description="B1.701 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="66" y="24.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1102" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL11.2</source>
|
||||
</field>
|
||||
<field x="65.5" y="18.5" type="Numero" align="right" width="11" id="702" pattern="1" text="###.###.###">
|
||||
<source>VE07,2</source>
|
||||
<postscript description="B1.702 POSTSCRIPT">MESSAGE ADD,B1.2302</postscript>
|
||||
<field x="52" y="26.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2001" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL20.1</source>
|
||||
</field>
|
||||
<field x="51" y="19.5" type="Numero" align="right" width="11" id="801" pattern="1" text="###.###.###">
|
||||
<source>VE08.1</source>
|
||||
<postscript description="B1.801 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="52" y="27.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2101" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL21.1</source>
|
||||
</field>
|
||||
<field x="65.5" y="19.5" type="Numero" align="right" width="11" id="802" pattern="1" text="###.###.###">
|
||||
<source>VE08.2</source>
|
||||
<postscript description="B1.802 POSTSCRIPT">MESSAGE ADD,B1.2302</postscript>
|
||||
<field x="52" y="28.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2201" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL22.1</source>
|
||||
</field>
|
||||
<field x="51" y="20.5" type="Numero" align="right" width="11" id="901" pattern="1" text="###.###.###">
|
||||
<source>VE09.1</source>
|
||||
<postscript description="B1.901 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="52" y="29.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2301" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL23.1</source>
|
||||
</field>
|
||||
<field x="65.5" y="20.5" type="Numero" align="right" width="11" id="902" pattern="1" text="###.###.###">
|
||||
<source>VE09.1</source>
|
||||
<postscript description="B1.902 POSTSCRIPT">MESSAGE ADD,B1.2302</postscript>
|
||||
<field x="66" y="30.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2401" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL24.1</source>
|
||||
</field>
|
||||
<field x="51" y="22.5" type="Numero" align="right" width="11" id="2001" pattern="1" text="###.###.###">
|
||||
<source>VE20.1</source>
|
||||
<postscript description="B1.2001 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="66" y="31.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2501" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL25.1</source>
|
||||
</field>
|
||||
<field x="65.5" y="22.5" type="Numero" align="right" width="11" id="2002" pattern="1" text="###.###.###">
|
||||
<source>VE20.2</source>
|
||||
<postscript description="B1.2002 POSTSCRIPT">MESSAGE ADD,B1.2302</postscript>
|
||||
<field x="66" y="33" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2601" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL26.1</source>
|
||||
</field>
|
||||
<field x="51" y="23.65" type="Numero" align="right" width="11" id="2101" pattern="1" text="###.###.###">
|
||||
<source>VE21.1</source>
|
||||
<postscript description="B1.2101 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="66" y="34" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2701" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL27.1</source>
|
||||
</field>
|
||||
<field x="65.5" y="23.65" type="Numero" align="right" width="11" id="2102" pattern="1" text="###.###.###">
|
||||
<source>VE21.1</source>
|
||||
<postscript description="B1.2102 POSTSCRIPT">MESSAGE ADD,B1.2302</postscript>
|
||||
<field x="66" y="35" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2801" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL28.1</source>
|
||||
</field>
|
||||
<field x="51" y="24.6" type="Numero" align="right" width="11" id="2201" pattern="1" text="###.###.###">
|
||||
<source>VE22.1</source>
|
||||
<postscript description="B1.2201 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="66" y="36" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2901" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL29.1</source>
|
||||
</field>
|
||||
<field x="65.5" y="24.6" type="Numero" align="right" width="11" id="2202" pattern="1" text="###.###.###">
|
||||
<source>VE22.2</source>
|
||||
<postscript description="B1.2202 POSTSCRIPT">MESSAGE ADD,B1.2302</postscript>
|
||||
</field>
|
||||
<field x="51" y="25.75" type="Numero" align="right" width="11" id="2301" pattern="1" text="###.###.###" />
|
||||
<field x="65.5" y="25.75" type="Numero" align="right" width="11" id="2302" pattern="1" text="###.###.###">
|
||||
<postscript description="B1.2302 POSTSCRIPT">MESSAGE ADD,B1.2502</postscript>
|
||||
</field>
|
||||
<field x="65.5" y="26.75" type="Numero" align="right" width="11" id="2402" pattern="1" text="###.###.###">
|
||||
<source>VE24.2</source>
|
||||
<postscript description="B1.2402 POSTSCRIPT">MESSAGE ADD,B1.2502</postscript>
|
||||
</field>
|
||||
<field x="65.5" y="27.75" type="Numero" align="right" width="11" id="2502" pattern="1" text="###.###.###" />
|
||||
<field x="19" y="30.75" type="Numero" align="right" width="11" id="3002" pattern="1" text="###.###.###">
|
||||
<source>VE30.2</source>
|
||||
<postscript description="B1.3002 POSTSCRIPT">MESSAGE ADD,B1.3010</postscript>
|
||||
</field>
|
||||
<field x="37" y="30.75" type="Numero" align="right" width="11" id="3003" pattern="1" text="###.###.###">
|
||||
<source>VE30.3</source>
|
||||
<postscript description="B1.3003 POSTSCRIPT">MESSAGE ADD,B1.3010</postscript>
|
||||
</field>
|
||||
<field x="19" y="32.75" type="Numero" align="right" width="11" id="3004" pattern="1" text="###.###.###">
|
||||
<source>V30.4</source>
|
||||
<postscript description="B1.3004 POSTSCRIPT">MESSAGE ADD,B1.3010</postscript>
|
||||
</field>
|
||||
<field x="37" y="32.75" type="Numero" align="right" width="11" id="3005" pattern="1" text="###.###.###">
|
||||
<source>VE30.5</source>
|
||||
<postscript description="B1.3005 POSTSCRIPT">MESSAGE ADD,B1.3010</postscript>
|
||||
</field>
|
||||
<field x="51" y="28.75" type="Numero" align="right" width="11" id="3010" pattern="1" text="###.###.###">
|
||||
<postscript description="B1.3010 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
</field>
|
||||
<field x="51" y="33.9" type="Numero" align="right" width="11" id="3101" pattern="1" text="###.###.###">
|
||||
<source>VE31.1</source>
|
||||
</field>
|
||||
<field x="51" y="34.95" type="Numero" align="right" width="11" id="3201" pattern="1" text="###.###.###">
|
||||
<source>VE32.1</source>
|
||||
</field>
|
||||
<field x="51" y="35.95" type="Numero" align="right" width="11" id="3301" pattern="1" text="###.###.###">
|
||||
<source>VE33.1</source>
|
||||
</field>
|
||||
<field x="51" y="36.95" type="Numero" align="right" width="11" id="3401" pattern="1" text="###.###.###">
|
||||
<source>VE34.1</source>
|
||||
<postscript description="B1.3401 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
</field>
|
||||
<field x="19" y="40" type="Numero" align="right" width="11" id="3502" pattern="1" text="###.###.###">
|
||||
<source>VE35.2</source>
|
||||
<postscript description="B1.3502 POSTSCRIPT">MESSAGE ADD,B1.3510</postscript>
|
||||
</field>
|
||||
<field x="37" y="40" type="Numero" align="right" width="11" id="3503" pattern="1" text="###.###.###">
|
||||
<source>VE35.3</source>
|
||||
<postscript description="B1.3503 POSTSCRIPT">MESSAGE ADD,B1.3510</postscript>
|
||||
</field>
|
||||
<field x="19" y="42.1" type="Numero" align="right" width="11" id="3504" pattern="1" text="###.###.###">
|
||||
<source>V35.4</source>
|
||||
<postscript description="B1.3504 POSTSCRIPT">MESSAGE ADD,B1.3510</postscript>
|
||||
</field>
|
||||
<field x="37" y="42.1" type="Numero" align="right" width="11" id="3505" pattern="1" text="###.###.###">
|
||||
<source>VE35.5</source>
|
||||
<postscript description="B1.3505 POSTSCRIPT">MESSAGE ADD,B1.3510</postscript>
|
||||
</field>
|
||||
<field x="19" y="44.15" type="Numero" align="right" width="11" id="3506" pattern="1" text="###.###.###">
|
||||
<source>V35.6</source>
|
||||
<postscript description="B1.3506 POSTSCRIPT">MESSAGE ADD,B1.3510</postscript>
|
||||
</field>
|
||||
<field x="37" y="44.15" type="Numero" align="right" width="11" id="3507" pattern="1" text="###.###.###">
|
||||
<source>VE35.7</source>
|
||||
<postscript description="B1.3507 POSTSCRIPT">MESSAGE ADD,B1.3510</postscript>
|
||||
</field>
|
||||
<field x="19" y="46.15" type="Numero" align="right" width="11" id="3508" pattern="1" text="###.###.###">
|
||||
<source>V35.8</source>
|
||||
<postscript description="B1.3508 POSTSCRIPT">MESSAGE ADD,B1.3510</postscript>
|
||||
</field>
|
||||
<field x="37" y="46.15" type="Numero" align="right" width="11" id="3509" pattern="1" text="###.###.###">
|
||||
<source>VE35.9</source>
|
||||
<postscript description="B1.3509 POSTSCRIPT">MESSAGE ADD,B1.3510</postscript>
|
||||
</field>
|
||||
<field x="51" y="38" type="Numero" align="right" width="11" id="3510" pattern="1" text="###.###.###">
|
||||
<postscript description="B1.3510 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
</field>
|
||||
<field x="51" y="47.25" type="Numero" align="right" width="11" id="3601" pattern="1" text="###.###.###">
|
||||
<source>VE36.1</source>
|
||||
</field>
|
||||
<field x="51" y="48.25" type="Numero" align="right" width="11" id="3701" pattern="1" text="###.###.###">
|
||||
<source>VE37.1</source>
|
||||
</field>
|
||||
<field x="37" y="50.25" type="Numero" align="right" width="11" id="3702" pattern="1" text="###.###.###">
|
||||
<source>VE37.1</source>
|
||||
</field>
|
||||
<field x="51" y="51.25" type="Numero" align="right" width="11" id="3801" pattern="1" text="###.###.###">
|
||||
<source>VE38.1</source>
|
||||
<postscript description="B1.3801 POSTSCRIPT">MESSAGE ADD,B1.5001</postscript>
|
||||
</field>
|
||||
<field x="51" y="52.35" type="Numero" align="right" width="11" id="3901" pattern="1" text="###.###.###">
|
||||
<source>VE39.1</source>
|
||||
<postscript description="B1.3901 POSTSCRIPT">MESSAGE SUB,B1.5001</postscript>
|
||||
</field>
|
||||
<field x="51" y="53.35" type="Numero" align="right" width="11" id="4001" pattern="1" text="###.###.###">
|
||||
<source>VE40.1</source>
|
||||
<postscript description="B1.4001 POSTSCRIPT">MESSAGE SUB,B1.5001</postscript>
|
||||
</field>
|
||||
<field x="51" y="54.5" type="Numero" align="right" width="11" id="5001" pattern="1" text="###.###.###">
|
||||
<postscript description="B1.5001 POSTSCRIPT">MESSAGE ADD,B1.2301</postscript>
|
||||
<field x="66" y="37" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" height="2" id="9901" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL99.1</source>
|
||||
</field>
|
||||
<field x="78" y="64.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="1" codval="" id="9999" pattern="1" hide_zero="" text="###.###.###" />
|
||||
</section>
|
||||
<section type="Foot" pattern="1" />
|
||||
<section type="Foot" level="1" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="1" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<sql>USE NDITTE SELECT CODDITTA==#CODDITTA</sql>
|
||||
<parameters>
|
||||
<item name="ANNO"> </item>
|
||||
</parameters>
|
||||
</report>
|
||||
@ -18,7 +18,7 @@ END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Quadro VC" 0 0 0 0
|
||||
PAGE "Quadro VA" 0 0 0 0
|
||||
|
||||
NUMBER F_YEAR 4
|
||||
BEGIN
|
||||
|
||||
Binary file not shown.
|
Before Width: | Height: | Size: 176 KiB After Width: | Height: | Size: 373 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 122 KiB |
BIN
src/cg/cg7400x.png
Normal file
BIN
src/cg/cg7400x.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 773 KiB |
@ -153,6 +153,33 @@ bool TQuadro_IVA_mask::on_field_event(TOperable_field& o, TField_event e, long j
|
||||
sf.force_update();
|
||||
}
|
||||
break;
|
||||
case F_FIRM:
|
||||
if (e == fe_modify && dirty())
|
||||
{
|
||||
const int ditta_attiva = main_app().get_firm();
|
||||
int codditta = get_int(F_FIRM);
|
||||
|
||||
if (codditta != ditta_attiva)
|
||||
{
|
||||
if (yesno_box("Devo salvare i dati"))
|
||||
((TQuadro_IVA_app &)main_app()).save_data(*this);
|
||||
main_app().set_firm(codditta);
|
||||
((TQuadro_IVA_app &)main_app()).load_data(*this);
|
||||
reset_dirty();
|
||||
}
|
||||
}
|
||||
break;
|
||||
case DLG_SAVEREC:
|
||||
if (e == fe_button)
|
||||
{
|
||||
int codditta = get_int(F_FIRM);
|
||||
|
||||
((TQuadro_IVA_app &)main_app()).save_data(*this);
|
||||
main_app().set_firm(codditta);
|
||||
((TQuadro_IVA_app &)main_app()).load_data(*this);
|
||||
reset_dirty();
|
||||
}
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
@ -382,9 +409,13 @@ void TQuadro_IVA_app::main_loop()
|
||||
KEY k;
|
||||
|
||||
_mask = new TQuadro_IVA_mask(_name);
|
||||
|
||||
if (_mask->exist(F_FIRM))
|
||||
_mask->set(F_FIRM, prefix().get_codditta());
|
||||
load_data(*_mask);
|
||||
while ((k = _mask->run()) != K_QUIT)
|
||||
print();
|
||||
if (_mask->dirty() && yesno_box("Devo salvare i dati"))
|
||||
save_data(*_mask);
|
||||
set_firm(oldditta);
|
||||
}
|
||||
|
||||
|
||||
@ -86,6 +86,8 @@ protected:
|
||||
virtual char last_quadro_report() const { return 'a';}
|
||||
|
||||
public:
|
||||
virtual void load_data(TQuadro_IVA_mask & m) {};
|
||||
virtual void save_data(TQuadro_IVA_mask & m) {};
|
||||
virtual TQuadro_IVA_recordset * app_recordset(const char* use, const int year, const char repid) pure;
|
||||
virtual void load_sheet(TSheet_field & sf) {}
|
||||
virtual bool firm_change_enabled() const { return false; }
|
||||
|
||||
Binary file not shown.
|
Before Width: | Height: | Size: 190 KiB After Width: | Height: | Size: 477 KiB |
@ -100,18 +100,17 @@ void TQuadro_VE_recordset::load(const char repid)
|
||||
|
||||
for (pim.move_first(); !pim.eof(); pim.move_next())
|
||||
{
|
||||
const TString80 codtab = pim.get("CODTAB").as_string();
|
||||
|
||||
const TString8 codreg(format("%d%-3s",year(), (const char*)codtab.mid(10,3)));
|
||||
const TString80 codtab = pim.get_string("CODTAB");
|
||||
const TString8 codreg(format("%d%-3s",year(), (const char*)codtab.smid(10,3)));
|
||||
const TRectype & reg = cache().get("REG", codreg);
|
||||
const tiporec tipo = (tiporec) reg.get_int("I9");
|
||||
const bool vendite = reg.get_int("I0") == 1;
|
||||
const int month = atoi(codtab.mid(13,2));
|
||||
const int month = atoi(codtab.smid(13,2));
|
||||
|
||||
if (vendite && tipo != liquidazione && month == 13)
|
||||
{
|
||||
const TRectype & pimr = pim.cursor()->curr();
|
||||
TString8 codiva(codtab.mid(16,4)); codiva.trim();
|
||||
TString8 codiva(codtab.smid(16,4)); codiva.trim();
|
||||
const TRectype & ivar = cache().get("%IVA", codiva);
|
||||
const TString8 aliquota = ivar.get("R0");
|
||||
const TString4 tipo_aliquota = ivar.get("S1");
|
||||
@ -123,7 +122,7 @@ void TQuadro_VE_recordset::load(const char repid)
|
||||
const bool terremotati = int_tipo_iva11_ven == 25;
|
||||
TToken_string codatt;
|
||||
codatt.add(prefix().get_codditta());
|
||||
codatt.add(codtab.mid(4, 5));
|
||||
codatt.add(codtab.smid(4, 5));
|
||||
const TRectype& attiv = cache().get(LF_ATTIV, codatt);
|
||||
const bool attivita_commerciale = !attiv.get_bool(ATT_ATTNONCOM);
|
||||
TArray imponibili;
|
||||
@ -156,8 +155,6 @@ void TQuadro_VE_recordset::load(const char repid)
|
||||
}
|
||||
else
|
||||
{
|
||||
if (aliquota == "22.00")
|
||||
int q = 1;
|
||||
if (aliquota == "19.00" || aliquota == "20.00" || aliquota == "21.00")
|
||||
{
|
||||
real imposta_corretta = imp;
|
||||
@ -167,8 +164,6 @@ void TQuadro_VE_recordset::load(const char repid)
|
||||
add_value("VE25.2", iva - imposta_corretta);
|
||||
iva = imposta_corretta;
|
||||
}
|
||||
if (aliquota == "22.00")
|
||||
int q = 1;
|
||||
add_value(STRING_TOKEN(imponibile.objptr(aliquota)), imp);
|
||||
add_value(STRING_TOKEN(imposta.objptr(aliquota)), iva);
|
||||
}
|
||||
@ -198,7 +193,7 @@ void TQuadro_VE_recordset::load(const char repid)
|
||||
case acq_ind_op_es: // acq. indetr. su op.es.
|
||||
break;
|
||||
case acq_ind_pass_int: // passaggi interni
|
||||
// add_value("VE40.1", imp);
|
||||
// add_value("VE40.1", imp);
|
||||
break;
|
||||
case acq_ind_art_19: // indetr. art. 19
|
||||
break;
|
||||
@ -213,7 +208,6 @@ void TQuadro_VE_recordset::load(const char repid)
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
|
||||
};
|
||||
}
|
||||
}
|
||||
@ -351,11 +345,13 @@ void TQuadro_VE_recordset::load(const char repid)
|
||||
const TDate da_datareg(1, 1, year());
|
||||
const TDate a_datareg(31, 12,year());
|
||||
|
||||
query << "USE IVADIFF KEY 4 SELECT (" << ID_TIPOIVA << "==1)"; // Vendite
|
||||
// query << "USE IVADIFF KEY 2 SELECT BETWEEN(DATAREG,#DAL,#AL)";
|
||||
query << "USE IVADIFF KEY 4";
|
||||
if (!end_cassa)
|
||||
query << "\nFROM " << ID_DATAREG << "=" << da_datareg;
|
||||
query << "\nTO " << ID_DATAREG << "=" << a_datareg;
|
||||
|
||||
query << "\nFROM DATAREG=" << da_datareg;
|
||||
query << "\nTO DATAREG=" << a_datareg;
|
||||
|
||||
|
||||
TISAM_recordset id(query);
|
||||
TString8 cod;
|
||||
TImporto imp371, imp372;
|
||||
@ -369,7 +365,6 @@ void TQuadro_VE_recordset::load(const char repid)
|
||||
{
|
||||
const int tipodiff = id.get_int(ID_TIPODIFF);
|
||||
const TRectype & mov = cache().get(LF_MOV, numreg);
|
||||
const int annoreg = mov.get_date(MOV_DATAREG).year();
|
||||
const char sezione = id.get_string(ID_SEZIONE)[0];
|
||||
const int tipomov = id.get_int(ID_TIPOMOV);
|
||||
const TImporto imp(sezione, id.get_real(RMI_IMPONIBILE));
|
||||
@ -383,14 +378,11 @@ void TQuadro_VE_recordset::load(const char repid)
|
||||
|
||||
const TCodiceIVA & codiva = cached_codIVA(cod);
|
||||
|
||||
if (codiva.iva_imponibile() && annoreg == year())
|
||||
if (codiva.iva_imponibile() && datapag <= a_datareg)
|
||||
{
|
||||
if ((tipomov == 3 && between(datapag, da_datareg, a_datareg)) || (tipomov < 3))
|
||||
{
|
||||
imp371 += imp;
|
||||
if (tipodiff == 2)
|
||||
imp372 += imp;
|
||||
}
|
||||
imp371 += imp;
|
||||
if (tipodiff == 2)
|
||||
imp372 += imp;
|
||||
}
|
||||
}
|
||||
}
|
||||
@ -401,13 +393,9 @@ void TQuadro_VE_recordset::load(const char repid)
|
||||
|
||||
query.zap();
|
||||
|
||||
query << "USE IVADIFF KEY 4 SELECT (BETWEEN(" << ID_DATAREGP << ",\"" << da_datareg.date2ansi() << "\",\"" << a_datareg.date2ansi() << "\")&&(" << ID_TIPOIVA << "==1)&&(" << ID_TIPOMOV << "==3)";
|
||||
query << "&&(" << ID_NUMPRO << ">0))"; // Vendite
|
||||
|
||||
TDate end_prec = da_datareg;
|
||||
|
||||
--end_prec;
|
||||
query << "\nTO " << ID_DATAREG << "=" << end_prec;
|
||||
query << "USE IVADIFF KEY 3";
|
||||
query << "\nFROM DATAREGP=" << da_datareg;
|
||||
query << "\nTO DATAREGP=" << a_datareg;
|
||||
|
||||
TISAM_recordset idp(query);
|
||||
TImporto imp391;
|
||||
@ -417,11 +405,15 @@ void TQuadro_VE_recordset::load(const char repid)
|
||||
const long numreg = idp.get_long(RMI_NUMREG);
|
||||
const int tipoiva = idp.get_int(ID_TIPOIVA);
|
||||
|
||||
if (tipoiva == 1) // Vendite
|
||||
{
|
||||
const int tipodiff = idp.get_int(ID_TIPODIFF);
|
||||
const TRectype & mov = cache().get(LF_MOV, numreg);
|
||||
const char sezione = idp.get_string(ID_SEZIONE)[0];
|
||||
const int tipomov = idp.get_int(ID_TIPOMOV);
|
||||
const TImporto imp(sezione, idp.get_real(RMI_IMPONIBILE));
|
||||
const int annoliq = idp.get_date(ID_DATAREG).year();
|
||||
const int annopag = idp.get_date(ID_DATAREGP).year();
|
||||
|
||||
key.cut(0);
|
||||
key.add(numreg);
|
||||
@ -429,8 +421,9 @@ void TQuadro_VE_recordset::load(const char repid)
|
||||
cod = cache().get(LF_RMOVIVA, key, RMI_CODIVA);
|
||||
const TCodiceIVA & codiva = cached_codIVA(cod);
|
||||
|
||||
if (codiva.iva_imponibile())
|
||||
if (annoliq < year() && tipomov == 3 && codiva.iva_imponibile())
|
||||
imp391 += imp;
|
||||
}
|
||||
}
|
||||
imp391.normalize('A');
|
||||
add_value("VE39.1", imp391.valore()); // VE39.1 iva differita incassi di anni precedenti
|
||||
|
||||
Binary file not shown.
|
Before Width: | Height: | Size: 204 KiB After Width: | Height: | Size: 536 KiB |
@ -180,8 +180,8 @@ void TQuadro_VF_recordset::load(char repid)
|
||||
|
||||
if (obj != nullptr)
|
||||
{
|
||||
real & imp = (real &)*obj;
|
||||
real & iva = (real &)imposte[t];
|
||||
real imp = (real &)*obj;
|
||||
real iva = (real &)imposte[t];
|
||||
|
||||
switch (tipo)
|
||||
{
|
||||
@ -333,15 +333,16 @@ void TQuadro_VF_recordset::load(char repid)
|
||||
const TDate da_datareg(1, 1, year());
|
||||
const TDate a_datareg(31, 12, year());
|
||||
|
||||
query << "USE IVADIFF KEY 4 SELECT (" << ID_TIPOIVA << "==2)"; // Acquisti
|
||||
// query << "USE IVADIFF KEY 2 SELECT BETWEEN(DATAREG,#DAL,#AL)";
|
||||
query << "USE IVADIFF KEY 4";
|
||||
if (!end_cassa)
|
||||
query << "\nFROM DATAREG=" << da_datareg;
|
||||
query << "\nTO DATAREG=" << a_datareg;
|
||||
|
||||
|
||||
TISAM_recordset id(query);
|
||||
TString8 cod;
|
||||
TImporto imp231, imp232;
|
||||
TString8 tipo_aliquota, codiva;
|
||||
TImporto imp211, imp212;
|
||||
|
||||
for (bool ok = id.move_first(); ok; ok = id.move_next())
|
||||
{
|
||||
@ -349,67 +350,67 @@ void TQuadro_VF_recordset::load(char repid)
|
||||
const int tipoiva = id.get(ID_TIPOIVA).as_int();
|
||||
const int tipodiff = id.get(ID_TIPODIFF).as_int();
|
||||
const TRectype & mov = cache().get(LF_MOV, numreg);
|
||||
const int annoreg = mov.get_date(MOV_DATAREG).year();
|
||||
const char sezione = id.get(ID_SEZIONE).as_string()[0];
|
||||
const int tipomov = id.get(ID_TIPOMOV).as_int();
|
||||
const TImporto imp(sezione, id.get(RMI_IMPONIBILE).as_real());
|
||||
// const int annoliq = id.get(ID_ANNOLIQ).as_int();
|
||||
const int annoliq = id.get(ID_ANNOLIQ).as_int();
|
||||
const TDate datapag = id.get(ID_DATAREGP).as_date();
|
||||
|
||||
key.cut(0);
|
||||
key.add(numreg);
|
||||
key.add(id.get(ID_NUMRIG).as_string());
|
||||
cod = cache().get(LF_RMOVIVA, key, RMI_CODIVA);
|
||||
codiva = cache().get(LF_RMOVIVA, key, RMI_CODIVA);
|
||||
key = codiva;
|
||||
tipo_aliquota = cache().get("%IVA", key, "S1");
|
||||
|
||||
const TCodiceIVA & codiva = cached_codIVA(cod);
|
||||
|
||||
if (codiva.iva_imponibile() && annoreg == year())
|
||||
if (tipo_aliquota.blank() && datapag <= a_datareg && tipoiva == 2) // Acquisti
|
||||
{
|
||||
if ((tipomov == 3 && between(datapag, da_datareg, a_datareg)) || (tipomov < 3))
|
||||
{
|
||||
imp231 += imp;
|
||||
if (tipodiff == 2)
|
||||
imp232 += imp;
|
||||
}
|
||||
imp211 += imp;
|
||||
if (tipodiff == 2)
|
||||
imp212 += imp;
|
||||
}
|
||||
}
|
||||
imp231.normalize('A');
|
||||
add_value("VF23.1", imp231.valore());
|
||||
add_value("VF37.1", imp231.valore()); // VF37.1 2 iva sospensione da pagare
|
||||
imp232.normalize('A');
|
||||
add_value("VF23.2", imp232.valore());
|
||||
imp211.normalize('A');
|
||||
add_value("VF23.1", imp211.valore());
|
||||
add_value("VF37.1", imp211.valore()); // VF37.1 2 iva sospensione da pagare
|
||||
imp212.normalize('A');
|
||||
add_value("VF23.2", imp212.valore());
|
||||
|
||||
query.zap();
|
||||
|
||||
query << "USE IVADIFF KEY 4 SELECT (BETWEEN(" << ID_DATAREGP << ",\"" << da_datareg.date2ansi() << "\",\"" << a_datareg.date2ansi() << "\")&&(" << ID_TIPOIVA << "==2)&&(" << ID_TIPOMOV << "==3)";
|
||||
query << "&&(" << ID_NUMPRO <<">0))"; // Acquisti
|
||||
|
||||
TDate end_prec = da_datareg;
|
||||
|
||||
--end_prec;
|
||||
query << "\nTO " << ID_DATAREG << "=" << end_prec;
|
||||
query << "USE IVADIFF KEY 3";
|
||||
query << "\nFROM DATAREGP=" << da_datareg;
|
||||
query << "\nTO DATAREGP=" << a_datareg;
|
||||
|
||||
TISAM_recordset idp(query);
|
||||
TImporto imp241;
|
||||
TImporto imp221;
|
||||
|
||||
for (bool ok = idp.move_first(); ok; ok = idp.move_next())
|
||||
{
|
||||
const long numreg = idp.get_long(RMI_NUMREG);
|
||||
const long numreg = idp.get(RMI_NUMREG).as_int();
|
||||
const int tipoiva = idp.get(ID_TIPOIVA).as_int();
|
||||
const TRectype & mov = cache().get(LF_MOV, numreg);
|
||||
const char sezione = idp.get_string(ID_SEZIONE)[0];
|
||||
const char sezione = idp.get(ID_SEZIONE).as_string()[0];
|
||||
const int tipomov = idp.get(ID_TIPOMOV).as_int();
|
||||
const TImporto imp(sezione, idp.get(RMI_IMPONIBILE).as_real());
|
||||
const int annoliq = idp.get(ID_DATAREG).as_date().year();
|
||||
const int annopag = idp.get(ID_DATAREGP).as_date().year();
|
||||
|
||||
key.cut(0);
|
||||
key.add(numreg);
|
||||
key.add(idp.get(ID_NUMRIG).as_string());
|
||||
cod = cache().get(LF_RMOVIVA, key, RMI_CODIVA);
|
||||
const TCodiceIVA & codiva = cached_codIVA(cod);
|
||||
codiva = cache().get(LF_RMOVIVA, key, RMI_CODIVA);
|
||||
key = codiva;
|
||||
tipo_aliquota = cache().get("%IVA", key, "S1");
|
||||
|
||||
if (codiva.iva_imponibile())
|
||||
imp241 += imp;
|
||||
if (tipo_aliquota.blank() && tipoiva == 2) // Acquisti
|
||||
{
|
||||
if (annoliq < year() && tipomov == 3)
|
||||
imp221 += imp;
|
||||
}
|
||||
}
|
||||
imp241.normalize('D');
|
||||
add_value("VF24.1", imp241.valore()); // VE22.1 iva differita pagamenti di anni precedenti
|
||||
imp221.normalize('D');
|
||||
add_value("VF24.1", imp221.valore()); // VE22.1 iva differita pagamenti di anni precedenti
|
||||
|
||||
// V24.2 Variazioni e arrotondamenti d’imposta (indicare con il segno +/–)
|
||||
// V50.2 Variazioni e arrotondamenti d’imposta (indicare con il segno +/–)
|
||||
@ -453,8 +454,6 @@ void TQuadro_VF_recordset::load(char repid)
|
||||
add_value("VF29.2", val);
|
||||
val = evaluate_recordset_imponibile(REP_RIPACQ, year(), "(RMOVIVA.TIPOCR==1)||(RMOVIVA.TIPOCR==51)");
|
||||
add_value("VF29.3", val);
|
||||
// val = evaluate_recordset_imponibile(REP_RIPACQ, year(), "(RMOVIVA.TIPOCR==0)||(RMOVIVA.TIPOCR==3)||(RMOVIVA.TIPOCR==5)||(RMOVIVA.TIPOCR==9)||(RMOVIVA.TIPOCR==17)");
|
||||
// add_value("VF29.4", val);
|
||||
}
|
||||
else
|
||||
{
|
||||
|
||||
Binary file not shown.
|
Before Width: | Height: | Size: 190 KiB After Width: | Height: | Size: 481 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 110 KiB After Width: | Height: | Size: 532 KiB |
@ -1,163 +1,164 @@
|
||||
<?xml version="1.0" encoding="UTF-8" ?>
|
||||
<report name="cg7700g" orientation="1" lpi="6">
|
||||
<report libraries="" page_merge="" save_printer="" name="cg7700g" use_printer_font="" orientation="1" page_split="" lpi="6" command="" class="">
|
||||
<description>Dichiarazione IVA Quadro VF - VF27 1-4</description>
|
||||
<font face="Arial" size="8" />
|
||||
<section type="Head" pattern="1">
|
||||
<field x="88" type="Stringa" align="right" width="30" pattern="1">
|
||||
<source>"Pag. " +#PAGE</source>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field x="88" deactivated="" type="Stringa" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="30" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>"Pag. " +#PAGE</source>
|
||||
</field>
|
||||
<field x="2" y="0.75" type="Testo" align="right" width="7" pattern="1" text="Num.Reg" />
|
||||
<field x="10" y="0.75" type="Testo" hidden="1" width="3" pattern="1" text="N.R." />
|
||||
<field x="14" y="0.75" type="Testo" width="10" pattern="1" text="Data Reg." />
|
||||
<field x="25" y="0.75" type="Stringa" hidden="1" width="1" pattern="1">
|
||||
<field x="2" y="0.75" deactivated="" type="Testo" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="7" codval="" id="" pattern="1" hide_zero="" text="Num.Reg" />
|
||||
<field x="10" y="0.75" deactivated="" type="Testo" hidden="1" link="" dynamic_height="" shade_offset="" width="3" codval="" id="" pattern="1" hide_zero="" text="N.R." />
|
||||
<field x="14" y="0.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="Data Reg." />
|
||||
<field x="25" y="0.75" deactivated="" type="Stringa" hidden="1" link="" dynamic_height="" shade_offset="" width="1" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>RMOVIVA.INTRA</source>
|
||||
</field>
|
||||
<field x="27" y="0.75" type="Testo" width="10" pattern="1" text="Data Doc." />
|
||||
<field x="38" y="0.75" type="Testo" width="7" pattern="1" text="N. Doc." />
|
||||
<field x="46" y="0.75" type="Testo" width="4" pattern="1" text="Caus" />
|
||||
<field x="51" y="0.75" type="Testo" width="50" pattern="1" text="Fornitore Ragione Sociale" />
|
||||
<field x="92" y="0.75" type="Testo" align="right" width="13" pattern="1" text="Imponibile" />
|
||||
<field x="104.5" y="0.75" type="Testo" align="right" width="10" pattern="1" text="Imposta" />
|
||||
<field x="116" y="0.75" type="Testo" width="4" pattern="1" text="C.Iva" />
|
||||
<field border="2" x="2" y="1.75" type="Linea" width="117" height="0" pattern="1" />
|
||||
<field x="27" y="0.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="Data Doc." />
|
||||
<field x="38" y="0.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="7" codval="" id="" pattern="1" hide_zero="" text="N. Doc." />
|
||||
<field x="46" y="0.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="Caus" />
|
||||
<field x="51" y="0.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="50" codval="" id="" pattern="1" hide_zero="" text="Fornitore Ragione Sociale" />
|
||||
<field x="92" y="0.75" deactivated="" type="Testo" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="13" codval="" id="" pattern="1" hide_zero="" text="Imponibile" />
|
||||
<field x="104.5" y="0.75" deactivated="" type="Testo" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="Imposta" />
|
||||
<field x="116" y="0.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="C.Iva" />
|
||||
<field border="2" x="2" y="1.75" deactivated="" type="Linea" hidden="" link="" dynamic_height="" shade_offset="" width="117" codval="" height="0" id="" pattern="1" hide_zero="" text="" />
|
||||
</section>
|
||||
<section type="Head" level="1" pattern="1">
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<prescript description="H1 PRESCRIPT">MESSAGE RESET,F1</prescript>
|
||||
<field x="2" type="Stringa" width="40" pattern="1">
|
||||
<field x="2" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="40" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<font face="Arial" bold="1" size="8" />
|
||||
<source>#SYSTEM.RAGSOC</source>
|
||||
</field>
|
||||
<field x="90" type="Stringa" align="right" width="30" pattern="1">
|
||||
<source>"Data di Stampa: " +#SYSTEM.DATE</source>
|
||||
<field x="90" deactivated="" type="Stringa" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="30" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>"Data di Stampa: " +#SYSTEM.DATE</source>
|
||||
</field>
|
||||
<field border="1" x="2" y="1" type="Stringa" align="center" width="117" pattern="1">
|
||||
<source>"RIPARTIZIONE TOTALE ACQUISTI E IMPORTAZIONI VF27 - 1F;4 - " +#ANNO</source>
|
||||
<field border="1" x="2" y="1" deactivated="" type="Stringa" hidden="" align="center" link="" dynamic_height="" shade_offset="" width="117" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>"RIPARTIZIONE TOTALE ACQUISTI E IMPORTAZIONI VF27 - 1/4 - " +#ANNO</source>
|
||||
</field>
|
||||
</section>
|
||||
<section type="Head" level="2" hidden="1" pattern="1">
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="2" hidden="1" page_break="" can_break="" pattern="1">
|
||||
<groupby>NUMREG+CODIVA</groupby>
|
||||
<prescript description="H2 PRESCRIPT">MESSAGE RESET,F2</prescript>
|
||||
<field type="Stringa" width="10" pattern="1">
|
||||
<source>NUMREG+" "+CODIVA</source>
|
||||
<field deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>NUMREG+" "+CODIVA</source>
|
||||
</field>
|
||||
</section>
|
||||
<section type="Body" pattern="1" />
|
||||
<section type="Body" level="1" hidden="1" bg_color="#D9FFD9" pattern="2">
|
||||
<field x="2" type="Numero" align="right" width="7" id="5" pattern="1">
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="1" hidden="1" bg_color="#D9FFD9" page_break="" can_break="" pattern="2">
|
||||
<field x="2" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="7" codval="" id="5" pattern="1" hide_zero="" text="">
|
||||
<source>RMOVIVA.NUMREG</source>
|
||||
</field>
|
||||
<field x="10" type="Numero" align="right" width="3" id="10" pattern="1">
|
||||
<field x="10" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="3" codval="" id="10" pattern="1" hide_zero="" text="">
|
||||
<source>RMOVIVA.NUMRIG</source>
|
||||
</field>
|
||||
<field x="14" type="Data" width="10" id="15" pattern="1">
|
||||
<field x="14" deactivated="" type="Data" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="15" pattern="1" hide_zero="" text="">
|
||||
<source>MOV.DATAREG</source>
|
||||
</field>
|
||||
<field x="25" type="Stringa" width="1" id="20" pattern="1">
|
||||
<field x="25" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="1" codval="" id="20" pattern="1" hide_zero="" text="">
|
||||
<source>RMOVIVA.INTRA</source>
|
||||
</field>
|
||||
<field x="27" type="Data" width="10" id="25" pattern="1">
|
||||
<field x="27" deactivated="" type="Data" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="25" pattern="1" hide_zero="" text="">
|
||||
<source>MOV.DATADOC</source>
|
||||
</field>
|
||||
<field x="38" type="Stringa" width="7" id="30" pattern="1">
|
||||
<field x="38" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="7" codval="" id="30" pattern="1" hide_zero="" text="">
|
||||
<source>MOV.NUMDOC</source>
|
||||
</field>
|
||||
<field x="46" type="Stringa" width="4" id="35" pattern="1">
|
||||
<field x="46" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="35" pattern="1" hide_zero="" text="">
|
||||
<source>MOV.CODCAUS</source>
|
||||
</field>
|
||||
<field x="51" type="Stringa" width="40" id="40" pattern="1">
|
||||
<field x="51" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="40" codval="" id="40" pattern="1" hide_zero="" text="">
|
||||
<source>CLIFO.RAGSOC</source>
|
||||
</field>
|
||||
<field x="92" type="Valuta" align="right" width="13" id="100" pattern="1" text="###.###.###,@@">
|
||||
<field x="92" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="13" codval="" id="100" pattern="1" hide_zero="" text="###.###.###,@@">
|
||||
<source>RMOVIVA.IMPONIBILE</source>
|
||||
<prescript description="B1.100 PRESCRIPT">MESSAGE ADD,F2.100</prescript>
|
||||
</field>
|
||||
<field x="105" type="Numero" align="right" width="10" id="101" pattern="1" text="###.###.###,@@">
|
||||
<field x="105" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="10" codval="" id="101" pattern="1" hide_zero="" text="###.###.###,@@">
|
||||
<source>RMOVIVA.IMPOSTA</source>
|
||||
<prescript description="B1.101 PRESCRIPT">MESSAGE ADD,F2.101</prescript>
|
||||
</field>
|
||||
<field x="116" type="Stringa" width="4" id="105" pattern="1">
|
||||
<field x="116" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="105" pattern="1" hide_zero="" text="">
|
||||
<source>RMOVIVA.CODIVA</source>
|
||||
</field>
|
||||
<field x="121" type="Stringa" width="3" id="110" pattern="1">
|
||||
<field x="121" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="110" pattern="1" hide_zero="" text="">
|
||||
<source>RMOVIVA.TIPOCR</source>
|
||||
<prescript description="B1.110 PRESCRIPT">#100 @
|
||||
"F1.1"
|
||||
"F1.1"
|
||||
#THIS @
|
||||
+
|
||||
+!</prescript>
|
||||
</field>
|
||||
</section>
|
||||
<section type="Foot" pattern="1" />
|
||||
<section type="Foot" level="1" pattern="1">
|
||||
<field border="2" x="2" y="0.5" type="Linea" width="117" height="0" pattern="1" />
|
||||
<field x="35" y="1" type="Testo" align="right" width="50" pattern="1" text="Ripartizione totale acquisti e importazioni :" />
|
||||
<field x="5" y="3" type="Testo" align="right" width="80" pattern="1" text="Beni ammortizzabili - VF27 - 1:" />
|
||||
<field x="5" y="4" type="Testo" align="right" width="80" pattern="1" text="Beni strumentali non ammortizzabili - VF27 - 2:" />
|
||||
<field x="5" y="5" type="Testo" align="right" width="80" pattern="1" text="Beni destinati alla rivendita ovvero alla produzione di beni e servizi - VF27 - 3:" />
|
||||
<field x="5" y="6" type="Testo" align="right" width="80" pattern="1" text="Altri acquisti e importazioni - VF27 - 4:" />
|
||||
<field x="106" y="3" type="Valuta" hidden="1" align="right" width="18" id="10" pattern="1" text="###.###.###,@@" />
|
||||
<field x="106" y="4" type="Valuta" hidden="1" align="right" width="18" id="11" pattern="1" text="###.###.###,@@" />
|
||||
<field x="106" y="5" type="Valuta" hidden="1" align="right" width="18" id="12" pattern="1" text="###.###.###,@@" />
|
||||
<field x="106" y="6" type="Valuta" hidden="1" align="right" width="18" id="13" pattern="1" text="###.###.###,@@" />
|
||||
<field x="106" y="7" type="Valuta" hidden="1" align="right" width="18" id="14" pattern="1" text="###.###.###,@@" />
|
||||
<field x="124" y="3" type="Valuta" hidden="1" align="right" width="18" id="15" pattern="1" text="###.###.###,@@" />
|
||||
<field x="124" y="4" type="Valuta" hidden="1" align="right" width="18" id="18" pattern="1" text="###.###.###,@@" />
|
||||
<field x="124" y="5" type="Valuta" hidden="1" align="right" width="18" id="19" pattern="1" text="###.###.###,@@" />
|
||||
<field x="87" y="1" type="Valuta" align="right" width="18" id="100" pattern="1" text="###.###.###,@@" />
|
||||
<field x="105" y="1" type="Valuta" align="right" width="12" id="101" pattern="1" text="###.###.###,@@" />
|
||||
<field x="87" y="3" type="Valuta" align="right" width="18" id="112" pattern="1" text="###.###.###,@@">
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field border="2" x="2" y="0.5" deactivated="" type="Linea" hidden="" link="" dynamic_height="" shade_offset="" width="117" codval="" height="0" id="" pattern="1" hide_zero="" text="" />
|
||||
<field x="35" y="1" deactivated="" type="Testo" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="50" codval="" id="" pattern="1" hide_zero="" text="Ripartizione totale acquisti e importazioni :" />
|
||||
<field x="5" y="3" deactivated="" type="Testo" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="80" codval="" id="" pattern="1" hide_zero="" text="Beni ammortizzabili - VF29 - 1:" />
|
||||
<field x="5" y="4" deactivated="" type="Testo" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="80" codval="" id="" pattern="1" hide_zero="" text="Beni strumentali non ammortizzabili - VF29 - 2:" />
|
||||
<field x="5" y="5" deactivated="" type="Testo" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="80" codval="" id="" pattern="1" hide_zero="" text="Beni destinati alla rivendita ovvero alla produzione di beni e servizi - VF29 - 3:" />
|
||||
<field x="5" y="6" deactivated="" type="Testo" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="80" codval="" id="" pattern="1" hide_zero="" text="Altri acquisti e importazioni - VF29 - 4:" />
|
||||
<field x="106" y="3" deactivated="" type="Valuta" hidden="1" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="10" pattern="1" hide_zero="" text="###.###.###,@@" />
|
||||
<field x="106" y="4" deactivated="" type="Valuta" hidden="1" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="11" pattern="1" hide_zero="" text="###.###.###,@@" />
|
||||
<field x="106" y="5" deactivated="" type="Valuta" hidden="1" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="12" pattern="1" hide_zero="" text="###.###.###,@@" />
|
||||
<field x="106" y="6" deactivated="" type="Valuta" hidden="1" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="13" pattern="1" hide_zero="" text="###.###.###,@@" />
|
||||
<field x="106" y="7" deactivated="" type="Valuta" hidden="1" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="14" pattern="1" hide_zero="" text="###.###.###,@@" />
|
||||
<field x="124" y="3" deactivated="" type="Valuta" hidden="1" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="15" pattern="1" hide_zero="" text="###.###.###,@@" />
|
||||
<field x="124" y="4" deactivated="" type="Valuta" hidden="1" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="18" pattern="1" hide_zero="" text="###.###.###,@@" />
|
||||
<field x="124" y="5" deactivated="" type="Valuta" hidden="1" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="19" pattern="1" hide_zero="" text="###.###.###,@@" />
|
||||
<field x="87" y="1" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="100" pattern="1" hide_zero="" text="###.###.###,@@" />
|
||||
<field x="105" y="1" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="12" codval="" id="101" pattern="1" hide_zero="" text="###.###.###,@@" />
|
||||
<field x="87" y="3" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="112" pattern="1" hide_zero="" text="###.###.###,@@">
|
||||
<source>#12</source>
|
||||
</field>
|
||||
<field x="87" y="4" type="Valuta" align="right" width="18" id="113" pattern="1" text="###.###.###,@@">
|
||||
<field x="87" y="4" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="113" pattern="1" hide_zero="" text="###.###.###,@@">
|
||||
<source>#18</source>
|
||||
</field>
|
||||
<field x="87" y="5" type="Valuta" align="right" width="18" id="114" pattern="1" text="###.###.###,@@">
|
||||
<source>#11</source>
|
||||
<field x="87" y="5" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="114" pattern="1" hide_zero="" text="###.###.###,@@">
|
||||
<source>#11+#151</source>
|
||||
</field>
|
||||
<field x="124" y="6" type="Valuta" hidden="1" align="right" width="18" id="117" pattern="1" text="###.###.###,@@" />
|
||||
<field x="87" y="6" type="Valuta" align="right" width="18" id="120" pattern="1" text="###.###.###,@@">
|
||||
<source>#10+#13+#15+#19+#117</source>
|
||||
<field x="124" y="6" deactivated="" type="Valuta" hidden="1" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="117" pattern="1" hide_zero="" text="###.###.###,@@" />
|
||||
<field x="87" y="6" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="120" pattern="1" hide_zero="" text="###.###.###,@@">
|
||||
<source>#100-#112-#113-#114</source>
|
||||
</field>
|
||||
<field x="124" y="7" deactivated="" type="Valuta" hidden="1" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="151" pattern="1" hide_zero="" text="###.###.###,@@" />
|
||||
</section>
|
||||
<section type="Foot" level="2" height="1" pattern="1">
|
||||
<field x="2" type="Numero" align="right" link="23.NUMREG" width="7" pattern="1">
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="2" hidden="" height="1" page_break="" can_break="" pattern="1">
|
||||
<field x="2" deactivated="" type="Numero" hidden="" align="right" link="23.NUMREG" dynamic_height="" shade_offset="" width="7" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#B1.5</source>
|
||||
</field>
|
||||
<field x="10" type="Numero" hidden="1" align="right" width="3" pattern="1">
|
||||
<field x="10" deactivated="" type="Numero" hidden="1" align="right" link="" dynamic_height="" shade_offset="" width="3" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>RMOVIVA.NUMRIG</source>
|
||||
</field>
|
||||
<field x="14" type="Data" width="10" pattern="1">
|
||||
<field x="14" deactivated="" type="Data" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#B1.15</source>
|
||||
</field>
|
||||
<field x="25" type="Stringa" hidden="1" width="1" pattern="1">
|
||||
<field x="25" deactivated="" type="Stringa" hidden="1" link="" dynamic_height="" shade_offset="" width="1" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>RMOVIVA.INTRA</source>
|
||||
</field>
|
||||
<field x="27" type="Data" width="10" pattern="1">
|
||||
<field x="27" deactivated="" type="Data" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#B1.25</source>
|
||||
</field>
|
||||
<field x="38" type="Stringa" width="7" pattern="1">
|
||||
<field x="38" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="7" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#B1.30</source>
|
||||
</field>
|
||||
<field x="46" type="Stringa" width="4" pattern="1">
|
||||
<field x="46" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#B1.35</source>
|
||||
</field>
|
||||
<field x="51" type="Stringa" width="40" pattern="1">
|
||||
<field x="51" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="40" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#B1.40</source>
|
||||
</field>
|
||||
<field x="92" type="Valuta" align="right" width="13" id="100" pattern="1" text="###.###.###,@@">
|
||||
<field x="92" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="13" codval="" id="100" pattern="1" hide_zero="" text="###.###.###,@@">
|
||||
<prescript description="F2.100 PRESCRIPT">MESSAGE ADD,F1.100</prescript>
|
||||
</field>
|
||||
<field x="105" type="Valuta" align="right" width="10" id="101" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<field x="105" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="10" codval="" id="101" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<prescript description="F2.101 PRESCRIPT">MESSAGE ADD,F1.101</prescript>
|
||||
</field>
|
||||
<field x="116" type="Stringa" width="4" id="105" pattern="1">
|
||||
<field x="116" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="105" pattern="1" hide_zero="" text="">
|
||||
<source>#B1.105</source>
|
||||
</field>
|
||||
<field x="121" type="Stringa" width="2" id="110" pattern="1">
|
||||
<field x="121" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="110" pattern="1" hide_zero="" text="">
|
||||
<source>#B1.110</source>
|
||||
</field>
|
||||
</section>
|
||||
<sql>USE RMOVIVA SELECT (23.ANNOIVA=#ANNO)(23.TIPO="F")
|
||||
<sql>USE RMOVIVA SELECT (23.ANNOIVA=#ANNO)&&(23.TIPO="F")
|
||||
JOIN MOV INTO NUMREG==NUMREG
|
||||
JOIN 20 TO MOV INTO TIPOCF==TIPO CODCF==CODCF
|
||||
JOIN %IVA ALIAS 201 INTO CODTAB==CODIVA
|
||||
|
||||
Binary file not shown.
|
Before Width: | Height: | Size: 168 KiB After Width: | Height: | Size: 393 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 197 KiB After Width: | Height: | Size: 518 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 144 KiB After Width: | Height: | Size: 268 KiB |
376
src/cg/cg7a00.cpp
Normal file
376
src/cg/cg7a00.cpp
Normal file
@ -0,0 +1,376 @@
|
||||
// Programma per la stampa del quadro VL
|
||||
#include <recarray.h>
|
||||
#include <tabutil.h>
|
||||
#include <utility.h>
|
||||
|
||||
#include "cg7401.h"
|
||||
#include "cgpim.h"
|
||||
#include "cglib.h"
|
||||
|
||||
#include "cg7a00a.h"
|
||||
#include "rmoviva.h"
|
||||
#include <attiv.h>
|
||||
#include "ivaliq.h"
|
||||
|
||||
#define REP_QUADRO 1
|
||||
|
||||
class TQuadro_VL_recordset : public TQuadro_IVA_recordset
|
||||
{
|
||||
|
||||
protected:
|
||||
virtual void load(const char repid);
|
||||
|
||||
public:
|
||||
TQuadro_VL_recordset(TQuadro_IVA_mask * mask, const char* use, const int year, const char repid) : TQuadro_IVA_recordset(mask, use, year, repid) { load(repid); }
|
||||
virtual ~TQuadro_VL_recordset() {}
|
||||
};
|
||||
|
||||
void TQuadro_VL_recordset::load(const char repid)
|
||||
{
|
||||
real ivadeb;
|
||||
real ivadetr;
|
||||
clear();
|
||||
|
||||
TString query("USE PIM\nFROM CODTAB=");
|
||||
|
||||
query << year() << "\nTO CODTAB=" << year();
|
||||
|
||||
TISAM_recordset pim(query);
|
||||
for (pim.move_first(); !pim.eof(); pim.move_next())
|
||||
{
|
||||
const TString80 codtab = pim.get_string("CODTAB");
|
||||
TString8 codiva(codtab.smid(16, 4)); codiva.trim();
|
||||
const TRectype & ivar = cache().get("%IVA", codiva);
|
||||
const TString8 aliquota = ivar.get("R0");
|
||||
const TString8 codreg(format("%d%-3s", year(), (const char*)codtab.smid(10, 3)));
|
||||
const TRectype & reg = cache().get("REG", codreg);
|
||||
const tiporec tipo = (tiporec)reg.get_int("I9");
|
||||
const bool vendite = reg.get_int("I0") == 1;
|
||||
const int month = atoi(codtab.smid(13, 2));
|
||||
|
||||
if (tipo != liquidazione && month == 13)
|
||||
{
|
||||
const TRectype & pimr = pim.cursor()->curr();
|
||||
TArray imponibili;
|
||||
TArray imposte;
|
||||
|
||||
classify_pim_array(pimr, imponibili, imposte, true, true);
|
||||
FOR_EACH_ARRAY_ITEM(imposte, t, obj)
|
||||
{
|
||||
if (obj != nullptr)
|
||||
{
|
||||
real & imp = (real &)*obj;
|
||||
real & iva = (real &)imposte[t];
|
||||
tiporec tipo = (tiporec)t;
|
||||
|
||||
if (vendite)
|
||||
{
|
||||
if (tipo == vend_norm || tipo == corr_norm)
|
||||
{
|
||||
add_value("VL01.1", iva); // VL1.1 IVA a debito
|
||||
ivadeb += iva;
|
||||
}
|
||||
if (aliquota == "19.00" || aliquota == "20.00" || aliquota == "21.00")
|
||||
{
|
||||
real imposta_corretta = imp;
|
||||
|
||||
imposta_corretta *= 0.22;
|
||||
imposta_corretta.round(0);
|
||||
add_value("VL01.1", iva - imposta_corretta);
|
||||
iva = imposta_corretta;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
if (tipo == acq_norm)
|
||||
{
|
||||
add_value("VL02.1", iva); // VL2.1 IVA detraibile
|
||||
ivadetr += iva;
|
||||
}
|
||||
if (aliquota == "19.00" || aliquota == "20.00" || aliquota == "21.00")
|
||||
{
|
||||
real imposta_corretta = imp;
|
||||
|
||||
imposta_corretta *= 0.22;
|
||||
imposta_corretta.round(0);
|
||||
add_value("VL02.1", iva - imposta_corretta);
|
||||
iva = imposta_corretta;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
TISAM_recordset * recset = app().mask()->get_recset(REP_QUADRO);
|
||||
|
||||
recset->set_var("#ANNO", format("%d", year()));
|
||||
for (recset->move_first(); !recset->eof(); recset->move_next())
|
||||
{
|
||||
const int regspiva = recset->get("26.REGSPIVA").as_int();
|
||||
const real iva = recset->get(RMI_IMPOSTA).as_real();
|
||||
|
||||
switch (regspiva)
|
||||
{
|
||||
case 1:
|
||||
case 2:
|
||||
case 3:
|
||||
case 4:
|
||||
case 5:
|
||||
case 6:
|
||||
case 7:
|
||||
case 8:
|
||||
case 9:
|
||||
case 10:
|
||||
case 13:
|
||||
case 14:
|
||||
case 15:
|
||||
case 16:
|
||||
case 17:
|
||||
case 18:
|
||||
case 19:
|
||||
case 50:
|
||||
case 51:
|
||||
add_value("VL01.1", iva);
|
||||
ivadeb += iva;
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
const TRectype & lia = cache().get("%LIA", format("%04d", year()));
|
||||
const bool credito_compensabile = (lia.get("S9") == "CM");
|
||||
const bool mensile = lia.get("S7") == "M";
|
||||
const int annual_month = mensile ? 13 : 12;
|
||||
|
||||
add_value("VL08.1", lia.get_real("R0"));
|
||||
add_value("VL08.2", mask().get_real(F_VL082));
|
||||
add_value("VL08.3", mask().get_real(F_VL083));
|
||||
add_value("VL09.1", lia.get_real("R15"));
|
||||
|
||||
if (!credito_compensabile)
|
||||
{
|
||||
query.reset();
|
||||
query << "USE LAM\nFROM CODTAB=" << year() << "\nTO CODTAB=" << year();
|
||||
|
||||
TISAM_recordset lam(query);
|
||||
|
||||
for (lam.move_first(); !lam.eof(); lam.move_next())
|
||||
{
|
||||
int month = atoi(lam.get_string("CODTAB").smid(4));
|
||||
real iva_credeb = lam.get_real("R0");
|
||||
|
||||
iva_credeb -= lam.get_real("R1");
|
||||
iva_credeb += lam.get_real("R5");
|
||||
iva_credeb -= lam.get_real("R7");
|
||||
iva_credeb += lam.get_real("R6");
|
||||
iva_credeb -= lam.get_real("R8");
|
||||
if (iva_credeb > ZERO) // dovrei versare
|
||||
{
|
||||
TString lim_key = format("%04d%02d", year(), month);
|
||||
real credito_utilizzato_iva;
|
||||
real risultato(cache().get("LIM", lim_key, "R0"));
|
||||
|
||||
if (risultato > ZERO && risultato != iva_credeb) // devo versare
|
||||
{
|
||||
if (risultato <= iva_credeb)
|
||||
credito_utilizzato_iva = iva_credeb - risultato;
|
||||
else
|
||||
credito_utilizzato_iva = risultato -iva_credeb;
|
||||
add_value("VL27.1", credito_utilizzato_iva);
|
||||
if (month < 10)
|
||||
{
|
||||
add_value("VL22.1", credito_utilizzato_iva);
|
||||
ivadeb += credito_utilizzato_iva;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
query.reset();
|
||||
query << "USE LIM\nFROM CODTAB=" << year() << "\nTO CODTAB=" << year();
|
||||
|
||||
TISAM_recordset lim(query);
|
||||
|
||||
for (lim.move_first(); !lim.eof(); lim.move_next())
|
||||
{
|
||||
int month = atoi(lim.get_string("CODTAB").smid(4));
|
||||
const real crediva = lim.get_real("R15");
|
||||
const real credf24 = lim.get_real("R16");
|
||||
|
||||
add_value("VL27.1", crediva);
|
||||
// add_value("VL09.1", crediva);
|
||||
// add_value("VL09.1", credf24);
|
||||
ivadetr += crediva;
|
||||
if (month < annual_month)
|
||||
add_value("VL23.1", lim.get_real("R34"));
|
||||
else
|
||||
add_value("VL36.1", lim.get_real("R34"));
|
||||
if (month < 10)
|
||||
{
|
||||
add_value("VL22.1", crediva);
|
||||
ivadeb += crediva;
|
||||
add_value("VL22.1", credf24);
|
||||
ivadeb += credf24;
|
||||
}
|
||||
if (month == 13)
|
||||
{
|
||||
const real var_cred = lim.get("R17").as_real();
|
||||
|
||||
if (var_cred < ZERO) // ???
|
||||
add_value("VF26.2", -var_cred);
|
||||
}
|
||||
}
|
||||
add_value("VL10.1", mask().get_real(F_VL101));
|
||||
add_value("VL11.1", mask().get_real(F_VL111));
|
||||
ivadetr += mask().get_real(F_VL111);
|
||||
add_value("VL11.2", mask().get_real(F_VL112));
|
||||
ivadetr += mask().get_real(F_VL112);
|
||||
add_value("VL12.1", mask().get_real(F_VL121));
|
||||
add_value("VL12.2", mask().get_real(F_VL122));
|
||||
add_value("VL20.1", mask().get_real(F_VL201));
|
||||
ivadeb += mask().get_real(F_VL201);
|
||||
add_value("VL21.1", mask().get_real(F_VL211));
|
||||
ivadeb += mask().get_real(F_VL211);
|
||||
add_value("VL24.1", mask().get_real(F_VL241));
|
||||
ivadetr += mask().get_real(F_VL241);
|
||||
add_value("VL25.1", mask().get_real(F_VL251));
|
||||
ivadetr += mask().get_real(F_VL251);
|
||||
add_value("VL26.1", mask().get_real(F_VL261));
|
||||
ivadetr += mask().get_real(F_VL261);
|
||||
add_value("VL28.1", mask().get_real(F_VL281));
|
||||
ivadetr += mask().get_real(F_VL281);
|
||||
add_value("VL29.1", mask().get_real(F_VL291));
|
||||
ivadetr += mask().get_real(F_VL291);
|
||||
query.reset();
|
||||
query << "USE " << LF_IVALIQ << " SELECT " << IVAL_GENERATA << "==\"U\"\nFROM " << IVAL_ANNO << "=" << year() << "\nTO " << IVAL_ANNO << "=" << year();
|
||||
|
||||
TISAM_recordset ivaliq(query);
|
||||
real ivaperd;
|
||||
real ivaperv;
|
||||
|
||||
for (ivaliq.move_first(); !ivaliq.eof(); ivaliq.move_next())
|
||||
{
|
||||
const real ivaver = ivaliq.get_real(IVAL_IVAVER);
|
||||
|
||||
add_value("VL30.2", ivaver);
|
||||
add_value("VL30.3", ivaver);
|
||||
ivaperd += ivaver;
|
||||
ivaperv += ivaver;
|
||||
ivadetr += ivaver;
|
||||
}
|
||||
add_value("VL30.4", mask().get_real(F_VL304));
|
||||
ivaperv += mask().get_real(F_VL304);
|
||||
add_value("VL30.5", mask().get_real(F_VL305));
|
||||
ivaperv += mask().get_real(F_VL305);
|
||||
if (ivaperd >= ivaperv)
|
||||
add_value("VL30.1", ivaperd);
|
||||
else
|
||||
add_value("VL30.1", ivaperv);
|
||||
add_value("VL31.1", mask().get_real(F_VL311));
|
||||
ivadetr += mask().get_real(F_VL311);
|
||||
if (ivadeb > ivadetr)
|
||||
add_value("VL32.1", ivadeb - ivadetr);
|
||||
else
|
||||
if (ivadeb < ivadetr)
|
||||
add_value("VL33.1", ivadetr - ivadeb);
|
||||
add_value("VL35.1", mask().get_real(F_VL351));
|
||||
add_value("VL37.1", mask().get_real(F_VL371));
|
||||
add_value("VL40.1", mask().get_real(F_VL401));
|
||||
add_value("VL41.1", mask().get_real(F_VL411));
|
||||
add_value("VL41.2", mask().get_real(F_VL412));
|
||||
}
|
||||
|
||||
class TQuadro_VL_app : public TQuadro_IVA_app
|
||||
{
|
||||
|
||||
protected:
|
||||
virtual void load_sheet(TSheet_field & sf);
|
||||
|
||||
public:
|
||||
virtual void load_data(TQuadro_IVA_mask & m) override;
|
||||
virtual void save_data(TQuadro_IVA_mask & m) override;
|
||||
virtual TQuadro_IVA_recordset * app_recordset(const char* use, const int year, const char repid) { return new TQuadro_VL_recordset(mask(), use, year,repid); }
|
||||
|
||||
TQuadro_VL_app() : TQuadro_IVA_app("Stampa Quadro VL", "cg7a00a") {}
|
||||
virtual ~TQuadro_VL_app() {}
|
||||
|
||||
};
|
||||
|
||||
void TQuadro_VL_app::load_sheet(TSheet_field & sf)
|
||||
{
|
||||
TToken_string & row1 = sf.row(sf.items()); row1.add("|1|Quadro VJ - VJ1 - VJ16|cg7800b");
|
||||
}
|
||||
|
||||
void TQuadro_VL_app::load_data(TQuadro_IVA_mask & m)
|
||||
{
|
||||
TTable div("DIV");
|
||||
|
||||
div.put("CODTAB", m.get(F_YEAR));
|
||||
if (div.read() != NOERR)
|
||||
div.zero();
|
||||
m.set(F_VL082, div.get("R0"));
|
||||
m.set(F_VL083, div.get("R1"));
|
||||
m.set(F_VL101, div.get("R2"));
|
||||
m.set(F_VL111, div.get("R3"));
|
||||
m.set(F_VL112, div.get("R4"));
|
||||
m.set(F_VL121, div.get("R5"));
|
||||
m.set(F_VL122, div.get("R6"));
|
||||
m.set(F_VL201, div.get("R7"));
|
||||
m.set(F_VL211, div.get("R8"));
|
||||
m.set(F_VL241, div.get("R9"));
|
||||
m.set(F_VL251, div.get("R10"));
|
||||
m.set(F_VL261, div.get("R11"));
|
||||
m.set(F_VL281, div.get("R12"));
|
||||
m.set(F_VL291, div.get("R13"));
|
||||
m.set(F_VL304, div.get("R14"));
|
||||
m.set(F_VL305, div.get("R15"));
|
||||
m.set(F_VL311, div.get("R16"));
|
||||
m.set(F_VL351, div.get("R17"));
|
||||
m.set(F_VL371, div.get("R18"));
|
||||
m.set(F_VL401, div.get("R19"));
|
||||
m.set(F_VL411, div.get("R20"));
|
||||
m.set(F_VL412, div.get("R21"));
|
||||
}
|
||||
|
||||
void TQuadro_VL_app::save_data(TQuadro_IVA_mask & m)
|
||||
{
|
||||
TTable div("DIV");
|
||||
|
||||
div.put("CODTAB", m.get(F_YEAR));
|
||||
div.put("R0", m.get(F_VL082));
|
||||
div.put("R1", m.get(F_VL083));
|
||||
div.put("R2", m.get(F_VL101));
|
||||
div.put("R3", m.get(F_VL111));
|
||||
div.put("R4", m.get(F_VL112));
|
||||
div.put("R5", m.get(F_VL121));
|
||||
div.put("R6", m.get(F_VL122));
|
||||
div.put("R7", m.get(F_VL201));
|
||||
div.put("R8", m.get(F_VL211));
|
||||
div.put("R9", m.get(F_VL241));
|
||||
div.put("R10", m.get(F_VL251));
|
||||
div.put("R11", m.get(F_VL261));
|
||||
div.put("R12", m.get(F_VL281));
|
||||
div.put("R13", m.get(F_VL291));
|
||||
div.put("R14", m.get(F_VL304));
|
||||
div.put("R15", m.get(F_VL305));
|
||||
div.put("R16", m.get(F_VL311));
|
||||
div.put("R17", m.get(F_VL351));
|
||||
div.put("R18", m.get(F_VL371));
|
||||
div.put("R19", m.get(F_VL401));
|
||||
div.put("R20", m.get(F_VL411));
|
||||
div.put("R21", m.get(F_VL412));
|
||||
|
||||
const int err = div.write_rewrite();
|
||||
|
||||
if (err != NOERR)
|
||||
error_box("Errore %d nella scrittura dati.", err);
|
||||
}
|
||||
|
||||
int cg7a00(int argc, char* argv[])
|
||||
{
|
||||
TQuadro_VL_app a;
|
||||
a.run(argc, argv, TR("Quadro VL"));
|
||||
return 0;
|
||||
}
|
||||
28
src/cg/cg7a00a.h
Normal file
28
src/cg/cg7a00a.h
Normal file
@ -0,0 +1,28 @@
|
||||
#include "cg7400a.h"
|
||||
|
||||
#define F_VL082 301
|
||||
#define F_VL083 302
|
||||
#define F_VL101 303
|
||||
#define F_VL111 304
|
||||
#define F_VL112 305
|
||||
#define F_VL121 306
|
||||
#define F_VL122 307
|
||||
#define F_VL201 308
|
||||
#define F_VL211 309
|
||||
#define F_VL241 310
|
||||
#define F_VL251 311
|
||||
#define F_VL261 312
|
||||
#define F_VL281 313
|
||||
#define F_VL291 314
|
||||
#define F_VL304 315
|
||||
#define F_VL305 316
|
||||
#define F_VL311 317
|
||||
#define F_VL351 318
|
||||
#define F_VL371 319
|
||||
#define F_VL401 320
|
||||
#define F_VL411 321
|
||||
#define F_VL412 322
|
||||
|
||||
|
||||
|
||||
|
||||
Binary file not shown.
|
Before Width: | Height: | Size: 206 KiB After Width: | Height: | Size: 575 KiB |
495
src/cg/cg7a00a.rep
Normal file
495
src/cg/cg7a00a.rep
Normal file
@ -0,0 +1,495 @@
|
||||
<?xml version="1.0" encoding="UTF-8" ?>
|
||||
<report libraries="" page_merge="" save_printer="" name="cg7a00a" use_printer_font="" orientation="" page_split="" lpi="6" command="" class="">
|
||||
<description>Stampa quadro VL</description>
|
||||
<font face="Courier New" size="12" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="1" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field deactivated="" type="Immagine" hidden="" image_resize_type="" link="" dynamic_height="" shade_offset="" width="83" codval="" height="72" id="" pattern="1" hide_zero="" text="">
|
||||
<source>"cg7a00a.png"</source>
|
||||
</field>
|
||||
</section>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<font face="Courier New" size="10" />
|
||||
<field x="4" y="1" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="Anno" />
|
||||
<field x="22" y="1" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="50" codval="" id="" pattern="1" hide_zero="" text=" ">
|
||||
<font face="Courier New" size="12" />
|
||||
<source>#SYSTEM.RAGSOC</source>
|
||||
</field>
|
||||
<field x="35.75" y="5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="48" codval="" id="" pattern="1" hide_zero="" text=" ">
|
||||
<font face="Courier New" size="12" />
|
||||
<source>#SYSTEM.CFPI_SPACED</source>
|
||||
</field>
|
||||
<field x="63.75" y="9" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="0 1" />
|
||||
<field x="14" y="1" deactivated="" type="Stringa" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="6" codval="" id="100" pattern="1" hide_zero="" text=" ">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="51.5" y="12.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="101" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL01.1</source>
|
||||
</field>
|
||||
<field x="65.5" y="13.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="201" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL02.1</source>
|
||||
</field>
|
||||
<field x="51.5" y="14.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="301" pattern="1" hide_zero="" text="###.###.###">
|
||||
<prescript description="B1.301 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
>
|
||||
IF
|
||||
#101 @
|
||||
#201 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="16.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="401" pattern="1" hide_zero="" text="###.###.###">
|
||||
<prescript description="B1.401 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="17.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="801" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL08.1</source>
|
||||
<prescript description="B1.801 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="18.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="802" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL08.2</source>
|
||||
<prescript description="B1.802 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="19.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="803" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL08.3</source>
|
||||
<prescript description="B1.803 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="51.5" y="21.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="901" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL09.1</source>
|
||||
<prescript description="B1.901 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="22.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1001" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL10.1</source>
|
||||
<prescript description="B1.1001 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="23.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1101" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL11.1</source>
|
||||
<prescript description="B1.1101 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="24.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1102" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL11.2</source>
|
||||
<prescript description="B1.1102 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="25.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1201" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL12.1</source>
|
||||
<prescript description="B1.1201 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="26.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1202" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL12.2</source>
|
||||
<prescript description="B1.1202 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="51.5" y="28.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2001" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL20.1</source>
|
||||
<prescript description="B1.2001 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="51.5" y="29.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2101" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL21.1</source>
|
||||
<prescript description="B1.2101 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="51.5" y="30.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2201" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL22.1</source>
|
||||
<prescript description="B1.2201 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="51.5" y="31.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2301" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL23.1</source>
|
||||
<prescript description="B1.2301 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="32.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2401" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL24.1</source>
|
||||
<prescript description="B1.2401 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="33.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2501" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL25.1</source>
|
||||
<prescript description="B1.2501 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="34.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2601" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL26.1</source>
|
||||
<prescript description="B1.2601 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="36" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2701" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL27.1</source>
|
||||
<prescript description="B1.2701 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="37" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2801" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL28.1</source>
|
||||
<prescript description="B1.2801 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="38" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2901" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL29.1</source>
|
||||
<prescript description="B1.2901 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="40" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3001" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL30.1</source>
|
||||
<prescript description="B1.3001 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="25" y="44" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3002" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL30.2</source>
|
||||
<prescript description="B1.3002 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="38" y="44" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3003" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL30.3</source>
|
||||
<prescript description="B1.3003 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="51" y="44" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3004" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL30.4</source>
|
||||
<prescript description="B1.3004 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="44" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3005" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL30.5</source>
|
||||
<prescript description="B1.3005 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="45.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3101" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL31.1</source>
|
||||
<prescript description="B1.3101 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="51.5" y="46.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3201" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL32.1</source>
|
||||
<prescript description="B1.3201 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="48.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3301" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL33.1</source>
|
||||
<prescript description="B1.3301 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="49.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3401" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL34.1</source>
|
||||
<prescript description="B1.3401 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="50.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3501" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL35.1</source>
|
||||
<prescript description="B1.3501 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="51.5" y="51.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3601" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL36.1</source>
|
||||
<prescript description="B1.3601 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="51.5" y="52.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3701" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL37.1</source>
|
||||
<prescript description="B1.3701 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="51.5" y="53.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3801" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>#3201+#3401+#3501+#3601</source>
|
||||
<prescript description="B1.3801 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="54.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="3901" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>#3301+#3701</source>
|
||||
<prescript description="B1.3901 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="55.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="4001" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL40.1</source>
|
||||
<prescript description="B1.4001 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="51" y="58.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="4101" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL41.1</source>
|
||||
<prescript description="B1.4101 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="65.5" y="58.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="4102" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VL41.2</source>
|
||||
<prescript description="B1.4102 PRESCRIPT">#101 @
|
||||
#201 @
|
||||
<
|
||||
IF
|
||||
#201 @
|
||||
#101 @
|
||||
-
|
||||
#THIS !
|
||||
THEN</prescript>
|
||||
</field>
|
||||
<field x="78" y="64.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="1" codval="" id="9999" pattern="1" hide_zero="" text="###.###.###" />
|
||||
</section>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="1" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<sql>USE NDITTE SELECT CODDITTA==#CODDITTA</sql>
|
||||
<parameters>
|
||||
<item name="ANNO"> </item>
|
||||
</parameters>
|
||||
</report>
|
||||
288
src/cg/cg7a00a.uml
Normal file
288
src/cg/cg7a00a.uml
Normal file
@ -0,0 +1,288 @@
|
||||
#include "cg7a00a.h"
|
||||
|
||||
TOOLBAR "Toolbar" 0 0 0 2
|
||||
|
||||
BUTTON DLG_SAVEREC 10 2
|
||||
BEGIN
|
||||
PROMPT 1 3 "Salva"
|
||||
PICTURE TOOL_SAVEREC
|
||||
END
|
||||
|
||||
BUTTON DLG_ALLFIRMS 2 2
|
||||
BEGIN
|
||||
PROMPT 2 3 "Tutte le ditte"
|
||||
PICTURE TOOL_CHECK
|
||||
END
|
||||
|
||||
BUTTON DLG_ALLREPORTS 2 2
|
||||
BEGIN
|
||||
PROMPT 3 3 "Tutte le stampe"
|
||||
PICTURE TOOL_SETPRINT
|
||||
END
|
||||
|
||||
#include <printbar.h>
|
||||
|
||||
ENDPAGE
|
||||
PAGE "Quadro VL - Dati" 0 0 0 0
|
||||
|
||||
NUMBER F_FIRM 5
|
||||
BEGIN
|
||||
PROMPT 2 1 "Ditta "
|
||||
FLAGS "RF"
|
||||
USE LF_NDITTE
|
||||
INPUT CODDITTA F_FIRM
|
||||
DISPLAY "Codice" CODDITTA
|
||||
DISPLAY "Ragione sociale @50" RAGSOC
|
||||
OUTPUT F_FIRM CODDITTA
|
||||
OUTPUT F_DFIRM RAGSOC
|
||||
WARNING "Ditta assente"
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING F_DFIRM 50
|
||||
BEGIN
|
||||
PROMPT 22 1 ""
|
||||
USE LF_NDITTE KEY 2
|
||||
CHECKTYPE SEARCH
|
||||
INPUT RAGSOC F_DFIRM
|
||||
DISPLAY "Ragione sociale @60" RAGSOC
|
||||
DISPLAY "Codice" CODDITTA
|
||||
COPY OUTPUT F_FIRM
|
||||
WARNING "Ditta assente"
|
||||
END
|
||||
|
||||
CURRENCY F_VL082 15
|
||||
BEGIN
|
||||
PROMPT 2 2 "Credito richiesto a rimborso anni precedenti "
|
||||
END
|
||||
|
||||
CURRENCY F_VL083 15
|
||||
BEGIN
|
||||
PROMPT 2 3 "Eccedenza da ultima dichiarazione gruppo IVA "
|
||||
END
|
||||
|
||||
CURRENCY F_VL101 15
|
||||
BEGIN
|
||||
PROMPT 2 4 "Eccedenza di credito non trasferibile "
|
||||
END
|
||||
|
||||
TEXT DLG_NULL
|
||||
BEGIN
|
||||
PROMPT 66 4 "Gruppo IVA"
|
||||
END
|
||||
|
||||
CURRENCY F_VL111 15
|
||||
BEGIN
|
||||
PROMPT 2 5 "Crediti art.8 comma 6-quater D.P.R. n.633/98 "
|
||||
END
|
||||
|
||||
CURRENCY F_VL112 15
|
||||
BEGIN
|
||||
PROMPT 65 5 ""
|
||||
END
|
||||
|
||||
CURRENCY F_VL121 15
|
||||
BEGIN
|
||||
PROMPT 2 6 "Versamenti periodici effettuati "
|
||||
END
|
||||
|
||||
CURRENCY F_VL122 15
|
||||
BEGIN
|
||||
PROMPT 65 6 ""
|
||||
END
|
||||
|
||||
TEXT DLG_NULL
|
||||
BEGIN
|
||||
PROMPT 2 7 "________________________________________________________________________________"
|
||||
END
|
||||
|
||||
CURRENCY F_VL201 15
|
||||
BEGIN
|
||||
PROMPT 2 8 "Rimborsi infrannuali richiesti(art.38 bis c.2)"
|
||||
END
|
||||
|
||||
CURRENCY F_VL211 15
|
||||
BEGIN
|
||||
PROMPT 2 9 "Ammontare crediti trasferiti "
|
||||
END
|
||||
|
||||
CURRENCY F_VL241 15
|
||||
BEGIN
|
||||
PROMPT 2 10 "Trasf.anno precedente restituiti dalla contr. "
|
||||
END
|
||||
|
||||
CURRENCY F_VL251 15
|
||||
BEGIN
|
||||
PROMPT 2 11 "Eccedenza credito anno precedente "
|
||||
END
|
||||
|
||||
CURRENCY F_VL261 15
|
||||
BEGIN
|
||||
PROMPT 2 12 "Credito richiesto a rimb. computabile in detr. "
|
||||
END
|
||||
|
||||
CURRENCY F_VL281 15
|
||||
BEGIN
|
||||
PROMPT 2 13 "Crediti utilizzati nelle liq.periodiche e ann. "
|
||||
END
|
||||
|
||||
CURRENCY F_VL291 15
|
||||
BEGIN
|
||||
PROMPT 2 14 "Versamenti auto F24 relativi a cess. nell'anno "
|
||||
END
|
||||
|
||||
TEXT DLG_NULL
|
||||
BEGIN
|
||||
PROMPT 2 15 "________________________________________________________________________________"
|
||||
END
|
||||
|
||||
CURRENCY F_VL304 15
|
||||
BEGIN
|
||||
PROMPT 2 16 "IVA periodica versata per irregolarità "
|
||||
END
|
||||
|
||||
CURRENCY F_VL305 15
|
||||
BEGIN
|
||||
PROMPT 2 17 "IVA periodica versata per cartelle "
|
||||
END
|
||||
|
||||
CURRENCY F_VL311 15
|
||||
BEGIN
|
||||
PROMPT 2 18 "Ammontare dei crediti trasferiti "
|
||||
END
|
||||
|
||||
CURRENCY F_VL351 15
|
||||
BEGIN
|
||||
PROMPT 2 19 "Crediti ricevuti da società di gest.del credito"
|
||||
END
|
||||
|
||||
CURRENCY F_VL371 15
|
||||
BEGIN
|
||||
PROMPT 2 20 "Crediti ceduti da società di gest.del risparmio"
|
||||
END
|
||||
|
||||
CURRENCY F_VL401 15
|
||||
BEGIN
|
||||
PROMPT 2 21 "Vers.effettuati per uso eccessivo del credito "
|
||||
END
|
||||
|
||||
CURRENCY F_VL411 15
|
||||
BEGIN
|
||||
PROMPT 2 22 "Differenza tra IVA periodica dovuta e versata "
|
||||
END
|
||||
|
||||
CURRENCY F_VL412 15
|
||||
BEGIN
|
||||
PROMPT 2 23 "Differenza tra credito potenziale e effettivo "
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Quadro VL - Stampa" 0 0 0 0
|
||||
|
||||
NUMBER F_YEAR 4
|
||||
BEGIN
|
||||
PROMPT 3 2 "Anno "
|
||||
FLAGS "A-"
|
||||
END
|
||||
|
||||
SPREADSHEET F_DITTE 66 8
|
||||
BEGIN
|
||||
PROMPT 7 4 " "
|
||||
ITEM ""
|
||||
ITEM "Codice"
|
||||
ITEM "Ragione Sociale@50"
|
||||
END
|
||||
|
||||
SPREADSHEET F_REPORTS 83 10
|
||||
BEGIN
|
||||
PROMPT 1 14 ""
|
||||
ITEM ""
|
||||
ITEM "Codice"
|
||||
ITEM "Descrizione@60"
|
||||
ITEM "Nome@6"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
PAGE "Ditte" -1 -1 78 6
|
||||
|
||||
BOOLEAN S_CHKDITTA
|
||||
BEGIN
|
||||
PROMPT 3 2 "Selezionata"
|
||||
END
|
||||
|
||||
NUMBER S_CODDITTA 5
|
||||
BEGIN
|
||||
PROMPT 3 4 "Ditta "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_RAGSOC 50
|
||||
BEGIN
|
||||
PROMPT 20 4 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
TOOLBAR "topbar" 0 0 0 2
|
||||
|
||||
BUTTON DLG_OK 2 2
|
||||
BEGIN
|
||||
PROMPT 1 1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_CANCEL 10 2
|
||||
BEGIN
|
||||
PROMPT 2 1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
PAGE "Reports" -1 -1 78 6
|
||||
|
||||
BOOLEAN S_CHKREPORT
|
||||
BEGIN
|
||||
PROMPT 3 2 "Selezionata"
|
||||
END
|
||||
|
||||
STRING S_CODEREPORT 2
|
||||
BEGIN
|
||||
PROMPT 3 4 "Codice "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_NAMEREPORT 7
|
||||
BEGIN
|
||||
PROMPT 3 6 "Report "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_DESCREPORT 60
|
||||
BEGIN
|
||||
PROMPT 20 6 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
TOOLBAR "topbar" 0 0 0 2
|
||||
|
||||
BUTTON DLG_OK 2 2
|
||||
BEGIN
|
||||
PROMPT 1 1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_CANCEL 10 2
|
||||
BEGIN
|
||||
PROMPT 2 1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
Binary file not shown.
|
Before Width: | Height: | Size: 149 KiB After Width: | Height: | Size: 246 KiB |
169
src/cg/cg7c00.cpp
Normal file
169
src/cg/cg7c00.cpp
Normal file
@ -0,0 +1,169 @@
|
||||
// Programma per la stampa del quadro VE
|
||||
#include <recarray.h>
|
||||
#include <tabutil.h>
|
||||
#include <utility.h>
|
||||
|
||||
#include "cg7401.h"
|
||||
#include "cgpim.h"
|
||||
#include "cglib.h"
|
||||
|
||||
#include "cg7400a.h"
|
||||
#include "rmoviva.h"
|
||||
|
||||
#define REP_QUADRO 1
|
||||
|
||||
class TQuadro_VT_recordset : public TQuadro_IVA_recordset
|
||||
{
|
||||
TQuadro_IVA_mask * _mask;
|
||||
|
||||
protected:
|
||||
virtual void load(const char repid);
|
||||
|
||||
public:
|
||||
TQuadro_VT_recordset(TQuadro_IVA_mask * mask, const char* use, const int year, const char repid) : TQuadro_IVA_recordset(mask, use, year, repid) { load(repid); }
|
||||
virtual ~TQuadro_VT_recordset() {}
|
||||
};
|
||||
|
||||
void TQuadro_VT_recordset::load(const char repid)
|
||||
{
|
||||
clear();
|
||||
|
||||
TISAM_recordset * recset = app().mask()->get_recset(REP_QUADRO);
|
||||
|
||||
recset->set_var("#ANNO", format("%d", year()));
|
||||
for (recset->move_first(); !recset->eof(); recset->move_next())
|
||||
{
|
||||
const int regspiva = recset->get("26.REGSPIVA").as_int();
|
||||
const real imp = recset->get(RMI_IMPONIBILE).as_real();
|
||||
const real iva = recset->get(RMI_IMPOSTA).as_real();
|
||||
|
||||
switch (regspiva)
|
||||
{
|
||||
case 1:
|
||||
add_value("VT01.1", imp); // VT1.1 Acquisti di beni provenienti dallo Stato Città del Vaticano e dalla Repubblica di San Marino – art. 71, comma 2 – (inclusi acquisti di oro industriale,argento puro e beni di cui all’art. 74, commi 7 e 8)
|
||||
add_value("VT01.2", iva); // VT1.2 Acquisti di beni provenienti dallo Stato Città del Vaticano e dalla Repubblica di San Marino – art. 71, comma 2 – (inclusi acquisti di oro industriale,argento puro e beni di cui all’art. 74, commi 7 e 8)
|
||||
break;
|
||||
case 2:
|
||||
add_value("VT02.1", imp); // VT2.1 Estrazione di beni da depositi IVA (art. 50-bis, comma 6, d.l. n. 331/1993)
|
||||
add_value("VT02.2", iva); // VT2.2 Estrazione di beni da depositi IVA (art. 50-bis, comma 6, d.l. n. 331/1993)
|
||||
break;
|
||||
case 3:
|
||||
{
|
||||
const bool intra = recset->get(FIELD_NAME(LF_CAUSALI, CAU_INTRACOM)).as_bool();
|
||||
|
||||
if (intra)
|
||||
{
|
||||
add_value("VT09.1", imp); // VT9.1 Acquisti intracomunitari di beni (inclusi acquisti di oro industriale, argento puro e beni di cui all’art. 74, commi 7 e 8)
|
||||
add_value("VT09.2", iva); // VT9.2 Acquisti intracomunitari di beni (inclusi acquisti di oro industriale, argento puro e beni di cui all’art. 74, commi 7 e 8)
|
||||
}
|
||||
else
|
||||
{
|
||||
add_value("VT03.1", imp); // VT3.1 Acquisti di beni e servizi da soggettIi non residenti ai sensi dell’art. 17, comma 2
|
||||
add_value("VT03.2", iva); // VT3.2 Acquisti di beni e servizi da soggettIi non residenti ai sensi dell’art. 17, comma 2
|
||||
}
|
||||
}
|
||||
break;
|
||||
case 4:
|
||||
add_value("VT04.1", imp); // VT4.1 Operazioni di cui all’art. 74, comma 1, lett. e)
|
||||
add_value("VT04.2", iva); // VT4.2 Operazioni di cui all’art. 74, comma 1, lett. e)
|
||||
break;
|
||||
case 5:
|
||||
add_value("VT05.1", imp); // VT5.1 Provvigioni corrisposte dalle agenzie di viaggio ai loro intermediari
|
||||
add_value("VT05.2", iva); // VT5.1 Provvigioni corrisposte dalle agenzie di viaggio ai loro intermediari
|
||||
break;
|
||||
case 6:
|
||||
add_value("VT06.1", imp); // VT6.1 Acquisti all’interno di beni di cui all’art. 74, commi 7 e 8
|
||||
add_value("VT6.2", iva); // VT6.2 Acquisti all’interno di beni di cui all’art. 74, commi 7 e 8
|
||||
case 7:
|
||||
add_value("VT07.1", imp); // VT7.1 Acquisti all’interno di oro industriale e argento puro (art. 17, comma 5)
|
||||
add_value("VT07.2", iva); // VT7.2 Acquisti all’interno di oro industriale e argento puro (art. 17, comma 5)
|
||||
break;
|
||||
case 8:
|
||||
add_value("VT08.1", imp); // VT8.1 Acquisti di oro da investimento imponibile per opzione (art. 17, comma 5)
|
||||
add_value("VT08.2", iva); // VT8.1 Acquisti di oro da investimento imponibile per opzione (art. 17, comma 5)
|
||||
break;
|
||||
case 9:
|
||||
add_value("VT09.1", imp); // VT9.1 Acquisti intracomunitari di beni (inclusi acquisti di oro industriale, argento puro e beni di cui all’art. 74, commi 7 e 8)
|
||||
add_value("VT09.2", iva); // VT9.2 Acquisti intracomunitari di beni (inclusi acquisti di oro industriale, argento puro e beni di cui all’art. 74, commi 7 e 8)
|
||||
break;
|
||||
case 10:
|
||||
add_value("VT10.1", imp); // VT10.1 Importazioni di beni di cui all’art. 74, commi 7 e 8 senza pagamento dell’IVA in dogana (art. 70, comma 6)
|
||||
add_value("VT10.2", iva); // VT10.2 Importazioni di beni di cui all’art. 74, commi 7 e 8 senza pagamento dell’IVA in dogana (art. 70, comma 6)
|
||||
add_value("VT09.1", imp); // VT9.1 Acquisti intracomunitari di beni (inclusi acquisti di oro industriale, argento puro e beni di cui all’art. 74, commi 7 e 8)
|
||||
add_value("VT09.2", iva); // VT9.2 Acquisti intracomunitari di beni (inclusi acquisti di oro industriale, argento puro e beni di cui all’art. 74, commi 7 e 8)
|
||||
break;
|
||||
case 12:
|
||||
// add_value("VT12.1", imp); // VT12.1 Acquisti di tartufi da rivenditori dilettanti ed occasionali non muniti di partita IVA (art. 1, comma 109, legge n. 311/2004) non esiste più il campo
|
||||
// add_value("VT12.2", iva); // VT12.2 Acquisti di tartufi da rivenditori dilettanti ed occasionali non muniti di partita IVA (art. 1, comma 109, legge n. 311/2004)
|
||||
break;
|
||||
case 13:
|
||||
// spostato in su per eliminazione campo
|
||||
add_value("VT12.1", imp); // VT13.1 Acquisti di servizi resi da subappaltatori nel settore edile (art. 17, comma 6, lett. a)
|
||||
add_value("VT12.2", iva); // VT13.2 Acquisti di servizi resi da subappaltatori nel settore edile (art. 17, comma 6, lett. a)
|
||||
break;
|
||||
case 14:
|
||||
add_value("VT13.1", imp); // VT14.1 Acquisti di fabbricati (art. 17, comma 6, lett. a-bis)
|
||||
add_value("VT13.2", iva); // VT14.2 Acquisti di fabbricati (art. 17, comma 6, lett. a-bis)
|
||||
break;
|
||||
case 15:
|
||||
add_value("VT14.1", imp); // VT15.1 Acquisti di telefoni cellulari (art. 17, comma 6, lett. b)
|
||||
add_value("VT14.2", iva); // VT15 2 Acquisti di telefoni cellulari (art. 17, comma 6, lett. b)
|
||||
break;
|
||||
case 16:
|
||||
add_value("VT15.1", imp); // VT16.1 Acquisti di prodotti elettronici (art. 17, comma 6, lett. c)
|
||||
add_value("VT15.2", iva); // VT16.2 Acquisti di prodotti elettronici (art. 17, comma 6, lett. c)
|
||||
break;
|
||||
case 17:
|
||||
add_value("VT16.1", imp); // VT17.1 Acquisti di servizi del comparto edile e settori connessi (art. 17, comma 6, lett. a-ter)
|
||||
add_value("VT16.2", iva); // VT17.2 Acquisti di servizi del comparto edile e settori connessi (art. 17, comma 6, lett. a-ter)
|
||||
break;
|
||||
case 18:
|
||||
add_value("VT17.1", imp); // VT18.1 Acquisti di beni e servizi del settore energetico (art. 17, comma 6, lett. d-bis, d-ter e d-quater)
|
||||
add_value("VT17.2", iva); // VT18.2 Acquisti di beni e servizi del settore energetico (art. 17, comma 6, lett. d-bis, d-ter e d-quater)
|
||||
break;
|
||||
case 19:
|
||||
add_value("VT18.1", imp); // VT11.1 intracomunitari di beni di oro diverso dall’oro da investimento (c.d. oro industriale) e di argento puro
|
||||
add_value("VT18.2", iva); // VT11.2 intracomunitari di beni di oro diverso dall’oro da investimento (c.d. oro industriale) e di argento puro
|
||||
break;
|
||||
case 50:
|
||||
add_value("VT11.1", imp); // VT11.1 intracomunitari di beni di oro diverso dall’oro da investimento (c.d. oro industriale) e di argento puro
|
||||
add_value("VT11.2", iva); // VT11.2 intracomunitari di beni di oro diverso dall’oro da investimento (c.d. oro industriale) e di argento puro
|
||||
add_value("VT09.1", imp); // VT09.1 Acquisti intracomunitari di beni (inclusi acquisti di oro industriale, argento puro e beni di cui all’art. 74, commi 7 e 8)
|
||||
add_value("VT09.2", iva); // VT09.2 Acquisti intracomunitari di beni (inclusi acquisti di oro industriale, argento puro e beni di cui all’art. 74, commi 7 e 8)
|
||||
break;
|
||||
case 51:
|
||||
add_value("VT09.1", imp); // VT09.1 Acquisti intracomunitari di beni (inclusi acquisti di oro industriale, argento puro e beni di cui all’art. 74, commi 7 e 8)
|
||||
add_value("VT09.2", iva); // VT09.2 Acquisti intracomunitari di beni (inclusi acquisti di oro industriale, argento puro e beni di cui all’art. 74, commi 7 e 8)
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
class TQuadro_VT_app : public TQuadro_IVA_app
|
||||
{
|
||||
|
||||
protected:
|
||||
virtual void load_sheet(TSheet_field & sf);
|
||||
|
||||
public:
|
||||
virtual TQuadro_IVA_recordset * app_recordset(const char* use, const int year, const char repid) { return new TQuadro_VT_recordset(mask(), use, year,repid); }
|
||||
|
||||
TQuadro_VT_app() : TQuadro_IVA_app("Stampa Quadro VT", "cg7c00a") {}
|
||||
virtual ~TQuadro_VT_app() {}
|
||||
|
||||
};
|
||||
|
||||
void TQuadro_VT_app::load_sheet(TSheet_field & sf)
|
||||
{
|
||||
TToken_string & row1 = sf.row(sf.items()); row1.add("|1|Quadro VT - VT1 - VT16|cg7c00b");
|
||||
}
|
||||
|
||||
|
||||
int cg7c00(int argc, char* argv[])
|
||||
{
|
||||
TQuadro_VT_app a;
|
||||
a.run(argc, argv, TR("Quadro VT"));
|
||||
return 0;
|
||||
}
|
||||
Binary file not shown.
|
Before Width: | Height: | Size: 194 KiB After Width: | Height: | Size: 313 KiB |
179
src/cg/cg7c00a.rep
Normal file
179
src/cg/cg7c00a.rep
Normal file
@ -0,0 +1,179 @@
|
||||
<?xml version="1.0" encoding="UTF-8" ?>
|
||||
<report libraries="" page_merge="" save_printer="" name="cg7c00a" use_printer_font="" orientation="" page_split="" lpi="6" command="" class="">
|
||||
<description>Stampa quadro VT</description>
|
||||
<font face="Courier New" size="12" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="1" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field deactivated="" type="Immagine" hidden="" image_resize_type="" link="" dynamic_height="" shade_offset="" width="83" codval="" height="72" id="" pattern="1" hide_zero="" text="">
|
||||
<source>"cg7c00a.png"</source>
|
||||
</field>
|
||||
</section>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<font face="Courier New" size="10" />
|
||||
<field x="4" y="1" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="Anno" />
|
||||
<field x="22" y="1" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="50" codval="" id="" pattern="1" hide_zero="" text=" ">
|
||||
<font face="Courier New" size="12" />
|
||||
<source>#SYSTEM.RAGSOC</source>
|
||||
</field>
|
||||
<field x="35.75" y="5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="48" codval="" id="" pattern="1" hide_zero="" text=" ">
|
||||
<font face="Courier New" size="12" />
|
||||
<source>#SYSTEM.CFPI_SPACED</source>
|
||||
</field>
|
||||
<field x="62.75" y="8" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="0 1" />
|
||||
<field x="14" y="1" deactivated="" type="Stringa" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="6" codval="" id="100" pattern="1" hide_zero="" text=" ">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="44" y="12.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="101" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT01.1</source>
|
||||
</field>
|
||||
<field x="66" y="12.25" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="102" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT01.2</source>
|
||||
</field>
|
||||
<field x="44" y="14.4" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="103" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT01.3</source>
|
||||
</field>
|
||||
<field x="66" y="14.4" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="104" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT01.4</source>
|
||||
</field>
|
||||
<field x="44" y="16.4" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="105" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT01.5</source>
|
||||
</field>
|
||||
<field x="66" y="16.4" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="106" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT01.6</source>
|
||||
</field>
|
||||
<field x="44" y="19.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="201" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT02.1</source>
|
||||
</field>
|
||||
<field x="66" y="19.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="202" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT02.2</source>
|
||||
</field>
|
||||
<field x="44" y="20.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="301" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT03.1</source>
|
||||
</field>
|
||||
<field x="66" y="20.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="302" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT03.2</source>
|
||||
</field>
|
||||
<field x="44" y="21.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="401" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT04.1</source>
|
||||
</field>
|
||||
<field x="66" y="21.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="402" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT04.2</source>
|
||||
</field>
|
||||
<field x="44" y="22.6" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="501" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT05.1</source>
|
||||
</field>
|
||||
<field x="66" y="22.6" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="502" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT05.2</source>
|
||||
</field>
|
||||
<field x="44" y="23.7" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="601" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT06.1</source>
|
||||
</field>
|
||||
<field x="66" y="23.7" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="602" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT06.2</source>
|
||||
</field>
|
||||
<field x="44" y="24.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="701" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT07.1</source>
|
||||
</field>
|
||||
<field x="66" y="24.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="702" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT07.2</source>
|
||||
</field>
|
||||
<field x="44" y="25.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="801" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT08.1</source>
|
||||
</field>
|
||||
<field x="66" y="25.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="802" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT08.2</source>
|
||||
</field>
|
||||
<field x="44" y="26.6" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="901" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT09.1</source>
|
||||
</field>
|
||||
<field x="66" y="26.6" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="902" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT09.2</source>
|
||||
</field>
|
||||
<field x="44" y="27.7" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1001" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT10.1</source>
|
||||
</field>
|
||||
<field x="66" y="27.7" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1002" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT10.2</source>
|
||||
</field>
|
||||
<field x="44" y="28.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1101" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT11.1</source>
|
||||
</field>
|
||||
<field x="66" y="28.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1102" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT11.2</source>
|
||||
</field>
|
||||
<field x="44" y="29.85" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1201" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT12.1</source>
|
||||
</field>
|
||||
<field x="66" y="29.85" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1202" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT12.2</source>
|
||||
</field>
|
||||
<field x="44" y="30.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1301" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT13.1</source>
|
||||
</field>
|
||||
<field x="66" y="30.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1302" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT13.2</source>
|
||||
</field>
|
||||
<field x="44" y="31.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1401" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT14.1</source>
|
||||
</field>
|
||||
<field x="66" y="31.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1402" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT14.2</source>
|
||||
</field>
|
||||
<field x="44" y="32.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1501" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT15.1</source>
|
||||
</field>
|
||||
<field x="66" y="32.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1502" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT15.2</source>
|
||||
</field>
|
||||
<field x="44" y="34" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1601" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT16.1</source>
|
||||
</field>
|
||||
<field x="66" y="34" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1602" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT16.2</source>
|
||||
</field>
|
||||
<field x="44" y="35" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1701" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT17.1</source>
|
||||
</field>
|
||||
<field x="66" y="35" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1702" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT17.2</source>
|
||||
</field>
|
||||
<field x="44" y="36" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1801" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT18.1</source>
|
||||
</field>
|
||||
<field x="66" y="36" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1802" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT18.2</source>
|
||||
</field>
|
||||
<field x="44" y="37" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1901" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT19.1</source>
|
||||
</field>
|
||||
<field x="66" y="37" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="1902" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT19.2</source>
|
||||
</field>
|
||||
<field x="44" y="38" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2001" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT20.1</source>
|
||||
</field>
|
||||
<field x="66" y="38" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2002" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT20.2</source>
|
||||
</field>
|
||||
<field x="44" y="39" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2101" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT21.1</source>
|
||||
</field>
|
||||
<field x="66" y="39" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2102" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT21.2</source>
|
||||
</field>
|
||||
<field x="44" y="40.05" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2201" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT22.1</source>
|
||||
</field>
|
||||
<field x="66" y="40.05" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="11" codval="" id="2202" pattern="1" hide_zero="" text="###.###.###">
|
||||
<source>VT22.2</source>
|
||||
</field>
|
||||
<field x="78" y="64.75" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="1" codval="" id="9999" pattern="1" hide_zero="" text="###.###.###" />
|
||||
</section>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="1" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<sql>USE NDITTE SELECT CODDITTA==#CODDITTA</sql>
|
||||
<parameters>
|
||||
<item name="ANNO"> </item>
|
||||
</parameters>
|
||||
</report>
|
||||
128
src/cg/cg7c00a.uml
Normal file
128
src/cg/cg7c00a.uml
Normal file
@ -0,0 +1,128 @@
|
||||
#include "cg7400a.h"
|
||||
|
||||
TOOLBAR "Toolbar" 0 0 0 2
|
||||
|
||||
BUTTON DLG_ALLFIRMS 2 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Tutte le ditte"
|
||||
PICTURE TOOL_CHECK
|
||||
END
|
||||
|
||||
BUTTON DLG_ALLREPORTS 2 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Tutte le stampe"
|
||||
PICTURE TOOL_SETPRINT
|
||||
END
|
||||
|
||||
#include <printbar.h>
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Quadro VT" 0 0 0 0
|
||||
|
||||
NUMBER F_YEAR 4
|
||||
BEGIN
|
||||
PROMPT 3 2 "Anno "
|
||||
FLAGS "A-"
|
||||
END
|
||||
|
||||
SPREADSHEET F_DITTE 66 8
|
||||
BEGIN
|
||||
PROMPT 7 4 " "
|
||||
ITEM ""
|
||||
ITEM "Codice"
|
||||
ITEM "Ragione Sociale@50"
|
||||
END
|
||||
|
||||
SPREADSHEET F_REPORTS 83 10
|
||||
BEGIN
|
||||
PROMPT 1 14 ""
|
||||
ITEM ""
|
||||
ITEM "Codice"
|
||||
ITEM "Descrizione@60"
|
||||
ITEM "Nome@6"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
PAGE "Ditte" -1 -1 78 6
|
||||
|
||||
BOOLEAN S_CHKDITTA
|
||||
BEGIN
|
||||
PROMPT 3 2 "Selezionata"
|
||||
END
|
||||
|
||||
NUMBER S_CODDITTA 5
|
||||
BEGIN
|
||||
PROMPT 3 4 "Ditta "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_RAGSOC 50
|
||||
BEGIN
|
||||
PROMPT 20 4 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
TOOLBAR "topbar" 0 0 0 2
|
||||
|
||||
BUTTON DLG_OK 2 2
|
||||
BEGIN
|
||||
PROMPT 1 1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_CANCEL 10 2
|
||||
BEGIN
|
||||
PROMPT 2 1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
PAGE "Reports" -1 -1 78 6
|
||||
|
||||
BOOLEAN S_CHKREPORT
|
||||
BEGIN
|
||||
PROMPT 3 2 "Selezionata"
|
||||
END
|
||||
|
||||
STRING S_CODEREPORT 2
|
||||
BEGIN
|
||||
PROMPT 3 4 "Codice "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_NAMEREPORT 7
|
||||
BEGIN
|
||||
PROMPT 3 6 "Report "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING S_DESCREPORT 60
|
||||
BEGIN
|
||||
PROMPT 20 6 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
TOOLBAR "topbar" 0 0 0 2
|
||||
|
||||
BUTTON DLG_OK 2 2
|
||||
BEGIN
|
||||
PROMPT 1 1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_CANCEL 10 2
|
||||
BEGIN
|
||||
PROMPT 2 1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
Binary file not shown.
|
Before Width: | Height: | Size: 229 KiB After Width: | Height: | Size: 458 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 73 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 147 KiB After Width: | Height: | Size: 511 KiB |
BIN
src/cg/cg7e00b.png
Normal file
BIN
src/cg/cg7e00b.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 494 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 154 KiB After Width: | Height: | Size: 292 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 49 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 211 KiB After Width: | Height: | Size: 316 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 56 KiB After Width: | Height: | Size: 102 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 136 KiB After Width: | Height: | Size: 588 KiB |
BIN
src/cg/cg7h00b.png
Normal file
BIN
src/cg/cg7h00b.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 178 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 274 KiB |
Binary file not shown.
|
Before Width: | Height: | Size: 147 KiB |
@ -296,5 +296,6 @@ Module = 7
|
||||
Flags = ""
|
||||
Item_01 = "Quadro VE", "cg7 -5", "F"
|
||||
Item_02 = "Quadro VF", "cg7 -6", "F"
|
||||
Item_03 = "Quadro VJ", "cg7 -7", "F"
|
||||
Item_03 = "Quadro VT", "cg5 -8", "F"
|
||||
Item_03 = "Quadro VL", "cg7 -9", "F"
|
||||
Item_04 = "Quadro VJ", "cg7 -7", "F"
|
||||
Item_05 = "Quadro VT", "cg5 -8", "F"
|
||||
Loading…
x
Reference in New Issue
Block a user