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

1
at/at0200.cpp

@ -119,6 +119,7 @@ bool TGiornalieroDC::create()
TSheet_field& ss = (TSheet_field&)_msk->field(F_SOGGETTI);
ss.set_notify(soggetti_notify);
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_TIPODON,tipodon_handler);
TConfig config(CONFIG_STUDIO);

20
at/at0200a.h

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

38
at/at0200a.uml

@ -140,6 +140,7 @@ BEGIN
ITEM "Codice@8"
ITEM "Cognome@25"
ITEM "Nome@25"
ITEM "Tessera"
ITEM "Don."
ITEM "Con."
ITEM "Et. sacca"
@ -149,7 +150,6 @@ BEGIN
ITEM "Sez."
ITEM "Sot."
ITEM "Cat."
ITEM "Tessera"
ITEM "Int.SI"
END
@ -236,6 +236,36 @@ BEGIN
ADD RUN at0 -0
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
BEGIN
PROMPT 2 16 "Tipo donazione "
@ -336,12 +366,6 @@ BEGIN
// CHECKTYPE NORMAL
END
STRING F_S_TESSAVIS 10
BEGIN
PROMPT 33 3 "Tessera AVIS "
FLAGS "D"
END
NUMBER F_S_INTSI 3 0
BEGIN
PROMPT 40 12 "Sangue intero "