USE 67
JOIN 9 INTO CODDITTA=CODDITTA
JOIN  6 TO   9 ALIAS 116 INTO TIPOA=TIPOA CODANAGR=CODANAGR
JOIN  8 TO   6 ALIAS 118 INTO CODANAGR=CODANAGR
JOIN 13 TO   8 ALIAS 113 INTO COM=COMNASC
JOIN 13 TO   6 ALIAS 213 INTO COM=COMRF(COMRES)
END

DESCRIPTION
BEGIN
  67->* "Quadro F 770"
  9->* "Ditte"
  6->* "Anagrafica persone fisiche e giuridiche"
  8->* "Anagrafica persone fisiche"
  113@->* "Comuni"
  213@->* "Comuni"
  216@->* "Anagrafica persone fisiche e giuridiche"
  218@->* "Anagrafica persone giuridiche"
  313@->* "Comuni"
  413@->* "Comuni"
END

GENERAL
BEGIN
  OFFSET 0 0
  FONT "Courier 17cpi"
  SIZE 10
  CA "X"
  IN 3 2
  FI 131
END

SECTION HEADER FIRST 65

STRINGA 1 
BEGIN
  KEY "CODICE FISCALE"
  PROMPT 4 9  ""
  FIELD 116@->COFI
END

STRINGA 2
BEGIN
  KEY "RAGIONE SOCIALE"
  PROMPT 39 9  ""
  FIELD 116@->RAGSOC
  GROUP 2
END

STRINGA 3
BEGIN
  KEY "COGNOME"
  PROMPT 39 9 ""
  FIELD 116@->RAGSOC[1,30]
  GROUP 1
END  

STRINGA 4
BEGIN
  KEY "NOME"
  PROMPT 17 11 ""
  FIELD 116@->RAGSOC[31,50]
  GROUP 1
END  

STRINGA 5
BEGIN
  KEY "SESSO"
  PROMPT 58 11 ""
  FIELD 118@->SESSO
  GROUP 1
END  
  
STRINGA 6
BEGIN
  KEY "DATA DI NASCITA"
  PROMPT 66 11 ""
  FIELD 118@->DATANASC
  GROUP 1
END  
  
STRINGA 7
BEGIN
  KEY "COMUNE DI NASCITA"
  PROMPT 84 11 ""
  FIELD 113@->DENCOM
  GROUP 1
END  
  
STRINGA 8
BEGIN
  KEY "PROV. DI NASCITA"
  PROMPT 126 11 ""
  FIELD 113@->PROVCOM
  GROUP 1
END  
  
LISTA 9
BEGIN
 KEY "Tipo anagrafica"
 FIELD 116@->TIPOA
 ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
 ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
END

STRINGA 10
BEGIN
  KEY "COMUNE DI RES.FISCALE"
  PROMPT 17 13 ""
  FIELD 213@->DENCOM
END  
  
STRINGA 11
BEGIN
  KEY "PROV DI RES.FISCALE"
  PROMPT 59 13 ""
  FIELD 213@->PROVCOM
END  
  
STRINGA 12
BEGIN
  KEY "VIA di RES."
  PROMPT 66 13  ""
  FIELD 116@->INDRF
END  
  
STRINGA 13
BEGIN
  KEY "NUM. CIVICO di RES."
  PROMPT 102 13 ""
  FIELD 116@->CIVRF
END  
  
STRINGA 14
BEGIN
  KEY "CAP"
  PROMPT 120 13 ""
  FIELD 116@->CAPRF
END  

STRINGA 15
BEGIN
  KEY "CODICE FISCALE DICHIARANTE"
  PROMPT 118 16  ""
END


STRINGA 56
BEGIN
  KEY "Colonna 0 Numero d'ordine"
  PROMPT 10 35 ""
END

STRINGA 57
BEGIN
  KEY "P02"
  PROMPT 10 37 ""
END

STRINGA 58
BEGIN
  KEY "P03"
  PROMPT 10 39 ""
END

STRINGA 59
BEGIN
  KEY "P04"
  PROMPT 10 41 ""
END

STRINGA 60
BEGIN
  KEY "P05"
  PROMPT 10 43 ""
END

STRINGA 61
BEGIN
  KEY "P06"
  PROMPT 10 45 ""
END

