2005-06-29 14:34:28 +00:00
|
|
|
#include "ca3700.h"
|
2005-09-06 17:58:13 +00:00
|
|
|
#include "camask.h"
|
2005-06-29 14:34:28 +00:00
|
|
|
|
2008-04-10 21:34:34 +00:00
|
|
|
TOOLBAR "topbar" 0 0 0 2
|
2005-06-29 14:34:28 +00:00
|
|
|
|
|
|
|
BUTTON DLG_PRINT 10 2
|
|
|
|
BEGIN
|
|
|
|
PROMPT -12 -1 "~Stampa"
|
|
|
|
MESSAGE EXIT,K_ENTER
|
|
|
|
END
|
|
|
|
|
|
|
|
BUTTON DLG_QUIT 10 2
|
|
|
|
BEGIN
|
|
|
|
PROMPT -22 -1 ""
|
|
|
|
END
|
|
|
|
|
|
|
|
ENDPAGE
|
|
|
|
|
2008-04-10 21:34:34 +00:00
|
|
|
TOOLBAR "" 0 -2 0 2
|
|
|
|
|
|
|
|
STRING DLG_PROFILE 50
|
|
|
|
BEGIN
|
|
|
|
PROMPT 9 -11 "Profilo "
|
|
|
|
PSELECT
|
|
|
|
END
|
|
|
|
|
|
|
|
ENDPAGE
|
|
|
|
|
|
|
|
PAGE "CdC/Cms/Fasi / Date" 0 0 0 2
|
2005-06-29 14:34:28 +00:00
|
|
|
|
|
|
|
NUMBER F_CODDITTA 5
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 1 "Ditta "
|
|
|
|
FLAGS "FRD"
|
|
|
|
USE LF_NDITTE KEY 1
|
|
|
|
CHECKTYPE REQUIRED
|
|
|
|
INPUT CODDITTA F_CODDITTA
|
|
|
|
DISPLAY "Codice" CODDITTA
|
|
|
|
DISPLAY "Ragione sociale @50" RAGSOC
|
|
|
|
OUTPUT F_CODDITTA CODDITTA
|
|
|
|
OUTPUT F_RAGSOC RAGSOC
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING F_RAGSOC 50
|
|
|
|
BEGIN
|
|
|
|
PROMPT 15 1 ""
|
|
|
|
FLAGS "D"
|
|
|
|
END
|
|
|
|
|
|
|
|
DATE F_DATASTAMPA
|
|
|
|
BEGIN
|
2005-07-19 11:05:25 +00:00
|
|
|
PROMPT 1 2 "Data stampa "
|
2005-06-29 14:34:28 +00:00
|
|
|
FLAGS "A"
|
|
|
|
END
|
|
|
|
|
|
|
|
NUMBER F_ANNO 4
|
|
|
|
BEGIN
|
2005-08-22 15:53:19 +00:00
|
|
|
PROMPT 25 2 "Esercizio "
|
2005-06-29 14:34:28 +00:00
|
|
|
USE ESC
|
|
|
|
INPUT CODTAB F_ANNO
|
|
|
|
DISPLAY "Codice Esercizio" CODTAB
|
|
|
|
DISPLAY "Data inizio esercizio" D0
|
|
|
|
DISPLAY "Data fine esercizio " D1
|
|
|
|
OUTPUT F_ANNO CODTAB
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
FLAGS "RZ"
|
|
|
|
ADD NONE
|
|
|
|
END
|
|
|
|
|
2006-10-06 15:37:58 +00:00
|
|
|
BOOLEAN F_REV_COSRIC
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 3 "Stampa Ricavi prima dei Costi"
|
|
|
|
END
|
|
|
|
|
2007-07-10 15:23:41 +00:00
|
|
|
BOOLEAN F_IMPLODE_ROWS
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 4 "Compatta movimenti ripartiti"
|
|
|
|
END
|
|
|
|
|
2005-08-22 15:53:19 +00:00
|
|
|
SPREADSHEET F_RIGHE -1 -4
|
2005-06-29 14:34:28 +00:00
|
|
|
BEGIN
|
2007-07-10 15:23:41 +00:00
|
|
|
PROMPT 0 6 "Centro di Costo / Commessa / Fase"
|
2005-08-22 15:53:19 +00:00
|
|
|
ITEM "Cdc1"
|
|
|
|
ITEM "Cdc2"
|
|
|
|
ITEM "Cdc3"
|
|
|
|
ITEM "Cdc4"
|
|
|
|
ITEM "Cdc5"
|
|
|
|
ITEM "Cdc6"
|
|
|
|
ITEM "Cdc7"
|
|
|
|
ITEM "Cdc8"
|
|
|
|
ITEM "Cdc9"
|
|
|
|
ITEM "Cdc10"
|
|
|
|
ITEM "Cdc11"
|
|
|
|
ITEM "Cdc12"
|
2005-06-29 14:34:28 +00:00
|
|
|
END
|
|
|
|
|
|
|
|
DATE F_DATAINI
|
|
|
|
BEGIN
|
2008-04-10 21:34:34 +00:00
|
|
|
PROMPT 2 18 "Dalla data "
|
2005-06-29 14:34:28 +00:00
|
|
|
END
|
|
|
|
|
|
|
|
DATE F_DATAFIN
|
|
|
|
BEGIN
|
2008-04-10 21:34:34 +00:00
|
|
|
PROMPT 40 18 "Alla data "
|
2005-06-29 14:34:28 +00:00
|
|
|
END
|
|
|
|
|
|
|
|
STRING F_REPORT 256 64
|
|
|
|
BEGIN
|
2008-04-10 21:34:34 +00:00
|
|
|
PROMPT 2 19 "Report "
|
2005-06-29 14:34:28 +00:00
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE REQUIRED
|
|
|
|
END
|
|
|
|
|
|
|
|
ENDPAGE
|
|
|
|
|
2005-08-22 15:53:19 +00:00
|
|
|
PAGE "Conti" -1 -1 78 20
|
2005-06-29 14:34:28 +00:00
|
|
|
|
2005-08-22 15:53:19 +00:00
|
|
|
LIST F_PIANO 1 12
|
2005-06-29 14:34:28 +00:00
|
|
|
BEGIN
|
2005-08-22 15:53:19 +00:00
|
|
|
PROMPT 1 1 "Piano dei conti "
|
|
|
|
ITEM "A|Analitico"
|
|
|
|
MESSAGE HIDE,5@|SHOW,6@
|
|
|
|
ITEM "C|Contabile"
|
|
|
|
MESSAGE HIDE,6@|SHOW,5@
|
2006-04-04 12:45:21 +00:00
|
|
|
FLAGS "G"
|
2005-08-22 15:53:19 +00:00
|
|
|
END
|
|
|
|
|
|
|
|
GROUPBOX F_PRE0 76 6
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 3 "@bPrefisso del piano dei conti analitico:"
|
|
|
|
GROUP 6
|
|
|
|
END
|
|
|
|
|
|
|
|
GROUPBOX F_PDC0_INI 76 6
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 9 "@bDa conto:"
|
|
|
|
GROUP 4
|
|
|
|
END
|
|
|
|
|
|
|
|
GROUPBOX F_PDC0_FIN 76 6
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 15 "@bA conto:"
|
|
|
|
GROUP 4
|
2005-06-29 14:34:28 +00:00
|
|
|
END
|
|
|
|
|
|
|
|
ENDPAGE
|
|
|
|
|
|
|
|
ENDMASK
|
|
|
|
|
2005-07-07 17:25:53 +00:00
|
|
|
PAGE "Riga Analitica" -1 -1 78 19
|
2005-06-29 14:34:28 +00:00
|
|
|
|
|
|
|
STRING S_CDC1 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 2 "Cdc1"
|
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
GROUP 1
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING S_CDC2 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 21 2 "Cdc2"
|
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
GROUP 1
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING S_CDC3 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 41 2 "Cdc3"
|
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
GROUP 1
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING S_CDC4 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 61 2 "Cdc4"
|
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
GROUP 1
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING S_CDC5 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 3 "Cdc5"
|
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
GROUP 1
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING S_CDC6 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 21 3 "Cdc6"
|
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
GROUP 1
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING S_CDC7 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 41 3 "Cdc7"
|
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
GROUP 1
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING S_CDC8 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 61 3 "Cdc8"
|
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
GROUP 1
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING S_CDC9 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 4 "Cdc9"
|
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
GROUP 1
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING S_CDC10 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 21 4 "Cdc10"
|
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
GROUP 1
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING S_CDC11 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 41 4 "Cdc11"
|
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
GROUP 1
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING S_CDC12 20
|
|
|
|
BEGIN
|
|
|
|
PROMPT 61 4 "Cdc12"
|
|
|
|
FLAGS "B"
|
|
|
|
CHECKTYPE NORMAL
|
|
|
|
GROUP 1
|
|
|
|
END
|
|
|
|
|
|
|
|
BUTTON DLG_OK 10 2
|
|
|
|
BEGIN
|
|
|
|
PROMPT -13 -1 ""
|
|
|
|
END
|
|
|
|
|
|
|
|
BUTTON DLG_DELREC 10 2
|
|
|
|
BEGIN
|
|
|
|
PROMPT -23 -1 ""
|
|
|
|
END
|
|
|
|
|
|
|
|
BUTTON DLG_CANCEL 10 2
|
|
|
|
BEGIN
|
|
|
|
PROMPT -33 -1 ""
|
|
|
|
END
|
|
|
|
|
|
|
|
ENDPAGE
|
|
|
|
|
2005-07-07 17:25:53 +00:00
|
|
|
ENDMASK
|