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

Corretta gestione valuta e abbuoni e banche

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1891 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-09-25 17:30:36 +00:00
parent 4fe9b183f5
commit 42605b0e11
7 changed files with 45 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
cg/cg2100.cpp
View File

@ -66,7 +66,6 @@ TMask* TPrimanota_application::load_mask(int n)
{ {
m->set_handler(F_DATADOC, doc_handler); m->set_handler(F_DATADOC, doc_handler);
m->set_handler(F_NUMDOC, doc_handler); m->set_handler(F_NUMDOC, doc_handler);
// m->set_handler(F_NUMRIF, numrif_handler);
m->set_handler(F_DATA74TER, data74ter_handler); m->set_handler(F_DATA74TER, data74ter_handler);
m->set_handler(F_PROTIVA, protiva_handler); m->set_handler(F_PROTIVA, protiva_handler);
m->set_handler(F_CLIENTE, clifo_handler); m->set_handler(F_CLIENTE, clifo_handler);

22
cg/cg2102.cpp
View File

@ -722,7 +722,7 @@ bool TPrimanota_application::cg_notify(TSheet_field& cg, int r, KEY k)
} }
app().calcola_saldo(); app().calcola_saldo();
break; break;
case K_INS: case K_CTRL+K_INS: // Post inserimento
if (app().is_pagamento()) if (app().is_pagamento())
{ {
const char tipo = app().curr_mask().get(S_TIPORIGA)[0]; const char tipo = app().curr_mask().get(S_TIPORIGA)[0];
@ -740,6 +740,7 @@ bool TPrimanota_application::cg_notify(TSheet_field& cg, int r, KEY k)
if (row_type(row) != 'K') if (row_type(row) != 'K')
{ {
cg.swap_rows(r, i); cg.swap_rows(r, i);
cg.force_update();
break; break;
} }
} }
@ -1673,12 +1674,21 @@ bool TPrimanota_application::clifo_handler(TMask_field& f, KEY key)
const TString& valuta = clifo.get(CLI_CODVAL); const TString& valuta = clifo.get(CLI_CODVAL);
if (valuta.not_empty()) if (valuta.not_empty())
m.set(S_VALUTA, valuta, TRUE); m.set(S_VALUTA, valuta, TRUE);
}
if (clifo.get(CLI_CODCAB).not_empty())
{
m.set(FS_VSABI, clifo.get(CLI_CODABI));
m.set(FS_VSCAB, clifo.get(CLI_CODCAB));
m.send_key(K_TAB, FS_VSCAB);
} }
m.set(FS_VSABI, clifo.get(CLI_CODABI));
m.set(FS_VSCAB, clifo.get(CLI_CODCAB)); const TString& agente = cliforel.curr(LF_CFVEN).get(CLI_CODAG);
m.send_key(K_TAB, FS_VSCAB); if (agente.not_empty())
m.set(FS_AGENTE, cliforel.curr(LF_CFVEN).get(CLI_CODAG), TRUE); {
m.send_key(K_TAB, FS_AGENTE); m.set(FS_AGENTE, agente, TRUE);
m.send_key(K_TAB, FS_AGENTE);
}
} }
} }

30
cg/cg2104.cpp
View File