STRINGA 62
BEGIN
  KEY "P11 Colonna causale"
  PROMPT 18 35 ""
END

STRINGA 63
BEGIN
  KEY "P12"
  PROMPT 18 37 ""
END

STRINGA 64
BEGIN
  KEY "P13"
  PROMPT 18 39 ""
END

STRINGA 65
BEGIN
  KEY "P14"
  PROMPT 18 41 ""
END

STRINGA 66
BEGIN
  KEY "P15"
  PROMPT 18 43 ""
END

STRINGA 67
BEGIN
  KEY "P16"
  PROMPT 18 45 ""
END

STRINGA 68
BEGIN
  KEY "Colonna 3 - P21"
  PROMPT 38 35 ""
END

STRINGA 69
BEGIN
  KEY "P22"
  PROMPT 38 37 ""
END

STRINGA 70
BEGIN
  KEY "P23"
  PROMPT 38 39 ""
END

STRINGA 71
BEGIN
  KEY "P24"
  PROMPT 38 41 ""
END

STRINGA 72
BEGIN
  KEY "P25"
  PROMPT 38 43 ""
END

STRINGA 73
BEGIN
  KEY "P26"
  PROMPT 38 45 ""
END
         
STRINGA 74
BEGIN
  KEY "P31"
  PROMPT 58 35 ""
END

STRINGA 75
BEGIN
  KEY "P32"
  PROMPT 58 37 ""
END

STRINGA 76
BEGIN
  KEY "P33"
  PROMPT 58 39 ""
END

STRINGA 77
BEGIN
  KEY "P34"
  PROMPT 58 41 ""
END

STRINGA 78
BEGIN
  KEY "P35"
  PROMPT 58 43 ""
END

STRINGA 79
BEGIN
  KEY "P36"
  PROMPT 58 45 ""
END

STRINGA 80
BEGIN
  KEY "P52"
  PROMPT 78 35 ""
END

STRINGA 81
BEGIN
  KEY "P53"
  PROMPT 78 37 ""
END

STRINGA 82
BEGIN
  KEY "P54"
  PROMPT 78 39 ""
END

STRINGA 83
BEGIN
  KEY "P55"
  PROMPT 78 41 ""
END

STRINGA 84
BEGIN
  KEY "P56"
  PROMPT 78 43 ""
END
         
STRINGA 85
BEGIN
  KEY "P57"
  PROMPT 78 45 ""
END

STRINGA 86
BEGIN
  KEY "P58"
  PROMPT 98 35 ""
END

STRINGA 87
BEGIN
  KEY "P59"
  PROMPT 98 37 ""
END

STRINGA 88
BEGIN
  KEY "P5-10"
  PROMPT 98 39 ""
END

STRINGA 89
BEGIN
  KEY "P5-11"
  PROMPT 98 41 ""
END

STRINGA 90
BEGIN
  KEY "COLONNA 6 - 1"
  PROMPT 98 43 ""
END

STRINGA 91
BEGIN
  KEY "P62"
  PROMPT 98 45 ""
END

STRINGA 92
BEGIN
  KEY "P63"
  PROMPT 118 35 ""
END

STRINGA 93
BEGIN
  KEY "P64"
  PROMPT 118 37 ""
END

STRINGA 94
BEGIN
  KEY "P65"
  PROMPT 118 39 ""
END

STRINGA 95
BEGIN
  KEY "P66"
  PROMPT 118 41 ""
END
         
STRINGA 96
BEGIN
  KEY "P67"
  PROMPT 118 43 ""
END

STRINGA 97
BEGIN
  KEY "P68"
  PROMPT 118 45 ""
END

STRINGA 98
BEGIN
  KEY "P69"
  PROMPT 138 35 ""
END

STRINGA 99
BEGIN
  KEY "P6-10"
  PROMPT 138 37 ""
END

STRINGA 100
BEGIN
  KEY "P6-11"
  PROMPT 138 39 ""
END

STRINGA 101
BEGIN
  KEY "P6-11"
  PROMPT 138 41 ""
END

STRINGA 102
BEGIN
  KEY "P6-11"
  PROMPT 138 43 ""
END

STRINGA 103
BEGIN
  KEY "P6-11"
  PROMPT 138 45 ""
END

