campo-sirio/m770/77qg1.frm

USE 71         
JOIN 98 INTO CODDITTA=CODDITTA
JOIN  9 TO  71 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
  71->* "Quadro G1 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 "P. Colonna 2 - solo 5 righe"
  PROMPT 10 35 ""
END

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

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

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

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

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

STRINGA 62
BEGIN
  KEY "P. Colonna 7 - solo 5 righe"
  PROMPT 65 35 ""
END

STRINGA 63
BEGIN
  KEY "P71"
  PROMPT 65 37 ""
END

STRINGA 64
BEGIN
  KEY "P72"
  PROMPT 65 39 ""
END

STRINGA 65
BEGIN
  KEY "P73"
  PROMPT 65 41 ""
END

STRINGA 66
BEGIN
  KEY "P74"
  PROMPT 65 43 ""
END

STRINGA 67
BEGIN
  KEY "P75"
  PROMPT 65 45 ""
END


STRINGA 68
BEGIN
  KEY "Colonna 3 - P31"
  PROMPT 30 35 ""
END

STRINGA 69
BEGIN
  KEY "P32"
  PROMPT 30 37 ""
END

STRINGA 70
BEGIN
  KEY "P33"
  PROMPT 30 39 ""
END

STRINGA 71
BEGIN
  KEY "P34"
  PROMPT 30 41 ""
END

STRINGA 72
BEGIN
  KEY "P35"
  PROMPT 30 43 ""
END

STRINGA 73
BEGIN
  KEY "P36"
  PROMPT 30 45 ""
END
         
STRINGA 74
BEGIN
  KEY "P37"
  PROMPT 30 47 ""
END

STRINGA 75
BEGIN
  KEY "P38"
  PROMPT 30 49 ""
END

STRINGA 76
BEGIN
  KEY "P39"
  PROMPT 30 51 ""
END

STRINGA 77
BEGIN
  KEY "P3-10"
  PROMPT 30 53 ""
END

STRINGA 78
BEGIN
  KEY "P3-11"
  PROMPT 30 55 ""
END



STRINGA 79
BEGIN
  KEY "COLONNA 5 - 1"
  PROMPT 45 35 ""
END

STRINGA 80
BEGIN
  KEY "P52"
  PROMPT 45 37 ""
END

STRINGA 81
BEGIN
  KEY "P53"
  PROMPT 45 39 ""
END

STRINGA 82
BEGIN
  KEY "P54"
  PROMPT 45 41 ""
END

STRINGA 83
BEGIN
  KEY "P55"
  PROMPT 45 43 ""
END

STRINGA 84
BEGIN
  KEY "P56"
  PROMPT 45 45 ""
END
         
STRINGA 85
BEGIN
  KEY "P57"
  PROMPT 45 47 ""
END

STRINGA 86
BEGIN
  KEY "P58"
  PROMPT 45 49 ""
END

STRINGA 87
BEGIN
  KEY "P59"
  PROMPT 45 51 ""
END

STRINGA 88
BEGIN
  KEY "P5-10"
  PROMPT 45 53 ""
END

STRINGA 89
BEGIN
  KEY "P5-11"
  PROMPT 45 55 ""
END



STRINGA 90
BEGIN
  KEY "COLONNA 6 - 1"
  PROMPT 60 35 ""
END

STRINGA 91
BEGIN
  KEY "P62"
  PROMPT 60 37 ""
END

STRINGA 92
BEGIN
  KEY "P63"
  PROMPT 60 39 ""
END

STRINGA 93
BEGIN
  KEY "P64"
  PROMPT 60 41 ""
END

STRINGA 94
BEGIN
  KEY "P65"
  PROMPT 60 43 ""
END

STRINGA 95
BEGIN
  KEY "P66"
  PROMPT 60 45 ""
END
         
STRINGA 96
BEGIN
  KEY "P67"
  PROMPT 60 47 ""
END

STRINGA 97
BEGIN
  KEY "P68"
  PROMPT 60 49 ""
END

STRINGA 98
BEGIN
  KEY "P69"
  PROMPT 60 51 ""
END

STRINGA 99
BEGIN
  KEY "P6-10"
  PROMPT 60 53 ""
END

STRINGA 100
BEGIN
  KEY "P6-11"
  PROMPT 60 55 ""
END


STRINGA 101
BEGIN
  KEY "P2TOT"
  PROMPT 15 58 ""
  FIELD 71->P12TOT
END

STRINGA 102
BEGIN
  KEY "P3TOT"
  PROMPT 30 58 ""
  FIELD 71->P13TOT
END

STRINGA 103
BEGIN
  KEY "P5TOT"
  PROMPT 60 58 ""
  FIELD 71->P15TOT
END

STRINGA 104
BEGIN
  KEY "P6TOT"
  PROMPT 75 58 ""
  FIELD 71->P16TOT
END

STRINGA 105
BEGIN
  KEY "P7TOT"
  PROMPT 90 58 ""
  FIELD 71->P17TOT
END

END