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            : Giornaliero donazioni: possibilita' di cercare il soggetto per tessera


git-svn-id: svn://10.65.10.50/trunk@7286 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1998-10-19 12:51:28 +00:00
parent eeec3858b2
commit 9e10d401f6
3 changed files with 42 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
at/at0200.cpp
View File

@ -119,6 +119,7 @@ bool TGiornalieroDC::create()
TSheet_field& ss = (TSheet_field&)_msk->field(F_SOGGETTI); TSheet_field& ss = (TSheet_field&)_msk->field(F_SOGGETTI);
ss.set_notify(soggetti_notify); ss.set_notify(soggetti_notify);
ss.sheet_mask().set_handler(F_S_NOME,nome_handler); ss.sheet_mask().set_handler(F_S_NOME,nome_handler);
ss.sheet_mask().set_handler(F_S_TESSAVIS,nome_handler);
ss.sheet_mask().set_handler(F_S_CODICE,codice_handler); ss.sheet_mask().set_handler(F_S_CODICE,codice_handler);
ss.sheet_mask().set_handler(F_S_TIPODON,tipodon_handler); ss.sheet_mask().set_handler(F_S_TIPODON,tipodon_handler);
TConfig config(CONFIG_STUDIO); TConfig config(CONFIG_STUDIO);

20
at/at0200a.h
View File

@ -17,16 +17,16 @@
#define F_S_CODICE 101 #define F_S_CODICE 101
#define F_S_COGNOME 102 #define F_S_COGNOME 102
#define F_S_NOME 103 #define F_S_NOME 103
#define F_S_TIPODON 104 #define F_S_TESSAVIS 104
#define F_S_TIPOCON 105 #define F_S_TIPODON 105
#define F_S_ETICHETTA 106 #define F_S_TIPOCON 106
#define F_S_PRIMADON 107 #define F_S_ETICHETTA 107
#define F_S_DATADON 108 #define F_S_PRIMADON 108
#define F_S_DATANASC 109 #define F_S_DATADON 109
#define F_S_CODSEZ 110 #define F_S_DATANASC 110
#define F_S_CODSOT 111 #define F_S_CODSEZ 111
#define F_S_CATDON 112 #define F_S_CODSOT 112
#define F_S_TESSAVIS 113 #define F_S_CATDON 113
#define F_S_INTSI 114 #define F_S_INTSI 114
#define F_S_DENSEZ 151 #define F_S_DENSEZ 151

38
at/at0200a.uml
View File

@ -140,6 +140,7 @@ BEGIN
ITEM "Codice@8" ITEM "Codice@8"
ITEM "Cognome@25" ITEM "Cognome@25"
ITEM "Nome@25" ITEM "Nome@25"
ITEM "Tessera"
ITEM "Don." ITEM "Don."
ITEM "Con." ITEM "Con."
ITEM "Et. sacca" ITEM "Et. sacca"
@ -149,7 +150,6 @@ BEGIN
ITEM "Sez." ITEM "Sez."
ITEM "Sot." ITEM "Sot."
ITEM "Cat." ITEM "Cat."
ITEM "Tessera"
ITEM "Int.SI" ITEM "Int.SI"
END END
@ -236,6 +236,36 @@ BEGIN
ADD RUN at0 -0 ADD RUN at0 -0
END END
STRING F_S_TESSAVIS 6
BEGIN
PROMPT 33 3 "Tessera AVIS "
USE LF_SOGGETTI KEY 4
INPUT TESSAVIS F_S_TESSAVIS
DISPLAY "Tessera" TESSAVIS
DISPLAY "Cognome@25" COGNOME
DISPLAY "Nome@25" NOME
DISPLAY "Nato il@10" DATANASC
DISPLAY "Codice@8" CODICE
DISPLAY "Sez." CODSEZ
DISPLAY "Sot." CODSOT
DISPLAY "C." CATDON
DISPLAY "Gr.AB0" GRUPPOAB0
DISPLAY "Rh " RHANTID
DISPLAY "Int.SI" INTSI
OUTPUT F_S_CODICE CODICE
OUTPUT F_S_COGNOME COGNOME
OUTPUT F_S_NOME NOME
OUTPUT F_S_DATANASC DATANASC
OUTPUT F_S_CODSEZ CODSEZ
OUTPUT F_S_CODSOT CODSOT
OUTPUT F_S_CATDON CATDON
OUTPUT F_S_TESSAVIS TESSAVIS
OUTPUT F_S_INTSI INTSI
HELP "Cognome del soggetto"
// CHECKTYPE NORMAL
ADD RUN at0 -0
END
STRING F_S_TIPODON 2 STRING F_S_TIPODON 2
BEGIN BEGIN
PROMPT 2 16 "Tipo donazione " PROMPT 2 16 "Tipo donazione "
@ -336,12 +366,6 @@ BEGIN
// CHECKTYPE NORMAL // CHECKTYPE NORMAL
END END
STRING F_S_TESSAVIS 10
BEGIN
PROMPT 33 3 "Tessera AVIS "
FLAGS "D"
END
NUMBER F_S_INTSI 3 0 NUMBER F_S_INTSI 3 0
BEGIN BEGIN
PROMPT 40 12 "Sangue intero " PROMPT 40 12 "Sangue intero "