diff --git a/src/cg/cg7500.cpp b/src/cg/cg7500.cpp deleted file mode 100644 index 16fc25980..000000000 --- a/src/cg/cg7500.cpp +++ /dev/null @@ -1,294 +0,0 @@ -// Programma per la stampa del quadro VE -#include -#include -#include - -#include "cg7401.h" -#include "cgpim.h" - -#include "cg7500a.h" -#include "rmoviva.h" - -#define REP_EXPORT 1 -#define REP_INTRA 2 -#define REP_SANMARINO 3 -#define REP_OPASSIMIL 4 -#define REP_DICHINT 5 -#define REP_ALTREOP 6 -#define REP_ART10 7 -#define REP_ART7 8 -#define REP_REVCHARGE 9 -#define REP_TERREM 10 -#define REP_PAART17 11 - -enum tipo_sospensione { nessuna, normale, vol_affari, liquidazione }; - -class TQuadro_VE_recordset : public TQuadro_IVA_recordset -{ - TQuadro_IVA_mask * _mask; - -protected: - const real TQuadro_VE_recordset::evaluate_recordset(const int code, const int year); - virtual void load(const long year); - -public: - TQuadro_VE_recordset(TQuadro_IVA_mask * mask, const char* use, const int year) : TQuadro_IVA_recordset(use, year), _mask(mask) {load(year);} - virtual ~TQuadro_VE_recordset() {} -}; - -const real TQuadro_VE_recordset::evaluate_recordset(const int code, const int year) -{ - real val; - TProgram_report & rep = _mask->get_report(code - 1); - TISAM_recordset * set = (TISAM_recordset *) rep.recordset(); - - if (set != NULL) - { - set->set_var("#ANNO", format("%d", year)); - - if (set->items() > 0) - for (set->move_first(); !set->eof(); set->move_next()) - val += set->get(RMI_IMPONIBILE).as_real(); - set->freeze(); - } - return val; -} - - -void TQuadro_VE_recordset::load(const long year) -{ - TAssoc_array imponibile_agricolo; - TAssoc_array imposta_agricola; - TAssoc_array imponibile; - TAssoc_array imposta; - - imponibile_agricolo.add("2.00", TString8("VE01.1")); - imposta_agricola.add("2.00", TString8("VE01.2")); - imponibile_agricolo.add("4,00", TString8("VE02.2")); - imposta_agricola.add("4,00", TString8("VE02.2")); - imponibile_agricolo.add("7.00", TString8("VE03.1")); - imposta_agricola.add("7.00", TString8("VE03.2")); - imponibile_agricolo.add("7.30", TString8("VE04.1")); - imposta_agricola.add("7.30", TString8("VE04.2")); - imponibile_agricolo.add("7.50", TString8("VE05.1")); - imposta_agricola.add("7.50", TString8("VE05.2")); - imponibile_agricolo.add("8.30", TString8("VE06.1")); - imposta_agricola.add("8.30", TString8("VE06.2")); - imponibile_agricolo.add("8,50", TString8("VE07.1")); - imposta_agricola.add("8,50", TString8("VE07.2")); - imponibile_agricolo.add("8.80", TString8("VE08.1")); - imposta_agricola.add("8.80", TString8("VE08.2")); - imponibile_agricolo.add("12.30", TString8("VE09.1")); - imposta_agricola.add("12.30", TString8("VE09.2")); - - imponibile.add("4.00", TString8("VE20.1")); - imposta.add("4.00", TString8("VE20.2")); - imponibile.add("10.00",TString8("VE21.1")); - imposta.add("10.00",TString8("VE21.2")); - imponibile.add("22.00", TString8("VE22.1")); - imposta.add("22.00", TString8("VE22.2")); - - TString80 query("USE PIM\nFROM CODTAB="); - - query << year << "\nTO CODTAB=" << year; - - TISAM_recordset pim(query); - bool good = pim.items() > 0; - - 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 TRectype & reg = cache().get("REG", codreg); - const tiporec tipo = (tiporec) reg.get_int("I9"); - const bool vendite = reg.get("I0") == 1; - - if (tipo != liquidazione) - { - const TString8 codiva(codtab.mid(16,4)); - const TRectype & ivar = cache().get("%IVA", codiva); - const TString8 aliquota = ivar.get("R0"); - - if (aliquota.full()) - { - tiporec tipo; - real imp; - real iva; - - if (classify_pim(pim, imp, iva, tipo, true)) - { - switch (tipo) - { - case acq_norm: // acquisti normali - break; - case vend_norm: // vendite normali - case corr_norm: - { - const bool agricolo = ivar.get_int("I4") != 0; - - if (agricolo) - { - const TString * field = (TString *) imponibile_agricolo.objptr(aliquota); - - add_value(field, imp); - field = (TString *) imposta_agricola.objptr(aliquota); - add_value(field, iva); - } - else - { - const TString * field = (TString *) imponibile.objptr(aliquota); - - add_value(field, imp); - field = (TString *) imposta.objptr(aliquota); - add_value(field, iva); - } - } - break; - case acq_simp: - break; - case vend_simp: // acq. e vend. sosp. imposta - break; - case bolle_doganali: // bolle doganali (acquisti) - break; - case acq_beni_riv : // acq. beni per rivendita - break; - case base_ventilazione: // base calcolo per ventil. - break; - case corr_simp: // corrispettivi n. e s. imp. - break; - case acq_beni_ammort: // acq. beni ammortizz. detr. - break; - case acq_beni_ammort_nd: // beni ammort. non detraibili - break; - case acq_beni_leasing: // beni strum. acq in leasing - break; - case acq_amm_ultdetr: // beni amm. ult. detr 6% - break; - case acq_ind_op_es: // acq. indetr. su op.es. - break; - case acq_ind_pass_int: // passaggi interni - if (vendite) - add_value(TString8("VE40.1"), iva); - break; - case acq_ind_art_19: // indetr. art. 19 - break; - case cess_amm: // cessioni amministrative - add_value(TString8("VE40.1"), iva); - break; - case vend_rimborso: // vendite valide per rimborso - break; - case acq_rimborso: // acq. validi per rimborso - break; - case acq_bd_ind_art_19: // acq. con tipo documento BD e tipo detr 9 - break; - default: - break; - - }; - - const TString4 tipo_aliquota = ivar.get("S1"); - const TString4 tipo_iva11_ven = ivar.get("S2"); - const bool non_imponibile = (tipo_aliquota == "NI"); - const bool esente = (tipo_aliquota == "ES"); - const bool reverse = (tipo_aliquota >= "31" && tipo_aliquota >= "38"); - const bool terremotati = tipo_aliquota >= "25"; - - if (non_imponibile) - { - if (tipo_iva11_ven == "21") - add_value("VE31.1", imp); - else - if (tipo_iva11_ven == "22") - add_value(TString8("VE32.1"), imp); - } - if (esente) - { - if ((tipo_iva11_ven == "B1") || - (tipo_iva11_ven == "B2") || - (tipo_iva11_ven == "B3") || - (tipo_iva11_ven == "B4") || - (tipo_iva11_ven == "B5")) - add_value(TString8("VE33.1"), imp); - else - if ((tipo_iva11_ven == "B6")) - add_value(TString8("VE34.1"), imp); - } - - if (reverse) - { - const int tipo_reverse = atoi(tipo_iva11_ven); - - switch (tipo_reverse) - { - case 31 : add_value(TString8("VE35.2"), imp); break; - case 32 : add_value(TString8("VE35.3"), imp); break; - case 33 : add_value(TString8("VE35.4"), imp); break; - case 34 : add_value(TString8("VE35.5"), imp); break; - case 35 : add_value(TString8("VE35.6"), imp); break; - case 36 : add_value(TString8("VE35.7"), imp); break; - case 37 : add_value(TString8("VE35.8"), imp); break; - case 38 : add_value(TString8("VE35.9"), imp); break; - default : break; - } - } - if (terremotati) - add_value(TString8("VE36.1"), imp); - } - } - } -} - - query = "USE LIM\n FROM CODTAB=="; - - query << year << "\nTO CODTAB==" << year; - - TISAM_recordset lim(query); - good |= lim.items() > 0; - - for (lim.move_first(); !lim.eof(); lim.move_next()) - { - add_value(TString8("VE24.2"), lim.get("R17").as_real()); - - } - - real val = evaluate_recordset(REP_EXPORT, year); - - good |= val > ZERO; - add_value(TString8("VE30.2"), val); - val = evaluate_recordset(REP_INTRA, year); - good |= val > ZERO; - add_value(TString8("VE30.3"), val); - val = evaluate_recordset(REP_SANMARINO, year); - good |= val > ZERO; - add_value(TString8("VE30.4"), val); - val = evaluate_recordset(REP_OPASSIMIL, year); - good |= val > ZERO; - add_value(TString8("VE30.5"), val); - -// VE37.1 2 iva sospensione - - val = evaluate_recordset(REP_PAART17, year); // liquidazione - good |= val > ZERO; - add_value(TString8("VE38.1"), val); - -// VE39.1 iva sospensione incassata -// if (!good) -// warning_box(FR("Risultati liquidazione non presenti o da ricalcolare per l'anno %d."), year); -} - -class TQuadro_VE_app : public TQuadro_IVA_app -{ -public: - virtual TQuadro_IVA_recordset * app_recordset(const char* use, const int year) { return new TQuadro_VE_recordset(mask(), use, year); } - TQuadro_VE_app() : TQuadro_IVA_app("Stampa Quadro VE", "cg7500a") {} - virtual ~TQuadro_VE_app() {} - -}; - -int cg7500(int argc, char* argv[]) -{ - TQuadro_VE_app a; - a.run(argc, argv, TR("Quadro VE")); - return 0; -} \ No newline at end of file diff --git a/src/cg/cg7500a.h b/src/cg/cg7500a.h deleted file mode 100644 index 2bf35fe90..000000000 --- a/src/cg/cg7500a.h +++ /dev/null @@ -1,12 +0,0 @@ -#define F_YEAR 201 -#define F_DITTE 202 -#define F_REPORTS 203 - -#define S_CHKDITTA 101 -#define S_CODDITTA 102 -#define S_RAGSOC 103 - -#define S_CHKREPORT 101 -#define S_CODEREPORT 102 -#define S_DESCREPORT 103 -#define S_NAMEREPORT 104 diff --git a/src/cg/cg7500a.jpg b/src/cg/cg7500a.jpg deleted file mode 100644 index 9db04a559..000000000 Binary files a/src/cg/cg7500a.jpg and /dev/null differ diff --git a/src/cg/cg7500a.pdf b/src/cg/cg7500a.pdf deleted file mode 100644 index fb4efc92c..000000000 Binary files a/src/cg/cg7500a.pdf and /dev/null differ diff --git a/src/cg/cg7500a.png b/src/cg/cg7500a.png deleted file mode 100644 index 4ae4dee5f..000000000 Binary files a/src/cg/cg7500a.png and /dev/null differ diff --git a/src/cg/cg7500a.rep b/src/cg/cg7500a.rep deleted file mode 100644 index 6316f1365..000000000 --- a/src/cg/cg7500a.rep +++ /dev/null @@ -1,233 +0,0 @@ - - - Stampa quadro VE - -
-
-
- - "c:\u\r_12_00\src\cg\cg7500a.tif" - -
-
- - - - CODDITTA - MON -#THIS @ -2 -* -#THIS ! - - - VE01.1 - MESSAGE ADD,B1.2301 - - - VE01.2 - MESSAGE ADD,B1.2302 - - - VE02.1 - MESSAGE ADD,B1.2301 - - - VE01.2 - MESSAGE ADD,B1.2302 - - - VE01.3 - MESSAGE ADD,B1.2301 - - - VE03.2 - MESSAGE ADD,B1.2302 - - - VE04.1 - MESSAGE ADD,B1.2301 - - - VE04.2 - MESSAGE ADD,B1.2302 - - - VE05.1 - MESSAGE ADD,B1.2301 - - - VE05.2 - MESSAGE ADD,B1.2302 - - - VE06.1 - MESSAGE ADD,B1.2301 - - - VE06.2 - MESSAGE ADD,B1.2302 - - - VE07.1 - MESSAGE ADD,B1.2301 - - - VE07.2 - MESSAGE ADD,B1.2302 - - - VE08.1 - MESSAGE ADD,B1.2301 - - - VE08.2 - MESSAGE ADD,B1.2302 - - - VE09.1 - MESSAGE ADD,B1.2301 - - - VE09.2 - MESSAGE ADD,B1.2302 - - - VE20.1 - MESSAGE ADD,B1.2301 - - - VE20.2 - MESSAGE ADD,B1.2302 - - - VE21.1 - MESSAGE ADD,B1.2301 - - - VE21.1 - MESSAGE ADD,B1.2302 - - - VE22.1 - MON -#B1.2301 @ -#THIS @ -+ -#B1.2301 ! - - - VE22.2 - MESSAGE ADD,B1.2302 - - - MON -#THIS @ -2 -* -#THIS ! - - - MESSAGE ADD,B1.2502 - - - VE24.2 - MESSAGE ADD,B1.2502 - - - - VE30.2 - MESSAGE ADD,B1.3010 - - - VE30.3 - MESSAGE ADD,B1.3010 - - - VE30.4 - MESSAGE ADD,B1.3010 - - - VE30.5 - MESSAGE ADD,B1.3010 - - - MESSAGE ADD,B1.2301 - - - VE31.1 - - - VE32.1 - - - VE33.1 - - - VE34.1 - MESSAGE ADD,B1.2301 - - - VE35.2 - MESSAGE ADD,B1.3510 - - - VE35.3 - MESSAGE ADD,B1.3510 - - - V35.4 - MESSAGE ADD,B1.3510 - - - VE35.5 - MESSAGE ADD,B1.3510 - - - V35.6 - MESSAGE ADD,B1.3510 - - - VE35.7 - MESSAGE ADD,B1.3510 - - - V35.8 - MESSAGE ADD,B1.3510 - - - VE35.9 - MESSAGE ADD,B1.3510 - - - MESSAGE ADD,B1.2301 - - - VE36.1 - - - VE37.1 - - - VE37.1 - - - VE38.1 - MESSAGE ADD,B1.5001 - - - VE39.1 - MESSAGE SUB,B1.5001 - - - VE40.1 - MESSAGE SUB,B1.5001 - - - MESSAGE ADD,B1.2301 - -
-
-
- USE NDITTE SELECT CODDITTA==#CODDITTA - \ No newline at end of file diff --git a/src/cg/cg7500a.rep.bak b/src/cg/cg7500a.rep.bak deleted file mode 100644 index f692ec315..000000000 --- a/src/cg/cg7500a.rep.bak +++ /dev/null @@ -1,218 +0,0 @@ - - - Stampa quadro VE - -
-
-
- - "c:\u\r_12_00\src\cg\cg7500a.tif" - -
-
- - - - CODDITTA - - - VE01.1 - MESSAGE ADD,B1.2301 - - - VE01.2 - MESSAGE ADD,B1.2302 - - - VE02.1 - MESSAGE ADD,B1.2301 - - - VE01.2 - MESSAGE ADD,B1.2302 - - - VE01.3 - MESSAGE ADD,B1.2301 - - - VE03.2 - MESSAGE ADD,B1.2302 - - - VE04.1 - MESSAGE ADD,B1.2301 - - - VE04.2 - MESSAGE ADD,B1.2302 - - - VE05.1 - MESSAGE ADD,B1.2301 - - - VE05.2 - MESSAGE ADD,B1.2302 - - - VE06.1 - MESSAGE ADD,B1.2301 - - - VE06.2 - MESSAGE ADD,B1.2302 - - - VE07.1 - MESSAGE ADD,B1.2301 - - - VE07.2 - MESSAGE ADD,B1.2302 - - - VE08.1 - MESSAGE ADD,B1.2301 - - - VE08.2 - MESSAGE ADD,B1.2302 - - - VE09.1 - MESSAGE ADD,B1.2301 - - - VE09.2 - MESSAGE ADD,B1.2302 - - - VE20.1 - MESSAGE ADD,B1.2301 - - - VE20.2 - MESSAGE ADD,B1.2302 - - - VE21.1 - MESSAGE ADD,B1.2301 - - - VE21.1 - MESSAGE ADD,B1.2302 - - - VE22.1 - MESSAGE ADD,B1.2301 - - - VE22.2 - MESSAGE ADD,B1.2302 - - - - MESSAGE ADD,B1.2502 - - - VE24.2 - MESSAGE ADD,B1.2502 - - - - VE30.2 - MESSAGE ADD,B1.3010 - - - VE30.3 - MESSAGE ADD,B1.3010 - - - VE30.4 - MESSAGE ADD,B1.3010 - - - VE30.5 - MESSAGE ADD,B1.3010 - - - MESSAGE ADD,B1.2301 - - - VE31.1 - - - VE32.1 - - - VE33.1 - - - VE34.1 - MESSAGE ADD,B1.2301 - - - VE35.2 - MESSAGE ADD,B1.3510 - - - VE35.3 - MESSAGE ADD,B1.3510 - - - V35.4 - MESSAGE ADD,B1.3510 - - - VE35.5 - MESSAGE ADD,B1.3510 - - - V35.6 - MESSAGE ADD,B1.3510 - - - VE35.7 - MESSAGE ADD,B1.3510 - - - V35.8 - MESSAGE ADD,B1.3510 - - - VE35.9 - MESSAGE ADD,B1.3510 - - - MESSAGE ADD,B1.2301 - - - VE36.1 - - - VE37.1 - - - VE37.1 - - - VE38.1 - MESSAGE ADD,B1.5001 - - - VE39.1 - MESSAGE SUB,B1.5001 - - - VE40.1 - MESSAGE SUB,B1.5001 - - - MESSAGE ADD,B1.2301 - -
-
-
- USE NDITTE SELECT CODDITTA==#CODDITTA - \ No newline at end of file diff --git a/src/cg/cg7500a.tif b/src/cg/cg7500a.tif deleted file mode 100644 index 2df52dcc2..000000000 Binary files a/src/cg/cg7500a.tif and /dev/null differ diff --git a/src/cg/cg7500a.uml b/src/cg/cg7500a.uml deleted file mode 100644 index d99249552..000000000 --- a/src/cg/cg7500a.uml +++ /dev/null @@ -1,128 +0,0 @@ -#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 - -ENDPAGE - -PAGE "Quadro VE" 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 diff --git a/src/cg/cg7500b.rep b/src/cg/cg7500b.rep deleted file mode 100644 index ab2f7e407..000000000 --- a/src/cg/cg7500b.rep +++ /dev/null @@ -1,126 +0,0 @@ - - - Dichiarazione IVA Quadro VE - Esportazioni - -
- - "Pag. " +#PAGE - - -
-
- MESSAGE RESET,F1 - - - #SYSTEM.RAGSOC - - - "Data di Stampa: " +#SYSTEM.DATE - - - "ELENCO FATTURE ESPORTAZIONE - " +#ANNO - -
- -
- -
-
- - - -
-
- - #B1.5 - - - - #B1.15 - - - - #B1.25 - - - #B1.30 - - - #B1.35 - - - #B1.40 - - - #B1.105 - - - - MESSAGE ADD,F1.100 - -
- USE RMOVIVA SELECT (23.ANNOIVA=#ANNO)(23.TIPO="C")((201@.S3="1")||(201@.S3="2"))(INTRA!="X")(202@.B1!="X") -JOIN MOV INTO NUMREG==NUMREG -JOIN 20 TO MOV INTO TIPOCF==TIPO CODCF==CODCF -JOIN %IVA ALIAS 201 INTO CODTAB=CODIVA -JOIN %STA TO CLIFO ALIAS 202 INTO CODTAB==STATOCF - \ No newline at end of file diff --git a/src/cg/cg7500c.rep b/src/cg/cg7500c.rep deleted file mode 100644 index 26be7a68c..000000000 --- a/src/cg/cg7500c.rep +++ /dev/null @@ -1,132 +0,0 @@ - - - Dichiarazione IVA Quadro VE intracomunitarie - -
- - "Pag. " +#PAGE - - -
-
- MESSAGE RESET,F1 - - - #SYSTEM.RAGSOC - - - "Data di Stampa: " +#SYSTEM.DATE - - - "ELENCO FATTURE CESSIONI INTRACOMUNITARIE - " +#ANNO - -
- -
- -
-
- - - -
-
- - #B1.5 - - - - #B1.15 - - - - #B1.25 - - - #B1.30 - - - #B1.35 - - - #B1.40 - - - #B1.105 - - - - MESSAGE ADD,F1.100 - -
- USE RMOVIVA SELECT (23.ANNOIVA=#ANNO)(23.TIPO="C")(INTRA="X")(201@.S3="")(202@.B1!="X") -JOIN MOV INTO NUMREG==NUMREG -JOIN 20 TO MOV INTO TIPOCF==TIPO CODCF==CODCF -JOIN %IVA ALIAS 201 INTO CODTAB==CODIVA -JOIN %STA TO CLIFO ALIAS 202 INTO CODTAB==STATOCF - \ No newline at end of file diff --git a/src/cg/cg7500d.rep b/src/cg/cg7500d.rep deleted file mode 100644 index 5d86fbf99..000000000 --- a/src/cg/cg7500d.rep +++ /dev/null @@ -1,132 +0,0 @@ - - - Dichiarazione IVA Quadro VE - San Marino - -
- - "Pag. " +#PAGE - - -
-
- MESSAGE RESET,F1 - - - #SYSTEM.RAGSOC - - - "Data di Stampa: " +#SYSTEM.DATE - - - "ELENCO FATTURE CESSIONI VERSO SAN MARINO - " +#ANNO - -
- -
- -
-
- - - -
-
- - #B1.5 - - - - #B1.15 - - - - #B1.25 - - - #B1.30 - - - #B1.35 - - - #B1.40 - - - #B1.105 - - - - MESSAGE ADD,F1.100 - -
- USE RMOVIVA SELECT (23.ANNOIVA=#ANNO)(23.TIPO="C")(201@.S3="")(202@.B1="X") -JOIN MOV INTO NUMREG==NUMREG -JOIN 20 TO MOV INTO TIPOCF==TIPO CODCF==CODCF -JOIN %IVA ALIAS 201 INTO CODTAB==CODIVA -JOIN %STA TO CLIFO ALIAS 202 INTO CODTAB==STATOCF - \ No newline at end of file diff --git a/src/cg/cg7500e.rep b/src/cg/cg7500e.rep deleted file mode 100644 index 443c833cb..000000000 --- a/src/cg/cg7500e.rep +++ /dev/null @@ -1,132 +0,0 @@ - - - Dichiarazione IVA Quadro VE - Assimilate - -
- - "Pag. " +#PAGE - - -
-
- MESSAGE RESET,F1 - - - #SYSTEM.RAGSOC - - - "Data di Stampa: " +#SYSTEM.DATE - - - "ELENCO FATTURE OPERAZIONI ASSIMILATE - " +#ANNO - -
- -
- -
-
- - - -
-
- - #B1.5 - - - - #B1.15 - - - - #B1.25 - - - #B1.30 - - - #B1.35 - - - #B1.40 - - - #B1.105 - - - - MESSAGE ADD,F1.100 - -
- USE RMOVIVA SELECT (23.ANNOIVA=#ANNO)(23.TIPO="C")(201@.S3="3")(202@.B1!="X")(INTRA!="X") -JOIN MOV INTO NUMREG==NUMREG -JOIN 20 TO MOV INTO TIPOCF==TIPO CODCF==CODCF -JOIN %IVA ALIAS 201 INTO CODTAB==CODIVA -JOIN %STA TO CLIFO ALIAS 202 INTO CODTAB==STATOCF - \ No newline at end of file diff --git a/src/cg/cg7500f.rep b/src/cg/cg7500f.rep deleted file mode 100644 index 4717be90a..000000000 --- a/src/cg/cg7500f.rep +++ /dev/null @@ -1,132 +0,0 @@ - - - Dichiarazione IVA Quadro VE - Intento - -
- - "Pag. " +#PAGE - - -
-
- MESSAGE RESET,F1 - - - #SYSTEM.RAGSOC - - - "Data di Stampa: " +#SYSTEM.DATE - - - "ELENCO OPERAZIONI NON IMPONIBILI A SEGUITO DI DICHIARAZIONI DI INTENTO - " +#ANNO - -
- -
- -
-
- - - -
-
- - #B1.5 - - - - #B1.15 - - - - #B1.25 - - - #B1.30 - - - #B1.35 - - - #B1.40 - - - #B1.105 - - - - MESSAGE ADD,F1.100 - -
- USE RMOVIVA SELECT (23.ANNOIVA=#ANNO)(23.TIPO="C")(201@.S1="NI")(201@.S2="21") -JOIN MOV INTO NUMREG==NUMREG -JOIN 20 TO MOV INTO TIPOCF==TIPO CODCF==CODCF -JOIN %IVA ALIAS 201 INTO CODTAB==CODIVA -JOIN %STA TO CLIFO ALIAS 202 INTO CODTAB==STATOCF - \ No newline at end of file diff --git a/src/cg/cg7500g.rep b/src/cg/cg7500g.rep deleted file mode 100644 index 9e43f26c2..000000000 --- a/src/cg/cg7500g.rep +++ /dev/null @@ -1,132 +0,0 @@ - - - Dichiarazione IVA Quadro VE - Altri NI - -
- - "Pag. " +#PAGE - - -
-
- MESSAGE RESET,F1 - - - #SYSTEM.RAGSOC - - - "Data di Stampa: " +#SYSTEM.DATE - - - "ELENCO ALTRE OPERAZIONI NON IMPONIBILI - " +#ANNO - -
- -
- -
-
- - - -
-
- - #B1.5 - - - - #B1.15 - - - - #B1.25 - - - #B1.30 - - - #B1.35 - - - #B1.40 - - - #B1.105 - - - - MESSAGE ADD,F1.100 - -
- USE RMOVIVA SELECT (23.ANNOIVA=#ANNO)(23.TIPO="C")(201@.S1="NI")(201@.S2="22") -JOIN MOV INTO NUMREG==NUMREG -JOIN 20 TO MOV INTO TIPOCF==TIPO CODCF==CODCF -JOIN %IVA ALIAS 201 INTO CODTAB==CODIVA -JOIN %STA TO CLIFO ALIAS 202 INTO CODTAB==STATOCF - \ No newline at end of file diff --git a/src/cg/cg7500h.rep b/src/cg/cg7500h.rep deleted file mode 100644 index b8efa7aaa..000000000 --- a/src/cg/cg7500h.rep +++ /dev/null @@ -1,132 +0,0 @@ - - - Dichiarazione IVA Quadro VE - Esenti Art. 10 - -
- - "Pag. " +#PAGE - - -
-
- MESSAGE RESET,F1 - - - #SYSTEM.RAGSOC - - - "Data di Stampa: " +#SYSTEM.DATE - - - "ELENCO OPERAZIONI ESENTI (art. 10) - " +#ANNO - -
- -
- -
-
- - - -
-
- - #B1.5 - - - - #B1.15 - - - - #B1.25 - - - #B1.30 - - - #B1.35 - - - #B1.40 - - - #B1.105 - - - - MESSAGE ADD,F1.100 - -
- USE RMOVIVA SELECT (23.ANNOIVA=#ANNO)(23.TIPO="C")(201@.S1="ES")((201@.S2="B2")||(201@.S2="B5")) -JOIN MOV INTO NUMREG==NUMREG -JOIN 20 TO MOV INTO TIPOCF==TIPO CODCF==CODCF -JOIN %IVA ALIAS 201 INTO CODTAB==CODIVA -JOIN %STA TO CLIFO ALIAS 202 INTO CODTAB==STATOCF - \ No newline at end of file diff --git a/src/cg/cg7500i.rep b/src/cg/cg7500i.rep deleted file mode 100644 index 8a823fed8..000000000 --- a/src/cg/cg7500i.rep +++ /dev/null @@ -1,132 +0,0 @@ - - - Dichiarazione IVA Quadro VE - NS ART. 7 A 7-sep - -
- - "Pag. " +#PAGE - - -
-
- MESSAGE RESET,F1 - - - #SYSTEM.RAGSOC - - - "Data di Stampa: " +#SYSTEM.DATE - - - "ELENCO OPERAZIONI NON SOGGETTE ALL'IMPOSTA AI SENSI DEGLI ARTICOLI DA 7 A 7 -septies" +#ANNO - -
- -
- -
-
- - - -
-
- - #B1.5 - - - - #B1.15 - - - - #B1.25 - - - #B1.30 - - - #B1.35 - - - #B1.40 - - - #B1.105 - - - - MESSAGE ADD,F1.100 - -
- USE RMOVIVA SELECT (23.ANNOIVA=#ANNO)(23.TIPO="C")(201@.S1="ES")(201@.S2="B6") -JOIN MOV INTO NUMREG==NUMREG -JOIN 20 TO MOV INTO TIPOCF==TIPO CODCF==CODCF -JOIN %IVA ALIAS 201 INTO CODTAB==CODIVA -JOIN %STA TO CLIFO ALIAS 202 INTO CODTAB==STATOCF - \ No newline at end of file diff --git a/src/cg/cg7500l.rep b/src/cg/cg7500l.rep deleted file mode 100644 index 2373bfc11..000000000 --- a/src/cg/cg7500l.rep +++ /dev/null @@ -1,172 +0,0 @@ - - - Dichiarazione IVA Quadro VE - Rev.Charge - -
- - "Pag. " +#PAGE - - -
-
- MESSAGE RESET,F1 - - - #SYSTEM.RAGSOC - - - "Data di Stampa: " +#SYSTEM.DATE - - - "ELENCO OPERAZIONI CON APPLICAZIONE DEL REVERSE CHARGE - " +#ANNO - -
- -
- -
-
- - - - - - - - - - - - - - - - - - - -
-
- - #B1.5 - - - - #B1.15 - - - - #B1.25 - - - #B1.30 - - - #B1.35 - - - #B1.40 - - - #B1.105 - - - #B1.115 - -
  • -
  • -
  • -
  • -
  • -
  • -
  • -
  • -
  • - - - - MESSAGE ADD,F1.100 - - - #B1.115 - -
  • - USE RMOVIVA SELECT (23.ANNOIVA=#ANNO)(23.TIPO="C")(201@.S2E;="31")(201@.S2C;="38") -JOIN MOV INTO NUMREG==NUMREG -JOIN 20 TO MOV INTO TIPOCF==TIPO CODCF==CODCF -JOIN %IVA ALIAS 201 INTO CODTAB==CODIVA -JOIN %STA TO CLIFO ALIAS 202 INTO CODTAB==STATOCF -JOIN 26 TO MOV INTO CODCAUS==CODCAUS - \ No newline at end of file diff --git a/src/cg/cg7500m.rep b/src/cg/cg7500m.rep deleted file mode 100644 index a42bb61aa..000000000 --- a/src/cg/cg7500m.rep +++ /dev/null @@ -1,141 +0,0 @@ - - - Dichiarazione IVA Quadro VE - Terremotati - -
    - - "Pag. " +#PAGE - - -
    -
    - MESSAGE RESET,F1 - - - #SYSTEM.RAGSOC - - - "Data di Stampa: " +#SYSTEM.DATE - - - "ELENCO Operazioni non soggette all\imposta effettuate nei confronti dei terremotati - " +#ANNO - -
    - -
    - -
    -
    - - - -
    -
    - - #B1.5 - - - - #B1.15 - - - - #B1.25 - - - #B1.30 - - - #B1.35 - - - #B1.40 - - - #B1.105 - - - MESSAGE ADD,F1.100 - - - #B1.115 - -
    - USE RMOVIVA SELECT (23.ANNOIVA=#ANNO)(23.TIPO="C")(201@.S2="25") -JOIN MOV INTO NUMREG==NUMREG -JOIN 20 TO MOV INTO TIPOCF==TIPO CODCF==CODCF -JOIN %IVA ALIAS 201 INTO CODTAB==CODIVA -JOIN %STA TO CLIFO ALIAS 202 INTO CODTAB==STATOCF -JOIN 26 TO MOV INTO CODCAUS==CODCAUS - \ No newline at end of file diff --git a/src/cg/cg7500n.rep b/src/cg/cg7500n.rep deleted file mode 100644 index a81e578cd..000000000 --- a/src/cg/cg7500n.rep +++ /dev/null @@ -1,114 +0,0 @@ - - - fatture in split - -
    - - - "Ditta: " +#SYSTEM.RAGSOC - - - "Data di Stampa: " +#SYSTEM.DATE+" - Pag. "+#PAGE - - - - "Lista Fatture emesse in Split Payment nel periodo: " +#ANNO - - - - - - - - - - - - -
    -
    - - MESSAGE RESET,F1 -
    -
    - RMOVIVA.CODIVA - - MESSAGE RESET,F2 - - - RMOVIVA.CODIVA - - - MESSAGE TABLEREAD,%IVA,#10,S0 - -
    -
    -
    - - - RMOVIVA.NUMREG - - - MOV.DATAREG - - - MOV.CODCAUS - - - MOV.REG - - - MOV.CODCF - - - - CLIFO.RAGSOC - - - RMOVIVA.CODIVA - - - RMOVIVA.IMPONIBILE - MESSAGE ADD,F2.100 - - - RMOVIVA.IMPOSTA - MESSAGE ADD,F2.200 - - - MOV.SPLITPAY - - - CLIFO.SPLITPAY - -
    -
    -
    - - - - -
    -
    - - - - #H2.10 - - - #H2.20 - - - MESSAGE ADD,F1.100 - - - MESSAGE ADD,F1.200 - -
    - USE RMOVIVA SELECT ((MOV.SPLITPAY="S")||((MOV.SPLITPAY="")(20.SPLITPAY="X")))(MOV.ANNOIVA=#ANNO) -BY RMOVIVA.CODIVA 23.DATAREG -JOIN MOV INTO NUMREG==NUMREG -JOIN CLIFO TO MOV INTO TIPOCF==TIPO CODCF==CODCF - \ No newline at end of file