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

Nuovi oggetti per la gestione del codice a livelli

Browse Source 
Stampa solo le causali "fiscali"


git-svn-id: svn://10.65.10.50/trunk@4838 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
augusto 1997-07-07 11:10:35 +00:00
parent b945fd44b4
commit 9babfb5763
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
mg/mg4300.cpp
View File

@ -354,10 +354,15 @@ void TGiornalemag::add_mag(TRectype & magrec,const char * codreg)
bool TGiornalemag::filter_func(const TRelation* r)
{
bool rval;
TCausale_magazzino & causmov=(TCausale_magazzino & )r->lfile(-ALIAS_CAUSALI).curr();
TCausale_magazzino & causrig=(TCausale_magazzino & )r->lfile(-ALIAS_CAUSALIR).curr();
rval = r->lfile(LF_MOVMAG).get_date("DATAREG").year()==_annoes;
rval &=_cod_magazzini.is_key(r->lfile(LF_RMOVMAG).get("CODMAG").left(3));
if (!dadata.empty()) rval &=r->lfile(LF_MOVMAG).get_date("DATAREG")>=dadata;
if (!adata.empty()) rval &=r->lfile(LF_MOVMAG).get_date("DATAREG")<=adata;
// considera solo le causali "fiscali"
rval &=causrig.codice().not_empty() ?
causrig.is_fiscale(): causmov.is_fiscale();
return rval;
}