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

Patch level : 12.0 964

Browse Source 
Files correlati     : ba0.exe f90.exe f90100d.msk f90200a.msk f90300a.msk f90300b.msk f181.dir f181.trr f181.des f183.dir f183.trr f183.des
Commento            :
- Aumentato campo FILENAME nelle tabelle.
- Aggiunto alle cat. annessi se obbligatorio.
- Aggiunto controllo annessi obbligatori in diagnostica.
- Corretta esportazione IVA per categorie annessi: ora prende il nome della cat.
- Implementati nuovi metodi per le categorie doc.
- Modificati sheet categorie e annessi
- Dopo la conferma del nuovo annesso la maschera non usciva.
- Ora gli annessi sono univoci per ogni categoria "padre"
- Aggiunto controllo univocita' annesso in inserimento
- Modificata finestra nuovo annesso utilizzata anche per modificare una cat. annesso esistente
- Semplificato notevolmente riempimento sheet annessi
- Tolta colonna inutilizzata nelle categorie documentali
- Aggiunta possibilita' di modificare i file e annessi (solo alcuni campi)
- Durante l'inserimento di un file annesso non viene piu' richiesta la cat. padre poiche' non avrebbe senso, visto che e' il programma che deve riconoscere a quale cat. appartiene, quindi viene presa in automatico, e caricati autom. le cat annessi.
- Aggiunto controllo esistenza file annessi come per i doc.
- Aggiunti test sulle classi per le categorie documentali.
This commit is contained in:
Simone Palacino 2020-05-28 16:33:29 +02:00
parent fdf4bd821f
commit d6bef9b4e2
20 changed files with 750 additions and 307 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
build/f90.vcxproj
View File

@ -233,10 +233,6 @@
<ExcludedFromBuild Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'">true</ExcludedFromBuild> <ExcludedFromBuild Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'">true</ExcludedFromBuild>
</SqlCompiler> </SqlCompiler>
</ItemGroup> </ItemGroup>
<ItemGroup>
<DesCompiler Include="..\src\f9\d181.des" />
<DesCompiler Include="..\src\f9\d183.des" />
</ItemGroup>
<ItemGroup> <ItemGroup>
<DirCompiler Include="..\src\f9\f181.dir" /> <DirCompiler Include="..\src\f9\f181.dir" />
<DirCompiler Include="..\src\f9\f183.dir" /> <DirCompiler Include="..\src\f9\f183.dir" />

8
build/f90.vcxproj.filters
View File

@ -118,14 +118,6 @@
<Filter>SQL</Filter> <Filter>SQL</Filter>
</SqlCompiler> </SqlCompiler>
</ItemGroup> </ItemGroup>
<ItemGroup>
<DesCompiler Include="..\src\f9\d181.des">
<Filter>Recdesc</Filter>
</DesCompiler>
<DesCompiler Include="..\src\f9\d183.des">
<Filter>Recdesc</Filter>
</DesCompiler>
</ItemGroup>
<ItemGroup> <ItemGroup>
<DirCompiler Include="..\src\f9\f181.dir"> <DirCompiler Include="..\src\f9\f181.dir">
<Filter>Recdesc</Filter> <Filter>Recdesc</Filter>

2
exe/recdesc/f181.dir
View File

@ -1,3 +1,3 @@
181 181
0 0
$docf9|3|3|96|0|Associazione doc cartacei / mov per f9||| $docf9|3|6|132|0|Associazione doc cartacei / mov per f9|||

2
exe/recdesc/f181.trr
View File

@ -1,7 +1,7 @@
181 181
4 4
NUMREG|3|7|0|Numero di registrazione associato NUMREG|3|7|0|Numero di registrazione associato
FILENAME|1|64|0|Nome del file (senza indirizzo) FILENAME|1|100|0|Nome del file (senza indirizzo)
LOADDATE|5|8|0|Data caricamento LOADDATE|5|8|0|Data caricamento
USER|1|16|0|Utente che ha caricato il file USER|1|16|0|Utente che ha caricato il file
3 3

2
exe/recdesc/f183.dir
View File

@ -1,3 +1,3 @@
183 183
0 0
$annessif9|9|9|116|0|Tabella file annessi F9||| $annessif9|1|1|152|0|Tabella file annessi F9|||

2
exe/recdesc/f183.trr
View File

@ -1,7 +1,7 @@
183 183
6 6
NUMREG|3|7|0|Numero di registrazione associato NUMREG|3|7|0|Numero di registrazione associato
FILENAME|1|64|0|Nome del file (senza indirizzo) FILENAME|1|100|0|Nome del file (senza indirizzo)
CATDOCPAD|1|10|0|Categoria documentale padre (appartenenza annesso) CATDOCPAD|1|10|0|Categoria documentale padre (appartenenza annesso)
CATDOCANN|1|10|0|Categoria documentale annesso CATDOCANN|1|10|0|Categoria documentale annesso
LOADDATE|5|8|0|Data caricamento LOADDATE|5|8|0|Data caricamento

2
src/f9/f181.dir
View File

@ -1,3 +1,3 @@
181 181
0 0
$docf9|3|3|96|0|Associazione doc cartacei / mov per f9||| $docf9|3|6|132|0|Associazione doc cartacei / mov per f9|||

2
src/f9/f181.trr
View File

@ -1,7 +1,7 @@
181 181
4 4
NUMREG|3|7|0|Numero di registrazione associato NUMREG|3|7|0|Numero di registrazione associato
FILENAME|1|64|0|Nome del file (senza indirizzo) FILENAME|1|100|0|Nome del file (senza indirizzo)
LOADDATE|5|8|0|Data caricamento LOADDATE|5|8|0|Data caricamento
USER|1|16|0|Utente che ha caricato il file USER|1|16|0|Utente che ha caricato il file
3 3

2
src/f9/f183.dir
View File

@ -1,3 +1,3 @@
183 183
0 0
$annessif9|9|9|116|0|Tabella file annessi F9||| $annessif9|1|1|152|0|Tabella file annessi F9|||

2
src/f9/f183.trr
View File

@ -1,7 +1,7 @@
183 183
6 6
NUMREG|3|7|0|Numero di registrazione associato NUMREG|3|7|0|Numero di registrazione associato
FILENAME|1|64|0|Nome del file (senza indirizzo) FILENAME|1|100|0|Nome del file (senza indirizzo)
CATDOCPAD|1|10|0|Categoria documentale padre (appartenenza annesso) CATDOCPAD|1|10|0|Categoria documentale padre (appartenenza annesso)
CATDOCANN|1|10|0|Categoria documentale annesso CATDOCANN|1|10|0|Categoria documentale annesso
LOADDATE|5|8|0|Data caricamento LOADDATE|5|8|0|Data caricamento

168
src/f9/f90200.cpp
View File

