Errore aga001
git-svn-id: svn://10.65.10.50/trunk@4315 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
d748a62922
commit
1c714b3c3a
@ -191,7 +191,7 @@ int TVariazione_effetti::read(TMask& m)
|
||||
_com->zero();
|
||||
_com->put(COM_COM, codcom);
|
||||
if (_com->read() == NOERR)
|
||||
riga.add(_com->get(COM_DENCOM));
|
||||
riga.add(_com->get(COM_DENCOM));
|
||||
shcess.row(i-1)=riga;
|
||||
}
|
||||
items = _effetto->rows_r();
|
||||
@ -210,9 +210,9 @@ int TVariazione_effetti::read(TMask& m)
|
||||
riga.add(rec.get(REFF_NRATA));
|
||||
char tipo_num = rec.get(REFF_PROVV)[0];
|
||||
if (tipo_num == 'D')
|
||||
riga.add("Definitiva");
|
||||
riga.add("Definitiva");
|
||||
else
|
||||
riga.add("Provvisoria");
|
||||
riga.add("Provvisoria");
|
||||
riga.add(rec.get(REFF_CODNUM));
|
||||
riga.add(rec.get(REFF_ANNODOC));
|
||||
riga.add(rec.get(REFF_NFATT));
|
||||
@ -367,16 +367,16 @@ bool TVariazione_effetti::impeff_notify(TSheet_field& s, int r, KEY key)
|
||||
{
|
||||
if (s.to_check(key, TRUE))
|
||||
{
|
||||
calcola_totali();
|
||||
calcola_totali();
|
||||
}
|
||||
if (key == K_ENTER)
|
||||
{
|
||||
TToken_string& row = s.row(s.selected());
|
||||
char tipo_num = row.get(8)[0];
|
||||
TToken_string& row = s.row(s.selected());
|
||||
char tipo_num = row.get(8)[0];
|
||||
if (tipo_num == 'D')
|
||||
row.add("Definitiva",8);
|
||||
row.add("Definitiva",8);
|
||||
else
|
||||
row.add("Provvisoria",8);
|
||||
row.add("Provvisoria",8);
|
||||
}
|
||||
//se rimane una sola riga nello sheet non la si può cancellare
|
||||
if (key == K_DEL && s.items() == 1)
|
||||
@ -390,6 +390,6 @@ bool TVariazione_effetti::impeff_notify(TSheet_field& s, int r, KEY key)
|
||||
int ef0100(int argc, char* argv[])
|
||||
{
|
||||
TVariazione_effetti a ;
|
||||
a.run(argc, argv, "Variazione Effetti");
|
||||
a.run(argc, argv, "Effetti");
|
||||
return 0;
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user