Stampa base
git-svn-id: svn://10.65.10.50/trunk@3562 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
nik
parent
b5c5ee0a72
commit
8bc5cff872
@ -983,6 +983,9 @@ void TQuadroA::init_modify_mode(TMask& m)
|
|||||||
|
|
||||||
void TQuadroA::init_insert_mode(TMask& m)
|
void TQuadroA::init_insert_mode(TMask& m)
|
||||||
{
|
{
|
||||||
|
if (QuadroA1())
|
||||||
|
m.set(QA1F_ANNORIF, _anno_dic);
|
||||||
|
|
||||||
if (QuadroA3())
|
if (QuadroA3())
|
||||||
{
|
{
|
||||||
_codditta = m.get_long(QAF_CODDITTA);
|
_codditta = m.get_long(QAF_CODDITTA);
|
||||||
|
|||||||
@ -61,7 +61,6 @@ BEGIN
|
|||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
KEY 1
|
KEY 1
|
||||||
FIELD LF_BASEBIS->TIPOQUA
|
FIELD LF_BASEBIS->TIPOQUA
|
||||||
// CHECKTYPE REQUIRED
|
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|
||||||
@ -97,7 +96,6 @@ BEGIN
|
|||||||
FIELD LF_BASEBIS->CRIMPDL
|
FIELD LF_BASEBIS->CRIMPDL
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
// MESSAGE K_TAB,F_M6
|
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_M4 15
|
NUMBER F_M4 15
|
||||||
@ -106,7 +104,7 @@ BEGIN
|
|||||||
FIELD LF_BASEBIS->CRIMPIVA
|
FIELD LF_BASEBIS->CRIMPIVA
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
// MESSAGE K_TAB,F_M6
|
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_M5 15
|
NUMBER F_M5 15
|
||||||
@ -115,7 +113,6 @@ BEGIN
|
|||||||
FIELD LF_BASEBIS->CRIMPRIT
|
FIELD LF_BASEBIS->CRIMPRIT
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
// MESSAGE K_TAB,F_M6
|
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER F_M6 15
|
NUMBER F_M6 15
|
||||||
@ -124,7 +121,6 @@ BEGIN
|
|||||||
FIELD LF_BASEBIS->CRIMPRES
|
FIELD LF_BASEBIS->CRIMPRES
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
FLAGS "D"
|
FLAGS "D"
|
||||||
// NUM_CALC {#F_M3-#F_M4-#F_M5}
|
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|||||||
@ -38,7 +38,7 @@ BEGIN
|
|||||||
FI 131
|
FI 131
|
||||||
END
|
END
|
||||||
|
|
||||||
SECTION BODY FIRST 67
|
SECTION BODY FIRST 40
|
||||||
|
|
||||||
LISTA 1
|
LISTA 1
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -693,43 +693,43 @@ SECTION FOOTER FIRST 4
|
|||||||
STRINGA 82
|
STRINGA 82
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "AMMIN. 1 NOME"
|
KEY "AMMIN. 1 NOME"
|
||||||
PROMPT 25 54 ""
|
PROMPT 25 1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 83
|
STRINGA 83
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "AMMIN. 1 SESSO"
|
KEY "AMMIN. 1 SESSO"
|
||||||
PROMPT 52 54 ""
|
PROMPT 52 1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 84
|
STRINGA 84
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "AMMIN. 1 COMUNENA"
|
KEY "AMMIN. 1 COMUNENA"
|
||||||
PROMPT 56 54 ""
|
PROMPT 56 1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 85
|
STRINGA 85
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "AMMIN. 1 PROVNA"
|
KEY "AMMIN. 1 PROVNA"
|
||||||
PROMPT 81 54 ""
|
PROMPT 81 1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 86
|
STRINGA 86
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "AMMIN. 1 DATANA"
|
KEY "AMMIN. 1 DATANA"
|
||||||
PROMPT 87 54 ""
|
PROMPT 87 1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 87
|
STRINGA 87
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "AMMIN. 1 CODFIS"
|
KEY "AMMIN. 1 CODFIS"
|
||||||
PROMPT 100 54 ""
|
PROMPT 100 1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
STRINGA 88
|
STRINGA 88
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "AMMIN. 1 QUALIFICA"
|
KEY "AMMIN. 1 QUALIFICA"
|
||||||
PROMPT 127 54 ""
|
PROMPT 127 1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
END
|
END
|
||||||
|
|||||||
858
m770/77base2.frm
858
m770/77base2.frm
File diff suppressed because it is too large
Load Diff
181
m770/77base3.frm
Executable file
181
m770/77base3.frm
Executable file
@ -0,0 +1,181 @@
|
|||||||
|
USE 42
|
||||||
|
JOIN 37 INTO CODDITTA=CODDITTA
|
||||||
|
END
|
||||||
|
|
||||||
|
DESCRIPTION
|
||||||
|
BEGIN
|
||||||
|
36->* "Base 770"
|
||||||
|
37->* "Basebis 770"
|
||||||
|
END
|
||||||
|
|
||||||
|
GENERAL
|
||||||
|
BEGIN
|
||||||
|
OFFSET 0 0
|
||||||
|
FONT "Courier 17cpi"
|
||||||
|
SIZE 10
|
||||||
|
CA "X"
|
||||||
|
IN 3 2
|
||||||
|
FI 131
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION HEADER FIRST 2
|
||||||
|
|
||||||
|
STRINGA 1
|
||||||
|
BEGIN
|
||||||
|
KEY "Cod.Conc.1"
|
||||||
|
PROMPT 41 1 ""
|
||||||
|
FIELD 37->L0CCONC1
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 2
|
||||||
|
BEGIN
|
||||||
|
KEY "Cod.Conc.2"
|
||||||
|
PROMPT 53 1 ""
|
||||||
|
FIELD 37->L0CCONC2
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 3
|
||||||
|
BEGIN
|
||||||
|
KEY "Cod.Conc.3"
|
||||||
|
PROMPT 63 1 ""
|
||||||
|
FIELD 37->L0CCONC3
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 4
|
||||||
|
BEGIN
|
||||||
|
KEY "Cod.Tes.1"
|
||||||
|
PROMPT 102 1 ""
|
||||||
|
FIELD 37->L0CTES1
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 5
|
||||||
|
BEGIN
|
||||||
|
KEY "Cod.Tes.2"
|
||||||
|
PROMPT 114 1 ""
|
||||||
|
FIELD 37->L0CTES2
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 6
|
||||||
|
BEGIN
|
||||||
|
KEY "Cod.Tes.3"
|
||||||
|
PROMPT 126 1 ""
|
||||||
|
FIELD 37->L0CTES3
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION BODY ODD 4
|
||||||
|
|
||||||
|
NUMERO 1
|
||||||
|
BEGIN
|
||||||
|
KEY "Mese rif."
|
||||||
|
PROMPT 26 1 ""
|
||||||
|
FIELD 42->QLMP
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 2
|
||||||
|
BEGIN
|
||||||
|
KEY "Anno rif."
|
||||||
|
PROMPT 29 1 ""
|
||||||
|
FIELD 42->QLAP
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 3
|
||||||
|
BEGIN
|
||||||
|
KEY "Rit.eff"
|
||||||
|
PROMPT 48 1 ""
|
||||||
|
FIELD 42->QLRITEFF
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
MESSAGE ADD,FL->1
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 4
|
||||||
|
BEGIN
|
||||||
|
KEY "Rit.ver"
|
||||||
|
PROMPT 79 1 ""
|
||||||
|
FIELD 42->QLRITVER
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
MESSAGE ADD,FL->2
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 5
|
||||||
|
BEGIN
|
||||||
|
KEY "RSS"
|
||||||
|
PROMPT 100 1 ""
|
||||||
|
FIELD 42->QLRSS
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 6
|
||||||
|
BEGIN
|
||||||
|
KEY "Note"
|
||||||
|
PROMPT 111 1 ""
|
||||||
|
FIELD 42->QLNOTE
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 7
|
||||||
|
BEGIN
|
||||||
|
KEY "Luogo Vers."
|
||||||
|
PROMPT 28 3 ""
|
||||||
|
FIELD 42->QLLV
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 8
|
||||||
|
BEGIN
|
||||||
|
KEY "Tipo Vers."
|
||||||
|
PROMPT 36 3 ""
|
||||||
|
FIELD 42->QLTV
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 9
|
||||||
|
BEGIN
|
||||||
|
KEY "CodTrib"
|
||||||
|
PROMPT 47 3 ""
|
||||||
|
FIELD 42->QLCT
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 11
|
||||||
|
BEGIN
|
||||||
|
KEY "DATA VERS."
|
||||||
|
PROMPT 63 3 ""
|
||||||
|
FIELD 42->QLDV
|
||||||
|
PICTURE "## ^ ## ^####"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 12
|
||||||
|
BEGIN
|
||||||
|
KEY "SERIE"
|
||||||
|
PROMPT 84 3 ""
|
||||||
|
FIELD 42->QLSERIE
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 13
|
||||||
|
BEGIN
|
||||||
|
KEY "NUMERO"
|
||||||
|
PROMPT 99 3 ""
|
||||||
|
FIELD 42->QLNUMERO
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION FOOTER LAST 2
|
||||||
|
|
||||||
|
NUMERO 1
|
||||||
|
BEGIN
|
||||||
|
KEY "Tot.rit.eff"
|
||||||
|
PROMPT 51 1 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 2
|
||||||
|
BEGIN
|
||||||
|
KEY "Tot.rit.ver"
|
||||||
|
PROMPT 102 1 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
688
m770/77base4.frm
Executable file
688
m770/77base4.frm
Executable file
@ -0,0 +1,688 @@
|
|||||||
|
USE 37
|
||||||
|
JOIN 72 INTO CODDITTA=CODDITTA
|
||||||
|
JOIN 73 TO 37 INTO CODDITTA=CODDITTA
|
||||||
|
JOIN 74 TO 37 INTO CODDITTA=CODDITTA
|
||||||
|
JOIN 75 TO 37 INTO CODDITTA=CODDITTA
|
||||||
|
JOIN 76 TO 37 INTO CODDITTA=CODDITTA
|
||||||
|
JOIN 77 TO 37 INTO CODDITTA=CODDITTA
|
||||||
|
JOIN 36 TO 37 INTO CODDITTA=CODDITTA
|
||||||
|
JOIN %CAF TO 36 ALIAS 104 INTO CODTAB==CODCAAF
|
||||||
|
JOIN 9 TO 36 INTO CODDITTA=CODDITTA
|
||||||
|
JOIN 6 TO 9 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||||
|
JOIN 8 TO 36 ALIAS 108 INTO CODANAGR==CODPRO
|
||||||
|
JOIN 6 TO 8 ALIAS 106 INTO TIPOA="F" CODANAGR=CODANAGR
|
||||||
|
END
|
||||||
|
|
||||||
|
DESCRIPTION
|
||||||
|
BEGIN
|
||||||
|
36->* "Base 770"
|
||||||
|
37->* "Basebis 770"
|
||||||
|
72->* "Quadro N"
|
||||||
|
73->* "Quadro P"
|
||||||
|
74->* "Quadro Q"
|
||||||
|
75->* "Quadro R"
|
||||||
|
76->* "Quadro S"
|
||||||
|
77->* "Quadro T"
|
||||||
|
END
|
||||||
|
|
||||||
|
GENERAL
|
||||||
|
BEGIN
|
||||||
|
OFFSET 0 0
|
||||||
|
FONT "Courier 17cpi"
|
||||||
|
SIZE 10
|
||||||
|
CA "X"
|
||||||
|
IN 3 2
|
||||||
|
FI 131
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION HEADER FIRST 7
|
||||||
|
|
||||||
|
NUMERO 1
|
||||||
|
BEGIN
|
||||||
|
KEY "M1"
|
||||||
|
PROMPT 61 1 ""
|
||||||
|
FIELD 37->ECCRIT12
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 2
|
||||||
|
BEGIN
|
||||||
|
KEY "M2"
|
||||||
|
PROMPT 117 1 ""
|
||||||
|
FIELD 37->ECCRIT23
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 3
|
||||||
|
BEGIN
|
||||||
|
KEY "M3"
|
||||||
|
PROMPT 61 3 ""
|
||||||
|
FIELD 37->CRIMPDL
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 4
|
||||||
|
BEGIN
|
||||||
|
KEY "M4"
|
||||||
|
PROMPT 61 5 ""
|
||||||
|
FIELD 37->CRIMPIVA
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 5
|
||||||
|
BEGIN
|
||||||
|
KEY "M5"
|
||||||
|
PROMPT 117 3 ""
|
||||||
|
FIELD 37->CRIMPRIT
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 6
|
||||||
|
BEGIN
|
||||||
|
KEY "M6"
|
||||||
|
PROMPT 117 5 ""
|
||||||
|
FIELD 37->CRIMPRES
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION BODY ODD 1
|
||||||
|
|
||||||
|
NUMERO 1
|
||||||
|
BEGIN
|
||||||
|
KEY "MeseRif"
|
||||||
|
PROMPT 27 1 ""
|
||||||
|
FIELD 72->MESERIF
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 2
|
||||||
|
BEGIN
|
||||||
|
KEY "AnnoRif"
|
||||||
|
PROMPT 31 1 ""
|
||||||
|
FIELD 72->ANNORIF
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 3
|
||||||
|
BEGIN
|
||||||
|
KEY "imp. rimb"
|
||||||
|
PROMPT 39 1 ""
|
||||||
|
FIELD 72->IMPOSTA
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 4
|
||||||
|
BEGIN
|
||||||
|
KEY "Compensi"
|
||||||
|
PROMPT 60 1 ""
|
||||||
|
FIELD 72->COMPENSI
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 5
|
||||||
|
BEGIN
|
||||||
|
KEY "MeseRif"
|
||||||
|
PROMPT 85 1 ""
|
||||||
|
FIELD 72->MESERIF
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 6
|
||||||
|
BEGIN
|
||||||
|
KEY "AnnoRif"
|
||||||
|
PROMPT 89 1 ""
|
||||||
|
FIELD 72->ANNORIF
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 7
|
||||||
|
BEGIN
|
||||||
|
KEY "imp. rimb"
|
||||||
|
PROMPT 99 1 ""
|
||||||
|
FIELD 72->IMPOSTA
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 8
|
||||||
|
BEGIN
|
||||||
|
KEY "Compensi"
|
||||||
|
PROMPT 119 1 ""
|
||||||
|
FIELD 72->COMPENSI
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION BODY EVEN 1
|
||||||
|
|
||||||
|
NUMERO 1
|
||||||
|
BEGIN
|
||||||
|
KEY "R - MeseRif"
|
||||||
|
PROMPT 27 1 ""
|
||||||
|
FIELD 75->MESERIF
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 2
|
||||||
|
BEGIN
|
||||||
|
KEY "R - AnnoRif"
|
||||||
|
PROMPT 31 1 ""
|
||||||
|
FIELD 75->ANNORIF
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 3
|
||||||
|
BEGIN
|
||||||
|
KEY "R - imp. rimb"
|
||||||
|
PROMPT 41 1 ""
|
||||||
|
FIELD 75->IMPRIMB
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 4
|
||||||
|
BEGIN
|
||||||
|
KEY "R - Compensi"
|
||||||
|
PROMPT 62 1 ""
|
||||||
|
FIELD 75->COMPENSI
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 5
|
||||||
|
BEGIN
|
||||||
|
KEY "R - MeseRif"
|
||||||
|
PROMPT 85 1 ""
|
||||||
|
FIELD 75->MESERIF
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 6
|
||||||
|
BEGIN
|
||||||
|
KEY "R - AnnoRif"
|
||||||
|
PROMPT 89 1 ""
|
||||||
|
FIELD 75->ANNORIF
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 7
|
||||||
|
BEGIN
|
||||||
|
KEY "R - imp. rimb"
|
||||||
|
PROMPT 99 1 ""
|
||||||
|
FIELD 75->IMPRIMB
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 8
|
||||||
|
BEGIN
|
||||||
|
KEY "R - Compensi"
|
||||||
|
PROMPT 120 1 ""
|
||||||
|
FIELD 75->COMPENSI
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION HEADER EVEN 1
|
||||||
|
|
||||||
|
NUMERO 1
|
||||||
|
BEGIN
|
||||||
|
KEY "P Imp.versata"
|
||||||
|
PROMPT 24 1 ""
|
||||||
|
FIELD 73->IMPOSTA
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 2
|
||||||
|
BEGIN
|
||||||
|
KEY "P Inter.lav.dip"
|
||||||
|
PROMPT 41 1 ""
|
||||||
|
FIELD 73->INTERDIP
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 3
|
||||||
|
BEGIN
|
||||||
|
KEY "P Inter.dat.lav."
|
||||||
|
PROMPT 56 1 ""
|
||||||
|
FIELD 73->INTERDAT
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 4
|
||||||
|
BEGIN
|
||||||
|
KEY "P Modalita' vers"
|
||||||
|
PROMPT 76 1 ""
|
||||||
|
FIELD 73->TIPOVERS
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 5
|
||||||
|
BEGIN
|
||||||
|
KEY "P Cod.trib"
|
||||||
|
PROMPT 82 1 ""
|
||||||
|
FIELD 73->CODTRIB
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 6
|
||||||
|
BEGIN
|
||||||
|
KEY "P DATA VERS."
|
||||||
|
PROMPT 89 1 ""
|
||||||
|
FIELD 73->DATAVERS
|
||||||
|
PICTURE "## ^ ## ^####"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 7
|
||||||
|
BEGIN
|
||||||
|
KEY "P Serie"
|
||||||
|
PROMPT 108 1 ""
|
||||||
|
FIELD 73->SERIE
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 8
|
||||||
|
BEGIN
|
||||||
|
KEY "P Numero"
|
||||||
|
PROMPT 117 1 ""
|
||||||
|
FIELD 73->NUMERO
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION HEADER ODD 1
|
||||||
|
|
||||||
|
NUMERO 1
|
||||||
|
BEGIN
|
||||||
|
KEY "S Imp.versata"
|
||||||
|
PROMPT 24 1 ""
|
||||||
|
FIELD 76->IMPOSTA
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 2
|
||||||
|
BEGIN
|
||||||
|
KEY "S Inter.lav.dip"
|
||||||
|
PROMPT 41 1 ""
|
||||||
|
FIELD 76->INTERDIP
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 3
|
||||||
|
BEGIN
|
||||||
|
KEY "S Inter.dat.lav."
|
||||||
|
PROMPT 56 1 ""
|
||||||
|
FIELD 76->INTERDAT
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 4
|
||||||
|
BEGIN
|
||||||
|
KEY "S Modalita' vers"
|
||||||
|
PROMPT 76 1 ""
|
||||||
|
FIELD 73->TIPOVERS
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 5
|
||||||
|
BEGIN
|
||||||
|
KEY "S Cod.trib"
|
||||||
|
PROMPT 82 1 ""
|
||||||
|
FIELD 76->CODTRIB
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 6
|
||||||
|
BEGIN
|
||||||
|
KEY "S DATA VERS."
|
||||||
|
PROMPT 89 1 ""
|
||||||
|
FIELD 76->DATAVERS
|
||||||
|
PICTURE "## ^ ## ^####"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 7
|
||||||
|
BEGIN
|
||||||
|
KEY "S Serie"
|
||||||
|
PROMPT 108 1 ""
|
||||||
|
FIELD 76->SERIE
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 8
|
||||||
|
BEGIN
|
||||||
|
KEY "S Numero"
|
||||||
|
PROMPT 117 1 ""
|
||||||
|
FIELD 76->NUMERO
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION FOOTER EVEN 1
|
||||||
|
|
||||||
|
NUMERO 1
|
||||||
|
BEGIN
|
||||||
|
KEY "Q Mese paga"
|
||||||
|
PROMPT 27 1 ""
|
||||||
|
FIELD 74->MESEPAG
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 2
|
||||||
|
BEGIN
|
||||||
|
KEY "Q Anno paga"
|
||||||
|
PROMPT 32 1 ""
|
||||||
|
FIELD 74->ANNOPAG
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 3
|
||||||
|
BEGIN
|
||||||
|
KEY "Q Contr.versato"
|
||||||
|
PROMPT 41 1 ""
|
||||||
|
FIELD 74->CONTVERS
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 4
|
||||||
|
BEGIN
|
||||||
|
KEY "Q Contr.rimborsati"
|
||||||
|
PROMPT 65 1 ""
|
||||||
|
FIELD 74->CONTRIMB
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 5
|
||||||
|
BEGIN
|
||||||
|
KEY "Q Interes.e/o soprattasse"
|
||||||
|
PROMPT 94 1 ""
|
||||||
|
FIELD 74->INTERESSI
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 6
|
||||||
|
BEGIN
|
||||||
|
KEY "Q Cod.Reg"
|
||||||
|
PROMPT 123 1 ""
|
||||||
|
FIELD 74->CODREG
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION FOOTER ODD 1
|
||||||
|
|
||||||
|
NUMERO 1
|
||||||
|
BEGIN
|
||||||
|
KEY "T Mese paga"
|
||||||
|
PROMPT 27 1 ""
|
||||||
|
FIELD 77->MESEPAG
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 2
|
||||||
|
BEGIN
|
||||||
|
KEY "T Anno paga"
|
||||||
|
PROMPT 32 1 ""
|
||||||
|
FIELD 77->ANNOPAG
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 3
|
||||||
|
BEGIN
|
||||||
|
KEY "T Contr.versato"
|
||||||
|
PROMPT 41 1 ""
|
||||||
|
FIELD 77->CONTVERS
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 4
|
||||||
|
BEGIN
|
||||||
|
KEY "T Contr.rimborsati"
|
||||||
|
PROMPT 65 1 ""
|
||||||
|
FIELD 77->CONTRIMB
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 5
|
||||||
|
BEGIN
|
||||||
|
KEY "T Interes.e/o soprattasse"
|
||||||
|
PROMPT 94 1 ""
|
||||||
|
FIELD 77->INTERESSI
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 6
|
||||||
|
BEGIN
|
||||||
|
KEY "T Cod.Reg"
|
||||||
|
PROMPT 123 1 ""
|
||||||
|
FIELD 77->CODREG
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION FOOTER FIRST 25
|
||||||
|
|
||||||
|
STRINGA 650
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro A"
|
||||||
|
PROMPT 19 3 ""
|
||||||
|
FIELD 37->QCOMP[1,1]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 653
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro A3"
|
||||||
|
PROMPT 24 3 ""
|
||||||
|
FIELD 37->QCOMP[4,4]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 660
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro B"
|
||||||
|
PROMPT 29 3 ""
|
||||||
|
FIELD 37->QCOMP[5,5]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 661
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro B1"
|
||||||
|
PROMPT 34 3 ""
|
||||||
|
FIELD 37->QCOMP[6,6]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 670
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro C"
|
||||||
|
PROMPT 39 3 ""
|
||||||
|
FIELD 37->QCOMP[7,7]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 680
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro D"
|
||||||
|
PROMPT 44 3 ""
|
||||||
|
FIELD 37->QCOMP[8,8]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 681
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro D1"
|
||||||
|
PROMPT 49 3 ""
|
||||||
|
FIELD 37->QCOMP[9,9]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 690
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro E"
|
||||||
|
PROMPT 54 3 ""
|
||||||
|
FIELD 37->QCOMP[10,10]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 691
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro E1"
|
||||||
|
PROMPT 60 3 ""
|
||||||
|
FIELD 37->QCOMP[11,11]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 692
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro E2"
|
||||||
|
PROMPT 65 3 ""
|
||||||
|
FIELD 37->QCOMP[12,12]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 700
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro F"
|
||||||
|
PROMPT 70 3 ""
|
||||||
|
FIELD 37->QCOMP[13,13]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 701
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro F1"
|
||||||
|
PROMPT 75 3 ""
|
||||||
|
FIELD 37->QCOMP[14,14]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 702
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro F2"
|
||||||
|
PROMPT 80 3 ""
|
||||||
|
FIELD 37->QCOMP[15,15]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 710
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro G"
|
||||||
|
PROMPT 85 3 ""
|
||||||
|
FIELD 37->QCOMP[16,16]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 711
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro G1"
|
||||||
|
PROMPT 90 3 ""
|
||||||
|
FIELD 37->QCOMP[17,17]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 720
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro H"
|
||||||
|
PROMPT 95 3 ""
|
||||||
|
FIELD 37->QCOMP[18,18]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 730
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro I"
|
||||||
|
PROMPT 100 3 ""
|
||||||
|
FIELD 37->QCOMP[19,19]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 651
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro A1"
|
||||||
|
PROMPT 19 7 ""
|
||||||
|
FIELD 37->QCOMP[2,2]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 652
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro A2"
|
||||||
|
PROMPT 24 7 ""
|
||||||
|
FIELD 37->QCOMP[3,3]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 760
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro N"
|
||||||
|
PROMPT 29 7 ""
|
||||||
|
FIELD 37->QCOMP[20,20]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 780
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro P"
|
||||||
|
PROMPT 35 7 ""
|
||||||
|
FIELD 37->QCOMP[21,21]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 790
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro Q"
|
||||||
|
PROMPT 40 7 ""
|
||||||
|
FIELD 37->QCOMP[22,22]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 800
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro R"
|
||||||
|
PROMPT 45 7 ""
|
||||||
|
FIELD 37->QCOMP[23,23]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 810
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro S"
|
||||||
|
PROMPT 50 7 ""
|
||||||
|
FIELD 37->QCOMP[24,24]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 820
|
||||||
|
BEGIN
|
||||||
|
KEY "Quadro T"
|
||||||
|
PROMPT 55 7 ""
|
||||||
|
FIELD 37->QCOMP[25,25]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 821
|
||||||
|
BEGIN
|
||||||
|
PROMPT 80 9 ""
|
||||||
|
KEY "Numero quadri aggiuntivi"
|
||||||
|
FIELD 37->H0NQLAGG
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 822
|
||||||
|
BEGIN
|
||||||
|
PROMPT 72 11 ""
|
||||||
|
KEY "Numero quadri su supporto magnetico"
|
||||||
|
FIELD 37->NSUPPM
|
||||||
|
END
|
||||||
|
|
||||||
|
DATA 823
|
||||||
|
BEGIN
|
||||||
|
KEY "Data"
|
||||||
|
PROMPT 29 16 ""
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 824
|
||||||
|
BEGIN
|
||||||
|
KEY "Presidente"
|
||||||
|
PROMPT 51 15 ""
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 825
|
||||||
|
BEGIN
|
||||||
|
KEY "Dichiarante"
|
||||||
|
PROMPT 95 15 ""
|
||||||
|
FIELD 6->RAGSOC
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 826
|
||||||
|
BEGIN
|
||||||
|
KEY "CODICE FISCALE CAAF"
|
||||||
|
PROMPT 48 18 ""
|
||||||
|
FIELD 104@->S1
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 827
|
||||||
|
BEGIN
|
||||||
|
KEY "NUMERO ISCRIZIONE ALBO"
|
||||||
|
PROMPT 122 18 ""
|
||||||
|
FIELD 104@->I1
|
||||||
|
PICTURE "#####"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 828
|
||||||
|
BEGIN
|
||||||
|
KEY "CODICE FISCALE PROF."
|
||||||
|
PROMPT 92 20 ""
|
||||||
|
FIELD 106@->COFI
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 829
|
||||||
|
BEGIN
|
||||||
|
KEY "FIRMA"
|
||||||
|
PROMPT 84 25 ""
|
||||||
|
FIELD 106@->RAGSOC
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
688
m770/77qb.frm
688
m770/77qb.frm
@ -1,3 +1,690 @@
|
|||||||
|
<<<<<<< 77qb.frm
|
||||||
|
USE 59
|
||||||
|
JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP
|
||||||
|
JOIN 9 INTO CODDITTA=CODDITTA
|
||||||
|
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||||
|
JOIN 8 TO 106@ ALIAS 108 INTO CODANAGR=CODANAGR
|
||||||
|
JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC
|
||||||
|
JOIN 13 TO 106@ ALIAS 213 INTO COM==COMRF(COMRES)
|
||||||
|
|
||||||
|
END
|
||||||
|
DESCRIPTION
|
||||||
|
BEGIN
|
||||||
|
59->* "Quadro B 770"
|
||||||
|
45->* "Anagrafica dei dipendenti"
|
||||||
|
9->* "Ditte"
|
||||||
|
106@->* "Anagrafica persone fisiche e giuridiche (ditta)"
|
||||||
|
108@->* "Anagrafica persone fisiche (ditta)"
|
||||||
|
113@->* "Comuni DITTA (nascita)"
|
||||||
|
213@->* "Comuni DITTA (residenza)"
|
||||||
|
END
|
||||||
|
|
||||||
|
GENERAL
|
||||||
|
BEGIN
|
||||||
|
OFFSET 0 0
|
||||||
|
FONT "Courier New"
|
||||||
|
SIZE 11
|
||||||
|
CARATTERE "X"
|
||||||
|
INIZIO_POS 3 2
|
||||||
|
FINE_POS 131
|
||||||
|
GRID "+++++++++-|"
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION HEADER FIRST 28
|
||||||
|
|
||||||
|
LISTA 1
|
||||||
|
BEGIN
|
||||||
|
KEY "Tipo anagrafica"
|
||||||
|
FLAGS "H"
|
||||||
|
FIELD 106@->TIPOA
|
||||||
|
ITEM "F|Fisica" MESSAGE SHOW,1@|HIDE,2@
|
||||||
|
ITEM "G|Giuridica" MESSAGE SHOW,2@|HIDE,1@
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 2
|
||||||
|
BEGIN
|
||||||
|
KEY "CODICE FISCALE"
|
||||||
|
PROMPT 3 12 ""
|
||||||
|
FIELD 106@->COFI
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 3
|
||||||
|
BEGIN
|
||||||
|
KEY "RAGIONE SOCIALE"
|
||||||
|
PROMPT 39 12 ""
|
||||||
|
GROUP 2
|
||||||
|
FIELD 106@->RAGSOC
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 4
|
||||||
|
BEGIN
|
||||||
|
KEY "COGNOME"
|
||||||
|
PROMPT 39 12 ""
|
||||||
|
GROUP 1
|
||||||
|
FIELD 106@->RAGSOC[1,30]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 5
|
||||||
|
BEGIN
|
||||||
|
KEY "NOME"
|
||||||
|
PROMPT 17 14 ""
|
||||||
|
GROUP 1
|
||||||
|
FIELD 106@->RAGSOC[31,50]
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 6
|
||||||
|
BEGIN
|
||||||
|
KEY "SESSO"
|
||||||
|
PROMPT 58 14 ""
|
||||||
|
GROUP 1
|
||||||
|
FIELD 108@->SESSO
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 7
|
||||||
|
BEGIN
|
||||||
|
KEY "DATA DI NASCITA"
|
||||||
|
PROMPT 67 14 ""
|
||||||
|
GROUP 1
|
||||||
|
FIELD 108@->DATANASC
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 8
|
||||||
|
BEGIN
|
||||||
|
KEY "COMUNE DI NASCITA"
|
||||||
|
PROMPT 84 14 ""
|
||||||
|
GROUP 1
|
||||||
|
FIELD 113@->DENCOM
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 9
|
||||||
|
BEGIN
|
||||||
|
KEY "PROV. DI NASCITA"
|
||||||
|
PROMPT 125 14 ""
|
||||||
|
GROUP 1
|
||||||
|
FIELD 113@->PROVCOM
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 10
|
||||||
|
BEGIN
|
||||||
|
KEY "COMUNE DI RES.FISCALE"
|
||||||
|
PROMPT 17 16 ""
|
||||||
|
FIELD 213@->DENCOM
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 11
|
||||||
|
BEGIN
|
||||||
|
KEY "PROV DI RES.FISCALE"
|
||||||
|
PROMPT 59 16 ""
|
||||||
|
FIELD 213@->PROVCOM
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 12
|
||||||
|
BEGIN
|
||||||
|
KEY "VIA di RES."
|
||||||
|
PROMPT 66 16 ""
|
||||||
|
FIELD 106@->INDRF
|
||||||
|
FIELD 106@->INDRES
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 15
|
||||||
|
BEGIN
|
||||||
|
KEY "NUM. CIVICO di RES."
|
||||||
|
PROMPT 104 16 ""
|
||||||
|
FIELD 106@->CIVRF
|
||||||
|
FIELD 106@->CIVRES
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 16
|
||||||
|
BEGIN
|
||||||
|
KEY "CAP"
|
||||||
|
PROMPT 123 16 ""
|
||||||
|
FIELD 106@->CAPRF
|
||||||
|
FIELD 106@->CAPRES
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 13
|
||||||
|
BEGIN
|
||||||
|
KEY "CODICE FISCALE DEL SOGGETTO DICHIARANTE"
|
||||||
|
PROMPT 85 19 ""
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 14
|
||||||
|
BEGIN
|
||||||
|
KEY "NUM. FOGLIO"
|
||||||
|
PROMPT 125 22 ""
|
||||||
|
END
|
||||||
|
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION BODY ODD 12
|
||||||
|
|
||||||
|
STRINGA 1
|
||||||
|
BEGIN
|
||||||
|
KEY "COD.FIS"
|
||||||
|
PROMPT 11 1 ""
|
||||||
|
FIELD 45->CODFI
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 2
|
||||||
|
BEGIN
|
||||||
|
KEY "COGNOME"
|
||||||
|
PROMPT 44 1 ""
|
||||||
|
FIELD 45->COGNOME
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 3
|
||||||
|
BEGIN
|
||||||
|
KEY "NOME"
|
||||||
|
PROMPT 82 1 ""
|
||||||
|
FIELD 45->NOME
|
||||||
|
END
|
||||||
|
|
||||||
|
DATA 4
|
||||||
|
BEGIN
|
||||||
|
KEY "DATA NASCITA"
|
||||||
|
PROMPT 114 1 ""
|
||||||
|
FIELD 45->DATANA
|
||||||
|
FORMAT "1444-"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 5
|
||||||
|
BEGIN
|
||||||
|
KEY "SESSO"
|
||||||
|
PROMPT 128 1 ""
|
||||||
|
FIELD 45->SESSO
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 6
|
||||||
|
BEGIN
|
||||||
|
KEY "COMUNE DI NASCITA"
|
||||||
|
PROMPT 11 3 ""
|
||||||
|
FIELD 45->COMUNENA
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 7
|
||||||
|
BEGIN
|
||||||
|
KEY "PROV DI NASCITA"
|
||||||
|
PROMPT 47 3 ""
|
||||||
|
FIELD 45->PROVNA
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 8
|
||||||
|
BEGIN
|
||||||
|
KEY "COMUNE DI RESIDENZA"
|
||||||
|
PROMPT 54 3 ""
|
||||||
|
FIELD 45->COMRES
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 9
|
||||||
|
BEGIN
|
||||||
|
KEY "PROV. RESIDENZA"
|
||||||
|
PROMPT 88 3 ""
|
||||||
|
FIELD 45->PROVRES
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 10
|
||||||
|
BEGIN
|
||||||
|
KEY "INDIRIZZO RES."
|
||||||
|
PROMPT 95 3 ""
|
||||||
|
FIELD 45->INDRES
|
||||||
|
END
|
||||||
|
|
||||||
|
DATA 11
|
||||||
|
BEGIN
|
||||||
|
KEY "DATA INIZIO RAPPORTO"
|
||||||
|
PROMPT 12 5 ""
|
||||||
|
PICTURE "## ^ ## ^ ^^##"
|
||||||
|
FIELD DATAINI
|
||||||
|
END
|
||||||
|
|
||||||
|
DATA 12
|
||||||
|
BEGIN
|
||||||
|
KEY "DATA FINE RAPPORTO"
|
||||||
|
PROMPT 31 5 ""
|
||||||
|
PICTURE "## ^ ## ^ ^^##"
|
||||||
|
FIELD DATAFIN
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 131
|
||||||
|
BEGIN
|
||||||
|
KEY "ANNI COMMISURAZIONE"
|
||||||
|
PROMPT 49 5 ""
|
||||||
|
FIELD ANNICOMM
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 132
|
||||||
|
BEGIN
|
||||||
|
KEY "MESI COMMISURAZIONE"
|
||||||
|
PROMPT 55 5 ""
|
||||||
|
FIELD MESICOMM
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 141
|
||||||
|
BEGIN
|
||||||
|
KEY "ANNI CONVENZIONALI"
|
||||||
|
PROMPT 61 5 ""
|
||||||
|
FIELD ANNICONV
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 142
|
||||||
|
BEGIN
|
||||||
|
KEY "MESI CONVENZIONALI"
|
||||||
|
PROMPT 66 5 ""
|
||||||
|
FIELD MESICONV
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 151
|
||||||
|
BEGIN
|
||||||
|
KEY "ANNI PARZIALI"
|
||||||
|
PROMPT 73 5 ""
|
||||||
|
FIELD ANNIPARZ
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 152
|
||||||
|
BEGIN
|
||||||
|
KEY "MESI PARZIALI"
|
||||||
|
PROMPT 80 5 ""
|
||||||
|
FIELD MESIPARZ
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 153
|
||||||
|
BEGIN
|
||||||
|
KEY "PERCENTUALE TEMPO PARZIALE"
|
||||||
|
PROMPT 85 5 ""
|
||||||
|
FIELD PERCPARZ
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 16
|
||||||
|
BEGIN
|
||||||
|
KEY "QUOTA ECCEDENTE"
|
||||||
|
PROMPT 90 5 ""
|
||||||
|
PICTURE "###.###.###^^^"
|
||||||
|
FIELD QUOTAECC
|
||||||
|
MESSAGE ADD,FL->16
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 17
|
||||||
|
BEGIN
|
||||||
|
KEY "MESE EROGAZIONE"
|
||||||
|
PROMPT 103 5 ""
|
||||||
|
FIELD MESEEROG
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 18
|
||||||
|
BEGIN
|
||||||
|
KEY "TITOLO EROGAZIONE"
|
||||||
|
PROMPT 109 5 ""
|
||||||
|
FIELD TITEROG
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 19
|
||||||
|
BEGIN
|
||||||
|
KEY "PERCENTUALE ABBATTIMENTO"
|
||||||
|
PROMPT 114 5 ""
|
||||||
|
FIELD PERCABB
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 20
|
||||||
|
BEGIN
|
||||||
|
KEY "AMMONTARE NETTO"
|
||||||
|
PROMPT 117 5 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD AMMNETTO
|
||||||
|
MESSAGE ADD,FL->20
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 21
|
||||||
|
BEGIN
|
||||||
|
KEY "MESE EROGAZIONE"
|
||||||
|
PROMPT 11 7 ""
|
||||||
|
FIELD MESEEROG2
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 22
|
||||||
|
BEGIN
|
||||||
|
KEY "TITOLO EROGAZIONE"
|
||||||
|
PROMPT 16 7 ""
|
||||||
|
FIELD TITEROG2
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 23
|
||||||
|
BEGIN
|
||||||
|
KEY "PERCENTUALE ABBATTIMENTO"
|
||||||
|
PROMPT 21 7 ""
|
||||||
|
FIELD PERCABB2
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 24
|
||||||
|
BEGIN
|
||||||
|
KEY "AMMONTARE NETTO"
|
||||||
|
PROMPT 34 7 ""
|
||||||
|
PICTURE "###.###.###^^^"
|
||||||
|
FIELD AMMNETTO2
|
||||||
|
MESSAGE ADD,FL->24
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 25
|
||||||
|
BEGIN
|
||||||
|
KEY "CONTRIBUTI OBBLIGATORI LAVORATORE"
|
||||||
|
PROMPT 48 7 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD CONTLAV
|
||||||
|
MESSAGE ADD,FL->25
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 26
|
||||||
|
BEGIN
|
||||||
|
KEY "T.F.R."
|
||||||
|
PROMPT 67 7 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD TFR7494
|
||||||
|
MESSAGE ADD,FL->26
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 27
|
||||||
|
BEGIN
|
||||||
|
KEY "ALTRE INDENNITA'"
|
||||||
|
PROMPT 84 7 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD INDEN7494
|
||||||
|
MESSAGE ADD,FL->27
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 28
|
||||||
|
BEGIN
|
||||||
|
KEY "TOTALE INDENNITA'"
|
||||||
|
PROMPT 103 7 ""
|
||||||
|
PICTURE "###.###.###^^^"
|
||||||
|
FIELD TIND7494
|
||||||
|
MESSAGE ADD,FL->28
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 29
|
||||||
|
BEGIN
|
||||||
|
KEY "TOTALE RIDUZIONI"
|
||||||
|
PROMPT 117 7 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD TRID
|
||||||
|
MESSAGE ADD,FL->29
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 30
|
||||||
|
BEGIN
|
||||||
|
KEY "T.F.R. PER REDDITO DI RIFERIMENTO"
|
||||||
|
PROMPT 10 9 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD TFRIND
|
||||||
|
MESSAGE ADD,FL->30
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 31
|
||||||
|
BEGIN
|
||||||
|
KEY "ALIQUOTA"
|
||||||
|
PROMPT 27 9 ""
|
||||||
|
FIELD ALIQUOTA
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 32
|
||||||
|
BEGIN
|
||||||
|
KEY "RETRIBUZIONE MEDIA BIENNIO PRECEDENTE"
|
||||||
|
PROMPT 32 9 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD RETRMEDIA
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 33
|
||||||
|
BEGIN
|
||||||
|
KEY "ALIQUOTA"
|
||||||
|
PROMPT 50 9 ""
|
||||||
|
FIELD ALIQUOTA2
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 34
|
||||||
|
BEGIN
|
||||||
|
KEY "IMPONIBILE T.F.R."
|
||||||
|
PROMPT 54 9 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD IMPTFR
|
||||||
|
MESSAGE ADD,FL->34
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 35
|
||||||
|
BEGIN
|
||||||
|
KEY "IMPONIBILE ALTRE INDENNITA'"
|
||||||
|
PROMPT 71 9 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD IMPIND
|
||||||
|
MESSAGE ADD,FL->35
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 36
|
||||||
|
BEGIN
|
||||||
|
KEY "IMPONIBILE DELL'ANNO"
|
||||||
|
PROMPT 85 9 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD IMPANNO
|
||||||
|
MESSAGE ADD,FL->36
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 37
|
||||||
|
BEGIN
|
||||||
|
KEY "TOTALE REDDITO IMPONIBILE"
|
||||||
|
PROMPT 101 9 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD TOTIMP
|
||||||
|
MESSAGE ADD,FL->37
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 38
|
||||||
|
BEGIN
|
||||||
|
KEY "RITENUTE OPERATE"
|
||||||
|
PROMPT 117 9 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD ROPEACC
|
||||||
|
MESSAGE ADD,FL->38
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 39
|
||||||
|
BEGIN
|
||||||
|
KEY "IMPOSTA DOVUTA"
|
||||||
|
PROMPT 10 11 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD IMPDOV
|
||||||
|
MESSAGE ADD,FL->39
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 40
|
||||||
|
BEGIN
|
||||||
|
KEY "RITENUTE FISCALI"
|
||||||
|
PROMPT 27 11 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD RITECC
|
||||||
|
MESSAGE ADD,FL->40
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 41
|
||||||
|
BEGIN
|
||||||
|
KEY "QUOTA SPETTANTE"
|
||||||
|
PROMPT 44 11 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD QUOTASPET
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 42
|
||||||
|
BEGIN
|
||||||
|
KEY "INDENNITA' SPETTANTE"
|
||||||
|
PROMPT 61 11 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD INDSPETT
|
||||||
|
MESSAGE ADD,FL->42
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 43
|
||||||
|
BEGIN
|
||||||
|
KEY "RITENUTE OPERATE"
|
||||||
|
PROMPT 78 11 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD ROPE
|
||||||
|
MESSAGE ADD,FL->43
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 44
|
||||||
|
BEGIN
|
||||||
|
KEY "IMPONIBILE C.S.S.N."
|
||||||
|
PROMPT 95 11 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
FIELD IMPOCSSN
|
||||||
|
MESSAGE ADD,FL->44
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
SECTION FOOTER LAST 8
|
||||||
|
|
||||||
|
NUMERO 16
|
||||||
|
BEGIN
|
||||||
|
KEY "QUOTA ECCEDENTE"
|
||||||
|
PROMPT 90 1 ""
|
||||||
|
PICTURE "###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 20
|
||||||
|
BEGIN
|
||||||
|
KEY "AMMONTARE NETTO"
|
||||||
|
PROMPT 117 1 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 24
|
||||||
|
BEGIN
|
||||||
|
KEY "AMMONTARE NETTO"
|
||||||
|
PROMPT 26 3 ""
|
||||||
|
PICTURE "###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 25
|
||||||
|
BEGIN
|
||||||
|
KEY "CONTRIBUTI OBBLIGATORI LAVORATORE"
|
||||||
|
PROMPT 41 3 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 26
|
||||||
|
BEGIN
|
||||||
|
KEY "T.F.R."
|
||||||
|
PROMPT 60 3 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 27
|
||||||
|
BEGIN
|
||||||
|
KEY "ALTRE INDENNITA'"
|
||||||
|
PROMPT 72 3 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 28
|
||||||
|
BEGIN
|
||||||
|
KEY "TOTALE INDENNITA'"
|
||||||
|
PROMPT 103 3 ""
|
||||||
|
PICTURE "###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 29
|
||||||
|
BEGIN
|
||||||
|
KEY "TOTALE INDENNITA'"
|
||||||
|
PROMPT 117 3 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 30
|
||||||
|
BEGIN
|
||||||
|
KEY "T.F.R. PER REDDITO DI RIFERIMENTO"
|
||||||
|
PROMPT 10 5 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 34
|
||||||
|
BEGIN
|
||||||
|
KEY "IMPONIBILE T.F.R."
|
||||||
|
PROMPT 54 5 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 35
|
||||||
|
BEGIN
|
||||||
|
KEY "IMPONIBILE ALTRE INDENNITA'"
|
||||||
|
PROMPT 71 5 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 36
|
||||||
|
BEGIN
|
||||||
|
KEY "IMPONIBILE DELL'ANNO"
|
||||||
|
PROMPT 85 5 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 37
|
||||||
|
BEGIN
|
||||||
|
KEY "TOTALE REDDITO IMPONIBILE"
|
||||||
|
PROMPT 101 5 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 38
|
||||||
|
BEGIN
|
||||||
|
KEY "RITENUTE OPERATE"
|
||||||
|
PROMPT 117 5 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 39
|
||||||
|
BEGIN
|
||||||
|
KEY "IMPOSTA DOVUTA"
|
||||||
|
PROMPT 10 7 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 40
|
||||||
|
BEGIN
|
||||||
|
KEY "RITENUTE FISCALI"
|
||||||
|
PROMPT 27 7 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 42
|
||||||
|
BEGIN
|
||||||
|
KEY "INDENNITA' SPETTANTE"
|
||||||
|
PROMPT 61 7 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 43
|
||||||
|
BEGIN
|
||||||
|
KEY "RITENUTE OPERATE"
|
||||||
|
PROMPT 78 7 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMERO 44
|
||||||
|
BEGIN
|
||||||
|
KEY "IMPONIBILE C.S.S.N."
|
||||||
|
PROMPT 95 7 ""
|
||||||
|
PICTURE "###.###.###.###^^^"
|
||||||
|
END
|
||||||
|
|
||||||
|
STRINGA 2
|
||||||
|
BEGIN
|
||||||
|
KEY "FIRMA"
|
||||||
|
PROMPT 83 23 ""
|
||||||
|
FIELD 106@->RAGSOC
|
||||||
|
END
|
||||||
|
|
||||||
|
END
|
||||||
|
|
||||||
|
=======
|
||||||
USE 59
|
USE 59
|
||||||
JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP
|
JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP
|
||||||
JOIN 9 INTO CODDITTA=CODDITTA
|
JOIN 9 INTO CODDITTA=CODDITTA
|
||||||
@ -687,4 +1374,5 @@ END
|
|||||||
|
|
||||||
END
|
END
|
||||||
|
|
||||||
|
>>>>>>> 1.3
|
||||||
END
|
END
|
||||||
@ -28,7 +28,7 @@ BEGIN
|
|||||||
USE LF_DIPEND KEY 1
|
USE LF_DIPEND KEY 1
|
||||||
FIELD LF_QUAB->CODDIP
|
FIELD LF_QUAB->CODDIP
|
||||||
INPUT CODDITTA QBF_CODDITTA
|
INPUT CODDITTA QBF_CODDITTA
|
||||||
INPUT CODIP QBF_CODDIP
|
INPUT CODDIP QBF_CODDIP
|
||||||
DISPLAY "Cognome@24" COGNOME
|
DISPLAY "Cognome@24" COGNOME
|
||||||
DISPLAY "Nome@20" NOME
|
DISPLAY "Nome@20" NOME
|
||||||
OUTPUT QBF_COGNOME COGNOME
|
OUTPUT QBF_COGNOME COGNOME
|
||||||
@ -235,7 +235,7 @@ END
|
|||||||
|
|
||||||
GROUPBOX DLG_NULL 53 4
|
GROUPBOX DLG_NULL 53 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT COLTFR0 8 "TFR o ind.equip. corrisposti nel 1994 "
|
PROMPT COLTFR0 8 "TFR o ind.equip. corrisposti nel 1995 "
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
@ -303,15 +303,15 @@ END
|
|||||||
#define COLTFRB1 2
|
#define COLTFRB1 2
|
||||||
#define COLTFRB2 7
|
#define COLTFRB2 7
|
||||||
#define COLTFRB3 14
|
#define COLTFRB3 14
|
||||||
#define COLTFRB4 22
|
#define COLTFRB4 31
|
||||||
|
|
||||||
#define RIGTFRB0 14
|
#define RIGTFRB0 14
|
||||||
#define RIGTFRB1 15
|
#define RIGTFRB1 15
|
||||||
#define RIGTFRB2 16
|
#define RIGTFRB2 16
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 38 6
|
GROUPBOX DLG_NULL 48 6
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 13 "Altre indennità corrisposte nel 1994"
|
PROMPT 1 13 "Altre indennità corrisposte nel 1995"
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
@ -366,14 +366,14 @@ END
|
|||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT COLTFRB3 RIGTFRB1 "% abb."
|
PROMPT COLTFRB3 RIGTFRB1 "Abbattimento"
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER QBF_PERCABB2 6
|
NUMBER QBF_PERCABB2 15
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT COLTFRB3 RIGTFRB2 ""
|
PROMPT COLTFRB3 RIGTFRB2 ""
|
||||||
FIELD LF_QUAB->PERCABB2
|
FIELD LF_QUAB->PERCABB2
|
||||||
PICTURE ".2"
|
PICTURE "."
|
||||||
GROUP GROUP_ALL
|
GROUP GROUP_ALL
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -398,12 +398,12 @@ END
|
|||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 45 RIGTFRB1 "25 Contr. obbligatori a carico"
|
PROMPT 57 RIGTFRB1 "25 Cont.obblig.lav."
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER QBF_CONTLAV 15
|
NUMBER QBF_CONTLAV 15
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 45 RIGTFRB2 "del lavoratore "
|
PROMPT 59 RIGTFRB2 ""
|
||||||
PICTURE "."
|
PICTURE "."
|
||||||
FLAGS "R"
|
FLAGS "R"
|
||||||
FIELD LF_QUAB->CONTLAV
|
FIELD LF_QUAB->CONTLAV
|
||||||
@ -420,7 +420,7 @@ PAGE "MODULO 770 - QUADRO B" -1 -1 78 18
|
|||||||
|
|
||||||
GROUPBOX DLG_NULL 41 4
|
GROUPBOX DLG_NULL 41 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 1 "Acconti e anticipazioni erogati dal 74 al 93"
|
PROMPT 1 1 "Acconti e anticipazioni erogati dal 74 al 94"
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
TEXT DLG_NULL
|
||||||
|
|||||||
@ -42,7 +42,7 @@ END
|
|||||||
BUTTON B_BASE 1 1
|
BUTTON B_BASE 1 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 ROW1 ""
|
PROMPT 1 ROW1 ""
|
||||||
MESSAGE RUN,772MOD,-4,Base,S|K_TAB,RILEGGI_QUADRI
|
MESSAGE RUN,772MOD,-4,Base,S
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
@ -56,7 +56,7 @@ END
|
|||||||
BUTTON B_LAGG 1 1
|
BUTTON B_LAGG 1 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 ROW2 ""
|
PROMPT 1 ROW2 ""
|
||||||
// MESSAGE RUN,771MOD,-7,1|K_TAB,RILEGGI_QUADRI
|
// MESSAGE RUN,771MOD,-7,1
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
@ -70,7 +70,7 @@ END
|
|||||||
BUTTON B_NAGG 1 1
|
BUTTON B_NAGG 1 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 ROW3 ""
|
PROMPT 1 ROW3 ""
|
||||||
// MESSAGE RUN,771MOD,-7,2|K_TAB,RILEGGI_QUADRI
|
// MESSAGE RUN,771MOD,-7,2
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
@ -85,7 +85,7 @@ END
|
|||||||
BUTTON B_ALLSOC 1 1
|
BUTTON B_ALLSOC 1 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 ROW4 ""
|
PROMPT 1 ROW4 ""
|
||||||
// MESSAGE RUN,771MOD,-7,3|K_TAB,RILEGGI_QUADRI
|
// MESSAGE RUN,771MOD,-7,3
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
@ -114,7 +114,7 @@ BUTTON B_BUST 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 1 ROW6 ""
|
PROMPT 1 ROW6 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
// MESSAGE RUN,771MOD,-1
|
MESSAGE RUN,772MOD,-4,Busta,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
// Fine prima colonna
|
// Fine prima colonna
|
||||||
@ -131,7 +131,7 @@ BUTTON B_A 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 20 ROW1 ""
|
PROMPT 20 ROW1 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,772MOD,-4,A,S|K_TAB,RILEGGI_QUADRI
|
MESSAGE RUN,772MOD,-4,A,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -145,7 +145,7 @@ BUTTON B_A1 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 20 ROW2 ""
|
PROMPT 20 ROW2 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,771MOD,-4,A1,S|K_TAB,RILEGGI_QUADRI
|
MESSAGE RUN,771MOD,-4,A1,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -159,7 +159,7 @@ BUTTON B_A2 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 20 ROW3 ""
|
PROMPT 20 ROW3 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,772MOD,-4,A2,S|K_TAB,RILEGGI_QUADRI
|
MESSAGE RUN,772MOD,-4,A2,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -173,7 +173,7 @@ BUTTON B_A3 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 20 ROW4 ""
|
PROMPT 20 ROW4 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,772MOD,-4,A3,S|K_TAB,RILEGGI_QUADRI
|
MESSAGE RUN,772MOD,-4,A3,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -187,7 +187,7 @@ BUTTON B_B 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 20 ROW5 ""
|
PROMPT 20 ROW5 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,772MOD,-4,B,S|K_TAB,RILEGGI_QUADRI
|
MESSAGE RUN,772MOD,-4,B,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -201,7 +201,7 @@ BUTTON B_B1 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 20 ROW6 ""
|
PROMPT 20 ROW6 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
// MESSAGE RUN,771MOD,-6,0|K_TAB,RILEGGI_QUADRI
|
// MESSAGE RUN,771MOD,-6,0
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
// Fine seconda colonna
|
// Fine seconda colonna
|
||||||
@ -217,7 +217,7 @@ BUTTON B_C 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 39 ROW1 ""
|
PROMPT 39 ROW1 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,772MOD,-4,C,S|K_TAB,RILEGGI_QUADRI
|
MESSAGE RUN,772MOD,-4,C,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -230,7 +230,7 @@ BUTTON B_D 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 39 ROW2 ""
|
PROMPT 39 ROW2 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,772MOD,-4,D,S|K_TAB,RILEGGI_QUADRI
|
MESSAGE RUN,772MOD,-4,D,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -244,7 +244,7 @@ BUTTON B_D1 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 39 ROW3 ""
|
PROMPT 39 ROW3 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,772MOD,-4,D1,S|K_TAB,RILEGGI_QUADRI
|
MESSAGE RUN,772MOD,-4,D1,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -258,7 +258,7 @@ BUTTON B_E 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 39 ROW4 ""
|
PROMPT 39 ROW4 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,772MOD,-4,E,S|K_TAB,RILEGGI_QUADRI
|
MESSAGE RUN,772MOD,-4,E,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -272,7 +272,7 @@ BUTTON B_E1 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 39 ROW5 ""
|
PROMPT 39 ROW5 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,772MOD,-4,E1,S|K_TAB,RILEGGI_QUADRI
|
MESSAGE RUN,772MOD,-4,E1,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -286,7 +286,7 @@ BUTTON B_E2 1 1
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 39 ROW6 ""
|
PROMPT 39 ROW6 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,772MOD,-4,E2,S|K_TAB,RILEGGI_QUADRI
|
MESSAGE RUN,772MOD,-4,E2,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
// Fine terza colonna
|
// Fine terza colonna
|
||||||
@ -364,13 +364,13 @@ END
|
|||||||
|
|
||||||
TEXT T_H
|
TEXT T_H
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 62 ROW5 "Quadro H"
|
PROMPT 62 ROW6 "Quadro H"
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON B_H 1 1
|
BUTTON B_H 1 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 58 ROW5 ""
|
PROMPT 58 ROW6 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,772MOD,-4,H,S
|
MESSAGE RUN,772MOD,-4,H,S
|
||||||
GROUP 1
|
GROUP 1
|
||||||
|
|||||||
@ -379,14 +379,14 @@ END
|
|||||||
|
|
||||||
TEXT T_H
|
TEXT T_H
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 62 ROW5 "Quadro H"
|
PROMPT 62 ROW6 "Quadro H"
|
||||||
FLAGS MYFLAGS
|
FLAGS MYFLAGS
|
||||||
GROUP GRUPPO
|
GROUP GRUPPO
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON B_H 1 1
|
BUTTON B_H 1 1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 58 ROW5 ""
|
PROMPT 58 ROW6 ""
|
||||||
PICTURE 123
|
PICTURE 123
|
||||||
MESSAGE RUN,772MOD,-4,H,D
|
MESSAGE RUN,772MOD,-4,H,D
|
||||||
FLAGS MYFLAGS
|
FLAGS MYFLAGS
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user