campo-sirio/lv/lvtbfrq.uml

#include "lvtbfrq.h"

TOOLBAR "" 0 0 0 2
#include "Relapbar.h"
ENDPAGE


PAGE "Frequenza Consegne" 0 2 0 0

GROUPBOX DLG_NULL 60 7
BEGIN
  PROMPT 1 1 "@b Frequenza Consegne"
END

LIST F_COD 3
BEGIN
  PROMPT 2 3 ""
  ITEM "FRQ|FRQ"
  FLAGS "H"
  KEY 1
  FIELD COD
END  

STRING F_COD_FRQ 2
BEGIN
  PROMPT 2 3 "Codice     "
  FLAGS "BU"
  KEY 1
  FIELD CODTAB
    
  USE &FRQ SELECT COD = "FRQ"
  INPUT CODTAB F_COD_FRQ
  DISPLAY "Cod.Freq.Cons." CODTAB
  DISPLAY "Descr.Freq.Cons.@35" S0
  
  OUTPUT F_COD_FRQ CODTAB
  OUTPUT F_DES_FRQ S0
  
  CHECKTYPE REQUIRED
END

STRING F_DES_FRQ 35
BEGIN
  PROMPT 2 5 "Descrizione"
  FIELD S0
  KEY 2
  CHECKTYPE REQUIRED
END

GROUPBOX DLG_NULL 60 10 
BEGIN
  PROMPT 1 9 "@b Dettaglio Frequenza"
END

NUMBER F_RITARDO 3 0
BEGIN
  PROMPT 2 11 "Ritardo                            "
  FIELD I0
  GROUP 2
END

NUMBER F_INT_CONS 3 0    
BEGIN
  PROMPT 2 13 "Intervallo                         "
  FIELD I1
  CHECKTYPE REQUIRED
END

NUMBER F_MAX_CONS 2 0
BEGIN
  PROMPT 2 15 "Numero Massimo di Consegne per Mese"
  FIELD I2
END

BOOLEAN F_USA_CONS
BEGIN
  FIELD B0
  PROMPT 2 17 "Usa Ultima Consegna"
END

ENDPAGE
ENDMASK