@ -6,6 +6,7 @@
#include "../fp/fplib.h" #include "../fp/fplib.h"
#include "f901tab.h" #include "f901tab.h"
#include "f90100.h" #include "f90100.h"
#include "urldefid.h"
TString escape(const char* str); TString escape(const char* str);
@ -15,7 +16,34 @@ TString escape(const char* str);
class TF9_categorie_doc_msk : public TAutomask class TF9_categorie_doc_msk : public TAutomask
{ {
std::unique_ptr<TArray_sheet> _annessi_sheet; class TNew_annesso_msk : public TMask
{
public:
void edit_mode(const bool edit = true)
{
enable(101, !edit);
}
void fill_field(const TString& nome_ann, const TString& descr, const TString& tipo_ann, const bool obblig)
{
set(101, nome_ann);
set(102, descr);
set(103, tipo_ann);
set(104, obblig);
}
TNew_annesso_msk(const char* title) : TMask(title, 1, 78, 13)
{
add_button_tool(DLG_OK, "~Conferma", TOOL_OK);
add_button_tool(DLG_NULL, "", 0);
add_button_tool(DLG_CANCEL, "~Annulla", TOOL_CANCEL);
add_string (101, 0, "Nome tipo annesso:", 1, 1, 10);
add_string (102, 0, "Descrizione: ", 1, 2, 30);
add_list (103, 0, "Tipologia annesso:", 1, 3, 21, "", "DC|RC", "Annesso Cartaceo|Prospetto Rev. Charge");
add_boolean (104, 0, "Obbligatorio: ", 1, 4);
}
};
std::shared_ptr<TArray_sheet> _annessi_sheet;
TRecord_categorie _categorie_doc; TRecord_categorie _categorie_doc;
bool on_field_event(TOperable_field& o, TField_event e, long jolly) override; bool on_field_event(TOperable_field& o, TField_event e, long jolly) override;
@ -23,11 +51,12 @@ class TF9_categorie_doc_msk : public TAutomask
void check_spell() const; void check_spell() const;
void fill_annessi(const TString& catdoc); void fill_annessi(const TString& catdoc);
void fill_annessi(const TString_array& annessi);
void load_table() const; void load_table() const;
void salva_tabella() const; void salva_tabella() const;
public: public:
static void correct_spell_catdoc(TString& catdoc);
TF9_categorie_doc_msk() : TAutomask("f90200a") { load_table(); } TF9_categorie_doc_msk() : TAutomask("f90200a") { load_table(); }
}; };
@ -60,24 +89,37 @@ bool TF9_categorie_doc_msk::on_field_event(TOperable_field& o, TField_event e, l
{ {
TSheet_field& sf = sfield(S_CLASSDOC); TSheet_field& sf = sfield(S_CLASSDOC);
const TString catdoc_padre(sf.row(sf.selected()).get(1)); const TString catdoc_padre(sf.row(sf.selected()).get(1));
const TString tipoann = sf.row(sf.selected()).get(cid2index(F_OPERCEE));
if (!tipoann.empty())
{
warning_box("Impossibile visualizzare gli annessi di una categoria annesso.");
break;
}
fill_annessi(catdoc_padre); fill_annessi(catdoc_padre);
int key; int key;
while ((key = _annessi_sheet->run()) != K_ESC) while ((key = _annessi_sheet->run()) != K_ESC)
{ {
if (key == K_INS) if (key == K_INS) // Voglio inserire un nuovo annesso
{ {
TArray_sheet* catd = _categorie_doc.get_sheet_catdocs().get(); _categorie_doc.reload();
if (catd->run() == K_ENTER) TString title; title << "Nuovo annesso per " << catdoc_padre;
TNew_annesso_msk new_ann(title);
while(new_ann.run() == K_ENTER)
{ {
_categorie_doc.add_annesso(catdoc_padre, catd->row(catd->selected()).get(0)); TString catann = new_ann.get(101);
if (catann.empty())
{
warning_box("Inserire il nome tipo annesso");
continue;
}
TCategorie_doc::annesso ann;
if (!_categorie_doc.get_ann(catann, ann))
{
const TString& descr = new_ann.get(102);
const TString& tipo = new_ann.get(103);
const bool obblig = new_ann.get_bool(104);
correct_spell_catdoc(catann);
_categorie_doc.add_annesso(catdoc_padre, catann, descr, tipo, obblig);
fill_annessi(catdoc_padre); fill_annessi(catdoc_padre);
} }
else
warning_box("E' gia' presente un annesso con lo stesso nome per la categoria %s", (const char*)catdoc_padre);
break;
}
} }
else if (key == K_DEL) else if (key == K_DEL)
{ {
@ -88,11 +130,34 @@ bool TF9_categorie_doc_msk::on_field_event(TOperable_field& o, TField_event e, l
fill_annessi(catdoc_padre); fill_annessi(catdoc_padre);
} }
} }
else if(key == K_CTRL+'F' || key == K_ENTER) // EDIT
{
//_categorie_doc.reload();
TString title; title << "Modifica annesso per " << catdoc_padre;
TNew_annesso_msk new_ann(title);
new_ann.edit_mode();
TToken_string& r = _annessi_sheet->row(_annessi_sheet->selected());
new_ann.fill_field(r.get(0), r.get(1), r.get(2), r.get_bool(3));
if (new_ann.run() == K_ENTER)
{
const TString catann = new_ann.get(101);
//TCategorie_doc::annesso ann;
/*if (!_categorie_doc.get_ann(catann, ann))
{*/
const TString& descr = new_ann.get(102);
const TString& tipo = new_ann.get(103);
const bool obblig = new_ann.get_bool(104);
//correct_spell_catdoc(catann);
_categorie_doc.del_annesso(catdoc_padre, catann);
_categorie_doc.add_annesso(catdoc_padre, catann, descr, tipo, obblig);
fill_annessi(catdoc_padre);
//}
}
}
} }
} }
default: break; default: break;
} }
return true; return true;
} }
@ -102,9 +167,8 @@ bool TF9_categorie_doc_msk::on_key(KEY key)
{ {
TSheet_field& sf = sfield(S_CLASSDOC); TSheet_field& sf = sfield(S_CLASSDOC);
sf.hide(); sf.hide();
int row = sf.selected();
TString_array& arr = sf.rows_array(); TString_array& arr = sf.rows_array();
arr.destroy(row, true); arr.destroy(sf.selected(), true);
sf.force_update(); sf.force_update();
sf.show(); sf.show();
} }
@ -114,59 +178,23 @@ bool TF9_categorie_doc_msk::on_key(KEY key)
void TF9_categorie_doc_msk::check_spell() const void TF9_categorie_doc_msk::check_spell() const
{ {
TSheet_field& sf = sfield(S_CLASSDOC); TSheet_field& sf = sfield(S_CLASSDOC);
sf.hide();
FOR_EACH_SHEET_ROW(sf, nr, row) FOR_EACH_SHEET_ROW(sf, nr, row)
{ {
TString start; TString catdoc = row->get(F_CATDOC - 101);
TString catdoc = start = row->get(F_CATDOC - 101); correct_spell_catdoc(catdoc);
catdoc.trim();
catdoc.upper();
std::string ss = (const char*)catdoc;
for (size_t i = 0; i < ss.size(); ++i)
{
if (!(ss[i] >= 'A' && ss[i] <= 'Z' || ss[i] >= '0' && ss[i] <= '9' || ss[i] == '_'))
ss.erase(i--, 1);
}
catdoc = ss.c_str();
row->add(catdoc, 1); row->add(catdoc, 1);
if (catdoc != start)
sf.force_update();
} }
sf.force_update();
sf.show();
} }
void TF9_categorie_doc_msk::fill_annessi(const TString& catdoc) void TF9_categorie_doc_msk::fill_annessi(const TString& catdoc)
{ {
TRecord_categorie annessi(TRecord_categorie::annessi); TCategorie_doc d;
TToken_string r; d.set_mode_sheet(6);
if (_annessi_sheet == nullptr) _annessi_sheet = d.get_sheet_ann(catdoc);
_annessi_sheet = make_unique<TArray_sheet>(-1, -1, 78, 13, "Annessi", "Categoria\nDocumento (Codice)@15|Descrizione@26", 6); _annessi_sheet->add_button(DLG_EDIT, TR("~Modifica"), K_CTRL + 'F', TOOL_EDIT);
_annessi_sheet->destroy();
annessi.put("CATDOC", catdoc);
for(bool ok = annessi.read(); ok; ok = annessi.next())
{
_categorie_doc.put("NAME", annessi.get("NAME"));
_categorie_doc.read(true);
r.cut(0);
r.add(annessi.get("NAME"), 0);
r.add(_categorie_doc.get("DESCR"));
_annessi_sheet->add(r);
}
}
void TF9_categorie_doc_msk::fill_annessi(const TString_array& annessi)
{
TToken_string r;
if (_annessi_sheet == nullptr)
_annessi_sheet = make_unique<TArray_sheet>(-1, -1, 78, 13, "Annessi", "Categoria\nDocumento (Codice)@15|Descrizione@26", 6);
_annessi_sheet->destroy();
FOR_EACH_ARRAY_ITEM(annessi, nr, row)
{
_categorie_doc.put("NAME", ((TToken_string*)row)->get(0));
_categorie_doc.read();
r.cut(0);
r.add(((TToken_string*)row)->get(0), 0);
r.add(_categorie_doc.get("DESCR"));
_annessi_sheet->add(r);
}
} }
void TF9_categorie_doc_msk::load_table() const void TF9_categorie_doc_msk::load_table() const
@ -178,13 +206,12 @@ void TF9_categorie_doc_msk::load_table() const
int idx = 0; int idx = 0;
while (true) while (true)
{ {
const TString& appo = ini_get_string(CONFIG_DITTA, "F9", "CATDOC", "", idx++); TToken_string appo(ini_get_string(CONFIG_DITTA, "F9", "CATDOC", "", idx++));
if (appo == "STOP" || appo.empty()) /* STOP: Riga terminatrice */ if (appo == "STOP" || appo.empty()) /* STOP: Riga terminatrice */
break; break;
TToken_string& row = sf.row(-1); TToken_string& row = sf.row(-1);
row = appo; row = appo;
} }
sf.show(); sf.show();
sf.force_update(); sf.force_update();
} }
@ -213,6 +240,21 @@ void TF9_categorie_doc_msk::salva_tabella() const
load_table(); load_table();
} }
void TF9_categorie_doc_msk::correct_spell_catdoc(TString& catdoc)
{
catdoc.trim();
catdoc.upper();
std::string ss = (const char*)catdoc;
for (size_t i = 0; i < ss.size(); ++i)
{
if (!(ss[i] >= 'A' && ss[i] <= 'Z' || ss[i] >= '0' && ss[i] <= '9' || ss[i] == '_'))
ss.erase(i--, 1);
}
catdoc = ss.c_str();
}
/////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////
// TF9_categorie_doc // TF9_categorie_doc
@ -256,7 +298,6 @@ void TF9_categorie_doc::main_loop()
DRT_CAUSSO ", " DRT_CAUSSO ", "
DRT_CAUSCON ", " DRT_CAUSCON ", "
DRT_TIPOCAU ", " DRT_TIPOCAU ", "
DRT_TIPOMOV ", "
DRT_OPCEE ")\nVALUES('" << DRT_OPCEE ")\nVALUES('" <<
F9CONF.get_ambiente() << "', '" << F9CONF.get_ambiente() << "', '" <<
row->get(1) << "', '" << // Catdoc row->get(1) << "', '" << // Catdoc
@ -265,7 +306,6 @@ void TF9_categorie_doc::main_loop()
row->get(4) << "', '" << // Causale sost. row->get(4) << "', '" << // Causale sost.
escape(row->get(5)) << "', '" << // Causale cont escape(row->get(5)) << "', '" << // Causale cont
escape(row->get(6)) << "', '" << // Tipo caus. cont escape(row->get(6)) << "', '" << // Tipo caus. cont
escape(row->get(7)) << "', '" << // Tipo mov.
row->get(8) << "');\n"; // "Operat. CEE" row->get(8) << "');\n"; // "Operat. CEE"
ok &= fp_db().sq_set_exec(query, false) && fp_db().sq_commit(); ok &= fp_db().sq_set_exec(query, false) && fp_db().sq_commit();
if (!ok) if (!ok)

1
src/f9/f90200a.h
View File

@ -9,4 +9,3 @@
#define F_CAUSSOS 105 #define F_CAUSSOS 105
#define F_CAUSCONT 106 #define F_CAUSCONT 106
#define F_TIPOCAUSCONT 107 #define F_TIPOCAUSCONT 107
#define F_OPERCEE 108

11
src/f9/f90200a.uml
View File

@ -62,14 +62,13 @@ BEGIN
ITEM "Causale per\nSostitutiva (TD01...)@25" ITEM "Causale per\nSostitutiva (TD01...)@25"
ITEM "Causale\nContabile@8" ITEM "Causale\nContabile@8"
ITEM "Tipo\nDocumento@6" ITEM "Tipo\nDocumento@6"
ITEM "Classificazione\nAnnesso@14"
END END
ENDPAGE ENDPAGE
ENDMASK ENDMASK
PAGE "Righe doc" -1 -1 78 13 PAGE "class doc" -1 -1 78 13
BOOLEAN F_SELCLASS BOOLEAN F_SELCLASS
BEGIN BEGIN
@ -133,14 +132,6 @@ BEGIN
FLAG "U" FLAG "U"
END END
LIST F_OPERCEE 2 14
BEGIN
PROMPT 1 8 "Operatore CEE"
ITEM "|"
ITEM "DC|Doc. cartaceo"
ITEM "RC|Reverse Charge"
END
ENDPAGE ENDPAGE
TOOLBAR "topbar" 0 0 0 2 TOOLBAR "topbar" 0 0 0 2

