#include "in0200a.h"

TOOLBAR "topbar" 0 0 0 2

BUTTON DLG_OK 2 2
BEGIN
  PROMPT 1 1 "Conferma"
  PICTURE TOOL_SAVEREC
END

BUTTON F_RIEPILOGHI 2 2
BEGIN
  PROMPT 2 1 "Riepiloghi"
  PICTURE TOOL_ELABORA
END

#include <helpbar.h>

ENDPAGE

PAGE "Intra 1/2" 0 2 0 0

LIST F_TIPO 1 10
BEGIN
  PROMPT 1 1 "Tipo riepilogo "
  ITEM "A|Acquisti"
  ITEM "C|Cessioni"
END

NUMBER F_ANNO 4
BEGIN
  PROMPT 1 3 "Anno           "
  FLAGS "AU"
END

LIST F_PERIODO_M 2 17
BEGIN
  PROMPT 1 5 "Periodo        "
  FLAGS "AM"
  FIELD PERIODO
END

LIST F_PERIODO_T 2 17
BEGIN
  PROMPT 1 5 "Periodo        "
  ITEM "01|Gennaio-Marzo"
    MESSAGE COPY,F_PERIODO_M
  ITEM "02|Aprile-Giugno"
    MESSAGE COPY,F_PERIODO_M
  ITEM "03|Luglio-Settembre"
    MESSAGE COPY,F_PERIODO_M
  ITEM "04|Ottobre-Dicembre"
    MESSAGE COPY,F_PERIODO_M
END

LIST F_PERIODO_A 2 17
BEGIN
  PROMPT 1 5 "Periodo        "
  ITEM "01|Annuale"
    MESSAGE COPY,F_PERIODO_M
END

STRING F_CODUA 4
BEGIN
  PROMPT 1 7 "Codice UA      "
  VALIDATE FIXLEN_FUNC 4
  CHECKTYPE REQUIRED
END

NUMBER F_NUMERO 6
BEGIN
  PROMPT 1 9 "Prog.invio     "
  CHECKTYPE REQUIRED
END

NUMBER F_PROGGIORN 2
BEGIN
  PROMPT 30 9 "Prog.giornaliero "
  CHECKTYPE REQUIRED
END

STRING F_UFFDOG 6
BEGIN
  PROMPT 1 11 "Uff.doganale   "
  USE %UDD
  INPUT CODTAB F_UFFDOG
  DISPLAY "Ufficio" CODTAB
  DISPLAY "Denominazione@50" S0
  OUTPUT F_UFFDOG CODTAB
END

STRING F_PATH 50 29
BEGIN
  PROMPT 1 13 "Cartella       "
  DSELECT
  CHECKTYPE REQUIRED
END

ENDPAGE

ENDMASK