root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

MOdifiche al libgro giornale

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@287 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
nik 1994-09-26 11:51:24 +00:00
parent 8415f44f68
commit fb03331361
2 changed files with 455 additions and 508 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

898
cg/cg3400.cpp
View File

File diff suppressed because it is too large Load Diff

65
cg/cg3400a.uml
View File

@ -4,58 +4,59 @@ PAGE "Stampa Libro Giornale" -1 -1 70 15
STRING CODREG 3 STRING CODREG 3
BEGIN BEGIN
PROMPT 1 1 "Codice registro " PROMPT 1 1 "Codice registro "
USE REG SELECT (I0 = 5) || (I0 = 4) USE REG SELECT (I0 = 5) || (I0 = 4)
INPUT CODTAB[1,4] ANNO_ESER INPUT CODTAB[1,4] ANNO_ESER
INPUT CODTAB[5,7] CODREG INPUT CODTAB[5,7] CODREG
DISPLAY "Anno" CODTAB[1,4] DISPLAY "Anno" CODTAB[1,4]
DISPLAY "Codice" CODTAB[5,7] DISPLAY "Codice" CODTAB[5,7]
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
DISPLAY "Tipo" I0 DISPLAY "Tipo" I0
// OUTPUT ANNO_ESER CODTAB[1,4] // OUTPUT ANNO_ESER CODTAB[1,4]
OUTPUT CODREG CODTAB[5,7] OUTPUT CODREG CODTAB[5,7]
OUTPUT REG_DESC S0 OUTPUT REG_DESC S0
OUTPUT PAGINA_DA I1 OUTPUT PAGINA_DA I1
// OUTPUT DATA_DA D0 // OUTPUT DATA_DA D0
// OUTPUT DATA_A D1 // OUTPUT DATA_A D1
// CHECKTYPE NORMAL // CHECKTYPE NORMAL
FLAGS "R" FLAGS "RZ"
END END
NUMBER ANNO_ESER 4 NUMBER ANNO_ESER 4
BEGIN BEGIN
PROMPT 30 1 "Esercizio " PROMPT 30 1 "Esercizio "
USE ESC USE ESC
INPUT CODTAB ANNO_ESER INPUT CODTAB ANNO_ESER
DISPLAY "Anno" CODTAB DISPLAY "Anno" CODTAB
DISPLAY "Data inizio " D0 DISPLAY "Data inizio " D0
DISPLAY "Data fine " D1 DISPLAY "Data fine " D1
OUTPUT ANNO_ESER CODTAB DISPLAY "Data scarico" D2
// CHECKTYPE REQUIRED OUTPUT ANNO_ESER CODTAB
FLAGS "HRZ" // CHECKTYPE REQUIRED
FLAGS "HRZ"
END END
STRING REG_DESC 50 STRING REG_DESC 50
BEGIN BEGIN
PROMPT 1 3 "Descrizione: " PROMPT 1 3 "Descrizione: "
FLAGS "D" FLAGS "D"
END END
GROUPBOX DLG_NULL 25 5 GROUPBOX DLG_NULL 25 5
BEGIN BEGIN
PROMPT 1 5 "Intervallo" PROMPT 1 5 "Intervallo"
END END
RADIOBUTTON DLG_NULL 20 RADIOBUTTON DLG_NULL 20
BEGIN BEGIN
PROMPT 1 5 "" PROMPT 1 5 ""
ITEM "1|Tutto" MESSAGE DISABLE, PAGINA_DA ITEM "1|Tutto" MESSAGE DISABLE, PAGINA_DA
ITEM "2|Da pagina" MESSAGE ENABLE, PAGINA_DA ITEM "2|Da pagina" MESSAGE ENABLE, PAGINA_DA
END END
NUMBER PAGINA_DA 5 NUMBER PAGINA_DA 5
BEGIN BEGIN
PROMPT 13 8 "" PROMPT 13 8 ""
END END
GROUPBOX DLG_NULL 33 5 GROUPBOX DLG_NULL 33 5
@ -83,8 +84,8 @@ END
DATE DATA_A DATE DATA_A
BEGIN BEGIN
PROMPT 2 11 "Alla data " PROMPT 2 11 "Alla data "
VALIDATE DATE_CMP_FUNC >= DATA_DA // VALIDATE DATE_CMP_FUNC >= DATA_DA
WARNING "Questa data deve essere posteriore alla precedente" WARNING "Specificare la data di fine stampa"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END