155
src/f9/f90300.cpp
View File

@ -39,6 +39,9 @@ class TImport_msk : public TAutomask
const char* select_catdoc(); const char* select_catdoc();
public: public:
void set_fields(const TString& impaddress, const TString& impnumreg, bool isannesso = false, const TString& catannpadre = "",
const TString& catdocann = "");
TImport_msk(); TImport_msk();
}; };
@ -50,9 +53,25 @@ bool TImport_msk::on_field_event(TOperable_field& o, TField_event e, long jolly)
if (e == fe_modify) if (e == fe_modify)
{ {
const bool on = o.mask().get_bool(F_ISANNESSO); const bool on = o.mask().get_bool(F_ISANNESSO);
o.mask().enable(F_CATANNPADRE, on);
o.mask().enable(F_CATDOCANN, on); o.mask().enable(F_CATDOCANN, on);
} }
break;
case F_IMPNUMREG:
if(e == fe_modify)
{
const std::shared_ptr<TCategorie_doc::classe_doc> c = categorie_doc().mov2cat(o.get_int());
if (c != nullptr)
{
set(F_CATANNPADRE, c->catdoc);
set(F_CATDOCANN, "");
}
else
{
message_box("Questo tipo di registrazione non corrisponde a nessuna delle categorie documentali inserite.");
set(F_CATANNPADRE, "");
set(F_CATDOCANN, "");
}
}
default: break; default: break;
} }
return true; return true;
@ -61,7 +80,8 @@ bool TImport_msk::on_field_event(TOperable_field& o, TField_event e, long jolly)
bool TImport_msk::catdocann_handler(TMask_field& field, KEY key) bool TImport_msk::catdocann_handler(TMask_field& field, KEY key)
{ {
static const char* msg_notexist = "Non esistono tipologie di annessi per questa categoria documentale."; static const char* msg_notexist = "Non esistono tipologie di annessi per questa categoria documentale.";
static const char* msg_inspadre = "Inserire prima la cat. doc. padre."; static const char* msg_inspadre = "Questa registrazione non e' riconosciuta in nessuna categoria documentale.\nImpossible inserire un annesso.\n"
"Si prega di inserire prima una cat. documentale che comprenda questo tipo di registrazione\naggiungendo anche eventuali tipologie di annessi.";
TImport_msk& msk = (TImport_msk&)field.mask(); TImport_msk& msk = (TImport_msk&)field.mask();
if (key == K_TAB && field.dirty() && field.full()) if (key == K_TAB && field.dirty() && field.full())
{ {
@ -149,6 +169,16 @@ const char* TImport_msk::select_catdoc()
return ""; return "";
} }
void TImport_msk::set_fields(const TString& impaddress, const TString& impnumreg, const bool isannesso,
const TString& catannpadre, const TString& catdocann)
{
set(F_IMPADDRESS, impaddress);
set(F_IMPNUMREG, impnumreg);
set(F_ISANNESSO, isannesso);
set(F_CATANNPADRE, catannpadre);
set(F_CATDOCANN, catdocann);
}
TImport_msk::TImport_msk(): TAutomask("f90300b") TImport_msk::TImport_msk(): TAutomask("f90300b")
{ {
TMask::set_handler(F_CATANNPADRE, catannpadre_handler); TMask::set_handler(F_CATANNPADRE, catannpadre_handler);
@ -171,10 +201,20 @@ class TGestione_doc_cartacei_f9_msk : public TAutomask
TString numreg; TString numreg;
TString user; TString user;
}; };
struct ann_cart_t
{
TString numreg;
TString filename;
TString catdocpad;
TString catdocann;
TString loaddate;
TString user;
};
const TString& _addr_cart; // Indirizzo cartella doc. cartacei F9 const TString& _addr_cart; // Indirizzo cartella doc. cartacei F9
std::unique_ptr<std::set<TString>> _extensions; // todo: controllare che con TString funzioni l'ordinamento, quindi la find std::unique_ptr<std::set<TString>> _extensions; // todo: controllare che con TString funzioni l'ordinamento, quindi la find
std::unique_ptr<TImport_msk> _import_msk; std::unique_ptr<TImport_msk> _import_msk;
std::map<TString, doc_cart_t> _list_file; std::map<TString, doc_cart_t> _list_file;
std::map<TString, ann_cart_t> _list_ann;
bool on_field_event(TOperable_field& o, TField_event e, long jolly) override; bool on_field_event(TOperable_field& o, TField_event e, long jolly) override;
@ -182,8 +222,10 @@ class TGestione_doc_cartacei_f9_msk : public TAutomask
static void check_deleted(); static void check_deleted();
bool check_file_exist(const TString& file) const; bool check_file_exist(const TString& file) const;
void delete_file(); void delete_file();
void edit_ann();
void edit_file();
void fill(); void fill();
void fill_annessi() const; void fill_annessi();
void fill_docs(); void fill_docs();
static TToken_string& get_valid_extensions(); static TToken_string& get_valid_extensions();
void load_extensions(); void load_extensions();
@ -215,6 +257,16 @@ bool TGestione_doc_cartacei_f9_msk::on_field_event(TOperable_field& o, TField_ev
case B_CONFIG: case B_CONFIG:
if (e == fe_button) if (e == fe_button)
open_config_win(); open_config_win();
break;
case DLG_USER:
if (e == fe_button)
{
int page = curr_page();
if (!page)
edit_file();
else
edit_ann();
}
default: break; default: break;
} }
return true; return true;
@ -322,17 +374,88 @@ void TGestione_doc_cartacei_f9_msk::delete_file()
fill(); fill();
} }
void TGestione_doc_cartacei_f9_msk::edit_ann()
{
TToken_string& row = sfield(S_ANNESSI).row(sfield(S_ANNESSI).selected());
TImport_msk win;
win.set_caption("Modifica annesso");
TLocalisamfile f9ann(LF_F9ANNESSI);
const char* numreg = row.get(4);
const char* filename = row.get(1);
f9ann.put(F9A_NUMREG, numreg);
f9ann.put(F9A_FILENAME, filename);
f9ann.read();
win.set_fields(TF9_doccart::get_full_path_file_cartaceo(filename), numreg, true, f9ann.get(F9A_CATDOCPAD), f9ann.get(F9A_CATDOCANN));
win.disable(F_IMPADDRESS);
win.disable(F_ISANNESSO);
win.enable(F_CATDOCANN);
if(win.run() == K_ENTER)
{
if (win.get(F_IMPNUMREG) == numreg)
{
f9ann.put(F9A_CATDOCPAD, win.get(F_CATANNPADRE));
f9ann.put(F9A_CATDOCANN, win.get(F_CATDOCANN));
f9ann.write();
f9ann.rewrite();
}
else
{
f9ann.remove();
f9ann.put(F9A_NUMREG, win.get(F_IMPNUMREG));
f9ann.put(F9A_CATDOCPAD, win.get(F_CATANNPADRE));
f9ann.put(F9A_CATDOCANN, win.get(F_CATDOCANN));
f9ann.write();
f9ann.rewrite();
}
message_box("Annesso modificato!");
}
fill_annessi();
}
void TGestione_doc_cartacei_f9_msk::edit_file()
{
TToken_string& row = sfield(S_IMPORTED).row(sfield(S_IMPORTED).selected());
TImport_msk win;
win.set_caption("Modifica documento cartaceo");
TLocalisamfile f9docs(LF_F9DOCS);
const char* numreg = row.get(2);
const char* filename = row.get(1);
f9docs.put(F9C_NUMREG, numreg);
f9docs.read();
win.set_fields(TF9_doccart::get_full_path_file_cartaceo(filename), numreg);
win.disable(F_IMPADDRESS);
win.disable(F_ISANNESSO);
if (win.run() == K_ENTER && win.get(F_IMPNUMREG) != numreg)
{
f9docs.remove();
f9docs.put(F9C_NUMREG, win.get(F_IMPNUMREG));
f9docs.write();
f9docs.rewrite();
message_box("Documento modificato!");
}
fill_docs();
}
void TGestione_doc_cartacei_f9_msk::fill() void TGestione_doc_cartacei_f9_msk::fill()
{ {
fill_docs(); fill_docs();
fill_annessi(); fill_annessi();
} }
void TGestione_doc_cartacei_f9_msk::fill_annessi() const void TGestione_doc_cartacei_f9_msk::fill_annessi()
{ {
std::set<TString> file_err;
TLocalisamfile ann(LF_F9ANNESSI); TLocalisamfile ann(LF_F9ANNESSI);
if(ann.first() == NOERR) if(ann.first() == NOERR)
{ {
const TString& namefile = ann.get(F9A_FILENAME);
const bool not_exist = !check_file_exist(namefile);
if (not_exist)
file_err.insert(namefile);
TLocalisamfile mov(LF_MOV); TLocalisamfile mov(LF_MOV);
TSheet_field& sf = sfield(S_ANNESSI); TSheet_field& sf = sfield(S_ANNESSI);
sf.hide(); sf.hide();
@ -355,11 +478,33 @@ void TGestione_doc_cartacei_f9_msk::fill_annessi() const
row.add(TString(mov.get(MOV_REG)) << "/" << mov.get(MOV_PROTIVA)); // ITEM "Reg./Prot. IVA@10" row.add(TString(mov.get(MOV_REG)) << "/" << mov.get(MOV_PROTIVA)); // ITEM "Reg./Prot. IVA@10"
row.add(mov.get(MOV_DESCR)); // ITEM "Descrizione@20" row.add(mov.get(MOV_DESCR)); // ITEM "Descrizione@20"
row.add(ann.get(F9A_LOADDATE)); // ITEM "Data\nCaricamento@10" row.add(ann.get(F9A_LOADDATE)); // ITEM "Data\nCaricamento@10"
// todo: row.add("") // ITEM "Info (Errori)@25" row.add(not_exist ? "IL FILE NON E' PRESENTE IN ARCHIVIO." : ""); // ITEM "Info (Errori)@25"
_list_ann.insert({ namefile, { numreg, namefile, ann.get(F9A_CATDOCPAD), ann.get(F9A_CATDOCANN), ann.get(F9C_LOADDATE), ann.get(F9C_USER) } });
} while (ann.next() == NOERR); } while (ann.next() == NOERR);
sf.force_update(); sf.force_update();
sf.show(); sf.show();
} }
if (!file_err.empty())
{
int count = 0;
const bool m = (int)file_err.size() == 1;
const char p = m ? 'o' : 'i';
TString msg; msg << (int)file_err.size() << " file non " << (m ? "e'" : "sono") << " stat" << p <<
" trovat" << p << ".\nSi prega di rimuoverl" << p << " dall'elenco\n\nFile non trovat" << p << ":";
for (auto it = file_err.begin(); it != file_err.end(); ++it)
{
if (count++ == 10)
{
msg << "\n" << "...";
break;
}
msg << "\n" << *it << " [Num. Reg.: " << _list_ann.find(*it)->second.numreg << "]";
}
const bool del = warning_box(msg);
}
} }
void TGestione_doc_cartacei_f9_msk::fill_docs() void TGestione_doc_cartacei_f9_msk::fill_docs()

