1999-10-22 10:00:18 +00:00
|
|
|
|
#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
|
2000-05-05 15:25:49 +00:00
|
|
|
|
PROMPT 1 5 "Iva periodica di "
|
1999-10-22 10:00:18 +00:00
|
|
|
|
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
|
2000-05-05 15:25:49 +00:00
|
|
|
|
PROMPT 1 5 "Iva periodica del "
|
1999-10-22 10:00:18 +00:00
|
|
|
|
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
|