*** empty log message ***
git-svn-id: svn://10.65.10.50/trunk@238 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy
parent
da64109dde
commit
0d135ae092
@ -79,6 +79,7 @@
|
||||
7|Causali|cg0 -4
|
||||
7|Clienti/Fornitori|cg0 -1
|
||||
7|Banche|ba3 -0 %ban
|
||||
7|Esercizi|ba3 -0 esc
|
||||
8|Stampa tabelle ditta|
|
||||
8|Registri|ba3 -1 reg
|
||||
8|Piano dei conti|cg1 -0
|
||||
|
||||
@ -139,7 +139,7 @@ END
|
||||
|
||||
SPREADSHEET F_SHEET_GCS
|
||||
BEGIN
|
||||
PROMPT 2 7 ""
|
||||
PROMPT 0 7 ""
|
||||
ITEM "Tipo conto@21"
|
||||
ITEM "C/F"
|
||||
ITEM "Gr."
|
||||
|
||||
@ -1,4 +1,5 @@
|
||||
#include <config.h>
|
||||
#include <execp.h>
|
||||
#include <tabutil.h>
|
||||
#include <utility.h>
|
||||
#include <urldefid.h>
|
||||
@ -13,7 +14,7 @@
|
||||
|
||||
|
||||
TPrimanota_application::TPrimanota_application()
|
||||
: _rel(NULL), _lastreg(0), _mode(0), _iva(nessuna_iva)
|
||||
: _rel(NULL), _lastreg(0), _mode(0), _iva(nessuna_iva)
|
||||
{
|
||||
memset(_msk, 0, sizeof(_msk));
|
||||
}
|
||||
@ -148,6 +149,13 @@ bool TPrimanota_application::user_destroy()
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
|
||||
void TPrimanota_application::print()
|
||||
{
|
||||
TExternal_app stampa("cg3 -0");
|
||||
stampa.run();
|
||||
}
|
||||
|
||||
// Legge la causale di codice cod ed il relativo registro dell'anno year
|
||||
// Certified 99%
|
||||
bool TPrimanota_application::read_caus(const char* cod, int year)
|
||||
@ -221,6 +229,8 @@ TMask* TPrimanota_application::get_mask(int mode)
|
||||
|
||||
void TPrimanota_application::init_mask(TMask& m)
|
||||
{
|
||||
disable_menu_item(M_FILE_PRINT);
|
||||
|
||||
fill_sheet(m);
|
||||
|
||||
// Show/Hide campi valuta: F_VALUTA, F_CAMBIO, F_VISVAL (GROUP 3)
|
||||
@ -238,7 +248,7 @@ void TPrimanota_application::init_mask(TMask& m)
|
||||
else
|
||||
{
|
||||
forg = 'h';
|
||||
clig = causale().reg().corrispettivi() ? 'h' : 's';
|
||||
clig = causale().corrispettivi() ? 'h' : 's';
|
||||
}
|
||||
m.send_key(K_SHIFT+K_CTRL+clig, -1); // group 1 (clienti)
|
||||
m.send_key(K_SHIFT+K_CTRL+forg, -2); // group 2 (fornitori)
|
||||
@ -256,6 +266,7 @@ void TPrimanota_application::init_mask(TMask& m)
|
||||
|
||||
void TPrimanota_application::init_query_mode(TMask& m)
|
||||
{
|
||||
enable_menu_item(M_FILE_PRINT);
|
||||
m.enable(DLG_NEWREC);
|
||||
}
|
||||
|
||||
@ -297,7 +308,8 @@ void TPrimanota_application::init_insert_mode(TMask& m)
|
||||
_saldi.set_movap(_causale.apertura());
|
||||
_saldi.set_anno_es(m.get_int(F_ANNOES));
|
||||
_saldi.set_num_ulmov(m.get_long(F_NUMREG));
|
||||
_saldi.set_data_ulmov(TDate(m.get(F_DATAREG)));
|
||||
const TDate datareg(m.get(F_DATAREG));
|
||||
_saldi.set_data_ulmov(datareg);
|
||||
|
||||
if (_iva != nessuna_iva)
|
||||
{
|
||||
@ -337,7 +349,8 @@ void TPrimanota_application::init_insert_mode(TMask& m)
|
||||
|
||||
if (iva() == nessuna_iva)
|
||||
{
|
||||
set_cgs_row(-1,zero,tc,desc,' ');
|
||||
const int n = set_cgs_row(-1,zero,tc,desc,' ');
|
||||
cgs().disable_cell(n, sezione == 'D' ? 1 : 0);
|
||||
}
|
||||
else
|
||||
{
|
||||
@ -578,7 +591,7 @@ void TPrimanota_application::mask2rel(const TMask& m)
|
||||
}
|
||||
if (_iva == nessuna_iva) return;
|
||||
|
||||
if (causale().reg().corrispettivi())
|
||||
if (causale().corrispettivi())
|
||||
{
|
||||
TRectype& rec = _rel->lfile()->curr();
|
||||
rec.put("TIPO", "");
|
||||
|
||||
@ -67,7 +67,8 @@ real TPrimanota_application::totale_documento()
|
||||
const bool swaps = test_swap(TRUE); // Ritenute sociali invertite ?
|
||||
|
||||
real tot(m.get(F_TOTALE));
|
||||
tot += real(m.get(F_RITFIS));
|
||||
const real ritfis(m.get(F_RITFIS));
|
||||
tot += ritfis;
|
||||
|
||||
real ritsoc(m.get(F_RITSOC));
|
||||
if (swapt ^ swaps)
|
||||
@ -78,7 +79,7 @@ real TPrimanota_application::totale_documento()
|
||||
}
|
||||
|
||||
// Determina se un codice sospeso o no
|
||||
// Certified 50%
|
||||
// Certified 90%
|
||||
bool TPrimanota_application::suspended_handler(TMask_field& f, KEY k)
|
||||
{
|
||||
if (f.to_check(k))
|
||||
@ -342,9 +343,6 @@ int TPrimanota_application::set_cgs_row(int n, const TImporto& imp,
|
||||
row << '|' << tipo;
|
||||
|
||||
disable_cgs_cells(n, tipo);
|
||||
if (tipo == ' ')
|
||||
cg.disable_cell(n, imp.sezione() == 'D' ? 1 : 0);
|
||||
|
||||
cg.force_update(n);
|
||||
|
||||
return n;
|
||||
@ -465,8 +463,9 @@ bool TPrimanota_application::cg_notify(int r, KEY k)
|
||||
TImporto i; i = row; i.swap_section();
|
||||
TConto contro(row, 9, 0x3);
|
||||
app().set_cgs_row(1, i, contro, "", ' ');
|
||||
TConto conto(cg.row(1), 2, 0x3);
|
||||
conto.add_to(cg.row(1), 2, 0x3);
|
||||
TConto conto(row, 2, 0x3);
|
||||
conto.add_to(cg.row(1), 9, 0x3);
|
||||
app().cgs().force_update(1);
|
||||
}
|
||||
app().calcola_saldo();
|
||||
break;
|
||||
@ -886,16 +885,22 @@ bool TPrimanota_application::datacomp_handler(TMask_field& f, KEY key)
|
||||
|
||||
if (ae)
|
||||
{
|
||||
const char* data = "";
|
||||
if (f.dlg() == F_DATACOMP)
|
||||
{
|
||||
m.set(F_ANNOES, ae);
|
||||
data = "di competenza";
|
||||
}
|
||||
else
|
||||
data = "del 74/ter";
|
||||
|
||||
const TDate dr(m.get(F_DATAREG)); // Data operazione
|
||||
int pr; // Esercizio precedente
|
||||
const int ar = date2esc(dr, &pr); // Esercizio in corso
|
||||
if (ae != ar && ae != pr)
|
||||
{
|
||||
TString80 e("La data deve appartenere all'esercizio ");
|
||||
e << ar;
|
||||
TString80 e;
|
||||
e << "La data " << data << " deve appartenere all'esercizio " << ar;
|
||||
if (pr > 0) e << " o al " << pr;
|
||||
return f.error_box(e);
|
||||
}
|
||||
@ -929,34 +934,13 @@ bool TPrimanota_application::data74ter_handler(TMask_field& f, KEY key)
|
||||
// Certified 99%
|
||||
bool TPrimanota_application::reg_handler(TMask_field& f, KEY key)
|
||||
{
|
||||
if (f.to_check(key, TRUE))
|
||||
if (key == K_TAB)
|
||||
{
|
||||
// if (!suspended_handler(f, key)) return FALSE;
|
||||
|
||||
const int ai = f.mask().get_int(F_ANNOIVA);
|
||||
const char* r = f.get();
|
||||
TRegistro reg(r, ai);
|
||||
|
||||
const TipoIVA i = reg.iva();
|
||||
if (i == iva_errata)
|
||||
return f.error_box("Tipo registro errato");
|
||||
|
||||
if (reg.iva() != app().iva())
|
||||
{
|
||||
const TString16 i1(iva2name(reg.iva()));
|
||||
const TString16 i2(iva2name(app().iva()));
|
||||
return f.error_box("Tipo registro (%s) incongruente col tipo di registrazione (%s)",
|
||||
(const char*)i1, (const char*)i2);
|
||||
}
|
||||
|
||||
TRegistro& reg = app().causale().reg();
|
||||
const bool av = reg.agenzia_viaggi();
|
||||
f.mask().show(F_DATA74TER, av);
|
||||
if (!av) f.mask().reset(F_DATA74TER);
|
||||
|
||||
if (key == K_TAB)
|
||||
app().causale().reg() = reg;
|
||||
}
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
|
||||
@ -230,7 +230,7 @@ TLibro_giornale::TLibro_giornale(int y)
|
||||
|
||||
TCausale::TCausale(const char* cod, int year)
|
||||
: TArray(12), _rec(LF_CAUSALI), _iva(iva_errata),
|
||||
_sezione_clifo(' '), _sezione_ritsoc(' ')
|
||||
_sezione_clifo(' '), _sezione_ritsoc(' '), _corrisp(FALSE)
|
||||
{
|
||||
if (*cod) read(cod, year);
|
||||
}
|
||||
@ -284,6 +284,7 @@ bool TCausale::read(const char* cod, int year)
|
||||
else
|
||||
{
|
||||
_iva = nessuna_iva; // Clear IVA data
|
||||
_corrisp = FALSE;
|
||||
_reg.read("", year);
|
||||
}
|
||||
|
||||
@ -375,7 +376,8 @@ TipoIVA TCausale::iva() const
|
||||
{
|
||||
if (_iva == iva_errata)
|
||||
{
|
||||
TipoIVA i = nessuna_iva;
|
||||
TipoIVA i = nessuna_iva; // Tipo IVA di default
|
||||
bool c = FALSE; // Corrispettivi di default
|
||||
|
||||
TString16 tipodoc(_rec.get("TIPODOC"));
|
||||
if (tipodoc.not_empty())
|
||||
@ -393,11 +395,11 @@ TipoIVA TCausale::iva() const
|
||||
error_box("Tipo documento incompatibile con tipo registro");
|
||||
i = iva_errata;
|
||||
}
|
||||
|
||||
((TCausale*)this)->_corrisp = tpd.get_bool("B0"); // Ricorda flag per la prossima volta
|
||||
c = tpd.get_bool("B0");
|
||||
}
|
||||
}
|
||||
((TCausale*)this)->_iva = i; // Ricorda IVA per la prossima volta
|
||||
((TCausale*)this)->_corrisp = c; // Ricorda flag per la prossima volta
|
||||
}
|
||||
return _iva;
|
||||
}
|
||||
@ -413,7 +415,8 @@ bool TCausale::similar(const TCausale& c) const
|
||||
return iva() == c.iva() &&
|
||||
sezionale() == c.sezionale() &&
|
||||
valuta() == c.valuta() &&
|
||||
intra() == c.intra();
|
||||
intra() == c.intra() &&
|
||||
corrispettivi() == c.corrispettivi();
|
||||
}
|
||||
|
||||
///////////////////////////////////////////////////////////
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user