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

Corretti errori MI4317, MI4314, MI4315.

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@3579 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-09-13 07:38:30 +00:00
parent 363a958654
commit df0b0b81d9
1 changed files with 29 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

53
cg/cg4305.cpp
View File

@ -161,6 +161,7 @@ bool TLiquidazione_app::extract_delega(int month, TArray& desc)
{ {
TToken_string* tt = NULL; TToken_string* tt = NULL;
bool versare = FALSE; bool versare = FALSE;
bool skip_print = FALSE;
if (look_lim(month)) if (look_lim(month))
{ {
@ -201,7 +202,9 @@ bool TLiquidazione_app::extract_delega(int month, TArray& desc)
if (stampato) //se esiste e stampato si richiede conferma aggiornamento if (stampato) //se esiste e stampato si richiede conferma aggiornamento
{ {
if (topay != _del->get_real("R0")) if (topay != _del->get_real("R0"))
video_conferma(topay, intr, nrnd); skip_print = !video_conferma(topay, intr, nrnd); // se non conferma o annulla, salta il tabulato
else
skip_print = TRUE; // Se l'importo e' lo stesso e la delega era gia' stampata, salta il tabulato
} }
else //aggiorna importo versamento else //aggiorna importo versamento
{ {
@ -248,7 +251,7 @@ bool TLiquidazione_app::extract_delega(int month, TArray& desc)
_del->remove(); _del->remove();
} }
if (tt != NULL) if (tt != NULL && !skip_print) // Se il tabulato deve essere stampato per questa delega...
desc.add(tt); desc.add(tt);
return TRUE; return TRUE;
@ -258,7 +261,8 @@ bool TLiquidazione_app::video_conferma(const real& newimp, const real& intr,
const real& narr) const real& narr)
{ {
TMask m("cg4800b"); TMask m("cg4800b");
m.set_caption("Estrazione versamenti"); // Modifica il titolo...
m.field(F_CODDITTA).set(_nditte->lfile().get("CODDITTA")); m.field(F_CODDITTA).set(_nditte->lfile().get("CODDITTA"));
m.field(F_RAGSOC).set(_nditte->lfile().get("RAGSOC")); m.field(F_RAGSOC).set(_nditte->lfile().get("RAGSOC"));
m.field(F_DATAVER).set(_del->get_date("D0")); m.field(F_DATAVER).set(_del->get_date("D0"));
@ -268,34 +272,35 @@ bool TLiquidazione_app::video_conferma(const real& newimp, const real& intr,
m.field(F_IMPVER).set(_del->get("R0")); m.field(F_IMPVER).set(_del->get("R0"));
m.field(F_NEWIMP).set(newimp.string()); m.field(F_NEWIMP).set(newimp.string());
KEY k;
for (bool stop = FALSE; !stop;) for (bool stop = FALSE; !stop;)
{ {
KEY k = m.run(); k = m.run();
switch(k) switch(k)
{ {
case K_SAVE: case K_SAVE:
{
KEY k = yesnocancel_box("Delega gia' stampata. Si desidera ugualmente confermare l'aggiornamento?");
if (k == K_YES)
{ {
_del->put("B0", ""); k = yesnocancel_box("Delega gia' stampata. Si desidera ugualmente confermare l'aggiornamento?");
_del->put("R0",newimp); if (k == K_YES)
_del->put("R1",intr); {
_del->put("R2",narr); _del->put("B0", "");
_del->rewrite(); _del->put("R0",newimp);
} _del->put("R1",intr);
if (k == K_YES || k == K_NO) _del->put("R2",narr);
stop = TRUE; _del->rewrite();
} }
break; if (k == K_YES || k == K_NO)
case K_ESC: stop = TRUE;
//case K_QUIT: }
stop = TRUE; break;
break; case K_ESC:
//case K_QUIT:
stop = TRUE;
break;
}
} }
} return k == K_YES;
return TRUE;
} }
// -------------------------------------------- calcolo acconto dicembre // -------------------------------------------- calcolo acconto dicembre