36
src/f9/f90300a.uml
View File

@ -172,8 +172,27 @@ END
ENDPAGE ENDPAGE
TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_USER 2 2
BEGIN
PROMPT 1 1 "Annessi"
PICTURE TOOL_LINK
END
BUTTON DLG_QUIT 2 2
BEGIN
PROMPT 2 1 "Fine"
MESSAGE EXIT,K_QUIT
PICTURE TOOL_QUIT
END
ENPAGE
ENDMASK ENDMASK
PAGE "ANNESSO" -1 -1 78 13 PAGE "ANNESSO" -1 -1 78 13
BOOLEAN F_ASEL BOOLEAN F_ASEL
@ -250,4 +269,21 @@ END
ENDPAGE ENDPAGE
TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_USER 2 2
BEGIN
PROMPT 1 1 "Annessi"
PICTURE TOOL_LINK
END
BUTTON DLG_QUIT 2 2
BEGIN
PROMPT 2 1 "Fine"
MESSAGE EXIT,K_QUIT
PICTURE TOOL_QUIT
END
ENPAGE
ENDMASK ENDMASK

2
src/f9/f90300b.uml
View File

@ -44,7 +44,7 @@ END
STRING F_CATANNPADRE 10 STRING F_CATANNPADRE 10
BEGIN BEGIN
PROMPT 2 5 "Cat.doc. padre" PROMPT 2 5 "Cat.doc. padre"
FLAGS "BD" FLAGS "D"
END END
STRING F_CATDOCANN 10 STRING F_CATDOCANN 10

129
src/f9/f90400.cpp
View File

@ -1,8 +1,14 @@
#include "f90.h"
#include "annessif9.h" #include "annessif9.h"
#include "applicat.h" #include "applicat.h"
#include "f90.h"
#include "f9lib01.h" #include "f9lib01.h"
/**
* \brief Some test for F9 classes
*/
class TF9_test_app : public TSkeleton_application class TF9_test_app : public TSkeleton_application
{ {
public: public:
@ -20,7 +26,7 @@ void TF9_test_app::main_loop()
TString filename = f.get(F9A_FILENAME); TString filename = f.get(F9A_FILENAME);
TString numreg; TString numreg;
for(f.read(_isgteq); (numreg = f.get(F9A_NUMREG)) == search_numreg; f.next()) for (f.read(_isgteq); (numreg = f.get(F9A_NUMREG)) == search_numreg; f.next())
{ {
filename = f.get(F9A_FILENAME); filename = f.get(F9A_FILENAME);
numreg = f.get(F9A_NUMREG); numreg = f.get(F9A_NUMREG);
@ -29,26 +35,6 @@ void TF9_test_app::main_loop()
CHECK(filename == "annmid.pdf" || filename == "annmid2.pdf", "YOU'RE WRONG"); CHECK(filename == "annmid.pdf" || filename == "annmid2.pdf", "YOU'RE WRONG");
} }
// TISAM_recordset FAILS. A sto punto uso il primo.
//TISAM_recordset sta(R"(USE ANNESSIF9 FROM NUMREG=="95223" TO NUMREG=="95223")");
//for (bool ok = sta.move_first(); ok; ok = sta.move_next())
//{
// TString filename = sta.get(F9A_FILENAME).as_string();
// TString numreg = sta.get(F9A_NUMREG).as_string();
// CHECK(numreg == "95223", "isam recordset failed. (EOF)"); // FAILS!
// bool simo = true;
//}
// FAILS
//TF9_doccart doccart;
////const TDate domani("23-05-2020");
//doccart.put_in_doc(F9C_NUMREG, "95755");
//bool ok = doccart.read_doc();
//filename = doccart.get_in_doc(F9C_FILENAME);
//numreg = doccart.get_in_doc(F9C_NUMREG);
//CHECK(numreg == "95755", "Error in line");
//TDate loaddate(doccart.get_in_doc(F9F_LOADDATE));
TF9_doccart d; TF9_doccart d;
TString_array sa; TString_array sa;
CHECK(d.mov2listann(search_numreg, sa) && sa.items() == 2, "COSA STAI LEGGENDO??"); CHECK(d.mov2listann(search_numreg, sa) && sa.items() == 2, "COSA STAI LEGGENDO??");
@ -70,6 +56,105 @@ void TF9_test_app::main_loop()
CHECK(filename == "annmid.pdf" || filename == "annmid2.pdf", "YOU'RE WRONG"); CHECK(filename == "annmid.pdf" || filename == "annmid2.pdf", "YOU'RE WRONG");
//message_box(rec); //message_box(rec);
} }
/////////////////////////
// Preload some cat doc.
if (noyes_box("Attenzione: procedere all'eliminazione e caricamento di categorie documentali e annessi di prova?"))
{
TCategorie_doc preload;
preload.remove_all();
preload.reload();
preload.add_categoria("FATTACQ", "FATTURE DI ACQUISTI", "FTA", "TD01", "", "FA");
preload.add_categoria("FATTVEN", "FATTURE DI VENDITA", "FTV", "TD01", "", "FV");
preload.add_categoria("NOTCREDACQ", "Nota credito di acquisto", "FTA", "TD04", "", "NC");
preload.add_categoria("NOTDEBVEN", "Nota debito di vendita", "FTV", "TD05", "", "ND");
preload.add_categoria("FATTCORR", "Fattura corrispettivi", "FTA", "TD01", "", "CR");
preload.add_categoria("ACQREV", "Fattura acq. con rev. charge", "FTA", "TD01", "052", "FA");
preload.add_annesso("FATTACQ", "GENACQ", "Annesso generico acq", "DC");
preload.add_annesso("FATTVEN", "GENVEN", "Annesso gen. ven.", "DC");
preload.add_annesso("ACQREV", "INTREVC", "Prosp. integr. rev.ch.", "RC", true);
preload.add_annesso("FATTACQ", "LEASING", "Annesso leasing", "DC");
CHECK(preload.get_array_rows().items() > 0, "Errore aggiunta o caricamento categorie documentali.");
TCategorie_doc::annesso annesso;
bool get_ann = preload.get_ann("GENACQ", annesso);
TCategorie_doc::classe_doc get_classe_doc_right{ "ACQREV", "Fattura acq. con rev. charge", "FTA", "TD01", "052", "FA" };
std::shared_ptr<TCategorie_doc::classe_doc> get_classe_doc = preload.get_classe_doc("ACQREV");
CHECK(get_classe_doc->catdoc == get_classe_doc_right.catdoc &&
get_classe_doc->descr == get_classe_doc_right.descr &&
get_classe_doc->class_sost == get_classe_doc_right.class_sost &&
get_classe_doc->caus_sost == get_classe_doc_right.caus_sost &&
get_classe_doc->causcont == get_classe_doc_right.causcont &&
get_classe_doc->tipocaus == get_classe_doc_right.tipocaus, "get_classe_doc failed"
);
std::set<TString> get_name_catdocs = preload.get_name_catdocs();
CHECK(get_name_catdocs.find("FATTACQ") != get_name_catdocs.end() &&
get_name_catdocs.find("FATTVEN") != get_name_catdocs.end() &&
get_name_catdocs.find("NOTCREDACQ") != get_name_catdocs.end() &&
get_name_catdocs.find("NOTDEBVEN") != get_name_catdocs.end() &&
get_name_catdocs.find("FATTCORR") != get_name_catdocs.end() &&
get_name_catdocs.find("ACQREV") != get_name_catdocs.end(), "Get catdocs failed"
);
std::shared_ptr<TCategorie_doc::classe_doc> mov2cat = preload.mov2cat(95752);
CHECK(mov2cat, "mov2cat failed: classe doc is null");
mov2cat = preload.mov2cat(96955); // Rev. charge causale 052
CHECK(mov2cat->causcont == "052", "Error retriving cat.doc. from numreg for causale.");
const TString cat_selected = "FATTACQ";
TCategorie_doc catdoc;
std::shared_ptr<TArray_sheet> annessi = catdoc.get_sheet_ann(cat_selected);
CHECK(annessi->items() == 2, "TCategorie_doc::get_sheet_ann() failed: retrived %d elements instead of 2", (int)annessi->items());
std::shared_ptr<TArray_sheet> sheet_catdocs = catdoc.get_sheet_catdocs();
CHECK(sheet_catdocs->items() == 6, "TCategorie_doc::get_sheet_catdocs() failed: retrived %d elements instead of 6", (int)sheet_catdocs->items());
TRecord_categorie rec(TRecord_categorie::catdocs);
TRecord_categorie rec2(TRecord_categorie::annessi);
rec.put("NAME", "FATTACQ");
rec.read();
TString name = rec.get("NAME");
TString descr = rec.get("DESCR");
TString classdo = rec.get("CLASSDOCSOS");
TString caussos = rec.get("CAUSSOS");
TString causcon = rec.get("CAUSCONT");
TString tipodoc = rec.get("TIPODOC");
CHECK(name == "FATTACQ" && descr.starts_with("FATTURE") && classdo == "FTA" && caussos == "TD01"&& causcon.blank() && tipodoc == "FA", "TRecord_categorie failed to retrieve FATTACQ");
rec2.put("CATDOC", "FATTACQ");
bool ok = rec2.read();
CHECK(ok, "TRecord_categorie (annessi) failed to retrieve annessi FATTACQ");
for (; ok; ok = rec2.next())
{
TString s_catdoc = rec2.get("CATDOC");
TString s_name = rec2.get("NAME");
TString s_descr = rec2.get("DESCR");
TString s_tipoann = rec2.get("TIPOANN");
bool s_obblig = rec2.get("OBBLIG") == "X";
CHECK(s_catdoc == "FATTACQ" && s_tipoann == "DC" && !s_obblig && (s_name == "GENACQ" && s_descr.starts_with("Annesso generico") ||
s_name == "LEASING" && s_descr.starts_with("Annesso lea")),
"TRecord_categorie (annessi) failed to retrive annessi FATTACQ");
}
}
TF9_doccart doccart;
TString old_numreg; old_numreg << 95752;
TFilename doc;
TString_array list_annessi;
vector<annesso_t> vect_annessi;
//TFilename f_doc; f_doc << "asd";
//bool annesso;
//bool doc_ae = doccart.doc_already_exists(f_doc, old_numreg, annesso);
bool movdoc = doccart.mov2doc(old_numreg, doc);
TString msg("Error retriving filename from reg n. "); msg << old_numreg;
CHECK(movdoc && TString(doc.name()) == "ve1300_F01_0000000011_0002237.pdf", (const char*)msg);
old_numreg.cut(0) << 95222; // Doppio annesso
bool movann = doccart.mov2listann(old_numreg, list_annessi);
CHECK(movann && list_annessi.items() == 2, "Error retriving list annessi from numreg %s", (const char*)old_numreg);
bool movannvect = doccart.mov2listann_vect(old_numreg, vect_annessi);
CHECK(movannvect && vect_annessi.size() == 2, "Error retriving vector annessi from numreg %s", (const char*)old_numreg);
message_box("TESTS COMPLETELY SUCCESSFUL"); message_box("TESTS COMPLETELY SUCCESSFUL");
} }

