82 lines
1.2 KiB
Plaintext
82 lines
1.2 KiB
Plaintext
|
#include "lvtbfrq.h"
|
||
|
|
|
||
|
|
TOOLBAR "" 0 0 0 2
|
||
|
|
#include "Relapbar.h"
|
||
|
|
ENDPAGE
|
||
|
|
|
||
|
|
|
||
|
|
PAGE "Frequenza Consegne" 0 2 0 0
|
||
|
|
|
||
|
|
GROUPBOX DLG_NULL 80 15
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 1 "@b Frequenza Consegne"
|
||
|
|
END
|
||
|
|
|
||
|
|
LIST F_COD 3
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 3 ""
|
||
|
|
ITEM "FRQ|FRQ"
|
||
|
|
FLAGS "H"
|
||
|
|
FIELD COD
|
||
|
|
KEY 1
|
||
|
|
END
|
||
|
|
|
||
|
|
STRING F_COD_FRQ 2
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 5 "Cod.Frequenza Consegna "
|
||
|
|
FLAGS "BU"
|
||
|
|
FIELD CODTAB
|
||
|
|
KEY 1
|
||
|
|
|
||
|
|
USE FRQ
|
||
|
|
INPUT CODTAB F_COD_FRQ
|
||
|
|
DISPLAY "Cod.Freq.Cons." CODTAB
|
||
|
|
DISPLAY "Descr.Freq.Cons.@35" S0
|
||
|
|
DISPLAY "Ritardo" I0
|
||
|
|
DISPLAY "Intervallo" I1
|
||
|
|
DISPLAY "Max Cons." I2
|
||
|
|
DISPLAY "Usa Ult.Cons" B0
|
||
|
|
OUTPUT F_COD_FRQ CODTAB
|
||
|
|
OUTPUT F_DES_FRQ S0
|
||
|
|
OUTPUT F_RITARDO I0
|
||
|
|
OUTPUT F_INT_CONS I1
|
||
|
|
OUTPUT F_MAX_CONS I2
|
||
|
|
OUTPUT F_USA_CONS B0
|
||
|
|
CHECKTYPE REQUIRED
|
||
|
|
END
|
||
|
|
|
||
|
|
STRING F_DES_FRQ 35
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 7 "Descr.Frequenza Consegna"
|
||
|
|
FIELD S0
|
||
|
|
KEY 2
|
||
|
|
CHECKTYPE REQUIRED
|
||
|
|
END
|
||
|
|
|
||
|
|
NUMBER F_RITARDO 3 0
|
||
|
|
BEGIN
|
||
|
|
PROMPT 2 9 "Ritardo"
|
||
|
|
FIELD I0
|
||
|
|
END
|
||
|
|
|
||
|
|
NUMBER F_INT_CONS 3 0
|
||
|
|
BEGIN
|
||
|
|
PROMPT 15 9 "Intervallo"
|
||
|
|
FIELD I1
|
||
|
|
CHECKTYPE REQUIRED
|
||
|
|
END
|
||
|
|
|
||
|
|
NUMBER F_MAX_CONS 2 0
|
||
|
|
BEGIN
|
||
|
|
PROMPT 30 9 "Max Consegne Mese"
|
||
|
|
FIELD I2
|
||
|
|
END
|
||
|
|
|
||
|
|
BOOLEAN F_USA_CONS
|
||
|
|
BEGIN
|
||
|
|
FIELD B0
|
||
|
|
PROMPT 2 11 "Usa Ultima Consegna"
|
||
|
|
END
|
||
|
|
|
||
|
|
ENDPAGE
|
||
|
|
ENDMASK
|