1303 lines
18 KiB
Plaintext
Executable File
1303 lines
18 KiB
Plaintext
Executable File
USE 36
|
||
JOIN 37 TO 36 INTO TIPOQUA=TIPOQUA CODDITTA=CODDITTA
|
||
END
|
||
|
||
DESCRIPTION
|
||
BEGIN
|
||
36->* "Base 770"
|
||
37->* "Basebis 770"
|
||
END
|
||
|
||
GENERAL
|
||
BEGIN
|
||
OFFSET 0 0
|
||
FONT "Roman 17cpi"
|
||
SIZE 12
|
||
CA "X"
|
||
IN 3 3
|
||
FI 129
|
||
END
|
||
|
||
SECTION BODY EVEN 64
|
||
|
||
|
||
//--- QUADRO A ---
|
||
|
||
NUMERO 1
|
||
BEGIN
|
||
KEY "I1-1"
|
||
PROMPT 23 1 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->A0NFCOM
|
||
END
|
||
|
||
NUMERO 2
|
||
BEGIN
|
||
KEY "I1-2"
|
||
PROMPT 36 1 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->A0NLDIP
|
||
END
|
||
|
||
NUMERO 3
|
||
BEGIN
|
||
KEY "I1-3"
|
||
PROMPT 49 1 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0COBB
|
||
END
|
||
|
||
NUMERO 4
|
||
BEGIN
|
||
KEY "I1-4"
|
||
PROMPT 71 1 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0NSRIT
|
||
END
|
||
|
||
NUMERO 5
|
||
BEGIN
|
||
KEY "I1-5"
|
||
PROMPT 93 1 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0RETPEN
|
||
END
|
||
|
||
NUMERO 6
|
||
BEGIN
|
||
KEY "I1-6"
|
||
PROMPT 115 1 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0EPREV
|
||
END
|
||
|
||
NUMERO 7
|
||
BEGIN
|
||
KEY "I2-7 Compensi da terzi"
|
||
PROMPT 27 3 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0CTER
|
||
END
|
||
|
||
NUMERO 8
|
||
BEGIN
|
||
KEY "I2-8 Tot. imponibile"
|
||
PROMPT 49 3 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0TIMP
|
||
END
|
||
|
||
NUMERO 9
|
||
BEGIN
|
||
KEY "I2-9 Imposta lorda"
|
||
PROMPT 71 3 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0ILOR
|
||
END
|
||
|
||
NUMERO 10
|
||
BEGIN
|
||
KEY "I2-10 Tot. detrazioni"
|
||
PROMPT 93 3 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0TDET
|
||
END
|
||
|
||
NUMERO 11
|
||
BEGIN
|
||
KEY "I2-11 Rit.da terzi"
|
||
PROMPT 115 3 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0RTER
|
||
END
|
||
|
||
NUMERO 12
|
||
BEGIN
|
||
KEY "I3-12 Rit.dat.lav."
|
||
PROMPT 27 5 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0RDAT
|
||
END
|
||
|
||
NUMERO 13
|
||
BEGIN
|
||
KEY "I3-13 Ecc.ritenute"
|
||
PROMPT 49 5 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0ERIT
|
||
END
|
||
|
||
NUMERO 14
|
||
BEGIN
|
||
KEY "I3-14 Contr.Europa"
|
||
PROMPT 71 5 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0EUROT
|
||
END
|
||
|
||
NUMERO 15
|
||
BEGIN
|
||
KEY "I3-15 Contrib.arretrati"
|
||
PROMPT 93 5 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0CARR
|
||
END
|
||
|
||
NUMERO 16
|
||
BEGIN
|
||
KEY "I3-16 Ammontare arretrati"
|
||
PROMPT 115 5 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0AARR
|
||
END
|
||
|
||
NUMERO 17
|
||
BEGIN
|
||
KEY "I4-17 Detrazioni arretrati"
|
||
PROMPT 27 7 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0DARR
|
||
END
|
||
|
||
NUMERO 18
|
||
BEGIN
|
||
KEY "I4-18 Rit.arretrati"
|
||
PROMPT 49 7 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0RARR
|
||
END
|
||
|
||
NUMERO 19
|
||
BEGIN
|
||
KEY "I4-19 Compensi ai fini contr.INPS"
|
||
PROMPT 71 7 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0CINPS
|
||
END
|
||
|
||
NUMERO 20
|
||
BEGIN
|
||
KEY "I4-20 Rit.operate VA"
|
||
PROMPT 93 7 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0RITOPEVA
|
||
END
|
||
|
||
NUMERO 21
|
||
BEGIN
|
||
KEY "I4-21 Ritenute operate SA"
|
||
PROMPT 115 7 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0RITOPESA
|
||
END
|
||
|
||
NUMERO 22
|
||
BEGIN
|
||
KEY "I5-22 Rit.operate SI"
|
||
PROMPT 27 9 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0RITSI
|
||
END
|
||
|
||
NUMERO 23
|
||
BEGIN
|
||
KEY "I5-23 Credito d'imp.imprese d'autotrasporto"
|
||
PROMPT 49 9 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0CIIAUT
|
||
END
|
||
|
||
NUMERO 24
|
||
BEGIN
|
||
KEY "I5-25 Credito d'imp.premio d'assun."
|
||
PROMPT 71 9 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0CRIMPRAS
|
||
END
|
||
|
||
NUMERO 25
|
||
BEGIN
|
||
KEY "I5-25 Credito d'imp.L.85"
|
||
PROMPT 93 9 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0CRIMP85
|
||
END
|
||
|
||
//--- QUADRO A bis ---
|
||
|
||
NUMERO 26
|
||
BEGIN
|
||
KEY "I6-1 Fogli"
|
||
PROMPT 23 11 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->ABNFCOM
|
||
END
|
||
|
||
NUMERO 27
|
||
BEGIN
|
||
KEY "I6-2 Num.assistiti da datore di lavoro"
|
||
PROMPT 36 11 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->ABNADLAV
|
||
END
|
||
|
||
NUMERO 28
|
||
BEGIN
|
||
KEY "I6-3 Num.ass.CAAF"
|
||
PROMPT 48 11 ""
|
||
PICTURE "#.###"
|
||
FIELD 36->ABNACAAF
|
||
END
|
||
|
||
NUMERO 29
|
||
BEGIN
|
||
KEY "I6-4 Irpef 2<>ac.96"
|
||
PROMPT 71 11 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->ABIR2R
|
||
END
|
||
|
||
NUMERO 30
|
||
BEGIN
|
||
KEY "I6-5 Cssn 2<>ac.96"
|
||
PROMPT 93 11 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->ABCS2R
|
||
END
|
||
|
||
NUMERO 31
|
||
BEGIN
|
||
KEY "I6-6 Irpef sal.96"
|
||
PROMPT 115 11 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->ABIRSA
|
||
END
|
||
|
||
NUMERO 32
|
||
BEGIN
|
||
KEY "I7-7 Irpef 1<>ac.97"
|
||
PROMPT 27 13 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->ABIR1R
|
||
END
|
||
|
||
NUMERO 33
|
||
BEGIN
|
||
KEY "I7-8 Cssn sal.96"
|
||
PROMPT 49 13 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->ABCSSA
|
||
END
|
||
|
||
NUMERO 34
|
||
BEGIN
|
||
KEY "I7-9 Cssn 1<>ac.97"
|
||
PROMPT 71 13 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->ABCS1R
|
||
END
|
||
|
||
NUMERO 35
|
||
BEGIN
|
||
KEY "I7-10 Contr.Europa"
|
||
PROMPT 93 13 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->ABEURO
|
||
END
|
||
|
||
NUMERO 36
|
||
BEGIN
|
||
KEY "I7-11 Acc.tas.sep."
|
||
PROMPT 115 13 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->ABACCTS
|
||
END
|
||
|
||
//--- QUADRO A3 ---
|
||
|
||
NUMERO 37
|
||
BEGIN
|
||
KEY "I8-1 N.fogli"
|
||
PROMPT 23 15 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->A3NFCOM
|
||
END
|
||
|
||
NUMERO 38
|
||
BEGIN
|
||
KEY "I8-2 N.percipienti"
|
||
PROMPT 36 15 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->A3NUMPER
|
||
END
|
||
|
||
NUMERO 39
|
||
BEGIN
|
||
KEY "I8-3 Reddito corrisp(p.10)"
|
||
PROMPT 49 15 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A3REPT10
|
||
END
|
||
|
||
NUMERO 40
|
||
BEGIN
|
||
KEY "I8-4 Reddito corrisp(p.12)"
|
||
PROMPT 71 15 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A3REPT12
|
||
END
|
||
|
||
//--- QUADRO B ---
|
||
|
||
NUMERO 41
|
||
BEGIN
|
||
KEY "I9-1 N.fogli"
|
||
PROMPT 23 17 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->B0NFCOM
|
||
END
|
||
|
||
NUMERO 42
|
||
BEGIN
|
||
KEY "I9-2 N.dip."
|
||
PROMPT 36 17 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->B0NLDIP
|
||
END
|
||
|
||
NUMERO 43
|
||
BEGIN
|
||
KEY "I9-3 TFR corrisposto nel 95"
|
||
PROMPT 49 17 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0TFR93
|
||
END
|
||
|
||
NUMERO 44
|
||
BEGIN
|
||
KEY "I9-4 Altre indennit<69> 95"
|
||
PROMPT 71 17 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0AI
|
||
END
|
||
|
||
NUMERO 45
|
||
BEGIN
|
||
KEY "I9-5 Cont.obb.caric.lav."
|
||
PROMPT 93 17 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0COLAV
|
||
END
|
||
|
||
NUMERO 46
|
||
BEGIN
|
||
KEY "I9-6 T.F.R. erogato 74-94"
|
||
PROMPT 115 17 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0TFR7492
|
||
END
|
||
|
||
NUMERO 47
|
||
BEGIN
|
||
KEY "I10-7 Altr.ind.erog. 74-94"
|
||
PROMPT 27 19 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0AI7492
|
||
END
|
||
|
||
NUMERO 48
|
||
BEGIN
|
||
KEY "I10-8 Imponibile dell'anno"
|
||
PROMPT 49 19 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0IMP
|
||
END
|
||
|
||
NUMERO 49
|
||
BEGIN
|
||
KEY "I10-9 Totale imponibile "
|
||
PROMPT 71 19 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0TIMP
|
||
END
|
||
|
||
NUMERO 50
|
||
BEGIN
|
||
KEY "I10-10 Ritenute operate "
|
||
PROMPT 93 19 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0ROP
|
||
END
|
||
|
||
NUMERO 51
|
||
BEGIN
|
||
KEY "I10-11 Alt.ind.fin.con.Inps"
|
||
PROMPT 115 19 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0AIINPS
|
||
END
|
||
|
||
NUMERO 52
|
||
BEGIN
|
||
KEY "I11-12 Ritenute operate SA"
|
||
PROMPT 27 21 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0ROPESA
|
||
END
|
||
|
||
NUMERO 53
|
||
BEGIN
|
||
KEY "I11-13 Ritenute operate SI "
|
||
PROMPT 49 21 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0RITSI
|
||
END
|
||
|
||
NUMERO 54
|
||
BEGIN
|
||
KEY "I11-14 Cred.imp.impr.autot."
|
||
PROMPT 71 21 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0CIIAUT
|
||
END
|
||
|
||
NUMERO 55
|
||
BEGIN
|
||
KEY "I11-15 Cred.imp.pre.assun. "
|
||
PROMPT 93 21 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0CRIMPRAS
|
||
END
|
||
|
||
NUMERO 56
|
||
BEGIN
|
||
KEY "I11-16 Cred.imp.ex L.85/95 "
|
||
PROMPT 115 21 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0CRIMP85
|
||
END
|
||
|
||
//--- QUADRO B1 ---
|
||
|
||
NUMERO 57
|
||
BEGIN
|
||
KEY "I12-1 N.fogli"
|
||
PROMPT 23 23 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->B1NFCOM
|
||
END
|
||
|
||
NUMERO 58
|
||
BEGIN
|
||
KEY "I12-2 N.dip."
|
||
PROMPT 36 23 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->B1NPER
|
||
END
|
||
|
||
NUMERO 59
|
||
BEGIN
|
||
KEY "I12-3 Totale indennit<69> "
|
||
PROMPT 49 23 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B1TIND
|
||
END
|
||
|
||
NUMERO 60
|
||
BEGIN
|
||
KEY "I12-4 Totale imponib. r.m."
|
||
PROMPT 71 23 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B1TIRM
|
||
END
|
||
|
||
NUMERO 61
|
||
BEGIN
|
||
KEY "I12-5 Tot.imp.complessivo "
|
||
PROMPT 93 23 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B1TICOM
|
||
END
|
||
|
||
//--- QUADRO C ---
|
||
|
||
NUMERO 62
|
||
BEGIN
|
||
KEY "I13-1 N.fogli"
|
||
PROMPT 23 25 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->C0NFCOM
|
||
END
|
||
|
||
NUMERO 63
|
||
BEGIN
|
||
KEY "I13-2 N.dip."
|
||
PROMPT 36 25 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->C0NLASS
|
||
END
|
||
|
||
NUMERO 64
|
||
BEGIN
|
||
KEY "I13-3 Ammont.corris.totale"
|
||
PROMPT 49 25 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0ACTOT
|
||
END
|
||
|
||
NUMERO 65
|
||
BEGIN
|
||
KEY "I13-4 Contributi S.S.N. "
|
||
PROMPT 71 25 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0CONTSSN
|
||
END
|
||
|
||
NUMERO 66
|
||
BEGIN
|
||
KEY "I13-5 Somme non sogg.rit. "
|
||
PROMPT 93 25 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0SNSRIT
|
||
END
|
||
|
||
NUMERO 67
|
||
BEGIN
|
||
KEY "I13-6 Tot.imbonib."
|
||
PROMPT 115 25 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0TOTIMP
|
||
END
|
||
|
||
NUMERO 68
|
||
BEGIN
|
||
KEY "I14-7 Imposta"
|
||
PROMPT 27 27 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0ROPE
|
||
END
|
||
|
||
NUMERO 69
|
||
BEGIN
|
||
KEY "I14-8 Tot.detraz."
|
||
PROMPT 49 27 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0TOTDET
|
||
END
|
||
|
||
NUMERO 70
|
||
BEGIN
|
||
KEY "I14-9 Rit.operate"
|
||
PROMPT 71 27 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0RITOPE
|
||
END
|
||
|
||
NUMERO 71
|
||
BEGIN
|
||
KEY "I14-10 Cred.imp.impr.autot."
|
||
PROMPT 93 27 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0CIIAUT
|
||
END
|
||
|
||
NUMERO 72
|
||
BEGIN
|
||
KEY "I14-11 Cred.imp.pre.assun. "
|
||
PROMPT 115 27 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0CRIMPRAS
|
||
END
|
||
|
||
//--- QUADRO D ---
|
||
|
||
NUMERO 73
|
||
BEGIN
|
||
KEY "I15-1 N.fogli"
|
||
PROMPT 23 29 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->D0NFCOM
|
||
END
|
||
|
||
NUMERO 74
|
||
BEGIN
|
||
KEY "I15-2 N.dip."
|
||
PROMPT 36 29 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->D0NLAUT
|
||
END
|
||
|
||
NUMERO 75
|
||
BEGIN
|
||
KEY "I15-3 Ammont.corris.totale"
|
||
PROMPT 49 29 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0ACTOT
|
||
END
|
||
|
||
NUMERO 76
|
||
BEGIN
|
||
KEY "I15-4 Somme non sogg.rit. "
|
||
PROMPT 71 29 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0SNSRIT
|
||
END
|
||
|
||
NUMERO 77
|
||
BEGIN
|
||
KEY "I15-5 Non sogg.reg."
|
||
PROMPT 93 29 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0NSRITRC
|
||
END
|
||
|
||
NUMERO 78
|
||
BEGIN
|
||
KEY "I15-6 Ritenute operate "
|
||
PROMPT 115 29 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0ROPE
|
||
END
|
||
|
||
NUMERO 79
|
||
BEGIN
|
||
KEY "I16-7 Cred.imp.impr.autot."
|
||
PROMPT 27 31 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0CIIAUT
|
||
END
|
||
|
||
NUMERO 80
|
||
BEGIN
|
||
KEY "I16-8 Cred.imp.pre.assun. "
|
||
PROMPT 49 31 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0CRIMPRAS
|
||
END
|
||
|
||
NUMERO 81
|
||
BEGIN
|
||
KEY "I16-9 Cred.imp.ex L.85/95 "
|
||
PROMPT 71 31 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0CRIMP85
|
||
END
|
||
|
||
//--- QUADRO D bis ---
|
||
|
||
NUMERO 82
|
||
BEGIN
|
||
KEY "I17-1 N.fogli"
|
||
PROMPT 23 33 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->DBNFCOM
|
||
END
|
||
|
||
NUMERO 83
|
||
BEGIN
|
||
KEY "I17-2 N.dip."
|
||
PROMPT 36 33 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->DBNPER
|
||
END
|
||
|
||
NUMERO 84
|
||
BEGIN
|
||
KEY "I17-3 Ammont.corris.totale"
|
||
PROMPT 49 33 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->DBAMMCOR
|
||
END
|
||
|
||
NUMERO 85
|
||
BEGIN
|
||
KEY "I17-4 Somme non sogg.rit. "
|
||
PROMPT 71 33 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->DBNSRIT
|
||
END
|
||
|
||
NUMERO 86
|
||
BEGIN
|
||
KEY "I17-5 Non sogg.reg."
|
||
PROMPT 93 33 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->DBNSRITRC
|
||
END
|
||
|
||
NUMERO 87
|
||
BEGIN
|
||
KEY "I17-6 Ritenute operate "
|
||
PROMPT 115 33 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->DBRITOPE
|
||
END
|
||
|
||
NUMERO 88
|
||
BEGIN
|
||
KEY "I18-7 Cred.imp.impr.autot."
|
||
PROMPT 27 35 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->DBCRIMAUT
|
||
END
|
||
|
||
NUMERO 89
|
||
BEGIN
|
||
KEY "I18-8 Cred.imp.pre.assun. "
|
||
PROMPT 49 35 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->DBCRIMASS
|
||
END
|
||
|
||
NUMERO 90
|
||
BEGIN
|
||
KEY "I18-9 Cred.imp.ex L.85/95 "
|
||
PROMPT 71 35 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->DBCRIML85
|
||
END
|
||
|
||
//--- QUADRO D1 ---
|
||
|
||
NUMERO 91
|
||
BEGIN
|
||
KEY "I19-1 N.fogli"
|
||
PROMPT 23 37 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->D1NFCOM
|
||
END
|
||
|
||
NUMERO 92
|
||
BEGIN
|
||
KEY "I19-2 N.dip."
|
||
PROMPT 36 37 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->D1NPER
|
||
END
|
||
|
||
NUMERO 93
|
||
BEGIN
|
||
KEY "I19-3 Ammont.corris.totale"
|
||
PROMPT 49 37 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D1TACOR
|
||
END
|
||
|
||
NUMERO 94
|
||
BEGIN
|
||
KEY "I19-4 Somme non sogg.rit. "
|
||
PROMPT 71 37 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D1SNSRIT
|
||
END
|
||
|
||
NUMERO 95
|
||
BEGIN
|
||
KEY "I19-5 Ritenute operate "
|
||
PROMPT 93 37 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D1ROPE
|
||
END
|
||
|
||
NUMERO 96
|
||
BEGIN
|
||
KEY "I19-6 Cred.imp.pre.assun. "
|
||
PROMPT 115 37 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D1CRIMPRAS
|
||
END
|
||
|
||
//--- QUADRO E ---
|
||
|
||
NUMERO 97
|
||
BEGIN
|
||
KEY "I20-1 N.fogli"
|
||
PROMPT 23 39 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->E0NFCOM
|
||
END
|
||
|
||
NUMERO 98
|
||
BEGIN
|
||
KEY "I20-2 N.dip."
|
||
PROMPT 36 39 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->E0NPER
|
||
END
|
||
|
||
NUMERO 99
|
||
BEGIN
|
||
KEY "I20-3 Ammontare imponibile"
|
||
PROMPT 49 39 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E0AIMP
|
||
END
|
||
|
||
NUMERO 100
|
||
BEGIN
|
||
KEY "I20-4 Ritenute operate "
|
||
PROMPT 71 39 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E0ROPE
|
||
END
|
||
|
||
NUMERO 101
|
||
BEGIN
|
||
KEY "I20-5 Somme non sogg.rit. "
|
||
PROMPT 93 39 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E0SNSRIT
|
||
END
|
||
|
||
NUMERO 102
|
||
BEGIN
|
||
KEY "I20-6 Cred.imp.pre.assun. "
|
||
PROMPT 115 39 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E0CRIMPRAS
|
||
END
|
||
|
||
//--- QUADRO E1 ---
|
||
|
||
NUMERO 103
|
||
BEGIN
|
||
KEY "I21-1 N.fogli"
|
||
PROMPT 23 41 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->E1NFCOM
|
||
END
|
||
|
||
NUMERO 104
|
||
BEGIN
|
||
KEY "I21-2 N.dip."
|
||
PROMPT 36 41 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->E1NPER
|
||
END
|
||
|
||
NUMERO 105
|
||
BEGIN
|
||
KEY "I21-3 Somme corrisposte "
|
||
PROMPT 49 41 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1SCOR
|
||
END
|
||
|
||
NUMERO 106
|
||
BEGIN
|
||
KEY "I21-4 Base commisurazione "
|
||
PROMPT 71 41 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1BCOM
|
||
END
|
||
|
||
NUMERO 107
|
||
BEGIN
|
||
KEY "I21-5 Ritenute operate "
|
||
PROMPT 93 41 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1ROPE
|
||
END
|
||
|
||
NUMERO 108
|
||
BEGIN
|
||
KEY "I21-6 Ammontare compless. "
|
||
PROMPT 115 41 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1ACOM
|
||
END
|
||
|
||
NUMERO 109
|
||
BEGIN
|
||
KEY "I22-7 Base commisurazione "
|
||
PROMPT 27 43 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1BCOM2
|
||
END
|
||
|
||
NUMERO 110
|
||
BEGIN
|
||
KEY "I22-8 Ritenute operate "
|
||
PROMPT 49 43 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1ROPE2
|
||
END
|
||
|
||
NUMERO 111
|
||
BEGIN
|
||
KEY "I22-9 Cred.imp.pre.assun. "
|
||
PROMPT 71 43 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1CRIMPRAS
|
||
END
|
||
|
||
//--- QUADRO E2 ---
|
||
|
||
NUMERO 112
|
||
BEGIN
|
||
KEY "I23-1 N.fogli"
|
||
PROMPT 23 45 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->E2NFCOM
|
||
END
|
||
|
||
NUMERO 113
|
||
BEGIN
|
||
KEY "I23-2 N.dip."
|
||
PROMPT 36 45 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->E2NPER
|
||
END
|
||
|
||
NUMERO 114
|
||
BEGIN
|
||
KEY "I23-3 Somme sogg. ritenute "
|
||
PROMPT 49 45 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E2SSRIT
|
||
END
|
||
|
||
NUMERO 115
|
||
BEGIN
|
||
KEY "I23-4 Ritenute operate "
|
||
PROMPT 71 45 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E2ROPE
|
||
END
|
||
|
||
NUMERO 116
|
||
BEGIN
|
||
KEY "I23-5 Cred.imp.pre.assun. "
|
||
PROMPT 93 45 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E2CRIMPRAS
|
||
END
|
||
|
||
//--- QUADRO F ---
|
||
|
||
NUMERO 117
|
||
BEGIN
|
||
KEY "I24-1 Som.sogg.rit."
|
||
PROMPT 27 47 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0SSRITBF
|
||
END
|
||
|
||
NUMERO 118
|
||
BEGIN
|
||
KEY "I24-2 Rit.operate"
|
||
PROMPT 49 47 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0ROPEBF
|
||
END
|
||
|
||
NUMERO 119
|
||
BEGIN
|
||
KEY "I24-3 Amm.proventi"
|
||
PROMPT 71 47 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0AMMPRO
|
||
END
|
||
|
||
NUMERO 120
|
||
BEGIN
|
||
KEY "I24-4 Prel.operato"
|
||
PROMPT 93 47 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0PREOPE
|
||
END
|
||
|
||
NUMERO 121
|
||
BEGIN
|
||
KEY "I24-5 Cred.imp.pre.assun. "
|
||
PROMPT 115 47 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0CRIMPRAS
|
||
END
|
||
|
||
//--- QUADRO F1 ---
|
||
|
||
NUMERO 122
|
||
BEGIN
|
||
KEY "I25-1 N.fogli"
|
||
PROMPT 23 49 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->F1NFCOM
|
||
END
|
||
|
||
NUMERO 123
|
||
BEGIN
|
||
KEY "I25-2 N.perc."
|
||
PROMPT 36 49 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->F1NPER
|
||
END
|
||
|
||
NUMERO 124
|
||
BEGIN
|
||
KEY "I25-3 Som.sogg.rit."
|
||
PROMPT 49 49 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F1SSRIT
|
||
END
|
||
|
||
NUMERO 125
|
||
BEGIN
|
||
KEY "I25-4 Rit.operate"
|
||
PROMPT 71 49 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F1ROPE
|
||
END
|
||
|
||
NUMERO 126
|
||
BEGIN
|
||
KEY "I25-5 Cred.imp.pre.assun. "
|
||
PROMPT 93 49 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F1CRIMPRAS
|
||
END
|
||
|
||
//--- QUADRO F2 ---
|
||
|
||
NUMERO 127
|
||
BEGIN
|
||
KEY "I26-1 Somme sogg. ritenute"
|
||
PROMPT 27 51 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F2SSRIT
|
||
END
|
||
|
||
NUMERO 128
|
||
BEGIN
|
||
KEY "I26-2 Ritenute operate "
|
||
PROMPT 49 51 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F2ROPE
|
||
END
|
||
|
||
NUMERO 129
|
||
BEGIN
|
||
KEY "I26-3 Cred.imp.pre.assun. "
|
||
PROMPT 71 51 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F2CRIMPRAS
|
||
END
|
||
|
||
//--- QUADRO G ---
|
||
|
||
NUMERO 130
|
||
BEGIN
|
||
KEY "I27-1 N.fogli"
|
||
PROMPT 23 53 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->G0NFCOM
|
||
END
|
||
|
||
NUMERO 131
|
||
BEGIN
|
||
KEY "I27-2 N.dip."
|
||
PROMPT 36 53 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->G0NPER
|
||
END
|
||
|
||
NUMERO 132
|
||
BEGIN
|
||
KEY "I27-3 Utili spettanti "
|
||
PROMPT 49 53 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0USPE
|
||
END
|
||
|
||
NUMERO 133
|
||
BEGIN
|
||
KEY "I27-4 Rit.utili spettanti "
|
||
PROMPT 71 53 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0RITSPET
|
||
END
|
||
|
||
NUMERO 134
|
||
BEGIN
|
||
KEY "I27-5 Utili pagati "
|
||
PROMPT 93 53 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0UPAG
|
||
END
|
||
|
||
NUMERO 135
|
||
BEGIN
|
||
KEY "I27-6 Rit. su utili pagati"
|
||
PROMPT 115 53 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0ROPE
|
||
END
|
||
|
||
NUMERO 136
|
||
BEGIN
|
||
KEY "I28-7 Ut.da cor.95"
|
||
PROMPT 27 55 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0UTDACOR
|
||
END
|
||
|
||
NUMERO 137
|
||
BEGIN
|
||
KEY "I28-8 Ut.del.distr."
|
||
PROMPT 49 55 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0UTDELDIS
|
||
END
|
||
|
||
NUMERO 138
|
||
BEGIN
|
||
KEY "I28-9 Ut.cor.1<EFBFBD>sem"
|
||
PROMPT 71 55 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0UTCOR1S
|
||
END
|
||
|
||
NUMERO 139
|
||
BEGIN
|
||
KEY "I28-10 Ut.cor.2<EFBFBD>sem"
|
||
PROMPT 93 55 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0UTCOR2S
|
||
END
|
||
|
||
NUMERO 140
|
||
BEGIN
|
||
KEY "I28-11 Rit.acconto"
|
||
PROMPT 115 55 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0RACC3
|
||
END
|
||
|
||
NUMERO 141
|
||
BEGIN
|
||
KEY "I29-12 Rit.imposta"
|
||
PROMPT 27 57 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0RIMP3
|
||
END
|
||
|
||
NUMERO 142
|
||
BEGIN
|
||
KEY "I29-13 Ut.non sogg."
|
||
PROMPT 49 57 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0UNSRIT3
|
||
END
|
||
|
||
NUMERO 143
|
||
BEGIN
|
||
KEY "I29-14 Ut.da cor.96"
|
||
PROMPT 71 57 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0UTDACOR2
|
||
END
|
||
|
||
NUMERO 144
|
||
BEGIN
|
||
KEY "I29-15 Cred.imp.pre.assun. "
|
||
PROMPT 93 57 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0CRIMPRAS
|
||
END
|
||
|
||
//--- QUADRO G1 ---
|
||
|
||
NUMERO 145
|
||
BEGIN
|
||
KEY "I30-1 Ut.cor.1<EFBFBD>sem."
|
||
PROMPT 27 59 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1UTCOR1S
|
||
END
|
||
|
||
NUMERO 146
|
||
BEGIN
|
||
KEY "I30-2 Ut.cor.2<EFBFBD>sem."
|
||
PROMPT 49 59 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1UTCOR2S
|
||
END
|
||
|
||
NUMERO 147
|
||
BEGIN
|
||
KEY "I30-3 Rit.acc.ve.96"
|
||
PROMPT 71 59 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1RITAV1
|
||
END
|
||
|
||
NUMERO 148
|
||
BEGIN
|
||
KEY "I30-4 Rit.acc.ve.97"
|
||
PROMPT 93 59 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1RITAV2
|
||
END
|
||
|
||
NUMERO 149
|
||
BEGIN
|
||
KEY "I30-5 Rit.imp.ve.96"
|
||
PROMPT 115 59 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1RITIV1
|
||
END
|
||
|
||
NUMERO 150
|
||
BEGIN
|
||
KEY "I31-6 Rit.imp.ve.97"
|
||
PROMPT 27 61 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1RITIV2
|
||
END
|
||
|
||
NUMERO 151
|
||
BEGIN
|
||
KEY "I31-7 Ut.non ass.1s"
|
||
PROMPT 49 61 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1UTNSR1S
|
||
END
|
||
|
||
NUMERO 152
|
||
BEGIN
|
||
KEY "I31-8 Ut.non ass.2s"
|
||
PROMPT 71 61 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1UTNSR2S
|
||
END
|
||
|
||
NUMERO 153
|
||
BEGIN
|
||
KEY "I31-9 Cred.imp.pre.assun. "
|
||
PROMPT 93 61 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1CRIMPRAS
|
||
END
|
||
|
||
//--- QUADRO H ---
|
||
|
||
NUMERO 154
|
||
BEGIN
|
||
KEY "I32-1 Cont.obb.car.dat.lav"
|
||
PROMPT 27 63 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->H0CODLAV
|
||
END
|
||
|
||
NUMERO 155
|
||
BEGIN
|
||
KEY "I32-2 Cont.ob.car.lav.dip."
|
||
PROMPT 49 63 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->H0COLDIP
|
||
END
|
||
|
||
END
|
||
|
||
END
|