campo-sirio/cg/cg5700a.uml

62 lines
882 B
Plaintext
Raw Normal View History

#include "cg5700.h"
PAGE "Dichiarazione periodica" -1 -1 72 8
NUMBER F_YEAR 4
BEGIN
PROMPT 1 1 "Anno liquidazione "
FLAGS "AR"
END
NUMBER F_CODDITTA 5
BEGIN
PROMPT 1 3 "Codice ditta "
FLAGS "B"
END
STRING F_RAGSOC 50 30
BEGIN
PROMPT 28 3 "Rag.soc. "
FLAGS "B"
END
LIST F_MONTHS 30
BEGIN
PROMPT 1 5 "Iva periodica di "
ITEM "1|Gennaio"
ITEM "2|Febbraio"
ITEM "3|Marzo"
ITEM "4|Aprile"
ITEM "5|Maggio"
ITEM "6|Giugno"
ITEM "7|Luglio"
ITEM "8|Agosto"
ITEM "9|Settembre"
ITEM "10|Ottobre"
ITEM "11|Novembre"
ITEM "12|Dicembre"
END
LIST F_TRIMS 30
BEGIN
PROMPT 1 5 "Iva periodica del "
ITEM "3|1<> Trimestre"
ITEM "6|2<> Trimestre"
ITEM "9|3<> Trimestre"
ITEM "12|4<> Trimestre"
FLAGS "H"
END
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
ENDMASK