campo-sirio/in/in0500b.uml

#include "in0500a.h"

TOOLBAR "topbar" 0 0 0 2
#include <stdbar.h>
ENDPAGE

PAGE "Generazione Riepiloghi" 0 2 0 0

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

NUMBER R_ANNO 4
BEGIN
  PROMPT 1 2 "Anno    "
  FLAGS "AU"
  CHECKTYPE REQUIRED
END

LIST R_PERIODO_M 2 17
BEGIN
  PROMPT 1 3 "Periodo "
  FLAGS "AM"
  FIELD PERIODO
END

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

LIST R_PERIODO_A 2 17
BEGIN
  PROMPT 1 3 "Periodo "
  ITEM "01|Annuale"
    MESSAGE COPY,R_PERIODO_M
END

ENDPAGE

ENDMASK