STRINGA 104
BEGIN
  KEY "P3TOT"
  PROMPT 38 47 ""
END

STRINGA 105
BEGIN
  KEY "P4TOT"
  PROMPT 58 47 ""
END

STRINGA 106
BEGIN
  KEY "P5TOT"
  PROMPT 78 47 ""
END

STRINGA 107
BEGIN
  KEY "P6TOT"
  PROMPT 98 47 ""
END

STRINGA 108
BEGIN
  KEY "P7TOT"
  PROMPT 118 47 ""
END

STRINGA 109
BEGIN
  KEY "A1"
  PROMPT 118 50 ""
  FIELD 67->A1
END

STRINGA 110
BEGIN
  KEY "A2"
  PROMPT 118 52 ""
  FIELD 67->A2
END

STRINGA 111
BEGIN
  KEY "A3"
  PROMPT 118 54 ""
  FIELD 67->A3
END

STRINGA 112
BEGIN
  KEY "A4"
  PROMPT 118 56 ""
  FIELD 67->A4
END


END


SECTION BODY FIRST 66

STRINGA 1
BEGIN
  KEY "B - n.ord 1"
  PROMPT 4 10 ""
END

STRINGA 2
BEGIN
  KEY "B - n.ord 2"
  PROMPT 4 12 ""
END

STRINGA 3
BEGIN
  KEY "B - n.ord 3"
  PROMPT 4 14 ""
END

STRINGA 4
BEGIN
  KEY "B - col. DESCR. CAUSALE 1/1"
  PROMPT 8 10 ""
END

STRINGA 5
BEGIN
  KEY "col.1/2"
  PROMPT 8 12 ""
END

STRINGA 6
BEGIN
  KEY "col.1/3"
  PROMPT 8 14 ""
END

STRINGA 7
BEGIN
  KEY "ALIQUOTA col.2/1"
  PROMPT 28 10 ""
END

STRINGA 8
BEGIN
  KEY "col.2/2"
  PROMPT 28 12 ""
END

STRINGA 9
BEGIN
  KEY "col.2/3"
  PROMPT 28 14 ""
END

STRINGA 10
BEGIN
  KEY "col. SOMM.SOGG.RIT / 1"
  PROMPT 38 10 ""
END

STRINGA 11
BEGIN
  KEY "col. SOMM.SOGG.RIT / 2"
  PROMPT 38 12 ""
END

STRINGA 12
BEGIN
  KEY "col. SOMM.SOGG.RIT / 3"
  PROMPT 38 14 ""
END

STRINGA 13
BEGIN
  KEY "col. RIT.OPE. / 1"
  PROMPT 58 10 ""
END

STRINGA 14
BEGIN
  KEY "col. RIT.OPE. / 2"
  PROMPT 58 12 ""
END

STRINGA 15
BEGIN
  KEY "col. RIT.OPE. / 3"
  PROMPT 58 14 ""
END

STRINGA 16
BEGIN
  KEY "C - n.ord 1"
  PROMPT 4 16 ""
END

STRINGA 17
BEGIN
  KEY "C - n.ord 2"
  PROMPT 4 18 ""
END

STRINGA 18
BEGIN
  KEY "C - n.ord 3"
  PROMPT 4 20 ""
END

STRINGA 19
BEGIN
  KEY "C - col. DESCR. CAUSALE 1/1"
  PROMPT 8 16 ""
END

STRINGA 20
BEGIN
  KEY "col.1/2"
  PROMPT 8 18 ""
END

STRINGA 21
BEGIN
  KEY "col.1/3"
  PROMPT 8 20 ""
END

STRINGA 22
BEGIN
  KEY "ALIQUOTA col.2/1"
  PROMPT 28 16 ""
END

STRINGA 23
BEGIN
  KEY "col.2/2"
  PROMPT 28 18 ""
END

STRINGA 24
BEGIN
  KEY "col.2/3"
  PROMPT 28 20 ""
END

STRINGA 25
BEGIN
  KEY "col. SOMM.SOGG.RIT / 1"
  PROMPT 38 16 ""
END

STRINGA 26
BEGIN
  KEY "col. SOMM.SOGG.RIT / 2"
  PROMPT 38 18 ""
END

STRINGA 27
BEGIN
  KEY "col. SOMM.SOGG.RIT / 3"
  PROMPT 38 20 ""
