campo-sirio/m770/77base2.frm

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