Patch level :10.0

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
modificato per quanto è possibile la chiamata dei frm standard in at1


git-svn-id: svn://10.65.10.50/trunk@20433 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2010-05-06 13:37:46 +00:00
parent e8e526e6f1
commit cd5f4c250e
6 changed files with 98 additions and 5 deletions

13
at/at0900a.uml Executable file
View File

@ -0,0 +1,13 @@
PAGE "Cambio intervalli per Lesignano" -1 -1 78 20
BUTTON DLG_OK 9 2
BEGIN
PROMPT -12 14 ""
END
BUTTON DLG_QUIT 9 2
BEGIN
PROMPT -22 14 ""
END
ENDPAGE
ENDMASK

View File

@ -525,15 +525,29 @@ bool TStampaBenemerenze::user_create()
//_rel->add(LF_SEZIONI, "CODSEZ==CODSEZ|CODSOT==CODSOT");
_sezioni = new TLocalisamfile(LF_SEZIONI);
_msk = new TMask("at1300a");
//controllo e caricamento dati dalla configurazione
TConfig config(CONFIG_STUDIO);
//etichette
TString16 etformato = config.get("EtFormato");
if (!controlla_esistenza_form(etformato, "ate10x36"))
return false;
_etlarghezza = config.get_int("EtLarghezza");
_etcolonne = config.get_int("EtColonne");
_form_eti = new TEti_bensez_form(etformato);
_form_let = new TEti_bensez_form("ATLEBEBO");
//lettere
/*TString16 letformato = config.get("LetFormato");
if (!controlla_esistenza_form(letformato, "atlebebo"))
return false;*/
TString16 letformato = "atlebebo";
_form_let = new TEti_bensez_form(letformato);
_stampa80 = config.get_bool("Stampa80");
_etictot = config.get_bool("EticTot");
return TRUE;
return true;
}
bool TStampaBenemerenze::user_destroy()

View File

@ -384,15 +384,28 @@ bool TStampaBenxGAz::user_create()
_rel->add(LF_COMUNI, "COM==DOM_CODCOM",1,LF_SOGGETTI,ALIAS_COMDOM);
//_rel->add(LF_COMUNI, "COM==COMNASC",1,LF_SOGGETTI,ALIAS_COMNAS);
_msk = new TMask("at1400a");
//controllo e caricamento dati dalla configurazione
TConfig config(CONFIG_STUDIO);
//etichette
TString16 etformato = config.get("EtFormato");
if (!controlla_esistenza_form(etformato, "ate10x36"))
return false;
_form_eti = new TEti_bengru_form(etformato);
_etlarghezza = config.get_int("EtLarghezza");
_etcolonne = config.get_int("EtColonne");
_form_eti = new TEti_bengru_form(etformato);
_form_let = new TEti_bengru_form("ATLEBEBO");
//lettere
/*TString16 letformato = config.get("LetFormato");
if (!controlla_esistenza_form(letformato, "atlebebo"))
return false;*/
TString16 letformato = "atlebebo";
_form_let = new TEti_bengru_form(letformato);
_stampa80 = config.get_bool("Stampa80");
_etictot = config.get_bool("EticTot");
return TRUE;
return true;
}
bool TStampaBenxGAz::user_destroy()

22
at/at2600.trr Executable file
View File

@ -0,0 +1,22 @@
1001
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
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
DATAULTDON|5|8|0|Data ultima donazione
TOTDON|2|3|0|Totale donazioni
1
COGNOME+NOME+DATANASC|X

14
at/at2700a.trr Executable file
View File

@ -0,0 +1,14 @@
1001
10
CODICE|3|8|0|Codice
COGNOME|1|25|0|Cognome
NOME|1|25|0|Nome
DATANASC|5|8|0|Data di nascita
NOMINATIVO|1|100|0|Nominativo x famiglie
SPOSATA|1|25|0|Cognome da sposata
INDIRIZZO|1|30|0|Indirizzo
STRADARIO|1|5|0|Stradario
PRESSO|1|30|0|Presso
LOCALITA|1|80|0|CAP, Localita, Prov.
1
CODICE|X

17
at/at2700b.trr Executable file
View File

@ -0,0 +1,17 @@
1001
13
ASSOCIAZ|1|25|0|Sezione di appartenenza
DATANASC|5|8|0|Data di nascita
CATDON|1|2|0|Categoria donatori
TESSAVIS|1|6|0|Tessera AVIS
GRUPPOAB0|1|3|0|Gruppo AB0
KELL|1|3|0|Kell
RHANTID|1|3|0|Rh/AntiD
SESSO|1|1|0|Sesso
COGNOME|1|25|0|Cognome
NOME|1|25|0|Nome
INDIRIZZO|1|30|0|Indirizzo
CAP|1|5|0|CAP
LOCALITA|1|80|0|Localita, Prov.
1
COGNOME+NOME+DATANASC|X