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            : Stampa tessere: fa le modifiche su arc. soggetti anche nella stampa singola + corretto passaggio di categoria


git-svn-id: svn://10.65.10.50/trunk@7937 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1999-03-15 10:58:56 +00:00
parent afab52cf4e
commit dd9f77838f
2 changed files with 26 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
at/at4500.cpp
View File

@ -260,9 +260,8 @@ bool TStampaTessere::preprocess_page(int file, int counter)
if (_aggiorna)
{
sogg.put(SOG_T_STAMPATA,TRUE);
int totdon = sogg.get_int(SOG_TOTDON);
TString16 catdon = sogg.get(SOG_CATDON);
if ((totdon >= _numdon2) && (catdon == _catini2))
if ((totdon >= _numdon2) && (catdon == _catini2) && _sttess2)
sogg.put(SOG_CATDON, _catfin2);
sogg.rewrite();
}

27
at/at4600.cpp
View File

@ -46,6 +46,9 @@ class TStampaTessereS : public TPrintapp
ts _tipostampa;
TString _riepilogodon;
int _totfinestampa;
bool _sttess2;
int _numdon2;
TString16 _catini2, _catfin2;
protected:
virtual bool user_create();
@ -169,10 +172,23 @@ bool TStampaTessereS::preprocess_page(int file, int counter)
}
if (_aggiorna)
{
sogg.put(SOG_T_STAMPATA,TRUE);
sogg.rewrite();
// se non faccio cosi' non mi registra le variazioni!!!!
// provato come in at4500.cpp ma non va
// forse perche' la relazione e' su un'altro file principale????
TLocalisamfile filesogg(LF_SOGGETTI);
filesogg.setkey(1);
filesogg.zero();
filesogg.put(SOG_CODICE, sogg.get_long(SOG_CODICE));
if (filesogg.read() == NOERR)
{
filesogg.put(SOG_T_STAMPATA,TRUE);
TString16 catdon = filesogg.get(SOG_CATDON);
const int totdon = filesogg.get_int(SOG_TOTDON);
if ((totdon >= _numdon2) && (catdon == _catini2) && _sttess2)
filesogg.put(SOG_CATDON, _catfin2);
filesogg.rewrite();
}
}
//current_cursor()->file().remove();
}
else
_totfinestampa++;
@ -317,6 +333,11 @@ bool TStampaTessereS::user_create()
//cursore ordinamento per sezione+sottogruppo+cognome+nome
_cur = add_cursor(new TCursor(_rel, "", 3));
_msk = new TMask("at4600a");
TConfig config(CONFIG_STUDIO);
_numdon2 = config.get_int("NumDon2");
_catini2 = config.get("CatIni2");
_catfin2 = config.get("CatFin2");
_sttess2 = config.get_bool("StTess2");
_form_pag = new TTessereS_form("ATTESSER");
TSheet_field& ss = (TSheet_field&)_msk->field(F_SOGGETTI);
add_rows_soggetti(ss,50);