END

STRINGA 28
BEGIN
  KEY "col. RIT.OPE. / 1"
  PROMPT 58 16 ""
END

STRINGA 29
BEGIN
  KEY "col. RIT.OPE. / 2"
  PROMPT 58 18 ""
END

STRINGA 30
BEGIN
  KEY "col. RIT.OPE. / 3"
  PROMPT 58 20 ""
END

STRINGA 31
BEGIN
  KEY "D - n.ord 1"
  PROMPT 4 22 ""
END

STRINGA 32
BEGIN
  KEY "D - n.ord 2"
  PROMPT 4 24 ""
END

STRINGA 33
BEGIN
  KEY "D - n.ord 3"
  PROMPT 4 26 ""
END

STRINGA 34
BEGIN
  KEY "D - col. DESCR. CAUSALE 1/1"
  PROMPT 8 22 ""
END

STRINGA 35
BEGIN
  KEY "col.1/2"
  PROMPT 8 24 ""
END

STRINGA 36
BEGIN
  KEY "col.1/3"
  PROMPT 8 26 ""
END

STRINGA 37
BEGIN
  KEY "ALIQUOTA col.2/1"
  PROMPT 28 22 ""
END

STRINGA 38
BEGIN
  KEY "col.2/2"
  PROMPT 28 24 ""
END

STRINGA 39
BEGIN
  KEY "col.2/3"
  PROMPT 28 26 ""
END

STRINGA 40
BEGIN
  KEY "col. SOMM.SOGG.RIT / 1"
  PROMPT 38 22 ""
END

STRINGA 41
BEGIN
  KEY "col. SOMM.SOGG.RIT / 2"
  PROMPT 38 24 ""
END

STRINGA 42
BEGIN
  KEY "col. SOMM.SOGG.RIT / 3"
  PROMPT 38 26 ""
END

STRINGA 43
BEGIN
  KEY "col. RIT.OPE. / 1"
  PROMPT 58 22 ""
END

STRINGA 44
BEGIN
  KEY "col. RIT.OPE. / 2"
  PROMPT 58 24 ""
END

STRINGA 45
BEGIN
  KEY "col. RIT.OPE. / 3"
  PROMPT 58 26 ""
END

STRINGA 46
BEGIN
  KEY "E 1 "
  PROMPT 8 28 ""
  FIELD 67->E_CAMBIALI
END

STRINGA 47
BEGIN
  KEY "E 2 PROV.SOGG.RIT"
  PROMPT 30 28 ""
  FIELD 67->E_SOGRIT
END

STRINGA 48
BEGIN
  KEY "E 3 ALIQUOTA"
  PROMPT 52 28 ""
  FIELD 67->E_ALIQUOTA
END

STRINGA 49
BEGIN
  KEY "E 4 RIT.OPE."
  PROMPT 73 28 ""
  FIELD 67->E_ROPE
END

STRINGA 50
BEGIN
  KEY "F 1 DESC. CAUSALE"
  PROMPT 8 30 ""
END

STRINGA 51
BEGIN
  KEY "F 2 ALIQUOTA"
  PROMPT 30 30 "" 
  FIELD 67->F_ALIQUOTA
END

STRINGA 52
BEGIN
  KEY "F 3 SOMM.SOGG.RIT."
  PROMPT 40 30 "" 
  FIELD 67->F_SOGRIT
END

STRINGA 53
BEGIN
  KEY "F 4 RIT.OPE."
  PROMPT 60 30 "" 
  FIELD 67->F_ROPE
END

STRINGA 54
BEGIN
  KEY "TOTALI PB3"
  PROMPT 38 15 ""
END

STRINGA 55
BEGIN             
  KEY "TOTALI PB4"
  PROMPT 58 15 ""
END

STRINGA 56
BEGIN
  KEY "TOTALI PC3"
  PROMPT 38 21 ""
END

STRINGA 57
BEGIN             
  KEY "TOTALI PC4"
  PROMPT 58 21 ""
END

STRINGA 58
BEGIN
  KEY "TOTALI PD3"
  PROMPT 38 27 ""
END

STRINGA 59
BEGIN             
  KEY "TOTALI PD4"
  PROMPT 58 27 ""
END

END