campo-sirio/at/batbmtc.uml

48 lines
1013 B
Plaintext
Raw Normal View History

#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