363
src/f9/f9lib01.cpp
View File

@ -41,6 +41,62 @@ const char* TEstrazione::caus_sos(const TLocalisamfile& mov, const TipoIVA iva)
return ""; return "";
} }
void TEstrazione::check_annessi(movimento_t& mov_i, const TString& numreg)
{
TToken_string ann_nexist;
if (!check_annessi_oblig(mov_i.catdoc->catdoc, numreg, ann_nexist))
{
TString msg_annessi_mancanti("Annessi obligatori mancanti: ");
for (int i = 0; i < ann_nexist.items(); ++i)
msg_annessi_mancanti << ann_nexist.get() << " ";
mov_i.err = true;
mov_i.estratto = false;
mov_i.descr_err = msg_annessi_mancanti;
mov_i.descr_estr = movimento_t::annesso_nexist;
}
else
{
const bool loaded = load_annessi(mov_i);
#ifdef DBG
if (loaded)
bool simo = true;
#endif
}
}
bool TEstrazione::check_annessi_oblig(const TString& catdoc, const TString& numreg, TToken_string& ann_nexist)
{
ann_nexist.destroy(-1);
TCategorie_doc categorie;
const TString_array lista_cat_annessi = categorie.get_array_ann(catdoc); // Lista cat annessi
TF9_doccart file_cart;
std::vector<annesso_t> list_file_ann; // Lista file annessi
file_cart.mov2listann_vect(numreg, list_file_ann);
bool ok_ann = true;
FOR_EACH_ARRAY_ITEM(lista_cat_annessi, nr, ann)
{
TCategorie_doc::annesso annesso;
const bool ok_cat = categorie.get_ann(*(TToken_string*)ann, annesso);
if (ok_cat && annesso.obblig)
{
// Controllo che esista l'annesso per questo mov.
bool exist = false;
for (auto f_ann = list_file_ann.begin(); f_ann != list_file_ann.end(); ++f_ann)
{
if (f_ann->catdocann == *(TToken_string*)ann)
{
exist = true;
break;
}
}
ok_ann &= exist;
if (!exist)
ann_nexist.add(*(TToken_string*)ann);
}
}
return ok_ann;
}
bool TEstrazione::check_documento_vendita(const TLocalisamfile& mov, _Out_ bool& exist_doc) bool TEstrazione::check_documento_vendita(const TLocalisamfile& mov, _Out_ bool& exist_doc)
{ {
if (!mov.get(MOV_DPROVV).empty() && !mov.get(MOV_DANNO).empty() && !mov.get(MOV_DCODNUM).empty() && !mov.get(MOV_DNDOC).empty()) if (!mov.get(MOV_DPROVV).empty() && !mov.get(MOV_DANNO).empty() && !mov.get(MOV_DCODNUM).empty() && !mov.get(MOV_DNDOC).empty())
@ -421,6 +477,9 @@ const char* TEstrazione::diagnostica_mov()
mov_i.estratto = cd.get(); mov_i.estratto = cd.get();
mov_i.descr_estr = cd ? movimento_t::no_err : movimento_t::no_catdoc; mov_i.descr_estr = cd ? movimento_t::no_err : movimento_t::no_catdoc;
mov_i.catdoc = cd; mov_i.catdoc = cd;
if (mov_i.catdoc)
check_annessi(mov_i, numreg);
} }
if (mov_i.estratto) if (mov_i.estratto)
{ {
@ -442,11 +501,6 @@ const char* TEstrazione::diagnostica_mov()
mov_i.descr_estr = movimento_t::no_filecart; mov_i.descr_estr = movimento_t::no_filecart;
} }
} }
bool loaded = load_annessi(mov_i);
#ifdef DBG
if (loaded)
bool simo = true;
#endif
} }
} }
ok &= mov_i.err; ok &= mov_i.err;
@ -477,8 +531,10 @@ const char* TEstrazione::diagnostica_mov()
bool simo = true; // Rev charge bool simo = true; // Rev charge
if (it->numreg == 95752) if (it->numreg == 95752)
bool simo = true; // Cartaceo bool simo = true; // Cartaceo
if (it->numreg == 95740) // Annessi if (it->numreg == 95740)
bool simo = true; bool simo = true; // Annessi
if (it->numreg == 95222)
bool simo = true; // Annessi
#endif #endif
/* Controlli per vendite cambiati: /* Controlli per vendite cambiati:
* Elettroniche solo quelle agli italiani, tutti gli altri sono cartacei * Elettroniche solo quelle agli italiani, tutti gli altri sono cartacei
@ -521,6 +577,9 @@ const char* TEstrazione::diagnostica_mov()
mov_i.descr_estr = cd ? movimento_t::no_err : movimento_t::no_catdoc; mov_i.descr_estr = cd ? movimento_t::no_err : movimento_t::no_catdoc;
mov_i.catdoc = cd; mov_i.catdoc = cd;
if (mov_i.catdoc)
check_annessi(mov_i, numreg);
if (!mov_i.catdoc) if (!mov_i.catdoc)
++_stats.fv_nocatdoc; ++_stats.fv_nocatdoc;
if (mov_i.err) if (mov_i.err)
@ -547,11 +606,6 @@ const char* TEstrazione::diagnostica_mov()
mov_i.descr_estr = movimento_t::no_filecart; mov_i.descr_estr = movimento_t::no_filecart;
} }
} }
bool loaded = load_annessi(mov_i);
#ifdef DBG
if (loaded)
bool simo = true;
#endif
} }
ok &= !mov_i.err; ok &= !mov_i.err;
} }
@ -718,61 +772,54 @@ bool TEstrazione::estrazione_iva(bool escluso)
{ {
vector<annesso_t>& ann = it->annessi; vector<annesso_t>& ann = it->annessi;
TCategorie_doc cd; TCategorie_doc cd;
auto classost = [&](const int i)
{
const std::shared_ptr<TCategorie_doc::classe_doc> as = cd.get_classe_doc(ann[i].catdocann);
if (as != nullptr)
return as->class_sost;
return TString("");
};
size_t i = 0; size_t i = 0;
size_t size = ann.size(); size_t size = ann.size();
iva_query.add(IVA_CLASAN1, classost(i)); iva_query.add(IVA_CLASAN1, ann[i].catdocann);
iva_query.add(IVA_NOMF1, ann[i++].filename); iva_query.add(IVA_NOMF1, ann[i++].filename);
// HOW DID MY LIFE COME TO THIS?.... // HOW DID MY LIFE COME TO THIS?....
if (size > i) if (size > i)
{ {
iva_query.add(IVA_CLASAN2, classost(i)); iva_query.add(IVA_CLASAN2, ann[i].catdocann);
iva_query.add(IVA_NOMF2, ann[i++].filename); iva_query.add(IVA_NOMF2, ann[i++].filename);
} }
if (size > i) if (size > i)
{ {
iva_query.add(IVA_CLASAN3, classost(i)); iva_query.add(IVA_CLASAN3, ann[i].catdocann);
iva_query.add(IVA_NOMF3, ann[i++].filename); iva_query.add(IVA_NOMF3, ann[i++].filename);
} }
if (size > i) if (size > i)
{ {
iva_query.add(IVA_CLASAN4, classost(i)); iva_query.add(IVA_CLASAN4, ann[i].catdocann);
iva_query.add(IVA_NOMF4, ann[i++].filename); iva_query.add(IVA_NOMF4, ann[i++].filename);
} }
if (size > i) if (size > i)
{ {
iva_query.add(IVA_CLASAN5, classost(i)); iva_query.add(IVA_CLASAN5, ann[i].catdocann);
iva_query.add(IVA_NOMF5, ann[i++].filename); iva_query.add(IVA_NOMF5, ann[i++].filename);
} }
if (size > i) if (size > i)
{ {
iva_query.add(IVA_CLASAN4, classost(i)); iva_query.add(IVA_CLASAN4, ann[i].catdocann);
iva_query.add(IVA_NOMF4, ann[i++].filename); iva_query.add(IVA_NOMF4, ann[i++].filename);
} }
if (size > i) if (size > i)
{ {
iva_query.add(IVA_CLASAN6, classost(i)); iva_query.add(IVA_CLASAN6, ann[i].catdocann);
iva_query.add(IVA_NOMF6, ann[i++].filename); iva_query.add(IVA_NOMF6, ann[i++].filename);
} }
if (size > i) if (size > i)
{ {
iva_query.add(IVA_CLASAN7, classost(i)); iva_query.add(IVA_CLASAN7, ann[i].catdocann);
iva_query.add(IVA_NOMF7, ann[i++].filename); iva_query.add(IVA_NOMF7, ann[i++].filename);
} }
if (size > i) if (size > i)
{ {
iva_query.add(IVA_CLASAN8, classost(i)); iva_query.add(IVA_CLASAN8, ann[i].catdocann);
iva_query.add(IVA_NOMF8, ann[i++].filename); iva_query.add(IVA_NOMF8, ann[i++].filename);
} }
if (size > i) if (size > i)
{ {
iva_query.add(IVA_CLASAN9, classost(i)); iva_query.add(IVA_CLASAN9, ann[i].catdocann);
iva_query.add(IVA_NOMF9, ann[i++].filename); iva_query.add(IVA_NOMF9, ann[i++].filename);
} }
} }
@ -1002,22 +1049,12 @@ std::shared_ptr<TCategorie_doc::classe_doc> TCategorie_doc::find_tipodoc(const T
for (auto it = _rows.begin(); it != _rows.end(); ++it) for (auto it = _rows.begin(); it != _rows.end(); ++it)
{ {
const std::shared_ptr<classe_doc>& classe = *it; const std::shared_ptr<classe_doc>& classe = *it;
if (classe->causcont.empty() && classe->tipocaus == tipodoc) if (classe->causcont.blank() && classe->tipocaus == tipodoc)
return *it; return *it;
} }
return nullptr; return nullptr;
} }
std::vector<pair<TString, TString>>::iterator TCategorie_doc::find_annesso(const TString& catdoc, const char* catdoc_ann)
{
for (auto it = _annessi.begin(); it != _annessi.end(); ++it)
{
if (it->first == catdoc && it->second == catdoc_ann)
return it;
}
return _annessi.end();
}
std::vector<pair<TString, std::shared_ptr<TArray_sheet>>>::iterator TCategorie_doc::find_sheet_annessi(const TString& catdoc) std::vector<pair<TString, std::shared_ptr<TArray_sheet>>>::iterator TCategorie_doc::find_sheet_annessi(const TString& catdoc)
{ {
for(auto it = _sheets_annessi.begin(); it != _sheets_annessi.end(); ++it) for(auto it = _sheets_annessi.begin(); it != _sheets_annessi.end(); ++it)
@ -1041,15 +1078,16 @@ std::shared_ptr<TCategorie_doc::classe_doc> TCategorie_doc::get_classe_doc(const
void TCategorie_doc::load_all() void TCategorie_doc::load_all()
{ {
_rows.clear(); _rows.clear();
_annessi.clear(); _rows_annessi.clear();
int idx = 0; int idx = 0;
while (true) while (true)
{ {
const TString& appo = ini_get_string(CONFIG_DITTA, INI_PAR_MOD, INI_CATDOC, "", idx++); const TString& appo = ini_get_string(CONFIG_DITTA, INI_PAR_MOD, INI_CATDOC, "", idx++);
if (appo == "STOP" || appo.empty()) /* STOP: Riga terminatrice */ if (appo == "STOP" || appo.blank()) /* STOP: Riga terminatrice */
break; break;
TToken_string row(appo); TToken_string row(appo);
classe_doc cd = { row.get(1), row.get(), row.get(), row.get(), row.get(), row.get(), row.get(), row.get() }; classe_doc cd = { row.get(1), row.get(), row.get(), row.get(), row.get(), row.get() };
_rows.emplace_back(std::make_shared<classe_doc>(cd)); _rows.emplace_back(std::make_shared<classe_doc>(cd));
} }
@ -1057,13 +1095,66 @@ void TCategorie_doc::load_all()
while (true) while (true)
{ {
const TString& appo = ini_get_string(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, "", idx++); const TString& appo = ini_get_string(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, "", idx++);
if (appo == "STOP" || appo.empty()) /* STOP: Riga terminatrice */ if (appo == "STOP" || appo.blank()) /* STOP: Riga terminatrice */
break; break;
TToken_string row(appo); TToken_string row(appo);
_annessi.emplace_back(pair<TString, TString>({ row.get(0), row.get(1) })); annesso ann{ row.get(0), row.get(), row.get(), row.get(), row.get_bool() };
_rows_annessi.insert({ row.get(1), ann });
} }
} }
void TCategorie_doc::save_ann()
{
remove_all_ann();
int idx = 0;
for (auto it = _rows_annessi.begin(); it != _rows_annessi.end(); ++it)
{
TToken_string row;
if(!it->second.catdocpadre.blank())
row.add(it->second.catdocpadre, 0);
if (!it->second.catdoc.blank())
row.add(it->second.catdoc, 1);
if (!it->second.descr.blank())
row.add(it->second.descr, 2);
if (!it->second.opcee.blank())
row.add(it->second.opcee, 3);
row.add(it->second.obblig ? "X" : "", 4);
ini_set_string(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, row, idx++);
}
ini_set_string(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, "STOP", idx); // Riga terminatrice
reload();
}
void TCategorie_doc::save_cat()
{
remove_all_cat();
int idx = 0;
for (auto it = _rows.begin(); it != _rows.end(); ++it)
{
classe_doc& cd = **it;
TToken_string row;
if (!cd.catdoc.blank())
row.add(cd.catdoc, 1);
if (!cd.descr.blank())
row.add(cd.descr, 2);
if (!cd.class_sost.blank())
row.add(cd.class_sost, 3);
if (!cd.caus_sost.blank())
row.add(cd.caus_sost, 4);
if (!cd.causcont.blank())
row.add(cd.causcont, 5);
if (!cd.tipocaus.blank())
row.add(cd.tipocaus, 6);
ini_set_string(CONFIG_DITTA, INI_PAR_MOD, INI_CATDOC, row, idx++);
}
ini_set_string(CONFIG_DITTA, INI_PAR_MOD, INI_CATDOC, "STOP", idx); // Riga terminatrice
reload();
}
const char* TCategorie_doc::traduci_caus_sost(const TString& caus) const char* TCategorie_doc::traduci_caus_sost(const TString& caus)
{ {
if (caus == "TD01") return "TD01 Fattura"; if (caus == "TD01") return "TD01 Fattura";
@ -1079,7 +1170,7 @@ const char* TCategorie_doc::traduci_caus_sost(const TString& caus)
const char* TCategorie_doc::traduci_class_ann(const TString& class_ann) const char* TCategorie_doc::traduci_class_ann(const TString& class_ann)
{ {
if (class_ann == "RC") return "Reverse Charge"; if (class_ann == "RC") return "Reverse Charge";
if (class_ann == "DC") return "Doc. cartaceo"; if (class_ann == "DC") return "ANN. cartaceo";
return ""; return "";
} }
@ -1090,75 +1181,74 @@ const char* TCategorie_doc::traduci_class_sost(const TString& class_sost)
return ""; return "";
} }
void TCategorie_doc::add_annesso(const TString& catdoc, const char* catdoc_ann) std::map<TString, TCategorie_doc::annesso>::iterator TCategorie_doc::find_annesso(const TString& catdoc_padre, const char* catdoc_ann)
{ {
_annessi.insert(_annessi.end(), pair<TString, TString>({ catdoc, catdoc_ann })); auto it = _rows_annessi.find(catdoc_ann);
if (it->second.catdocpadre == catdoc_padre)
return it;
return _rows_annessi.end();
}
int idx = 0; void TCategorie_doc::add_annesso(const TString& catdoc_padre, const TString& catdoc_ann, const TString& descr,
TString iget = "start"; const TString& class_ann, const bool obblig)
while (iget != "STOP" && !iget.empty()) {
{ #ifdef DBG
iget = ini_get_string(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, "", idx); CHECK(catdoc_padre && *catdoc_padre && catdoc_ann && *catdoc_ann && class_ann && *class_ann,
ini_remove(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, idx++); "add_annesso failed: some parameters are NULL or keys are empty");
} #else
if (catdoc_padre && *catdoc_padre && catdoc_ann && *catdoc_ann && class_ann && *class_ann)
return;
#endif
annesso ann{ catdoc_padre, catdoc_ann, descr, class_ann, obblig };
_rows_annessi.insert({ catdoc_padre, ann });
idx = 0; save_ann();
for(auto it = _annessi.begin(); it != _annessi.end(); ++it) }
{
TToken_string row;
row.add(it->first, 0);
row.add(it->second);
ini_set_string(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, row, idx++);
}
ini_set_string(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, "STOP", idx); // Riga terminatrice
reload(); void TCategorie_doc::add_categoria(const TString& catdoc, const TString& descr, const TString& class_sost, const TString& caus_sost,
const TString& causcont, const TString& tipocaus)
{
classe_doc cd = { catdoc, descr, class_sost, caus_sost, causcont, tipocaus };
_rows.emplace_back(std::make_shared<classe_doc>(cd));
save_cat();
} }
void TCategorie_doc::del_annesso(const TString& catdoc, const char* catdoc_ann) void TCategorie_doc::del_annesso(const TString& catdoc, const char* catdoc_ann)
{ {
const auto annesso = find_annesso(catdoc, catdoc_ann); const auto ann = find_annesso(catdoc, catdoc_ann);
if(annesso != _annessi.end()) if(ann != _rows_annessi.end())
{ {
_annessi.erase(annesso); _rows_annessi.erase(ann);
save_ann();
}
}
int idx = 0; bool TCategorie_doc::get_ann(const TString& catann, annesso& annesso)
TString iget = "start"; {
while (iget != "STOP" && !iget.empty()) const map<TString, TCategorie_doc::annesso>::iterator it = _rows_annessi.find(catann);
if (it != _rows_annessi.end())
{ {
iget = ini_get_string(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, "", idx); annesso = it->second;
ini_remove(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, idx++); return true;
}
idx = 0;
for (auto it = _annessi.begin(); it != _annessi.end(); ++it)
{
TToken_string row;
row.add(it->first, 0);
row.add(it->second);
ini_set_string(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, row, idx++);
}
ini_set_string(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, "STOP", idx); // Riga terminatrice
reload();
} }
return false;
} }
TString_array TCategorie_doc::get_array_ann(const TString& catdoc) TString_array TCategorie_doc::get_array_ann(const TString& catdoc)
{ {
TString_array sa(0); TString_array sa(0);
for(auto it = _annessi.begin(); it != _annessi.end(); ++it) for(auto it = _rows_annessi.begin(); it != _rows_annessi.end(); ++it)
{ {
if (it->first == catdoc) if (it->second.catdocpadre == catdoc)
{ {
TToken_string row(it->second); TToken_string row(it->second.catdoc);
sa.add(row); sa.add(row);
} }
} }
return sa; return sa;
} }
TString_array TCategorie_doc::get_array_rows(bool traduci) TString_array TCategorie_doc::get_array_rows(const bool traduci)
{ {
TString_array sa(_rows.size()); TString_array sa(_rows.size());
for(auto it = _rows.begin(); it != _rows.end(); ++it) for(auto it = _rows.begin(); it != _rows.end(); ++it)
@ -1171,7 +1261,6 @@ TString_array TCategorie_doc::get_array_rows(bool traduci)
ts.add(!traduci ? row->caus_sost : traduci_caus_sost(row->caus_sost)); ts.add(!traduci ? row->caus_sost : traduci_caus_sost(row->caus_sost));
ts.add(row->causcont); ts.add(row->causcont);
ts.add(row->tipocaus); ts.add(row->tipocaus);
ts.add(!traduci ? row->tipomov : traduci_class_ann(row->tipomov));
sa.add(ts); sa.add(ts);
} }
@ -1182,17 +1271,17 @@ std::shared_ptr<TArray_sheet> TCategorie_doc::get_sheet_catdocs()
{ {
if (_sheet_catdocs == nullptr) if (_sheet_catdocs == nullptr)
{ {
_sheet_catdocs = make_shared<TArray_sheet>(-1, -1, 78, 13, "cat.docs", _sheet_catdocs = make_shared<TArray_sheet>(-1, -1, 125, 20, "Categorie Documentali",
"Categoria\nDocumento(Codice)@15|Descrizione\nDocumento@26|" "Categoria\nDocumento(Codice)@15|Descrizione\nDocumento@26|"
"Classe Documentale\nSostitutiva@25|Causale per\nSostitutiva (TD01...)@34|" "Classe Documentale\nSostitutiva@13|Causale per\nSostitutiva (TD01...)@13|"
"Causale\nContabile@8|Tipo\nDocumento@6|Classificazione\nAnnesso@15", "Causale\nContabile@8|Tipo\nDocumento@8",
MODE_SHEETS); MODE_SHEETS);
if (!_name_catdocs) if (!_name_catdocs)
_name_catdocs = make_shared<set<TString>>(); _name_catdocs = make_shared<set<TString>>();
else else
_name_catdocs->clear(); _name_catdocs->clear();
//_sheet_catdocs->add_button(DLG_CANCEL, "Annulla", K_ESC, TOOL_CANCEL, TOOL_CANCEL); //_sheet_catdocs->add_button(DLG_CANCEL, "Annulla", K_ESC, TOOL_CANCEL, TOOL_CANCEL);
const TString_array ar = get_array_rows(true); const TString_array ar = get_array_rows();
FOR_EACH_ARRAY_ITEM(ar, nr, row) FOR_EACH_ARRAY_ITEM(ar, nr, row)
{ {
_sheet_catdocs->add(*(TToken_string*)row); _sheet_catdocs->add(*(TToken_string*)row);
@ -1207,30 +1296,32 @@ std::shared_ptr<TArray_sheet> TCategorie_doc::get_sheet_ann(const TString& catdo
auto it = find_sheet_annessi(catdoc); auto it = find_sheet_annessi(catdoc);
if (it == _sheets_annessi.end()) if (it == _sheets_annessi.end())
{ {
const auto inserted = _sheets_annessi.insert(_sheets_annessi.end(), { TString title; title << "Annessi della Categoria " << catdoc;
catdoc, make_shared<TArray_sheet>(-1, -1, 78, 13, "Annessi", shared_ptr<TArray_sheet> sheet = make_shared<TArray_sheet>(-1, -1, 78, 13, title,
"Categoria\nAnnesso(Codice)@15|Descrizione\nDocumento@26|" "Categoria\nAnnesso(Codice)@15|Descrizione\nDocumento@26|"
"Classe Documentale\nSostitutiva@25|Classificazione\nAnnesso@14", "Classificazione\nAnnesso@14|Obbligatorio@8",
MODE_SHEETS) _mode_sheet);
}); const auto inserted = _sheets_annessi.insert(_sheets_annessi.end(), { catdoc, sheet });
const TString_array aann = get_array_ann(catdoc); const TString_array aann = get_array_ann(catdoc);
if (!aann.empty()) if (!aann.empty())
{ {
TArray_sheet* as = inserted->second.get(); FOR_EACH_ARRAY_ITEM(aann, nr, r)
TRecord_categorie rec;
FOR_EACH_ARRAY_ITEM(aann, nr, row)
{ {
rec.put("NAME", ((TToken_string*)row)->get(0)); TToken_string& row = *(TToken_string*)r;
rec.read(true); std::map<TString, annesso>::iterator it_ann = find_annesso(catdoc, row.get(0));
if(it_ann != _rows_annessi.end())
{
const annesso& ann = it_ann->second;
TToken_string t; TToken_string t;
t.add(((TToken_string*)row)->get(0)); t.add(ann.catdoc);
t.add(rec.get("DESCR")); t.add(ann.descr);
t.add(rec.get("CLASSDOCSOS")); t.add(ann.opcee);
t.add(rec.get("CLASSANN")); t.add(ann.obblig ? "X" : "");
as->add(t); sheet->add(t);
} }
} }
it = inserted; }
it = inserted; // Per restituirlo anche vuoto.
} }
return it->second; return it->second;
} }
@ -1260,6 +1351,39 @@ void TCategorie_doc::reload()
load_all(); load_all();
} }
void TCategorie_doc::remove_all()
{
remove_all_ann();
remove_all_cat();
}
void TCategorie_doc::remove_all_ann()
{
int idx = 0;
TString iget = "start";
while (iget != "STOP" && !iget.blank())
{
iget = ini_get_string(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, "", idx);
ini_remove(CONFIG_DITTA, INI_PAR_MOD, INI_ANNESSI, idx++);
}
}
void TCategorie_doc::remove_all_cat()
{
int idx = 0;
TString iget = "start";
while (iget != "STOP" && !iget.blank())
{
iget = ini_get_string(CONFIG_DITTA, INI_PAR_MOD, INI_CATDOC, "", idx);
ini_remove(CONFIG_DITTA, INI_PAR_MOD, INI_CATDOC, idx++);
}
}
TCategorie_doc::TCategorie_doc() : _mode_sheet(MODE_SHEETS)
{
load_all();
}
/////////////////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////////////////
// TRecord_categorie // TRecord_categorie
/////////////////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////////////////
@ -1312,14 +1436,21 @@ bool TRecord_categorie::read(bool traduci)
FOR_EACH_ARRAY_ITEM(sa, nr, str) FOR_EACH_ARRAY_ITEM(sa, nr, str)
{ {
TString n = (*(TToken_string*)str).get(0); TString n = (*(TToken_string*)str).get(0);
if (name.empty() || n == name) if (name.blank() || n == name) // Se name vuoto perche' sto cercando solo per catdoc
{
auto it = find_annesso(catdoc, n);
if (it != _rows_annessi.end())
{ {
TToken_string t; TToken_string t;
t.add(catdoc); t.add(it->second.catdocpadre);
t.add(n); t.add(it->second.catdoc);
t.add(it->second.descr);
t.add(it->second.opcee);
t.add(it->second.obblig);
_result_set.add(t); _result_set.add(t);
} }
} }
}
return next(); return next();
} }
} }
@ -1332,10 +1463,12 @@ TRecord_categorie::TRecord_categorie(type table): _table(table)
_categorie.head.add("CAUSSOS"); _categorie.head.add("CAUSSOS");
_categorie.head.add("CAUSCONT"); _categorie.head.add("CAUSCONT");
_categorie.head.add("TIPODOC"); _categorie.head.add("TIPODOC");
_categorie.head.add("CLASSANN");
_annessi.head.add("CATDOC"); _annessi.head.add("CATDOC");
_annessi.head.add("NAME"); _annessi.head.add("NAME");
_annessi.head.add("DESCR");
_annessi.head.add("TIPOANN");
_annessi.head.add("OBBLIG");
} }

