campo-sirio/lv/lvtbmez.uml

47 lines
764 B
Plaintext
Raw Normal View History

#include "lvtbmez.h"
TOOLBAR "" 0 0 0 2
#include "relapbar.h"
ENDPAGE
PAGE "Mezzi di Trasporto" -1 -1 78 10
GROUPBOX DLG_NULL 76 4
BEGIN
PROMPT 1 1 "@bDati Mezzo"
END
STRING F_COD_MEZZO 8
BEGIN
PROMPT 2 2 "Targa "
FLAGS "U"
HELP "Inserire la targa del mezzo."
USE &MEZ
INPUT CODTAB F_COD_MEZZO
DISPLAY "Codice@8" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_COD_MEZZO CODTAB
OUTPUT F_DES_MEZZO S0
FIELD CODTAB
KEY 1
CHECKTYPE REQUIRED
END
STRING F_DES_MEZZO 50
BEGIN
PROMPT 2 3 "Descrizione "
HELP "Inserire la descrizione del mezzo."
USE &MEZ KEY 2
INPUT S0 F_DES_MEZZO
DISPLAY "Descrizione@50" S0
DISPLAY "Codice@8" CODTAB
COPY OUTPUT F_COD_MEZZO
CHECKTYPE NORMAL
FIELD S0
KEY 2
END
ENDPAGE
ENDMASK