1090 lines
15 KiB
Plaintext
Executable File
1090 lines
15 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 2
|
||
FI 131
|
||
END
|
||
|
||
SECTION BODY EVEN 60
|
||
|
||
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 50 1 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0COBB
|
||
END
|
||
|
||
NUMERO 4
|
||
BEGIN
|
||
KEY "I1-4"
|
||
PROMPT 72 1 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0CNET
|
||
END
|
||
|
||
NUMERO 5
|
||
BEGIN
|
||
KEY "I1-5"
|
||
PROMPT 94 1 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0IITRA
|
||
END
|
||
|
||
NUMERO 6
|
||
BEGIN
|
||
KEY "I1-6"
|
||
PROMPT 116 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 50 3 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0TIMP
|
||
END
|
||
|
||
NUMERO 9
|
||
BEGIN
|
||
KEY "I2-9 Imposta lorda"
|
||
PROMPT 72 3 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0ILOR
|
||
END
|
||
|
||
NUMERO 10
|
||
BEGIN
|
||
KEY "I2-10 Tot. detrazioni"
|
||
PROMPT 94 3 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0TDET
|
||
END
|
||
|
||
NUMERO 11
|
||
BEGIN
|
||
KEY "I2-11 Incremento detrazioni"
|
||
PROMPT 116 3 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0INCDET
|
||
END
|
||
|
||
NUMERO 12
|
||
BEGIN
|
||
KEY "I3-12 Ritenute da terzi"
|
||
PROMPT 27 5 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0RTER
|
||
END
|
||
|
||
NUMERO 13
|
||
BEGIN
|
||
KEY "I3-13 Rit.datore di lavoro"
|
||
PROMPT 50 5 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0RDAT
|
||
END
|
||
|
||
NUMERO 14
|
||
BEGIN
|
||
KEY "I3-14 Eccedenza ritenute"
|
||
PROMPT 72 5 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0ERIT
|
||
END
|
||
|
||
NUMERO 15
|
||
BEGIN
|
||
KEY "I3-15 Contrib.arretrati"
|
||
PROMPT 94 5 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0CARR
|
||
END
|
||
|
||
NUMERO 16
|
||
BEGIN
|
||
KEY "I3-16 Ammontare arretrati"
|
||
PROMPT 116 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 50 7 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0RARR
|
||
END
|
||
|
||
NUMERO 19
|
||
BEGIN
|
||
KEY "I4-19 Compensi ai fini contr.INPS"
|
||
PROMPT 72 7 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0CINPS
|
||
END
|
||
|
||
NUMERO 20
|
||
BEGIN
|
||
KEY "I4-20 Rit.operate VA"
|
||
PROMPT 94 7 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0RITOPEVA
|
||
END
|
||
|
||
NUMERO 21
|
||
BEGIN
|
||
KEY "I4-21 Ritenute operate SA"
|
||
PROMPT 116 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 50 9 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0CIIAUT
|
||
END
|
||
|
||
NUMERO 24
|
||
BEGIN
|
||
KEY "I5-25 Credito d'imp.premio d'assun."
|
||
PROMPT 72 9 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0CRIMPRAS
|
||
END
|
||
|
||
NUMERO 25
|
||
BEGIN
|
||
KEY "I5-25 Credito d'imp.L.85"
|
||
PROMPT 94 9 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A0CRIMP85
|
||
END
|
||
|
||
NUMERO 26
|
||
BEGIN
|
||
KEY "I5-26 Num.assistiti da datore di lavoro"
|
||
PROMPT 116 9 ""
|
||
PICTURE "#.###"
|
||
FIELD 36->A0NADLAV
|
||
END
|
||
|
||
NUMERO 27
|
||
BEGIN
|
||
KEY "I6-27 Num.ass.CAAF"
|
||
PROMPT 27 11 ""
|
||
PICTURE "#.###"
|
||
FIELD 36->A0NACAAF
|
||
END
|
||
|
||
NUMERO 28
|
||
BEGIN
|
||
KEY "I7-1 N.fogli"
|
||
PROMPT 23 13 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->A3NFCOM
|
||
END
|
||
|
||
NUMERO 29
|
||
BEGIN
|
||
KEY "I7-2 N.percipienti"
|
||
PROMPT 36 13 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->A3NUMPER
|
||
END
|
||
|
||
NUMERO 30
|
||
BEGIN
|
||
KEY "I7-3 Reddito corrisp(p.10)"
|
||
PROMPT 50 13 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A3REPT10
|
||
END
|
||
|
||
NUMERO 31
|
||
BEGIN
|
||
KEY "I7-4 Reddito corrisp(p.12)"
|
||
PROMPT 72 13 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->A3REPT12
|
||
END
|
||
|
||
NUMERO 32
|
||
BEGIN
|
||
KEY "I8-1 N.fogli"
|
||
PROMPT 23 15 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->B0NFCOM
|
||
END
|
||
|
||
NUMERO 33
|
||
BEGIN
|
||
KEY "I8-2 N.dip."
|
||
PROMPT 36 15 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->B0NLDIP
|
||
END
|
||
|
||
NUMERO 34
|
||
BEGIN
|
||
KEY "I8-3 TFR corrisposto nel 95"
|
||
PROMPT 50 15 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0TFR93
|
||
END
|
||
|
||
NUMERO 35
|
||
BEGIN
|
||
KEY "I8-4 Altre indennit<69> 95"
|
||
PROMPT 72 15 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0AI
|
||
END
|
||
|
||
NUMERO 36
|
||
BEGIN
|
||
KEY "I8-5 Cont.obb.caric.lav."
|
||
PROMPT 94 15 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0COLAV
|
||
END
|
||
|
||
NUMERO 37
|
||
BEGIN
|
||
KEY "I8-6 T.F.R. erogato 74-94"
|
||
PROMPT 116 15 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0TFR7492
|
||
END
|
||
|
||
NUMERO 38
|
||
BEGIN
|
||
KEY "I9-7 Altr.ind.erog. 74-94"
|
||
PROMPT 27 17 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0AI7492
|
||
END
|
||
|
||
NUMERO 39
|
||
BEGIN
|
||
KEY "I9-8 Imponibile dell'anno"
|
||
PROMPT 50 17 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0IMP
|
||
END
|
||
|
||
NUMERO 40
|
||
BEGIN
|
||
KEY "I9-9 Totale imponibile "
|
||
PROMPT 72 17 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0TIMP
|
||
END
|
||
|
||
NUMERO 41
|
||
BEGIN
|
||
KEY "I9-10 Ritenute operate "
|
||
PROMPT 94 17 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0ROP
|
||
END
|
||
|
||
NUMERO 42
|
||
BEGIN
|
||
KEY "I9-11 Alt.ind.fin.con.Inps"
|
||
PROMPT 116 17 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0AIINPS
|
||
END
|
||
|
||
NUMERO 43
|
||
BEGIN
|
||
KEY "I10-12 Ritenute operate SA"
|
||
PROMPT 27 19 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0ROPESA
|
||
END
|
||
|
||
NUMERO 44
|
||
BEGIN
|
||
KEY "I10-13 Ritenute operate SI "
|
||
PROMPT 50 19 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0RITSI
|
||
END
|
||
|
||
NUMERO 45
|
||
BEGIN
|
||
KEY "I10-14 Cred.imp.impr.autot."
|
||
PROMPT 72 19 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0CIIAUT
|
||
END
|
||
|
||
NUMERO 46
|
||
BEGIN
|
||
KEY "I10-15 Cred.imp.pre.assun. "
|
||
PROMPT 94 19 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0CRIMPRAS
|
||
END
|
||
|
||
NUMERO 47
|
||
BEGIN
|
||
KEY "I10-16 Cred.imp.ex L.85/95 "
|
||
PROMPT 116 19 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B0CRIMP85
|
||
END
|
||
|
||
NUMERO 48
|
||
BEGIN
|
||
KEY "I11-1 N.fogli"
|
||
PROMPT 23 21 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->B1NFCOM
|
||
END
|
||
|
||
NUMERO 49
|
||
BEGIN
|
||
KEY "I11-2 N.dip."
|
||
PROMPT 36 21 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->B1NPER
|
||
END
|
||
|
||
NUMERO 50
|
||
BEGIN
|
||
KEY "I11-3 Totale indennit<69> "
|
||
PROMPT 50 21 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B1TIND
|
||
END
|
||
|
||
NUMERO 51
|
||
BEGIN
|
||
KEY "I11-4 Totale imponib. r.m."
|
||
PROMPT 72 21 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B1TIRM
|
||
END
|
||
|
||
NUMERO 52
|
||
BEGIN
|
||
KEY "I11-5 Tot.imp.complessivo "
|
||
PROMPT 94 21 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->B1TICOM
|
||
END
|
||
|
||
NUMERO 53
|
||
BEGIN
|
||
KEY "I12-1 N.fogli"
|
||
PROMPT 23 23 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->C0NFCOM
|
||
END
|
||
|
||
NUMERO 54
|
||
BEGIN
|
||
KEY "I12-2 N.dip."
|
||
PROMPT 36 23 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->C0NLASS
|
||
END
|
||
|
||
NUMERO 55
|
||
BEGIN
|
||
KEY "I12-3 Ammont.corris.totale"
|
||
PROMPT 50 23 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0ACTOT
|
||
END
|
||
|
||
NUMERO 56
|
||
BEGIN
|
||
KEY "I12-4 Contributi S.S.N. "
|
||
PROMPT 72 23 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0CONTSSN
|
||
END
|
||
|
||
NUMERO 57
|
||
BEGIN
|
||
KEY "I12-5 Somme non sogg.rit. "
|
||
PROMPT 94 23 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0SNSRIT
|
||
END
|
||
|
||
NUMERO 58
|
||
BEGIN
|
||
KEY "I12-6 Ritenute operate "
|
||
PROMPT 116 23 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0ROPE
|
||
END
|
||
|
||
NUMERO 59
|
||
BEGIN
|
||
KEY "I13-7 Cred.imp.impr.autot."
|
||
PROMPT 27 25 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0CIIAUT
|
||
END
|
||
|
||
NUMERO 60
|
||
BEGIN
|
||
KEY "I13-8 Cred.imp.pre.assun. "
|
||
PROMPT 50 25 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->C0CRIMPRAS
|
||
END
|
||
|
||
NUMERO 61
|
||
BEGIN
|
||
KEY "I14-1 N.fogli"
|
||
PROMPT 23 27 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->D0NFCOM
|
||
END
|
||
|
||
NUMERO 62
|
||
BEGIN
|
||
KEY "I14-2 N.dip."
|
||
PROMPT 36 27 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->D0NLAUT
|
||
END
|
||
|
||
NUMERO 63
|
||
BEGIN
|
||
KEY "I14-3 Ammont.corris.totale"
|
||
PROMPT 50 27 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0ACTOT
|
||
END
|
||
|
||
NUMERO 64
|
||
BEGIN
|
||
KEY "I14-4 Somme non sogg.rit. "
|
||
PROMPT 72 27 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0SNSRIT
|
||
END
|
||
|
||
NUMERO 65
|
||
BEGIN
|
||
KEY "I14-5 Ritenute operate "
|
||
PROMPT 94 27 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0ROPE
|
||
END
|
||
|
||
NUMERO 66
|
||
BEGIN
|
||
KEY "I14-6 Cred.imp.impr.autot."
|
||
PROMPT 116 27 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0CIIAUT
|
||
END
|
||
|
||
NUMERO 67
|
||
BEGIN
|
||
KEY "I15-7 Cred.imp.pre.assun. "
|
||
PROMPT 27 29 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0CRIMPRAS
|
||
END
|
||
|
||
NUMERO 68
|
||
BEGIN
|
||
KEY "I15-8 Cred.imp.ex L.85/95 "
|
||
PROMPT 50 29 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D0CRIMP85
|
||
END
|
||
|
||
NUMERO 69
|
||
BEGIN
|
||
KEY "I16-1 N.fogli"
|
||
PROMPT 23 31 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->D1NFCOM
|
||
END
|
||
|
||
NUMERO 70
|
||
BEGIN
|
||
KEY "I16-2 N.dip."
|
||
PROMPT 36 31 ""
|
||
PICTURE "##.###"
|
||
FIELD 36->D1NPER
|
||
END
|
||
|
||
NUMERO 71
|
||
BEGIN
|
||
KEY "I16-3 Ammont.corris.totale"
|
||
PROMPT 50 31 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D1TACOR
|
||
END
|
||
|
||
NUMERO 72
|
||
BEGIN
|
||
KEY "I16-4 Somme non sogg.rit. "
|
||
PROMPT 72 31 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D1SNSRIT
|
||
END
|
||
|
||
NUMERO 73
|
||
BEGIN
|
||
KEY "I16-5 Ritenute operate "
|
||
PROMPT 94 31 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D1ROPE
|
||
END
|
||
|
||
NUMERO 74
|
||
BEGIN
|
||
KEY "I16-6 Cred.imp.pre.assun. "
|
||
PROMPT 116 31 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 36->D1CRIMPRAS
|
||
END
|
||
|
||
NUMERO 75
|
||
BEGIN
|
||
KEY "I17-1 N.fogli"
|
||
PROMPT 23 33 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->E0NFCOM
|
||
END
|
||
|
||
NUMERO 76
|
||
BEGIN
|
||
KEY "I17-2 N.dip."
|
||
PROMPT 36 33 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->E0NPER
|
||
END
|
||
|
||
NUMERO 77
|
||
BEGIN
|
||
KEY "I17-3 Ammontare imponibile"
|
||
PROMPT 50 33 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E0AIMP
|
||
END
|
||
|
||
NUMERO 78
|
||
BEGIN
|
||
KEY "I17-4 Ritenute operate "
|
||
PROMPT 72 33 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E0ROPE
|
||
END
|
||
|
||
NUMERO 79
|
||
BEGIN
|
||
KEY "I17-5 Somme non sogg.rit. "
|
||
PROMPT 94 33 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E0SNSRIT
|
||
END
|
||
|
||
NUMERO 80
|
||
BEGIN
|
||
KEY "I17-6 Cred.imp.pre.assun. "
|
||
PROMPT 116 33 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E0CRIMPRAS
|
||
END
|
||
|
||
NUMERO 81
|
||
BEGIN
|
||
KEY "I18-1 N.fogli"
|
||
PROMPT 23 35 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->E1NFCOM
|
||
END
|
||
|
||
NUMERO 82
|
||
BEGIN
|
||
KEY "I18-2 N.dip."
|
||
PROMPT 36 35 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->E1NPER
|
||
END
|
||
|
||
NUMERO 83
|
||
BEGIN
|
||
KEY "I18-3 Somme corrisposte "
|
||
PROMPT 50 35 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1SCOR
|
||
END
|
||
|
||
NUMERO 84
|
||
BEGIN
|
||
KEY "I18-4 Base commisurazione "
|
||
PROMPT 72 35 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1BCOM
|
||
END
|
||
|
||
NUMERO 85
|
||
BEGIN
|
||
KEY "I18-5 Ritenute operate "
|
||
PROMPT 94 35 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1ROPE
|
||
END
|
||
|
||
NUMERO 86
|
||
BEGIN
|
||
KEY "I18-6 Ammontare compless. "
|
||
PROMPT 116 35 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1ACOM
|
||
END
|
||
|
||
NUMERO 87
|
||
BEGIN
|
||
KEY "I19-7 Base commisurazione "
|
||
PROMPT 27 37 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1BCOM2
|
||
END
|
||
|
||
NUMERO 88
|
||
BEGIN
|
||
KEY "I19-8 Ritenute operate "
|
||
PROMPT 50 37 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1ROPE2
|
||
END
|
||
|
||
NUMERO 89
|
||
BEGIN
|
||
KEY "I19-9 Cred.imp.pre.assun. "
|
||
PROMPT 72 37 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E1CRIMPRAS
|
||
END
|
||
|
||
NUMERO 90
|
||
BEGIN
|
||
KEY "I20-1 N.fogli"
|
||
PROMPT 23 39 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->E2NFCOM
|
||
END
|
||
|
||
NUMERO 91
|
||
BEGIN
|
||
KEY "I20-2 N.dip."
|
||
PROMPT 36 39 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->E2NPER
|
||
END
|
||
|
||
NUMERO 92
|
||
BEGIN
|
||
KEY "I20-3 Somme sogg. ritenute "
|
||
PROMPT 50 39 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E2SSRIT
|
||
END
|
||
|
||
NUMERO 93
|
||
BEGIN
|
||
KEY "I20-4 Ritenute operate "
|
||
PROMPT 72 39 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E2ROPE
|
||
END
|
||
|
||
NUMERO 94
|
||
BEGIN
|
||
KEY "I20-5 Cred.imp.pre.assun. "
|
||
PROMPT 94 39 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->E2CRIMPRAS
|
||
END
|
||
|
||
NUMERO 95
|
||
BEGIN
|
||
KEY "I21-1 Som.sog.rit.(pros.A)"
|
||
PROMPT 27 41 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0SRITA
|
||
END
|
||
|
||
NUMERO 96
|
||
BEGIN
|
||
KEY "I21-2 Rit.operate(pros.A) "
|
||
PROMPT 50 41 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0ROPEA
|
||
END
|
||
|
||
NUMERO 97
|
||
BEGIN
|
||
KEY "I21-3 Tot.acconti (pros.A)"
|
||
PROMPT 72 41 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0TACCA
|
||
END
|
||
|
||
NUMERO 98
|
||
BEGIN
|
||
KEY "I21-4 Ecc.dim.acc.(pros.A)"
|
||
PROMPT 94 41 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0EDACCA
|
||
END
|
||
|
||
NUMERO 99
|
||
BEGIN
|
||
KEY "I21-5 Ecc. rimbor.(pros.A)"
|
||
PROMPT 116 41 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0ERIMA
|
||
END
|
||
|
||
NUMERO 100
|
||
BEGIN
|
||
KEY "I22-6 Somme sog.VA(pros.A)"
|
||
PROMPT 27 43 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0SSVA
|
||
END
|
||
|
||
NUMERO 101
|
||
BEGIN
|
||
KEY "I22-7 Rit.oper.VA (pros.A)"
|
||
PROMPT 50 43 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0ROPEVA
|
||
END
|
||
|
||
NUMERO 102
|
||
BEGIN
|
||
KEY "I22-8 Som.sogg.rit.(BCDEF)"
|
||
PROMPT 72 43 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0SSRITBF
|
||
END
|
||
|
||
NUMERO 103
|
||
BEGIN
|
||
KEY "I22-9 Rit.op.(p.B,C,D,E,F)"
|
||
PROMPT 94 43 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0ROPEBF
|
||
END
|
||
|
||
NUMERO 104
|
||
BEGIN
|
||
KEY "I22-10 Cred.imp.pre.assun. "
|
||
PROMPT 116 43 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F0CRIMPRAS
|
||
END
|
||
|
||
NUMERO 105
|
||
BEGIN
|
||
KEY "I23-1 Som.sogg.rit.(p.A,B)"
|
||
PROMPT 27 45 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F1SSRIT
|
||
END
|
||
|
||
NUMERO 106
|
||
BEGIN
|
||
KEY "I23-2 Riten.operat.(p.A,B)"
|
||
PROMPT 50 45 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F1ROPE
|
||
END
|
||
|
||
NUMERO 107
|
||
BEGIN
|
||
KEY "I23-3 Cred.imp.pre.assun. "
|
||
PROMPT 72 45 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F1CRIMPRAS
|
||
END
|
||
|
||
NUMERO 108
|
||
BEGIN
|
||
KEY "I24-1 Somme sogg. ritenute"
|
||
PROMPT 27 47 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F2SSRIT
|
||
END
|
||
|
||
NUMERO 109
|
||
BEGIN
|
||
KEY "I24-2 Ritenute operate "
|
||
PROMPT 50 47 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F2ROPE
|
||
END
|
||
|
||
NUMERO 110
|
||
BEGIN
|
||
KEY "I24-3 Cred.imp.pre.assun. "
|
||
PROMPT 72 47 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->F2CRIMPRAS
|
||
END
|
||
|
||
NUMERO 111
|
||
BEGIN
|
||
KEY "I25-1 N.fogli"
|
||
PROMPT 23 49 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->G0NFCOM
|
||
END
|
||
|
||
NUMERO 112
|
||
BEGIN
|
||
KEY "I125-2 N.dip."
|
||
PROMPT 36 49 ""
|
||
PICTURE "##.###"
|
||
FIELD 37->G0NPER
|
||
END
|
||
|
||
NUMERO 113
|
||
BEGIN
|
||
KEY "I25-3 Utili spettanti "
|
||
PROMPT 50 49 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0USPE
|
||
END
|
||
|
||
NUMERO 114
|
||
BEGIN
|
||
KEY "I25-4 Rit.utili spettanti "
|
||
PROMPT 72 49 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0RITSPET
|
||
END
|
||
|
||
NUMERO 115
|
||
BEGIN
|
||
KEY "I25-5 Utili pagati "
|
||
PROMPT 94 49 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0UPAG
|
||
END
|
||
|
||
NUMERO 116
|
||
BEGIN
|
||
KEY "I25-6 Rit. su utili pagati"
|
||
PROMPT 116 49 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0ROPE
|
||
END
|
||
|
||
NUMERO 117
|
||
BEGIN
|
||
KEY "I26-7 Azioni o quote(pr.1)"
|
||
PROMPT 27 51 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0NAZI1
|
||
END
|
||
|
||
NUMERO 118
|
||
BEGIN
|
||
KEY "I26-8 Utili denaro (pr.1) "
|
||
PROMPT 50 51 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0UDEN1
|
||
END
|
||
|
||
NUMERO 120
|
||
BEGIN
|
||
KEY "I26-9 Utili natura (pr.1) "
|
||
PROMPT 72 51 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0UNAT1
|
||
END
|
||
|
||
NUMERO 121
|
||
BEGIN
|
||
KEY "I26-10 Importo utili (pr.2)"
|
||
PROMPT 94 51 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0IUTI2
|
||
END
|
||
|
||
NUMERO 122
|
||
BEGIN
|
||
KEY "I26-11 Util.sogg.rit.(pr.3)"
|
||
PROMPT 116 51 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0USRIT3
|
||
END
|
||
|
||
NUMERO 123
|
||
BEGIN
|
||
KEY "I27-12 Ritenuta acc.(pr.3) "
|
||
PROMPT 27 53 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0RACC3
|
||
END
|
||
|
||
NUMERO 124
|
||
BEGIN
|
||
KEY "I27-13 Riten. impos.(pr.3) "
|
||
PROMPT 50 53 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0RIMP3
|
||
END
|
||
|
||
NUMERO 125
|
||
BEGIN
|
||
KEY "I27-14 Ut.non sogg.rit.(p3)"
|
||
PROMPT 72 53 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0UNSRIT3
|
||
END
|
||
|
||
NUMERO 126
|
||
BEGIN
|
||
KEY "I27-15 Cred.imp.pre.assun. "
|
||
PROMPT 94 53 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G0CRIMPRAS
|
||
END
|
||
|
||
NUMERO 127
|
||
BEGIN
|
||
KEY "I28-1 Utili corrisposti "
|
||
PROMPT 27 55 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1UCOR
|
||
END
|
||
|
||
NUMERO 128
|
||
BEGIN
|
||
KEY "I28-2 Utili sogg. ritenute"
|
||
PROMPT 50 55 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1USRIT
|
||
END
|
||
|
||
NUMERO 129
|
||
BEGIN
|
||
KEY "I28-3 Ritenute di acconto "
|
||
PROMPT 72 55 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1RACC
|
||
END
|
||
|
||
NUMERO 130
|
||
BEGIN
|
||
KEY "I28-4 Ritenute di imposta "
|
||
PROMPT 94 55 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1RIMP
|
||
END
|
||
|
||
NUMERO 131
|
||
BEGIN
|
||
KEY "I28-5 Utili non sogg.rit. "
|
||
PROMPT 116 55 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1UNSRIT
|
||
END
|
||
|
||
NUMERO 132
|
||
BEGIN
|
||
KEY "I29-6 Cred.imp.pre.assun. "
|
||
PROMPT 27 57 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->G1CRIMPRAS
|
||
END
|
||
|
||
NUMERO 133
|
||
BEGIN
|
||
KEY "I30-1 Cont.obb.car.dat.lav"
|
||
PROMPT 27 59 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->H0CODLAV
|
||
END
|
||
|
||
NUMERO 134
|
||
BEGIN
|
||
KEY "I30-2 Cont.ob.car.lav.dip."
|
||
PROMPT 50 59 ""
|
||
PICTURE "###.###.###.###^^^"
|
||
FIELD 37->H0COLDIP
|
||
END
|
||
|
||
END
|
||
|
||
END
|