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

Patch level : 12.0 1044

Browse Source 
Files correlati     : cg0.exe cg0200a.msk cgtbbnp.msk
Commento        :

Agiunto supporto per IBAN esteri all'anagrafica clienti e alle banche di presentazione
This commit is contained in:
Alessandro Bonazzi 2021-03-29 22:29:47 +02:00
parent 9a0a4d5ef4
commit 914d2ffdb7
2 changed files with 16 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
src/cg/cg0200.cpp
View File

@ -47,6 +47,7 @@ protected:
virtual void on_config_change();
////////////
static bool ban_notify(TSheet_field& ban, int r, KEY key);
static bool indsp_notify(TSheet_field& s, int r, KEY key);
static void indsp_sheet_rebuilder();
static bool effetti_notify(TSheet_field& s, int r, KEY key);
@ -1468,6 +1469,16 @@ void TClifo_application::indsp_sheet_rebuilder()
}
}
bool TClifo_application::ban_notify(TSheet_field& ban, int r, KEY key)
{
if (key == K_CTRL + K_INS)
{
ban.disable_cell(r, F_BBAN);
ban.force_update(r);
}
return true;
}
bool TClifo_application::indsp_notify(TSheet_field& indsp, int r, KEY key)
{
switch (key)
@ -1560,6 +1571,10 @@ bool TClifo_application::user_create() // initvar e arrmask
_msk->set_handler(F_STATOCF, stato_handler);
_msk->set_handler(F_PADESTIN, coddest_handler);
TSheet_field & ns_sh = _msk->sfield(F_BANA);
ns_sh.set_notify(ban_notify);
TSheet_field& ind = _msk->sfield(F_SHEET_G_VEN);
ind.set_notify(indsp_notify);
@ -1570,9 +1585,6 @@ bool TClifo_application::user_create() // initvar e arrmask
pnae.set_notify(effetti_notify);
/*TSheet_field & vs_sh = _msk->sfield(F_BANP);
vs_sh.show_column(F_BBAN, false);*/
_savenew = !ini_get_bool(CONFIG_STUDIO, "cg", "Cg02SN");

2
src/cg/f20.dir
View File

@ -1,3 +1,3 @@
20
0
$clifo|4338|4338|916|0|Clienti/Fornitori|||
$clifo|0|0|916|0|Clienti/Fornitori|||