PAGE "Corrispondenza Tipi Documento" -1 -1 68 8

TEXT DLG_NULL
BEGIN
  PROMPT 1 1 "Scegliere il tipo documento di EuroCAMPO per la"
END

TEXT DLG_NULL
BEGIN
  PROMPT 1 2 "corrispondenza in importazione dati."
END

STRING 100 2
BEGIN
  PROMPT 1 4 "Tipo documento        "
  FLAGS "D"
END

STRING 101 4
BEGIN
  PROMPT 1 5 "Tipo doc. EuroCAMPO   "
  USE %TIP
  INPUT  CODTAB 101
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT 101 CODTAB
  CHECKTYPE REQUIRED
  WARNING "Tipo documento errato"
END

BUTTON DLG_OK 10 2
BEGIN
  PROMPT -11 -1 ""
END

ENDPAGE

ENDMASK