campo-sirio/lv/lvstiti.uml

#include "lvstiti.h"

TOOLBAR "topbar" 0 0 0 2
#include "printbar.h"
ENDPAGE

PAGE "Stampa Itinerari" -1 -1 40 5

GROUPBOX DLG_NULL 76 5
BEGIN
  PROMPT 1 1 "@b Parametri Itinerari"
END

STRING F_COD_ITINERARIO 3
BEGIN
  PROMPT 2 2 "Da codice"
  FLAGS "U"  
  USE &ITI
  INPUT CODTAB F_COD_ITINERARIO
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  DISPLAY "Autista" S1
  DISPLAY "Mezzo@8" S2
  OUTPUT F_COD_ITINERARIO CODTAB
  OUTPUT F_DES_ITINERARIO S0 
  CHECKTYPE SEARCH
  FIELD #FROM
END

STRING F_DES_ITINERARIO 50
BEGIN
  PROMPT 20 2 ""
  FLAGS "D"
END

STRING F_COD_ITINERARIO_TO 3
BEGIN
  PROMPT 2 3 "A codice "
  FLAGS "U"  
  USE &ITI
  INPUT CODTAB F_COD_ITINERARIO_TO
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  DISPLAY "Autista" S1
  DISPLAY "Mezzo@8" S2
  OUTPUT F_COD_ITINERARIO_TO CODTAB
  OUTPUT F_DES_ITINERARIO_TO S0 
  CHECKTYPE SEARCH
  FIELD #TO
END

STRING F_DES_ITINERARIO_TO 50
BEGIN
  PROMPT 20 3 ""
  FLAGS "D"
END

ENDPAGE
ENDMASK