Corretta gestione partite extracontabili

git-svn-id: svn://10.65.10.50/trunk@2126 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-11-10 13:38:29 +00:00
parent 76719be75d
commit d7f6c33f4a
4 changed files with 38 additions and 9 deletions

View File

@ -32,18 +32,16 @@ void TSaldaconto_app::open_files(int logicnum, ...)
}
}
void TSaldaconto_app::on_config_change()
{
TPartita::carica_allineamento();
}
bool TSaldaconto_app::menu(MENU_TAG)
{
KEY k;
TMask& m = curr_mask();
do
{
k = m.run();
if (k == K_ENTER)
edit_partite(m);
} while (k != K_QUIT);
while (m.run() == K_ENTER)
edit_partite(m);
return 0;
}

View File

@ -24,6 +24,7 @@ protected: // TApplication
virtual bool create();
virtual bool destroy();
virtual bool menu(MENU_TAG tag);
virtual void on_config_change();
protected:
void open_files(int logicnum, ...);

View File

@ -132,7 +132,7 @@ bool TFattura_mask::pag_notify(TSheet_field& ps, int r, KEY k)
mod = m_imp = TRUE;
}
if (newt != ts.get(4)) // modificato tipo pagamento
mod = m_tipo = TRUE;
mod = m_tipo = m_ulc = TRUE;
if (newu != ts.get(5)) // modificato tipo pagamento
mod = m_ulc = TRUE;
@ -423,6 +423,35 @@ bool TGame_mask::edit_fattura(TPartita& p, int nriga)
p.rimuovi_riga(nriga);
return ok;
}
void TGame_mask::prima_nota(const long nreg)
{
bool can_run = TRUE;
if (_changed)
{
can_run = yesno_box("Salvare le parite modificate?");
if (can_run)
{
app().partite().rewrite();
_changed = FALSE; // Resetta flag di cambiato
}
}
if (can_run)
{
app().partite().destroy(); // Distrugge tutte le partite in memoria
const char* const pn = "cg2 -0";
TExternal_app prima_nota(pn);
TString16 numreg; numreg << "1|" << nreg;
TMessage msg(pn, MSG_LN, numreg);
msg.send(); // Messaggio di collegamento al movimento nreg
prima_nota.run(); // Lancia la prima nota
const int anno = get_int(P_ANNO);
const TString16 numero = get(P_NUMERO);
fill_partite(anno, numero); // Rilegge partite
}
}
///////////////////////////////////////////////////////////

View File

@ -74,6 +74,7 @@ void TCreatepart_app::on_config_change()
TConfig cd(CONFIG_DITTA, "cg");
_num_cli = cd.get_bool("NrCliDx");
_num_for = cd.get_bool("NrForDx");
TPartita::carica_allineamento();
}
bool TCreatepart_app::zap_partite(int anno)