@ -394,7 +394,7 @@ bool TPrimanota_application::read_scadenze(TMask& m)
ps.disable_cell(0,-1); ps.disable_cell(0,-1);
if (scad_locked) if (scad_locked)
{ {
m.disable(-1); // Disabilita cliente m.disable(-1); // Disabilita cliente
m.disable(-2); // Disabilita fornitore m.disable(-2); // Disabilita fornitore
m.disable(-3); // Disabilita cambio m.disable(-3); // Disabilita cambio
@ -458,8 +458,19 @@ void TPrimanota_application::write_scadenze(const TMask& m)
partita.put(PART_SEZ, sezione); partita.put(PART_SEZ, sezione);
partita.put(PART_CODVAL, codval); partita.put(PART_CODVAL, codval);
partita.put(PART_CAMBIO, cambio); partita.put(PART_CAMBIO, cambio);
partita.put(PART_IMPORTO, pag.imponibile()+pag.imposta());
partita.put(PART_IMPOSTA, pag.imposta()); if (partita.in_valuta())
{
partita.put(PART_IMPORTO, m.get(F_IMPONIBILI));
partita.put(PART_IMPORTOVAL, pag.imponibile());
partita.zero(PART_IMPOSTA);
}
else
{
partita.put(PART_IMPORTO, pag.imponibile()+pag.imposta());
partita.zero(PART_IMPORTOVAL);
partita.put(PART_IMPOSTA, pag.imposta());
}
partita.put(PART_SPESE, pag.spese()); partita.put(PART_SPESE, pag.spese());
TSheet_field& ps = (TSheet_field&)m.field(FS_RATESHEET); TSheet_field& ps = (TSheet_field&)m.field(FS_RATESHEET);
@ -483,10 +494,10 @@ void TPrimanota_application::write_scadenze(const TMask& m)
scadenza.zero(SCAD_IMPORTOVAL); scadenza.zero(SCAD_IMPORTOVAL);
} }
scadenza.put(SCAD_DATASCAD, pag.data_rata(i)); scadenza.put(SCAD_DATASCAD, pag.data_rata(i));
scadenza.put(SCAD_CODABIPR, row.get(5)); scadenza.put(SCAD_CODABIPR, row.get(6));
scadenza.put(SCAD_CODCABPR, row.get(6)); scadenza.put(SCAD_CODCABPR, row.get(7));
scadenza.put(SCAD_CODABI, row.get(7)); scadenza.put(SCAD_CODABI, row.get(8));
scadenza.put(SCAD_CODCAB, row.get(8)); scadenza.put(SCAD_CODCAB, row.get(9));
scadenza.put(SCAD_PAGATA, pag.ratapagata(i)); scadenza.put(SCAD_PAGATA, pag.ratapagata(i));
scadenza.put(SCAD_CODAG, agente); scadenza.put(SCAD_CODAG, agente);
} }
@ -498,7 +509,7 @@ void TPrimanota_application::write_scadenze(const TMask& m)
const int primafatt = oldgame->prima_fattura(nreg); const int primafatt = oldgame->prima_fattura(nreg);
if (primafatt > 0) if (primafatt > 0)
{ {
if (*oldgame != *newgame) if (newgame == NULL || *oldgame != *newgame)
{ {
bool sposta = newgame != NULL; bool sposta = newgame != NULL;
if (sposta) if (sposta)
@ -510,7 +521,10 @@ void TPrimanota_application::write_scadenze(const TMask& m)
if (sposta) if (sposta)
oldgame->sposta_riga(primafatt, *newgame); oldgame->sposta_riga(primafatt, *newgame);
else else
{
oldgame->scollega_pagamenti(primafatt); oldgame->scollega_pagamenti(primafatt);
oldgame->rimuovi_riga(primafatt);
}
oldgame->rewrite(); oldgame->rewrite();
} }
else else

6
cg/cg2105.cpp
View File

@ -1064,7 +1064,7 @@ bool TPrimanota_application::notify_edit_pagamento(TPartita& p, TRectype& new_pa
if (deleting != riga_contabile) if (deleting != riga_contabile)
{ {
// Sottrae l'abbuono con la sezione invertita dalla riga contabile // Sottrae l'abbuono con la sezione invertita dalla riga contabile
add_cgs_imp(riga_contabile, old_abbuono); add_cgs_imp(riga_contabile-1, old_abbuono);
} }
} }
if (new_ap != ' ') // Se ci sono abbuoni if (new_ap != ' ') // Se ci sono abbuoni
@ -1082,7 +1082,7 @@ bool TPrimanota_application::notify_edit_pagamento(TPartita& p, TRectype& new_pa
if (deleting != riga_contabile) if (deleting != riga_contabile)
{ {
// Aggiunge l'abbuono con la sezione invertita // Aggiunge l'abbuono con la sezione invertita
sub_cgs_imp(riga_contabile, new_abbuono); sub_cgs_imp(riga_contabile-1, new_abbuono);
} }
} }
} }
@ -1109,7 +1109,7 @@ bool TPrimanota_application::notify_edit_pagamento(TPartita& p, TRectype& new_pa
if (deleting != riga_contabile) if (deleting != riga_contabile)
{ {
// Aggiunge la differenza con la sezione invertita // Aggiunge la differenza con la sezione invertita
sub_cgs_imp(riga_contabile, grow_diffcam); sub_cgs_imp(riga_contabile-1, grow_diffcam);
} }
} }
} // if (deleting != 0) } // if (deleting != 0)

2
cg/cg21rata.uml
View File

@ -73,7 +73,7 @@ END
NUMBER 108 5 NUMBER 108 5
BEGIN BEGIN
PROMPT 27 8 "Ns. Banca CAB " PROMPT 27 7 "Ns. Banca CAB "
FLAGS "Z" FLAGS "Z"
COPY ALL 107 COPY ALL 107
CHECKTYPE NORMAL CHECKTYPE NORMAL

4
cg/saldacon.cpp
View File

@ -601,7 +601,7 @@ bool TPartita::write(bool re) const
{ {
TRiga_partite& row = riga(r); TRiga_partite& row = riga(r);
row.put(PART_GRUPPOCL, conto().gruppo()); row.put(PART_GRUPPOCL, conto().gruppo());
row.put(PART_GRUPPOCL, conto().conto()); row.put(PART_CONTOCL, conto().conto());
} }
} }
int err = _part.write(re); int err = _part.write(re);
@ -1027,7 +1027,7 @@ void TPartita::sposta_riga(int r, TPartita& part)
// Sposta i pagamenti della riga r, dalla rata s compresa in poi, sui non assegnati // Sposta i pagamenti della riga r, dalla rata s compresa in poi, sui non assegnati
void TPartita::scollega_pagamenti(int r, int s) void TPartita::scollega_pagamenti(int r, int s)
{ {
CHECKD(s >= 0, "Impossibile scollegare la rata ", s); CHECKD(s > 0, "Impossibile scollegare la rata ", s);
const TRiga_partite& row = riga(r); const TRiga_partite& row = riga(r);
for (int i = row.rate(); i >= s; i--) for (int i = row.rate(); i >= s; i--)

2
cg/saldacon.h
View File

@ -199,7 +199,7 @@ public:
// assegna riga e figli ad altra partita // assegna riga e figli ad altra partita
void sposta_riga(int r, TPartita& part); void sposta_riga(int r, TPartita& part);
// de-assegna tutti i pagamenti di una riga e li distrugge // de-assegna tutti i pagamenti di una riga e li distrugge
void scollega_pagamenti(int riga, int rata = 0); void scollega_pagamenti(int riga, int rata = 1);
int succ(int r) const { return _part.succ_row(r); } int succ(int r) const { return _part.succ_row(r); }
int pred(int r) const { return _part.pred_row(r); } int pred(int r) const { return _part.pred_row(r); }