campo-sirio/in/in0200a.uml
alex a6bbb2800e Patch level : xx.282
Files correlati     :
Ricompilazione Demo : [ ]
Commento            : Riportata la versione 01.05 patch 282


git-svn-id: svn://10.65.10.50/trunk@8076 c028cbd2-c16b-5b4b-a496-9718f37d4682
1999-04-22 14:23:18 +00:00

77 lines
1.1 KiB
Plaintext
Executable File

#include "in0200a.h"
PAGE "Generazione Dischetti INTRA" -1 -1 30 8
LIST F_TIPO 1 10
BEGIN
PROMPT 1 1 "Tipo riepilogo "
ITEM "C|Cessioni"
ITEM "A|Acquisti"
END
NUMBER F_ANNO 4
BEGIN
PROMPT 1 2 "Anno "
FLAGS "AU"
END
NUMBER F_NUMERO 6
BEGIN
PROMPT 15 2 "Numero "
CHECKTYPE REQUIRED
END
LIST F_PERIODO_M 2 17
BEGIN
PROMPT 1 3 "Periodo "
FLAGS "AM"
FIELD PERIODO
END
LIST F_PERIODO_T 2 17
BEGIN
PROMPT 1 3 "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 3 "Periodo "
ITEM "01|Annuale"
MESSAGE COPY,F_PERIODO_M
END
LIST F_DISCO 2
BEGIN
PROMPT 1 4 "Disco destinazione "
ITEM "A:|A:"
ITEM "B:|B:"
ITEM "C:|C:"
END
BUTTON F_RIEPILOGHI 26 1
BEGIN
PROMPT -11 -3 "~Generazione Riepiloghi"
END
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK