#include "lv2300a.h"

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

PAGE "Stampa Planning per Itinerario" -1 -1 40 5

GROUPBOX DLG_NULL 76 5
BEGIN
  PROMPT 1 1 "@bParametri di Stampa"
END

NUMBER F_COD_ITI_FROM 3
BEGIN
  PROMPT 2 2 "Da Itinerario"
  FLAGS "UZ"  
  USE &ITI
  INPUT CODTAB F_COD_ITI_FROM
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT F_COD_ITI_FROM CODTAB
  OUTPUT F_DES_ITI_FROM S0 
  CHECKTYPE REQUIRED
  FIELD #FROM_COD_ITI
END

STRING F_DES_ITI_FROM 50
BEGIN
  PROMPT 25 2 ""
  FLAGS "D"
END

NUMBER F_COD_ITI_TO 3
BEGIN
  PROMPT 2 3 "A Itinerario "
  FLAGS "UZ"  
  USE &ITI
  INPUT CODTAB F_COD_ITI_TO
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT F_COD_ITI_TO CODTAB
  OUTPUT F_DES_ITI_TO S0 
  CHECKTYPE REQUIRED
  FIELD #TO_COD_ITI
END

STRING F_DES_ITI_TO 50
BEGIN
  PROMPT 25 3 ""
  FLAGS "D"
END

DATE F_DATA_DAL
BEGIN
  PROMPT 2 4 "Dal "
  FIELD #FROM_DATA
  GROUP 1
  CHECKTYPE REQUIRED
  FLAGS "A"
END

DATE F_DATA_AL
BEGIN
  PROMPT 25 4 "Al "
  FIELD #TO_DATA
  FLAGS "A"
  GROUP 2
  CHECKTYPE REQUIRED
  VALITATE DATE_CMP_FUNC >= F_DATA_DAL
  WARNING "La data finale deve essere successiva a quella iniziale"
END

ENDPAGE
ENDMASK