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

Patch level :

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            : Data iscrizione = data prima donazione se vuota (se la prima donazione non e' dettagliata)


git-svn-id: svn://10.65.10.50/trunk@7745 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1999-02-02 14:49:57 +00:00
parent 691cb291a5
commit 9df3692609
1 changed files with 10 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
at/at5400.cpp
View File

@ -90,11 +90,16 @@ bool TRiordinaSog::create()
sog.put(SOG_CATDON, catfin2);
}
TDate dataiscsog = sog.get_date(SOG_DATAISC);
if (dataiscsog.empty() && dataisc)
{
const TRectype& riga = _sdonazioni->row(1);
sog.put(SOG_DATAISC,riga.get(DON_DATADON));
}
if (!dataiscsog.ok() && dataisc)
{
if (!sog.get_date(SOG_DATAPRISI) == NULLDATE)
sog.put(SOG_DATAISC,sog.get(SOG_DATAPRISI));
else
{
const TRectype& riga = _sdonazioni->row(1);
sog.put(SOG_DATAISC,riga.get(DON_DATADON));
}
}
_soggetti->rewrite();
}
stop_run();