73
src/f9/f9lib01.h
View File

@ -133,40 +133,53 @@ class TCategorie_doc
public: public:
struct classe_doc struct classe_doc
{ {
TString catdoc; TString catdoc; // Codice cat. documentale.
TString descr; TString descr; // Descrizione documento.
TString class_sost; // { FTA | FTV } - classe documentale sostitutiva TString class_sost; // { FTA | FTV } - classe documentale sostitutiva.
TString caus_sost; // causale per sostitutiva(TD01…) TString caus_sost; // causale per sostitutiva (TD01...).
TString causcont; TString causcont; // Codice causale.
TString tipocaus; TString tipocaus; // Usato come tipo documento (FA, FV, CR, ...).
TString tipomov; };
TString opcee; struct annesso
{
TString catdocpadre;
TString catdoc; // Codice cat. documentale.
TString descr; // Descrizione documento.
TString opcee; // { RV | DC } - Usato come classificazione annesso (Reverse, ann. cartaceo).
bool obblig; // Definisce se deve essere per forza presente l'annesso.
}; };
private: private:
std::vector<std::shared_ptr<classe_doc>> _rows; std::vector<std::shared_ptr<classe_doc>> _rows;
std::vector<std::pair<TString, TString>> _annessi;
std::vector<std::pair<TString, std::shared_ptr<TArray_sheet>>> _sheets_annessi; std::vector<std::pair<TString, std::shared_ptr<TArray_sheet>>> _sheets_annessi;
std::shared_ptr<TArray_sheet> _sheet_catdocs; std::shared_ptr<TArray_sheet> _sheet_catdocs;
std::shared_ptr<std::set<TString>> _name_catdocs; std::shared_ptr<std::set<TString>> _name_catdocs;
int _mode_sheet;
std::vector<std::shared_ptr<classe_doc>>::iterator find(const TString& class_sost, const TString& caus_sost, std::shared_ptr<classe_doc> find_causcont(const TString& caus); // OK
const TString& op_cee); std::shared_ptr<classe_doc> find_tipodoc(const TString& tipodoc); // OK
std::shared_ptr<classe_doc> find_causcont(const TString& caus);
std::shared_ptr<classe_doc> find_tipodoc(const TString& tipodoc);
std::vector<pair<TString, TString>>::iterator find_annesso(const TString& catdoc, const char* catdoc_ann);
std::vector<pair<TString, std::shared_ptr<TArray_sheet>>>::iterator find_sheet_annessi(const TString& catdoc);
std::vector<pair<TString, std::shared_ptr<TArray_sheet>>>::iterator find_sheet_annessi(const TString& catdoc); // OK
void load_all(); void load_all();
void save_ann();
void save_cat();
static const char* traduci_caus_sost(const TString& caus); static const char* traduci_caus_sost(const TString& caus);
static const char* traduci_class_ann(const TString& class_ann); static const char* traduci_class_ann(const TString& class_ann);
static const char* traduci_class_sost(const TString& class_sost); static const char* traduci_class_sost(const TString& class_sost);
protected:
std::map<TString, annesso> _rows_annessi;
std::map<TString, annesso>::iterator find_annesso(const TString& catdoc_padre, const char* catdoc_ann);
public: public:
//std::shared_ptr<classe_doc> causcont2cat(const char* caus, bool force_cartacea); void add_annesso(const TString& catdoc_padre, const TString& catdoc_ann, const TString& descr,
void add_annesso(const TString& catdoc, const char* catdoc_ann); const TString& class_ann, bool obblig = false);
void add_categoria(const TString& catdoc, const TString& descr, const TString& class_sost,
const TString& caus_sost, const TString& causcont, const TString& tipocaus);
void del_annesso(const TString& catdoc, const char* catdoc_ann); void del_annesso(const TString& catdoc, const char* catdoc_ann);
bool get_ann(const TString& catann, annesso& annesso);
TString_array get_array_ann(const TString& catdoc); TString_array get_array_ann(const TString& catdoc);
TString_array get_array_rows(bool traduci = false); TString_array get_array_rows(bool traduci = false);
std::shared_ptr<classe_doc> get_classe_doc(const TString& catdoc); std::shared_ptr<classe_doc> get_classe_doc(const TString& catdoc);
@ -175,8 +188,12 @@ public:
std::shared_ptr<TArray_sheet> get_sheet_ann(const TString& catdoc); std::shared_ptr<TArray_sheet> get_sheet_ann(const TString& catdoc);
std::shared_ptr<classe_doc> mov2cat(int numreg); std::shared_ptr<classe_doc> mov2cat(int numreg);
void reload(); void reload();
void remove_all();
static void remove_all_ann();
static void remove_all_cat();
void set_mode_sheet(const int mode) { _mode_sheet = mode; }
TCategorie_doc() { load_all(); } TCategorie_doc();
}; };
class TRecord_categorie : public TCategorie_doc class TRecord_categorie : public TCategorie_doc
@ -223,7 +240,8 @@ struct movimento_t
no_fv, // Movimento di vendita non e' una fattura. no_fv, // Movimento di vendita non e' una fattura.
no_cartaceo, // Movimento cartaceo che non ha bisogno di essere estratto. no_cartaceo, // Movimento cartaceo che non ha bisogno di essere estratto.
pura_iva, // Movimento di sola IVA (integrazione Rev. Charge) pura_iva, // Movimento di sola IVA (integrazione Rev. Charge)
no_filecart // Il documento cartaceo non ha associato un file, o questo non e' stato trovato. no_filecart, // Il documento cartaceo non ha associato un file, o questo non e' stato trovato.
annesso_nexist // Un annesso obbligatorio e' mancante.
}; };
bool err; bool err;
@ -239,7 +257,7 @@ struct movimento_t
TString reg_protiva; TString reg_protiva;
TString descr; TString descr;
state_fppro state{ null_state }; state_fppro state{ null_state };
TString descr_err; // Messaggio di errore visibile dal controllo estrazion TString descr_err; // Messaggio di errore visibile dal controllo estrazione.
bool estratto{ true }; bool estratto{ true };
err_mov descr_estr{ no_err }; // Messaggio di informazioni visibile dal 'Apri Estr.' err_mov descr_estr{ no_err }; // Messaggio di informazioni visibile dal 'Apri Estr.'
std::shared_ptr<TCategorie_doc::classe_doc> catdoc; std::shared_ptr<TCategorie_doc::classe_doc> catdoc;
@ -254,7 +272,7 @@ struct movimento_t
case no_err: case no_err:
return "OK"; return "OK";
case escluso: case escluso:
return "Il movimemnto e' segnato come escluso. Saltato."; return "Il movimento e' segnato come escluso. Saltato.";
case no_catdoc: case no_catdoc:
return "Nessuna categoria documentale riconosciuta per questo movimento, o non e' una fattura."; return "Nessuna categoria documentale riconosciuta per questo movimento, o non e' una fattura.";
case no_doc: case no_doc:
@ -269,6 +287,8 @@ struct movimento_t
return "Movimento cartaceo che non ha bisogno di essere estratto"; return "Movimento cartaceo che non ha bisogno di essere estratto";
case pura_iva: case pura_iva:
return "Movimento di sola IVA. (Le integrazioni Rev. Charge sono gestite come annessi alle vendite)"; return "Movimento di sola IVA. (Le integrazioni Rev. Charge sono gestite come annessi alle vendite)";
case annesso_nexist:
return "Un annesso obbligatorio e' mancante.";
default: return ""; default: return "";
} }
} }
@ -323,6 +343,8 @@ class TEstrazione : public TObject
bool update_drd_stato_estr() const; bool update_drd_stato_estr() const;
static const char* categoria_doc(); static const char* categoria_doc();
static const char* caus_sos(const TLocalisamfile& mov, TipoIVA iva); static const char* caus_sos(const TLocalisamfile& mov, TipoIVA iva);
static void check_annessi(movimento_t& mov_i, const TString& numreg);
static bool check_annessi_oblig(const TString& catdoc, const TString& numreg, TToken_string& ann_nexist);
static bool check_documento_vendita(const TLocalisamfile& mov, _Out_ bool& exist_doc); static bool check_documento_vendita(const TLocalisamfile& mov, _Out_ bool& exist_doc);
/** CHECK RIFERIMENTO FPPRO /** CHECK RIFERIMENTO FPPRO
* Per le fatture di acquisto controllo se ho il riferimento nell'FPPRO. * Per le fatture di acquisto controllo se ho il riferimento nell'FPPRO.
@ -402,7 +424,7 @@ public:
void set_addrcart(const TString& addrcart) { _head.addr_cart = addrcart; } void set_addrcart(const TString& addrcart) { _head.addr_cart = addrcart; }
TEstrazione(const TString& ambiente, bool flag_prov, char tipodoc, const TString& descr, const TString& addrcart, TEstrazione(const TString& ambiente, bool flag_prov, char tipodoc, const TString& descr, const TString& addrcart,
bool escluso, const TDate* dal = nullptr, const TDate* al = nullptr, bool has_vendext = false, bool has_cartacei = false); bool escluso, const TDate* dal = nullptr, const TDate* al = nullptr, bool has_checkvend = false, bool has_cartacei = false);
}; };
@ -450,6 +472,11 @@ public:
bool mov2listann(const TString& numreg, _Out_ TString_array& list_annessi); bool mov2listann(const TString& numreg, _Out_ TString_array& list_annessi);
bool mov2listann_vect(const TString& numreg, _Out_ vector<annesso_t>& list_annessi); bool mov2listann_vect(const TString& numreg, _Out_ vector<annesso_t>& list_annessi);
static TString get_full_path_file_cartaceo(const TString& filename)
{
return TString() << TFilename(F9CONF.get_addr_cart()).slash_terminate() << filename;
}
TF9_doccart() : _tdocs(LF_F9DOCS), _tannessi(LF_F9ANNESSI) { } TF9_doccart() : _tdocs(LF_F9DOCS), _tannessi(LF_F9ANNESSI) { }
}; };

1
src/f9/f9lib02.cpp
View File

@ -198,7 +198,6 @@ void TIva_insert_prepared_stat::write()
count = ++count % 3; count = ++count % 3;
} }
_query << "\n)\nVALUES (\n" << vals_appo << "\n)"; _query << "\n)\nVALUES (\n" << vals_appo << "\n)";
bool simo = true;
} }
void TIva_insert_prepared_stat::add(const char* field, const TString& value) void TIva_insert_prepared_stat::add(const char* field, const TString& value)