Patch level : 1.7 at

Files correlati     : at2.exe iscritti.trr
Ricompilazione Demo : [ ]
Commento            : aggiunti campi al tracciato file iscritti


git-svn-id: svn://10.65.10.50/trunk@13094 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 2005-05-17 11:13:19 +00:00
parent fb8edbc545
commit 1a3ffd1339
2 changed files with 31 additions and 8 deletions

View File

@ -208,14 +208,19 @@ bool TStampaIscritti::preprocess_page(int file, int counter)
_fileiscr->put("COGNOME",recsog.get(SOG_COGNOME));
_fileiscr->put("NOME",recsog.get(SOG_NOME));
_fileiscr->put("INDIRIZZO",recsog.get(SOG_DOM_INDIR));
TString80 localita = "";
localita << recsog.get(SOG_DOM_CAP);
localita << ' ';
TString16 cap = recsog.get(SOG_DOM_CAP);
_fileiscr->put("CAP", cap);
TString80 localita;
if (recsog.get(SOG_DOM_CODLOC).not_empty())
localita << current_cursor()->curr(-ALIAS_LCP).get("S0");
localita = current_cursor()->curr(-ALIAS_LCP).get("S0");
else
localita << current_cursor()->curr(LF_COMUNI).get(COM_DENCOM);
localita << ' ' << current_cursor()->curr(LF_COMUNI).get(COM_PROVCOM);
localita = current_cursor()->curr(LF_COMUNI).get(COM_DENCOM);
_fileiscr->put("COMUNE",localita);
TString16 provincia = current_cursor()->curr(LF_COMUNI).get(COM_PROVCOM);
_fileiscr->put("PROVINCIA", provincia);
localita << ' ' << provincia;
cap << ' ';
localita.insert(cap);
localita.trim();
_fileiscr->put("LOCALITA",localita);
_fileiscr->put("TELABI",recsog.get(SOG_TELABI));
@ -225,6 +230,17 @@ bool TStampaIscritti::preprocess_page(int file, int counter)
_fileiscr->put("TOTDON",recsog.get(SOG_TOTDON));
_fileiscr->put("CATDON",recsog.get(SOG_CATDON));
_fileiscr->put("DATANASC",recsog.get(SOG_DATANASC));
_fileiscr->put("CODSEZ",recsog.get(SOG_CODSEZ));
_fileiscr->put("CODSOT",recsog.get(SOG_CODSOT));
TString80 sezione = current_cursor()->curr(LF_SEZIONI).get(SEZ_DENSEZ);
sezione << '/';
sezione << current_cursor()->curr(LF_SEZIONI).get(SEZ_DENSOT);
_fileiscr->put("SEZIONE", sezione);
const char sesso = recsog.get(SOG_SESSO)[0];
if (sesso == '1')
_fileiscr->put("SESSO",'M');
else if (sesso == '2')
_fileiscr->put("SESSO",'F');
_fileiscr->write();
do_events();
}

View File

@ -1,11 +1,18 @@
1001
11
18
COGNOME|1|25|0|Cognome
NOME|1|25|0|Nome
DATANASC|5|8|0|Data di nascita
CATDON|1|2|0|Categoria donatori
CODSEZ|1|2|0|Codice sezione
CODSOT|1|2|0|Codice sottogruppo
SEZIONE|1|50|0|Denominazione sezione/sottog.
SESSO|1|1|0|Sesso m/f
INDIRIZZO|1|30|0|Indirizzo
LOCALITA|1|50|0|Cap,localita,prov.
CAP|1|5|0|Cap,
COMUNE|1|50|0|Localita/comune
PROVINCIA|1|2|0|Provincia
LOCALITA|1|50|0|CAP, Localita, Prov.
TELABI|1|14|0|Telefono abitazione
TELLAV|1|14|0|Telefono lavoro
TELALT|1|14|0|Telefono altro