Patch level :
Files correlati : Ricompilazione Demo : [ ] Commento : git-svn-id: svn://10.65.10.50/trunk@19863 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
af34cd91cf
commit
f06e039eb6
@ -1,16 +0,0 @@
|
||||
//DEFINIZIONE MASCHERA PER STAMPA TABELLA CATEGORIE DONATORI
|
||||
|
||||
PAGE "Stampa Tabella Categorie donatori" -1 -1 56 8
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,17 +0,0 @@
|
||||
//DEFINIZIONE MASCHERA PER STAMPA TABELLA CATEGORIE NON DONATORI
|
||||
//#include "bastctn.h"
|
||||
|
||||
PAGE "Stampa Tabella Categorie non donatori" -1 -1 56 8
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,17 +0,0 @@
|
||||
//DEFINIZIONE MASCHERA PER STAMPA TABELLA GRUPPI AZIENDALI
|
||||
//#include "bastgaz.h"
|
||||
|
||||
PAGE "Stampa Tabella Gruppi Aziendali" -1 -1 56 8
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,17 +0,0 @@
|
||||
//DEFINIZIONE MASCHERA PER STAMPA TABELLA LOCALITA' POSTALI
|
||||
//#include "bastlcp.h"
|
||||
|
||||
PAGE "Stampa Tabella Localita' Postali" -1 -1 56 8
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,17 +0,0 @@
|
||||
//DEFINIZIONE MASCHERA PER STAMPA TABELLA LUOGHI DI LAVORO
|
||||
//#include "bastldl.h"
|
||||
|
||||
PAGE "Stampa Tabella Luoghi di lavoro" -1 -1 56 8
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,17 +0,0 @@
|
||||
//DEFINIZIONE MASCHERA PER STAMPA TABELLA PUNTI DI PRELIEVO
|
||||
//#include "bastldn.h"
|
||||
|
||||
PAGE "Stampa Tabella Punti di prelievo" -1 -1 56 8
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,17 +0,0 @@
|
||||
//DEFINIZIONE MASCHERA PER STAMPA TABELLA MOTIVI
|
||||
//#include "bastmtc.h"
|
||||
|
||||
PAGE "Stampa Tabella Motivi controlli sanitari" -1 -1 56 8
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,17 +0,0 @@
|
||||
//DEFINIZIONE MASCHERA PER STAMPA TABELLA PROFESSIONI
|
||||
//#include "bastprf.h"
|
||||
|
||||
PAGE "Stampa Tabella Professioni" -1 -1 56 8
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,16 +0,0 @@
|
||||
//DEFINIZIONE MASCHERA PER STAMPA TABELLA SINGOLI CONTROLLI SANITARI
|
||||
|
||||
PAGE "Stampa Tabella Singoli controlli sanitari" -1 -1 56 8
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,17 +0,0 @@
|
||||
//DEFINIZIONE MASCHERA PER STAMPA TABELLA CONTROLLI SANITARI
|
||||
//#include "basttcs.h"
|
||||
|
||||
PAGE "Stampa Tabella Controlli sanitari" -1 -1 56 8
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,8 +0,0 @@
|
||||
#define F_TABBNZ_CODTAB 100
|
||||
#define F_TABBNZ_DESCR 101
|
||||
#define F_TABBNZ_NDON 102
|
||||
#define F_TABBNZ_STATUTO 103
|
||||
#define F_TABBNZ_M_NDON 104
|
||||
#define F_TABBNZ_M_ANNI 105
|
||||
#define F_TABBNZ_CATDON 106
|
||||
#define DLG_DEL 108
|
@ -1,84 +0,0 @@
|
||||
#include "batbbnz.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Benemerenze" -1 -1 78 7
|
||||
|
||||
STRING F_TABBNZ_CODTAB 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
HELP "Inserire il codice della benemerenza"
|
||||
USE BNZ
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABBNZ_CODTAB
|
||||
DISPLAY "Codice " CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABBNZ_CODTAB CODTAB
|
||||
OUTPUT F_TABBNZ_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_TABBNZ_DESCR 30
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD S0
|
||||
HELP "Inserire la descrizione della benemerenza"
|
||||
USE BNZ KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABBNZ_DESCR
|
||||
DISPLAY "Descrizione@30" S0
|
||||
DISPLAY "Codice " CODTAB
|
||||
COPY OUTPUT F_TABBNZ_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
NUMBER F_TABBNZ_NDON 3
|
||||
BEGIN
|
||||
PROMPT 2 5 "Num. donazioni "
|
||||
FIELD I0
|
||||
HELP "Inserire il numero di donazioni necessarie per ottenere la benemerenza"
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
BOOLEAN F_TABBNZ_STATUTO
|
||||
BEGIN
|
||||
PROMPT 30 5 "Da statuto "
|
||||
FIELD B0
|
||||
HELP "La benemerenza Š prevista nello statuto AVIS?"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 77 4
|
||||
BEGIN
|
||||
PROMPT 1 7 "Nuovi criteri per benemerenza"
|
||||
END
|
||||
|
||||
NUMBER F_TABBNZ_M_NDON 3
|
||||
BEGIN
|
||||
PROMPT 2 8 "Numero donazioni "
|
||||
FIELD I1
|
||||
HELP "Inserire il numero di donazioni necessarie per ottenere la benemerenza"
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
NUMBER F_TABBNZ_M_ANNI 2
|
||||
BEGIN
|
||||
PROMPT 2 9 "Anni di iscrizione "
|
||||
FIELD I2
|
||||
HELP "Inserire il numero di anni di iscrizione necessari"
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
BOOLEAN F_TABBNZ_CATDON
|
||||
BEGIN
|
||||
PROMPT 50 9 "Attribuisci solo ai dimessi"
|
||||
FIELD B0
|
||||
HELP "Inserire se la benemerenza va attribuita solo ai dimessi"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,6 +0,0 @@
|
||||
#define F_TABCTD_CODTAB 100
|
||||
#define F_TABCTD_DESCR 101
|
||||
#define F_TABCTD_DIMESSI 102
|
||||
#define F_TABCTD_CATCOLL 103
|
||||
#define F_DESCR_CATCOLL 104
|
||||
#define DLG_DEL 105
|
@ -1,68 +0,0 @@
|
||||
#include "batbctd.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Categorie donatori" -1 -1 78 7
|
||||
|
||||
STRING F_TABCTD_CODTAB 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
HELP "Inserire il codice della categoria"
|
||||
USE CTD
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABCTD_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABCTD_CODTAB CODTAB
|
||||
OUTPUT F_TABCTD_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_TABCTD_DESCR 30
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD S0
|
||||
HELP "Inserire la descrizione della categoria"
|
||||
USE CTD KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABCTD_DESCR
|
||||
DISPLAY "Descrizione@30" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABCTD_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
BOOLEAN F_TABCTD_DIMESSI
|
||||
BEGIN
|
||||
PROMPT 2 5 "Categoria di dimissione"
|
||||
FIELD B0
|
||||
HELP "Indicare se la categoria è di dimissione"
|
||||
END
|
||||
|
||||
STRING F_TABCTD_CATCOLL 2
|
||||
BEGIN
|
||||
PROMPT 2 7 "Cat. collegata "
|
||||
FIELD S6
|
||||
FLAGS "U"
|
||||
USE CTD SELECT B0!=#F_TABCTD_DIMESSI
|
||||
INPUT CODTAB F_TABCTD_CATCOLL
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABCTD_CATCOLL CODTAB
|
||||
OUTPUT F_DESCR_CATCOLL S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice non presente"
|
||||
END
|
||||
|
||||
STRING F_DESCR_CATCOLL 30
|
||||
BEGIN
|
||||
PROMPT 23 7 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,3 +0,0 @@
|
||||
#define F_TABCTN_CODTAB 100
|
||||
#define F_TABCTN_DESCR 101
|
||||
#define DLG_DEL 105
|
@ -1,40 +0,0 @@
|
||||
#include "batbctn.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Categorie non donatori" -1 -1 78 7
|
||||
|
||||
STRING F_TABCTN_CODTAB 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
HELP "Inserire il codice della categoria"
|
||||
USE CTN
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABCTN_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABCTN_CODTAB CODTAB
|
||||
OUTPUT F_TABCTN_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_TABCTN_DESCR 30
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD S0
|
||||
HELP "Inserire la descrizione della categoria"
|
||||
USE CTN KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABCTN_DESCR
|
||||
DISPLAY "Descrizione@30" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABCTN_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,3 +0,0 @@
|
||||
#define F_TABGAZ_CODTAB 100
|
||||
#define F_TABGAZ_DESCR 101
|
||||
#define DLG_DEL 105
|
@ -1,40 +0,0 @@
|
||||
#include "batbgaz.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Gruppi Aziendali" -1 -1 78 7
|
||||
|
||||
STRING F_TABGAZ_CODTAB 4
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
HELP "Inserire il codice del gruppo aziendale"
|
||||
USE GAZ
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABGAZ_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABGAZ_CODTAB CODTAB
|
||||
OUTPUT F_TABGAZ_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_TABGAZ_DESCR 30
|
||||
BEGIN
|
||||
PROMPT 2 3 "Denominazione "
|
||||
FIELD S0
|
||||
HELP "Inserire la denominazione del gruppo aziendale"
|
||||
USE GAZ KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABGAZ_DESCR
|
||||
DISPLAY "Descrizione@30" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABGAZ_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,4 +0,0 @@
|
||||
#define F_TABIDO_CODTAB 100
|
||||
#define F_TABIDO_DESCR 101
|
||||
#define F_TABIDO_PROCDON 102
|
||||
#define DLG_DEL 105
|
@ -1,48 +0,0 @@
|
||||
#include "batbido.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Idoneita' alla donazione" -1 -1 78 7
|
||||
|
||||
STRING F_TABIDO_CODTAB 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
HELP "Inserire il codice della idoneità"
|
||||
USE IDO
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABIDO_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABIDO_CODTAB CODTAB
|
||||
OUTPUT F_TABIDO_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_TABIDO_DESCR 30
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD S0
|
||||
HELP "Inserire la descrizione della idoneita'"
|
||||
USE IDO KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABIDO_DESCR
|
||||
DISPLAY "Descrizione@30" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABIDO_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
LISTBOX F_TABIDO_PROCDON 17
|
||||
BEGIN
|
||||
PROMPT 2 5 "Procedura di don. "
|
||||
FIELD S6
|
||||
#include "procdon.h"
|
||||
HELP "Indicare la procedura di donazione collegata alla idoneita'"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,7 +0,0 @@
|
||||
#define F_TABLCP_CODTAB 100
|
||||
#define F_TABLCP_LOCALITA 101
|
||||
#define F_TABLCP_CAP 102
|
||||
#define F_TABLCP_COM 103
|
||||
#define F_DENCOM 104
|
||||
#define F_PROVCOM 105
|
||||
#define DLG_DEL 106
|
@ -1,83 +0,0 @@
|
||||
#include "batblcp.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Localita' postali" -1 -1 78 7
|
||||
|
||||
STRING F_TABLCP_CODTAB 4
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
HELP "Inserire il codice della localita'"
|
||||
USE LCP
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABLCP_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Denominazione@30" S0
|
||||
DISPLAY "CAP@5" S6
|
||||
OUTPUT F_TABLCP_CODTAB CODTAB
|
||||
OUTPUT F_TABLCP_LOCALITA S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_TABLCP_LOCALITA 30
|
||||
BEGIN
|
||||
PROMPT 2 3 "Localita' "
|
||||
FIELD S0
|
||||
HELP "Inserire la denominazione della localita'"
|
||||
USE LCP KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABLCP_LOCALITA
|
||||
DISPLAY "Denominazione@30" S0
|
||||
DISPLAY "CAP@5" S6
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABLCP_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
STRING F_TABLCP_CAP 5
|
||||
BEGIN
|
||||
PROMPT 2 5 "CAP "
|
||||
FIELD S6
|
||||
HELP "Inserire il CAP della località"
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_TABLCP_COM 4
|
||||
BEGIN
|
||||
PROMPT 2 7 "Comune "
|
||||
FIELD S7
|
||||
FLAGS "U"
|
||||
USE LF_COMUNI
|
||||
INPUT STATO ""
|
||||
INPUT COM F_TABLCP_COM
|
||||
#include <comdcod.h>
|
||||
OUTPUT F_TABLCP_COM COM
|
||||
OUTPUT F_DENCOM DENCOM
|
||||
OUTPUT F_PROVCOM PROVCOM
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Comune assente"
|
||||
END
|
||||
|
||||
STRING F_DENCOM 50
|
||||
BEGIN
|
||||
PROMPT 19 7 ""
|
||||
USE LF_COMUNI KEY 2
|
||||
INPUT DENCOM F_DENCOM
|
||||
#include <comdden.h>
|
||||
COPY OUTPUT F_TABLCP_COM
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_PROVCOM 5
|
||||
BEGIN
|
||||
PROMPT 73 7 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,3 +0,0 @@
|
||||
#define F_TABLDL_CODTAB 100
|
||||
#define F_TABLDL_DESCR 101
|
||||
#define DLG_DEL 105
|
@ -1,40 +0,0 @@
|
||||
#include "batbldl.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Luoghi di lavoro" -1 -1 78 7
|
||||
|
||||
STRING F_TABLDL_CODTAB 4
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
HELP "Inserire il codice del luogo di lavoro"
|
||||
USE LDL
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABLDL_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@40" S0
|
||||
OUTPUT F_TABLDL_CODTAB CODTAB
|
||||
OUTPUT F_TABLDL_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_TABLDL_DESCR 40
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD S0
|
||||
HELP "Inserire la descrizione del luogo di lavoro"
|
||||
USE LDL KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABLDL_DESCR
|
||||
DISPLAY "Descrizione@40" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABLDL_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
14
at/batbldn.h
14
at/batbldn.h
@ -1,14 +0,0 @@
|
||||
#define F_TABLDN_CODTAB 100
|
||||
#define F_TABLDN_DESCR 101
|
||||
#define F_TABLDN_INDIR 102
|
||||
#define F_TABLDN_LOC 103
|
||||
#define F_TABLDN_COM 104
|
||||
#define F_TABLDN_DENCOM 105
|
||||
#define F_TABLDN_DENLOC 106
|
||||
#define F_TABLDN_PROVCOM 107
|
||||
#define F_TABLDN_CAPCOM 108
|
||||
#define F_TABLDN_TELEFONO 109
|
||||
#define F_TABLDN_ORARIO 110
|
||||
#define F_TABLDN_NOTE1 111
|
||||
#define F_TABLDN_NOTE2 112
|
||||
#define DLG_DEL 115
|
141
at/batbldn.uml
141
at/batbldn.uml
@ -1,141 +0,0 @@
|
||||
#include "batbldn.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Punti di prelievo" -1 -1 78 7
|
||||
|
||||
STRING F_TABLDN_CODTAB 4
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
USE LDN
|
||||
INPUT CODTAB F_TABLDN_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_TABLDN_CODTAB CODTAB
|
||||
OUTPUT F_TABLDN_DESCR S0
|
||||
CHECKTYPE REQUIRED
|
||||
HELP "Codice del punto di prelievo"
|
||||
END
|
||||
|
||||
STRING F_TABLDN_DESCR 50
|
||||
BEGIN
|
||||
PROMPT 2 2 "Punto "
|
||||
FIELD S0
|
||||
KEY 2
|
||||
USE LDN KEY 2
|
||||
INPUT S0 F_TABLDN_DESCR
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABLDN_CODTAB
|
||||
CHECKTYPE REQUIRED
|
||||
HELP "Denominazione del punto di prelievo"
|
||||
END
|
||||
|
||||
STRING F_TABLDN_INDIR 50
|
||||
BEGIN
|
||||
PROMPT 2 4 "Indirizzo "
|
||||
FIELD S1
|
||||
END
|
||||
|
||||
STRING F_TABLDN_COM 4
|
||||
BEGIN
|
||||
PROMPT 2 5 "Comune "
|
||||
FIELD S6
|
||||
FLAGS "U"
|
||||
USE LF_COMUNI
|
||||
INPUT STATO ""
|
||||
INPUT COM F_TABLDN_COM
|
||||
#include <comdcod.h>
|
||||
OUTPUT F_TABLDN_COM COM
|
||||
OUTPUT F_TABLDN_DENCOM DENCOM
|
||||
OUTPUT F_TABLDN_PROVCOM PROVCOM
|
||||
OUTPUT F_TABLDN_CAPCOM CAPCOM
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Comune assente"
|
||||
END
|
||||
|
||||
STRING F_TABLDN_DENCOM 48
|
||||
BEGIN
|
||||
PROMPT 21 5 ""
|
||||
USE LF_COMUNI KEY 2
|
||||
INPUT DENCOM F_TABLDN_DENCOM
|
||||
#include <comdden.h>
|
||||
COPY OUTPUT F_TABLDN_COM
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_TABLDN_LOC 4
|
||||
BEGIN
|
||||
PROMPT 2 6 "Localita' "
|
||||
FIELD S7
|
||||
FLAGS "U"
|
||||
USE LCP SELECT S7=#F_TABLDN_COM
|
||||
INPUT CODTAB F_TABLDN_LOC
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Localita'@30" S0
|
||||
DISPLAY "CAP@5" S6
|
||||
OUTPUT F_TABLDN_LOC CODTAB
|
||||
OUTPUT F_TABLDN_DENLOC S0
|
||||
OUTPUT F_TABLDN_CAPCOM S6
|
||||
OUTPUT F_TABLDN_COM S7
|
||||
CHECKTYPE NORMAL
|
||||
HELP "Codice localita' postale se diversa dal comune"
|
||||
END
|
||||
|
||||
STRING F_TABLDN_DENLOC 30
|
||||
BEGIN
|
||||
PROMPT 21 6 ""
|
||||
USE LCP KEY 2 SELECT S7=#F_TABLDN_COM
|
||||
INPUT S0 F_TABLDN_DENLOC
|
||||
DISPLAY "Localita'@30" S0
|
||||
DISPLAY "CAP@5" S6
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABLDN_LOC
|
||||
CHECKTYPE NORMAL
|
||||
HELP "Localita' postale se diversa dal comune"
|
||||
END
|
||||
|
||||
STRING F_TABLDN_PROVCOM 5
|
||||
BEGIN
|
||||
PROMPT 73 5 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_TABLDN_CAPCOM 5
|
||||
BEGIN
|
||||
PROMPT 69 6 "CAP "
|
||||
FIELD S8
|
||||
//FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_TABLDN_TELEFONO 20
|
||||
BEGIN
|
||||
PROMPT 2 8 "Telefono "
|
||||
FIELD S4
|
||||
END
|
||||
|
||||
STRING F_TABLDN_ORARIO 50
|
||||
BEGIN
|
||||
PROMPT 2 9 "Orario "
|
||||
FIELD S2
|
||||
END
|
||||
|
||||
STRING F_TABLDN_NOTE1 35
|
||||
BEGIN
|
||||
PROMPT 2 10 "Note "
|
||||
FIELD S3[1,35]
|
||||
END
|
||||
|
||||
STRING F_TABLDN_NOTE2 35
|
||||
BEGIN
|
||||
PROMPT 2 11 " "
|
||||
FIELD S3[36,70]
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
14
at/batbmed.h
14
at/batbmed.h
@ -1,14 +0,0 @@
|
||||
// definizione campi della maschera tabella medici
|
||||
|
||||
#define F_CODMED 101
|
||||
#define F_COGNOME 102
|
||||
#define F_NOME 103
|
||||
#define F_INDIRIZZO 104
|
||||
#define F_COM 105
|
||||
#define F_DENCOM 106
|
||||
#define F_LOCALITA 107
|
||||
#define F_DENLOC 108
|
||||
#define F_CAPCOM 109
|
||||
#define F_PROVCOM 110
|
||||
#define F_TELAMB 111
|
||||
#define F_TELABI 112
|
156
at/batbmed.uml
156
at/batbmed.uml
@ -1,156 +0,0 @@
|
||||
#include "batbmed.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Medici" -1 -1 78 20
|
||||
|
||||
GROUPBOX DLG_NULL 77 5
|
||||
BEGIN
|
||||
PROMPT 1 1 ""
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
NUMBER F_CODMED 6
|
||||
BEGIN
|
||||
PROMPT 2 2 "Cod. medico "
|
||||
FIELD CODMED
|
||||
FLAGS "U"
|
||||
KEY 1
|
||||
USE LF_MEDICI
|
||||
INPUT CODMED F_CODMED
|
||||
DISPLAY "Codice " CODMED
|
||||
DISPLAY "Cognome@25" COGNOME
|
||||
DISPLAY "Nome@25" NOME
|
||||
OUTPUT F_CODMED CODMED
|
||||
OUTPUT F_COGNOME COGNOME
|
||||
OUTPUT F_NOME NOME
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING F_COGNOME 25
|
||||
BEGIN
|
||||
PROMPT 2 3 "Cognome "
|
||||
FIELD COGNOME
|
||||
KEY 2
|
||||
USE LF_MEDICI KEY 2
|
||||
INPUT COGNOME F_COGNOME
|
||||
INPUT NOME F_NOME
|
||||
DISPLAY "Cognome@25" COGNOME
|
||||
DISPLAY "Nome@25" NOME
|
||||
DISPLAY "Codice " CODMED
|
||||
COPY OUTPUT F_CODMED
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "Inserire il cognome del medico"
|
||||
END
|
||||
|
||||
STRING F_NOME 25
|
||||
BEGIN
|
||||
PROMPT 2 4 "Nome "
|
||||
FIELD NOME
|
||||
KEY 2
|
||||
COPY ALL F_COGNOME
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 77 5
|
||||
BEGIN
|
||||
PROMPT 1 6 "Indirizzo"
|
||||
END
|
||||
|
||||
STRING F_INDIRIZZO 50
|
||||
BEGIN
|
||||
PROMPT 2 7 "Indirizzo "
|
||||
FIELD INDIRIZZO
|
||||
END
|
||||
|
||||
STRING F_COM 4
|
||||
BEGIN
|
||||
PROMPT 2 8 "Comune "
|
||||
FIELD COM
|
||||
FLAGS "U"
|
||||
USE LF_COMUNI
|
||||
INPUT STATO ""
|
||||
INPUT COM F_COM
|
||||
#include <comdcod.h>
|
||||
OUTPUT F_COM COM
|
||||
OUTPUT F_DENCOM DENCOM
|
||||
OUTPUT F_PROVCOM PROVCOM
|
||||
OUTPUT F_CAPCOM CAPCOM
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Comune assente"
|
||||
END
|
||||
|
||||
STRING F_DENCOM 48
|
||||
BEGIN
|
||||
PROMPT 19 8 ""
|
||||
USE LF_COMUNI KEY 2
|
||||
INPUT DENCOM F_DENCOM
|
||||
#include <comdden.h>
|
||||
COPY OUTPUT F_COM
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_LOCALITA 4
|
||||
BEGIN
|
||||
PROMPT 2 9 "Località "
|
||||
FIELD LOCALITA
|
||||
FLAGS "U"
|
||||
USE LCP SELECT S7=#F_COM
|
||||
INPUT CODTAB F_LOCALITA
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Località@30" S0
|
||||
DISPLAY "CAP@5" S6
|
||||
OUTPUT F_LOCALITA CODTAB
|
||||
OUTPUT F_DENLOC S0
|
||||
OUTPUT F_CAPCOM S6
|
||||
OUTPUT F_COM S7
|
||||
CHECKTYPE NORMAL
|
||||
HELP "Codice localit… postale se diversa dal comune"
|
||||
END
|
||||
|
||||
STRING F_DENLOC 30
|
||||
BEGIN
|
||||
PROMPT 19 9 ""
|
||||
USE LCP KEY 2 SELECT S7=#F_COM
|
||||
INPUT S0 F_DENLOC
|
||||
DISPLAY "Località@30" S0
|
||||
DISPLAY "CAP@5" S6
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_LOCALITA
|
||||
CHECKTYPE NORMAL
|
||||
HELP "Localit… postale se diversa dal comune"
|
||||
END
|
||||
|
||||
STRING F_PROVCOM 5
|
||||
BEGIN
|
||||
PROMPT 71 8 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_CAPCOM 5
|
||||
BEGIN
|
||||
PROMPT 67 9 "CAP "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 77 3
|
||||
BEGIN
|
||||
PROMPT 1 11 "Telefoni"
|
||||
END
|
||||
|
||||
STRING F_TELAMB 15
|
||||
BEGIN
|
||||
PROMPT 2 12 "Ambulatorio "
|
||||
FIELD TELAMB
|
||||
END
|
||||
|
||||
STRING F_TELABI 15
|
||||
BEGIN
|
||||
PROMPT 40 12 "Abitazione "
|
||||
FIELD TELABI
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,4 +0,0 @@
|
||||
#define F_TABMTC_CODTAB 100
|
||||
#define F_TABMTC_DESCR 101
|
||||
#define F_TABMTC_SEGNALA 102
|
||||
#define DLG_DEL 105
|
@ -1,47 +0,0 @@
|
||||
#include "batbmtc.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Motivi per controlli sanitari" -1 -1 78 7
|
||||
|
||||
STRING F_TABMTC_CODTAB 4
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
HELP "Inserire il codice del motivo"
|
||||
USE MTC
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABMTC_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@25" S0
|
||||
OUTPUT F_TABMTC_CODTAB CODTAB
|
||||
OUTPUT F_TABMTC_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_TABMTC_DESCR 25
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD S0
|
||||
HELP "Inserire la descrizione del motivo"
|
||||
USE MTC KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABMTC_DESCR
|
||||
DISPLAY "Descrizione@25" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABMTC_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
BOOLEAN F_TABMTC_SEGNALA
|
||||
BEGIN
|
||||
PROMPT 2 5 "Segnala la sospensione per questo motivo"
|
||||
FIELD B0
|
||||
HELP "Indicare se occorre segnalare che il soggetto e' sospeso per questo motivo"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
18
at/batbpr1.h
18
at/batbpr1.h
@ -1,18 +0,0 @@
|
||||
// tabella di conversione CT Rimini- AVIS per stato trasfusionale
|
||||
#define F_TABPR1_CODTAB 100
|
||||
#define F_TABPR1_DESCR 101
|
||||
#define F_TABPR1_OPERAZIONE 102
|
||||
#define F_TABPR1_TIPOCON 104
|
||||
#define F_TABPR1_CATDON 105
|
||||
#define F_TABPR1_IDON1 106
|
||||
#define F_TABPR1_IDON2 107
|
||||
#define F_TABPR1_IDON3 108
|
||||
#define F_TABPR1_IDON4 109
|
||||
#define F_TABPR1_MOTIVO 110
|
||||
#define F_TABPR1_DESC_CATDON 201
|
||||
#define F_TABPR1_DESC_TIPOCON 202
|
||||
#define F_TABPR1_DESC_IDON1 203
|
||||
#define F_TABPR1_DESC_IDON2 204
|
||||
#define F_TABPR1_DESC_IDON3 205
|
||||
#define F_TABPR1_DESC_IDON4 206
|
||||
#define F_TABPR1_DESC_MOTIVO 207
|
202
at/batbpr1.uml
202
at/batbpr1.uml
@ -1,202 +0,0 @@
|
||||
#include "batbpr1.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tabella conversione stato trasfusionale CETRAPLUS" -1 -1 78 18
|
||||
|
||||
STRING F_TABPR1_CODTAB 3
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
USE PR1
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABPR1_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABPR1_CODTAB CODTAB
|
||||
OUTPUT F_TABPR1_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice dello stato trasfusionale"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_DESCR 50
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD S0
|
||||
USE PR1 KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABPR1_DESCR
|
||||
DISPLAY "Descrizione@30" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABPR1_CODTAB
|
||||
KEY 2
|
||||
HELP "Inserire la descrizione dello stato trasfusionale"
|
||||
END
|
||||
|
||||
RADIOBUTTON F_TABPR1_OPERAZIONE 35
|
||||
BEGIN
|
||||
PROMPT 2 5 "Operazione "
|
||||
FIELD I0
|
||||
ITEM "0|Sostituire senza segnalazione"
|
||||
ITEM "1|Sostituire con segnalazione"
|
||||
ITEM "2|Segnalare"
|
||||
ITEM "3|Ignorare"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_CATDON 2
|
||||
BEGIN
|
||||
PROMPT 2 11 "Categoria "
|
||||
FIELD S6
|
||||
FLAGS "U"
|
||||
USE CTD
|
||||
INPUT CODTAB F_TABPR1_CATDON
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABPR1_CATDON CODTAB
|
||||
OUTPUT F_TABPR1_DESC_CATDON S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice non presente"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_DESC_CATDON 30
|
||||
BEGIN
|
||||
PROMPT 23 11 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_TIPOCON 2
|
||||
BEGIN
|
||||
PROMPT 2 12 "Tipo controllo "
|
||||
FIELD S7
|
||||
FLAGS "U"
|
||||
USE TCS
|
||||
INPUT CODTAB F_TABPR1_TIPOCON
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABPR1_TIPOCON CODTAB
|
||||
OUTPUT F_TABPR1_DESC_TIPOCON S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice non presente"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_DESC_TIPOCON 30
|
||||
BEGIN
|
||||
PROMPT 23 12 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_IDON1 2
|
||||
BEGIN
|
||||
PROMPT 2 13 "Tipi donazione "
|
||||
FIELD S8
|
||||
FLAGS "U"
|
||||
USE IDO
|
||||
INPUT CODTAB F_TABPR1_IDON1
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@40" S0
|
||||
OUTPUT F_TABPR1_IDON1 CODTAB
|
||||
OUTPUT F_TABPR1_DESC_IDON1 S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice idoneita' non presente"
|
||||
HELP "Idoneita' alla donazione"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_IDON2 2
|
||||
BEGIN
|
||||
PROMPT 17 14 ""
|
||||
FIELD S9
|
||||
FLAGS "U"
|
||||
USE IDO
|
||||
INPUT CODTAB F_TABPR1_IDON2
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@40" S0
|
||||
OUTPUT F_TABPR1_IDON2 CODTAB
|
||||
OUTPUT F_TABPR1_DESC_IDON2 S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice idoneita' non presente"
|
||||
HELP "Idoneita' alla donazione"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_IDON3 2
|
||||
BEGIN
|
||||
PROMPT 17 15 ""
|
||||
FIELD S10
|
||||
FLAGS "U"
|
||||
USE IDO
|
||||
INPUT CODTAB F_TABPR1_IDON3
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@40" S0
|
||||
OUTPUT F_TABPR1_IDON3 CODTAB
|
||||
OUTPUT F_TABPR1_DESC_IDON3 S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice idoneita' non presente"
|
||||
HELP "Idoneita' alla donazione"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_IDON4 2
|
||||
BEGIN
|
||||
PROMPT 17 16 ""
|
||||
FIELD S11
|
||||
FLAGS "U"
|
||||
USE IDO
|
||||
INPUT CODTAB F_TABPR1_IDON4
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@40" S0
|
||||
OUTPUT F_TABPR1_IDON4 CODTAB
|
||||
OUTPUT F_TABPR1_DESC_IDON4 S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice idoneita' non presente"
|
||||
HELP "Idoneita' alla donazione"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_MOTIVO 4
|
||||
BEGIN
|
||||
PROMPT 2 17 "Motivo "
|
||||
FIELD S1
|
||||
FLAGS "U"
|
||||
USE MTC
|
||||
INPUT CODTAB F_TABPR1_MOTIVO
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_TABPR1_MOTIVO CODTAB
|
||||
OUTPUT F_TABPR1_DESC_MOTIVO S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice motivo non presente"
|
||||
HELP "Motivo del controllo sanitario"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_DESC_IDON1 25
|
||||
BEGIN
|
||||
PROMPT 23 13 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_DESC_IDON2 25
|
||||
BEGIN
|
||||
PROMPT 23 14 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_DESC_IDON3 25
|
||||
BEGIN
|
||||
PROMPT 23 15 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_DESC_IDON4 25
|
||||
BEGIN
|
||||
PROMPT 23 16 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_TABPR1_DESC_MOTIVO 25
|
||||
BEGIN
|
||||
PROMPT 23 17 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,5 +0,0 @@
|
||||
// tabella di conversione CT Parma- AVIS per tipo donazione
|
||||
#define F_TABPR2_CODTAB 100
|
||||
#define F_TABPR2_DESCR 101
|
||||
#define F_TABPR2_TIPODON 102
|
||||
#define F_TABPR2_DESC_TIPODON 201
|
@ -1,61 +0,0 @@
|
||||
#include "batbpr2.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tabella conversione tipi donazione" -1 -1 78 18
|
||||
|
||||
STRING F_TABPR2_CODTAB 3
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
USE PR2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABPR2_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABPR2_CODTAB CODTAB
|
||||
OUTPUT F_TABPR2_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice del tipo donazione"
|
||||
END
|
||||
|
||||
STRING F_TABPR2_DESCR 50
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD S0
|
||||
USE PR2 KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABPR2_DESCR
|
||||
DISPLAY "Descrizione@30" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABPR2_CODTAB
|
||||
KEY 2
|
||||
HELP "Inserire la descrizione del tipo donazione"
|
||||
END
|
||||
|
||||
STRING F_TABPR2_TIPODON 2
|
||||
BEGIN
|
||||
PROMPT 2 5 "Tipo donazione "
|
||||
FIELD S6
|
||||
FLAGS "U"
|
||||
USE TDN
|
||||
INPUT CODTAB F_TABPR2_TIPODON
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABPR2_TIPODON CODTAB
|
||||
OUTPUT F_TABPR2_DESC_TIPODON S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice non presente"
|
||||
END
|
||||
|
||||
STRING F_TABPR2_DESC_TIPODON 30
|
||||
BEGIN
|
||||
PROMPT 23 5 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,3 +0,0 @@
|
||||
#define F_TABPRF_CODTAB 100
|
||||
#define F_TABPRF_DESCR 101
|
||||
#define DLG_DEL 105
|
@ -1,40 +0,0 @@
|
||||
#include "batbprf.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Professioni" -1 -1 78 7
|
||||
|
||||
STRING F_TABPRF_CODTAB 4
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
HELP "Inserire il codice della professione"
|
||||
USE PRF
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABPRF_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@40" S0
|
||||
OUTPUT F_TABPRF_CODTAB CODTAB
|
||||
OUTPUT F_TABPRF_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_TABPRF_DESCR 40
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD S0
|
||||
HELP "Inserire la descrizione della professione"
|
||||
USE PRF KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABPRF_DESCR
|
||||
DISPLAY "Descrizione@40" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABPRF_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,3 +0,0 @@
|
||||
#define F_TABSCS_CODTAB 100
|
||||
#define F_TABSCS_DESCR 101
|
||||
#define DLG_DEL 105
|
@ -1,40 +0,0 @@
|
||||
#include "batbscs.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Singoli controlli sanitari" -1 -1 78 7
|
||||
|
||||
STRING F_TABSCS_CODTAB 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
HELP "Inserire il codice del singolo controllo"
|
||||
USE SCS
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABSCS_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABSCS_CODTAB CODTAB
|
||||
OUTPUT F_TABSCS_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_TABSCS_DESCR 30
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD S0
|
||||
HELP "Inserire la descrizione del singolo controllo"
|
||||
USE SCS KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABSCS_DESCR
|
||||
DISPLAY "Descrizione@30" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABSCS_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
47
at/batbsez.h
47
at/batbsez.h
@ -1,47 +0,0 @@
|
||||
// definizione campi della maschera tabella sezioni
|
||||
|
||||
#define F_CODSEZ 101
|
||||
#define F_CODSOT 103
|
||||
#define F_DENSEZ 102
|
||||
#define F_DENSOT 104
|
||||
#define F_INDIRIZZO 105
|
||||
#define F_COM 106
|
||||
#define F_DENCOM 107
|
||||
#define F_LOCALITA 108
|
||||
#define F_DENLOC 109
|
||||
#define F_CAPCOM 110
|
||||
#define F_CAPLOC 111
|
||||
#define F_PROVCOM 112
|
||||
#define F_TELEFONO 113
|
||||
#define F_FAX 114
|
||||
#define F_REFERCED 115
|
||||
#define F_STATO 116
|
||||
#define F_INTMINCONV 117
|
||||
#define F_INTMIN 118
|
||||
#define F_INTMAX 119
|
||||
#define F_TIPOCONV 120
|
||||
#define F_DATAULTCON 121
|
||||
#define F_INTESTAZ1 122
|
||||
#define F_INTESTAZ2 123
|
||||
#define F_INTESTAZ3 124
|
||||
#define F_INTESTAZ4 125
|
||||
#define F_CONVORA 126
|
||||
#define F_CONVSEDE1 127
|
||||
#define F_CONVSEDE2 128
|
||||
#define F_CONVSEDE3 129
|
||||
#define F_CONVSEDE4 130
|
||||
#define F_CONVNOTE 131
|
||||
#define F_DONEMER 132
|
||||
#define F_INTESTI 133
|
||||
#define F_CATEMER 134
|
||||
#define F_DESC_CATEMER 135
|
||||
#define F_CATESTI 136
|
||||
#define F_DESC_CATESTI 137
|
||||
#define F_CATCANC 138
|
||||
#define F_DESC_CATCANC 139
|
||||
#define F_GIOCARSOL 140
|
||||
#define F_GIOSOLSOL 141
|
||||
#define F_GIOULTSOL 142
|
||||
#define F_GIOPERRIT 143
|
||||
#define F_NUMMAXSOL 144
|
||||
#define F_DENOMINAZ 145
|
475
at/batbsez.uml
475
at/batbsez.uml
@ -1,475 +0,0 @@
|
||||
#include "batbsez.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Sezioni 1" -1 -1 78 20
|
||||
|
||||
GROUPBOX DLG_NULL 77 4
|
||||
BEGIN
|
||||
PROMPT 1 0 ""
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
STRING F_CODSEZ 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Cod. sezione "
|
||||
FIELD CODSEZ
|
||||
FLAGS "U"
|
||||
KEY 1
|
||||
USE LF_SEZIONI
|
||||
INPUT CODSEZ F_CODSEZ
|
||||
INPUT CODSOT F_CODSOT
|
||||
DISPLAY "Cod.sez. " CODSEZ
|
||||
DISPLAY "Cod.sot. " CODSOT
|
||||
DISPLAY "Sezione@25" DENSEZ
|
||||
DISPLAY "Sottogruppo@25" DENSOT
|
||||
OUTPUT F_CODSEZ CODSEZ
|
||||
OUTPUT F_DENSEZ DENSEZ
|
||||
OUTPUT F_CODSOT CODSOT
|
||||
OUTPUT F_DENSOT DENSOT
|
||||
MESSAGE COPY,1@
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING F_CODSOT 2
|
||||
BEGIN
|
||||
PROMPT 2 2 "Cod. sottogruppo "
|
||||
FIELD CODSOT
|
||||
FLAGS "U"
|
||||
KEY 1
|
||||
COPY ALL F_CODSEZ
|
||||
MESSAGE COPY,2@
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Inserire il codice della sezione"
|
||||
END
|
||||
|
||||
STRING F_DENSEZ 25
|
||||
BEGIN
|
||||
PROMPT 29 1 "Denominazione sez. "
|
||||
FIELD DENSEZ
|
||||
KEY 2
|
||||
USE LF_SEZIONI KEY 2
|
||||
INPUT DENSEZ F_DENSEZ
|
||||
INPUT DENSOT F_DENSOT
|
||||
DISPLAY "Sezione@25" DENSEZ
|
||||
DISPLAY "Sottogruppo@25" DENSOT
|
||||
DISPLAY "Cod.sez. " CODSEZ
|
||||
DISPLAY "Cod.sot. " CODSOT
|
||||
COPY OUTPUT F_CODSEZ
|
||||
MESSAGE COPY,3@
|
||||
CHECKTYPE REQUIRED
|
||||
WARNING "Inserire la denominazione della sezione"
|
||||
END
|
||||
|
||||
STRING F_DENSOT 25
|
||||
BEGIN
|
||||
PROMPT 29 2 "Denominazione sot. "
|
||||
FIELD DENSOT
|
||||
KEY 2
|
||||
COPY ALL F_DENSEZ
|
||||
MESSAGE COPY,4@
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Inserire la denominazione del sottogruppo"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 77 8
|
||||
BEGIN
|
||||
PROMPT 1 4 "Dati anagrafici"
|
||||
END
|
||||
|
||||
STRING F_DENOMINAZ 50
|
||||
BEGIN
|
||||
PROMPT 2 5 "Denominazione "
|
||||
FIELD DENOMINAZ
|
||||
END
|
||||
|
||||
STRING F_INDIRIZZO 50
|
||||
BEGIN
|
||||
PROMPT 2 6 "Indirizzo "
|
||||
FIELD INDIRIZZO
|
||||
END
|
||||
|
||||
STRING F_COM 4
|
||||
BEGIN
|
||||
PROMPT 2 7 "Comune "
|
||||
FIELD COM
|
||||
FLAGS "U"
|
||||
USE LF_COMUNI
|
||||
INPUT STATO ""
|
||||
INPUT COM F_COM
|
||||
#include <comdcod.h>
|
||||
OUTPUT F_COM COM
|
||||
OUTPUT F_DENCOM DENCOM
|
||||
OUTPUT F_PROVCOM PROVCOM
|
||||
OUTPUT F_CAPCOM CAPCOM
|
||||
CHECKTYPE NORMAL
|
||||
MESSAGE SHOW,F_CAPCOM|SHOW,F_CAPLOC
|
||||
WARNING "Comune assente"
|
||||
END
|
||||
|
||||
STRING F_DENCOM 48
|
||||
BEGIN
|
||||
PROMPT 19 7 ""
|
||||
USE LF_COMUNI KEY 2
|
||||
INPUT DENCOM F_DENCOM
|
||||
#include <comdden.h>
|
||||
COPY OUTPUT F_COM
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_LOCALITA 4
|
||||
BEGIN
|
||||
PROMPT 2 8 "Localita' "
|
||||
FIELD LOCALITA
|
||||
FLAGS "U"
|
||||
USE LCP SELECT S7=#F_COM
|
||||
INPUT CODTAB F_LOCALITA
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Localita'@30" S0
|
||||
DISPLAY "CAP@5" S6
|
||||
OUTPUT F_LOCALITA CODTAB
|
||||
OUTPUT F_DENLOC S0
|
||||
OUTPUT F_CAPLOC S6
|
||||
OUTPUT F_COM S7
|
||||
CHECKTYPE NORMAL
|
||||
MESSAGE EMPTY HIDE,F_CAPLOC|SHOW,F_CAPCOM
|
||||
HELP "Codice localit… postale se diversa dal comune"
|
||||
END
|
||||
|
||||
STRING F_DENLOC 30
|
||||
BEGIN
|
||||
PROMPT 19 8 ""
|
||||
USE LCP KEY 2 SELECT S7=#F_COM
|
||||
INPUT S0 F_DENLOC
|
||||
DISPLAY "Località@30" S0
|
||||
DISPLAY "CAP@5" S6
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_LOCALITA
|
||||
CHECKTYPE NORMAL
|
||||
MESSAGE EMPTY HIDE,F_CAPLOC|SHOW,F_CAPCOM
|
||||
HELP "Localit… postale se diversa dal comune"
|
||||
END
|
||||
|
||||
|
||||
STRING F_PROVCOM 5
|
||||
BEGIN
|
||||
PROMPT 71 7 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_CAPCOM 5
|
||||
BEGIN
|
||||
PROMPT 67 8 "CAP "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_CAPLOC 5
|
||||
BEGIN
|
||||
PROMPT 67 8 "CAP "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_TELEFONO 15
|
||||
BEGIN
|
||||
PROMPT 2 9 "Telefono "
|
||||
FIELD TELEFONO
|
||||
END
|
||||
|
||||
STRING F_FAX 15
|
||||
BEGIN
|
||||
PROMPT 32 9 "Fax "
|
||||
FIELD FAX
|
||||
END
|
||||
|
||||
STRING F_REFERCED 50
|
||||
BEGIN
|
||||
PROMPT 2 10 "Referente CED "
|
||||
FIELD REFERCED
|
||||
END
|
||||
|
||||
RADIOBUTTON F_STATO 13
|
||||
BEGIN
|
||||
PROMPT 1 12 "Stato"
|
||||
FIELD STATO
|
||||
ITEM "A|Attiva"
|
||||
ITEM "E|Estinta"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 25 6
|
||||
BEGIN
|
||||
PROMPT 16 12 "Intestazione tessere"
|
||||
END
|
||||
|
||||
STRING F_INTESTAZ1 20
|
||||
BEGIN
|
||||
PROMPT 17 13 ""
|
||||
FIELD INTESTAZ1
|
||||
END
|
||||
|
||||
STRING F_INTESTAZ2 20
|
||||
BEGIN
|
||||
PROMPT 17 14 ""
|
||||
FIELD INTESTAZ2
|
||||
END
|
||||
|
||||
STRING F_INTESTAZ3 20
|
||||
BEGIN
|
||||
PROMPT 17 15 ""
|
||||
FIELD INTESTAZ3
|
||||
END
|
||||
|
||||
STRING F_INTESTAZ4 20
|
||||
BEGIN
|
||||
PROMPT 17 16 ""
|
||||
FIELD INTESTAZ4
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 35 8
|
||||
BEGIN
|
||||
PROMPT 43 12 "Dati per stampa cartolina"
|
||||
END
|
||||
|
||||
STRING F_CONVORA 20
|
||||
BEGIN
|
||||
PROMPT 44 13 "Orario "
|
||||
FIELD CONVORA
|
||||
END
|
||||
|
||||
STRING F_CONVSEDE1 25
|
||||
BEGIN
|
||||
PROMPT 44 14 "Sede "
|
||||
FIELD CONVSEDE1
|
||||
END
|
||||
|
||||
STRING F_CONVSEDE2 25
|
||||
BEGIN
|
||||
PROMPT 44 15 " "
|
||||
FIELD CONVSEDE2
|
||||
END
|
||||
|
||||
STRING F_CONVSEDE3 25
|
||||
BEGIN
|
||||
PROMPT 44 16 " "
|
||||
FIELD CONVSEDE3
|
||||
END
|
||||
|
||||
STRING F_CONVSEDE4 25
|
||||
BEGIN
|
||||
PROMPT 44 17 " "
|
||||
FIELD CONVSEDE4
|
||||
END
|
||||
|
||||
STRING F_CONVNOTE 25
|
||||
BEGIN
|
||||
PROMPT 44 18 "Note "
|
||||
FIELD CONVNOTE
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Sezioni 2" -1 -1 78 20
|
||||
|
||||
GROUPBOX DLG_NULL 77 4
|
||||
BEGIN
|
||||
PROMPT 1 0 ""
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
STRING DLG_NULL 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Cod. sezione "
|
||||
FLAGS "D"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING DLG_NULL 2
|
||||
BEGIN
|
||||
PROMPT 2 2 "Cod. sottogruppo "
|
||||
FLAGS "D"
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRING DLG_NULL 25
|
||||
BEGIN
|
||||
PROMPT 29 1 "Denominazione sez. "
|
||||
FLAGS "D"
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
STRING DLG_NULL 25
|
||||
BEGIN
|
||||
PROMPT 29 2 "Denominazione sot. "
|
||||
FLAGS "D"
|
||||
GROUP 4
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 35 6
|
||||
BEGIN
|
||||
PROMPT 1 4 "Parametri convoc. per sezione"
|
||||
END
|
||||
|
||||
NUMBER F_INTMINCONV 4
|
||||
BEGIN
|
||||
PROMPT 2 5 "Int. min. convoc. "
|
||||
FIELD INTMINCONV
|
||||
HELP "Intervallo minimo di convocazione in giorni (dall'ultima don.)"
|
||||
END
|
||||
|
||||
NUMBER F_INTMIN 4
|
||||
BEGIN
|
||||
PROMPT 2 6 "Int. avvisi: min. "
|
||||
FIELD INTMIN
|
||||
END
|
||||
|
||||
NUMBER F_INTMAX 4
|
||||
BEGIN
|
||||
PROMPT 2 7 " max. "
|
||||
FIELD INTMAX
|
||||
END
|
||||
|
||||
LISTBOX F_TIPOCONV 11
|
||||
BEGIN
|
||||
PROMPT 2 8 "Tipo convocazione "
|
||||
FIELD TIPOCONV
|
||||
ITEM "D|Data fissa"
|
||||
ITEM "G|dal Giorno"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 35 7
|
||||
BEGIN
|
||||
PROMPT 1 10 "Parametri convoc. su punto prelievo"
|
||||
END
|
||||
|
||||
NUMBER F_GIOCARSOL 3
|
||||
BEGIN
|
||||
PROMPT 2 11 "Gio. tra cart. e soll. "
|
||||
FIELD GIOCARSOL
|
||||
HELP "Intervallo in giorni tra cartolina e primo sollecito"
|
||||
END
|
||||
|
||||
NUMBER F_GIOSOLSOL 3
|
||||
BEGIN
|
||||
PROMPT 2 12 "Gio. tra soll. e soll. "
|
||||
FIELD GIOSOLSOL
|
||||
HELP "Intervallo in giorni tra solleciti"
|
||||
END
|
||||
|
||||
NUMBER F_GIOULTSOL 3
|
||||
BEGIN
|
||||
PROMPT 2 13 "Gio. tra penult. e ult. soll. "
|
||||
FIELD GIOULTSOL
|
||||
HELP "Intervallo tra penultimo e ultimo sollecito"
|
||||
END
|
||||
|
||||
NUMBER F_GIOPERRIT 3
|
||||
BEGIN
|
||||
PROMPT 2 14 "Gio. tra chiamate per ritard. "
|
||||
FIELD GIOPERRIT
|
||||
HELP "Giorni tra le chiamate per ritardatari"
|
||||
END
|
||||
|
||||
NUMBER F_NUMMAXSOL 2
|
||||
BEGIN
|
||||
PROMPT 2 15 "Num. max di solleciti "
|
||||
FIELD NUMMAXSOL
|
||||
HELP "Numero massimo di solleciti inviabili per soggetto"
|
||||
END
|
||||
|
||||
DATE F_DATAULTCON
|
||||
BEGIN
|
||||
PROMPT 2 17 "Data ultima conv. "
|
||||
FIELD DATAULTCON
|
||||
//FLAGS "D"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 41 8
|
||||
BEGIN
|
||||
PROMPT 37 4 "Parametri per chiusura periodica"
|
||||
END
|
||||
|
||||
NUMBER F_DONEMER 3
|
||||
BEGIN
|
||||
PROMPT 38 5 "Donazioni per passaggio a emeriti "
|
||||
FIELD DONEMER
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
NUMBER F_INTESTI 2
|
||||
BEGIN
|
||||
PROMPT 38 6 "Intervallo di estinzione in anni "
|
||||
FIELD INTESTI
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
TEXT DLG_NULL
|
||||
BEGIN
|
||||
PROMPT 38 7 "Categorie:"
|
||||
END
|
||||
|
||||
STRING F_CATEMER 2
|
||||
BEGIN
|
||||
PROMPT 39 8 "emeriti "
|
||||
FIELD CATEMER
|
||||
FLAGS "U"
|
||||
USE CTD
|
||||
INPUT CODTAB F_CATEMER
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_CATEMER CODTAB
|
||||
OUTPUT F_DESC_CATEMER S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice non presente"
|
||||
END
|
||||
|
||||
STRING F_DESC_CATEMER 30 20
|
||||
BEGIN
|
||||
PROMPT 56 8 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_CATESTI 2
|
||||
BEGIN
|
||||
PROMPT 39 9 "estinti "
|
||||
FIELD CATESTI
|
||||
FLAGS "U"
|
||||
USE CTD
|
||||
INPUT CODTAB F_CATESTI
|
||||
COPY DISPLAY F_CATEMER
|
||||
OUTPUT F_CATESTI CODTAB
|
||||
OUTPUT F_DESC_CATESTI S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice non presente"
|
||||
END
|
||||
|
||||
STRING F_DESC_CATESTI 30 20
|
||||
BEGIN
|
||||
PROMPT 56 9 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_CATCANC 2
|
||||
BEGIN
|
||||
PROMPT 39 10 "cancellati "
|
||||
FIELD CATCANC
|
||||
FLAGS "U"
|
||||
USE CTD
|
||||
INPUT CODTAB F_CATCANC
|
||||
COPY DISPLAY F_CATEMER
|
||||
OUTPUT F_CATCANC CODTAB
|
||||
OUTPUT F_DESC_CATCANC S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice non presente"
|
||||
END
|
||||
|
||||
STRING F_DESC_CATCANC 30 20
|
||||
BEGIN
|
||||
PROMPT 56 10 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
@ -1,8 +0,0 @@
|
||||
// tabella tipi/esiti controlli sanitari
|
||||
#define F_TABTCS_CODTAB 100
|
||||
#define F_TABTCS_DESCR 101
|
||||
#define F_TABTCS_CATCOLL 102
|
||||
#define F_TABTCS_MODSTATO 103
|
||||
#define F_TABTCS_STATO 104
|
||||
#define F_DESCR_CATCOLL 105
|
||||
#define DLG_DEL 106
|
@ -1,85 +0,0 @@
|
||||
#include "batbtcs.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tipi/Esiti controlli sanitari" -1 -1 78 18
|
||||
|
||||
STRING F_TABTCS_CODTAB 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
USE TCS
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABTCS_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABTCS_CODTAB CODTAB
|
||||
OUTPUT F_TABTCS_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice del controllo sanitario"
|
||||
END
|
||||
|
||||
STRING F_TABTCS_DESCR 30
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD S0
|
||||
USE TCS KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABTCS_DESCR
|
||||
DISPLAY "Descrizione@30" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABTCS_CODTAB
|
||||
KEY 2
|
||||
HELP "Inserire la descrizione del controllo"
|
||||
END
|
||||
|
||||
STRING F_TABTCS_CATCOLL 2
|
||||
BEGIN
|
||||
PROMPT 2 5 "Cat.collegata "
|
||||
FIELD S7
|
||||
FLAGS "U"
|
||||
USE CTD
|
||||
INPUT CODTAB F_TABTCS_CATCOLL
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABTCS_CATCOLL CODTAB
|
||||
OUTPUT F_DESCR_CATCOLL S0
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Codice non presente"
|
||||
END
|
||||
|
||||
STRING F_DESCR_CATCOLL 30
|
||||
BEGIN
|
||||
PROMPT 23 5 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
RADIOBUTTON F_TABTCS_MODSTATO 35
|
||||
BEGIN
|
||||
PROMPT 2 7 "Modifica stato"
|
||||
FIELD S6
|
||||
ITEM "N|Non modifica"
|
||||
MESSAGE CLEAR, F_TABTCS_STATO
|
||||
MESSAGE DISABLE, F_TABTCS_STATO
|
||||
ITEM "I|Idoneita'"
|
||||
MESSAGE ENABLE, F_TABTCS_STATO
|
||||
ITEM "S|Sospensione"
|
||||
MESSAGE ENABLE, F_TABTCS_STATO
|
||||
ITEM "B|Blocco (sosp. senza id. auto)"
|
||||
MESSAGE ENABLE, F_TABTCS_STATO
|
||||
ITEM "F|Fine sospensione"
|
||||
MESSAGE ENABLE, F_TABTCS_STATO
|
||||
HELP "Indicare se il controllo modifica lo stato e in che modo"
|
||||
END
|
||||
|
||||
STRING F_TABTCS_STATO 20
|
||||
BEGIN
|
||||
PROMPT 40 8 "Stato "
|
||||
FIELD S3
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
@ -1,8 +0,0 @@
|
||||
#define F_TABTDN_CODTAB 100
|
||||
#define F_TABTDN_DESCR 101
|
||||
#define F_TABTDN_PROCDON 102
|
||||
#define F_TABTDN_IDON1 103
|
||||
#define F_DESC_I1 104
|
||||
#define F_TABTDN_IDON2 105
|
||||
#define F_DESC_I2 106
|
||||
#define DLG_DEL 107
|
@ -1,88 +0,0 @@
|
||||
#include "batbtdn.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tipi di donazione" -1 -1 78 7
|
||||
|
||||
STRING F_TABTDN_CODTAB 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD CODTAB
|
||||
HELP "Inserire il codice del tipo di donazione"
|
||||
USE TDN
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_TABTDN_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABTDN_CODTAB CODTAB
|
||||
OUTPUT F_TABTDN_DESCR S0
|
||||
KEY 1
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_TABTDN_DESCR 30
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD S0
|
||||
HELP "Inserire la descrizione del tipo di donazione"
|
||||
USE TDN KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_TABTDN_DESCR
|
||||
DISPLAY "Descrizione@30" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT F_TABTDN_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
LISTBOX F_TABTDN_PROCDON 17
|
||||
BEGIN
|
||||
PROMPT 2 5 "Procedura di donazione "
|
||||
FIELD S6
|
||||
#include "procdon.h"
|
||||
HELP "Indicare la procedura di donazione"
|
||||
END
|
||||
|
||||
STRING F_TABTDN_IDON1 2
|
||||
BEGIN
|
||||
PROMPT 2 7 "Idoneità necessarie: 1 "
|
||||
FIELD S7
|
||||
USE IDO SELECT S6==#F_TABTDN_PROCDON
|
||||
INPUT CODTAB F_TABTDN_IDON1
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABTDN_IDON1 CODTAB
|
||||
OUTPUT F_DESC_I1 S0
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_DESC_I1 30
|
||||
BEGIN
|
||||
PROMPT 31 7 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
STRING F_TABTDN_IDON2 2
|
||||
BEGIN
|
||||
PROMPT 2 9 " 2 "
|
||||
FIELD S8
|
||||
USE IDO SELECT S6==#F_TABTDN_PROCDON
|
||||
INPUT CODTAB F_TABTDN_IDON2
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@30" S0
|
||||
OUTPUT F_TABTDN_IDON2 CODTAB
|
||||
OUTPUT F_DESC_I2 S0
|
||||
CHECKTYPE NORMAL
|
||||
FLAGS "U"
|
||||
END
|
||||
|
||||
STRING F_DESC_I2 30
|
||||
BEGIN
|
||||
PROMPT 31 9 ""
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
Loading…
x
Reference in New Issue
Block a user