USE 12
JOIN 9 INTO CODDITTA=CODDITTA
JOIN 6 INTO TIPOA=TIPOASOC CODANAGR=CODANAGRSO
JOIN 8 TO 6 ALIAS 108 INTO CODANAGR=CODANAGR
JOIN 13 TO 108@ ALIAS 113 INTO COM==COMNASC
END

DESCRIPTION
BEGIN
  12->* "Soci"
  9->* "Ditte"
  6->* "Anagrafica persone fisiche e giuridiche"
  108@->* "Anagrafica persone fisiche"
  113@->* "Comuni (nascita)"
END

GENERAL
BEGIN
  OFFSET 0 0
  FONT "Courier New"
  SIZE 11
  CARATTERE "X"
  INIZIO_POS 1 1
  FINE_POS 131
  GRID "+++++++++-|"
END

SECTION HEADER FIRST 9

STRINGA 1
BEGIN
   KEY "INTESTAZIONE 1"
   PROMPT 1 1 "MOD. 770/97      DICHIARAZIONE DEL SOSTITUTO D'IMPOSTA:"
END

STRINGA 2
BEGIN
   KEY "INTESTAZIONE 2"
   PROMPT 1 3 "                       ELENCO NOMINATIVO DEGLI AMMINISTRATORI E DEI COMPONENTI DEL COLLEGIO SINDACALE"
END

STRINGA 3
BEGIN
   KEY "INTESTAZIONE 3"
   PROMPT 1 4 "                                   O DI ALTRO ORGANO DI CONTROLLO DELLA SOCIETA' O ENTE"
END

STRINGA 4
BEGIN
   KEY "INTESTAZIONE 4"
   PROMPT 1 5 "           (o, in mancanza, dei soggetti che rispondono personalmente delle obbligazioni della societa' o ente)"
END

STRINGA 5
BEGIN
   KEY "INTESTAZIONE 5"
   PROMPT 1 7 "-----------------------------------------------------------------------------------------------------------------------------------"
END

STRINGA 6
BEGIN
   KEY "INTESTAZIONE 6"
   PROMPT 1 8 "N.ord.  Cognome e nome                                       Sesso  Comune di nascita     Prov.    Data     Codice fiscale    Qual."
//                                                                                                                11111111111111111111111111111111
//                      11111111112222222222333333333344444444445555555555666666666677777777778888888888999999999900000000001111111111222222222233
//             12345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901
//             12345   123456789012345678901234567890 123456789012345678901   1    12345678901234567890   12    12/12/123  1234567890123456   1
END

STRINGA 7
BEGIN
   KEY "INTESTAZIONE 7"
   PROMPT 1 9 "-----------------------------------------------------------------------------------------------------------------------------------"
END

STRINGA 8
BEGIN
 KEY "RAGIONE SOCIALE"
 PROMPT 60 1 ""
 FIELD 9->RAGSOC
END

END

SECTION BODY ODD 1

NUMERO 1
BEGIN
   KEY "N.ORD"
   PROMPT 1 1 ""
   PICTURE "#####"
END

STRINGA 2
BEGIN
 KEY "COGNOME"
 PROMPT 9 1 ""
 FIELD 6->RAGSOC[1,30]
END

STRINGA 3
BEGIN
 KEY "NOME"
 PROMPT 40 1 ""
 FIELD 6->RAGSOC[31,50]
END

STRINGA 4
BEGIN
 KEY "SESSO"
 PROMPT 64 1 ""
 FIELD 108@->SESSO
END

STRINGA 5
BEGIN
 KEY "COMUNE DI NASCITA"
 PROMPT 69 1 ""
 FIELD 113@->DENCOM[1,20]
END

STRINGA 6
BEGIN
 KEY "PROV. DI NASCITA"
 PROMPT 92 1 ""
 FIELD 113@->PROVCOM
END

STRINGA 7
BEGIN
 KEY "DATA DI NASCITA"
 PROMPT 98 1 ""
 FIELD 108@->DATANASC
END

STRINGA 8
BEGIN
 KEY "CODICE FISCALE"
 PROMPT 109 1 ""
 FIELD 6->COFI
END

STRINGA 9
BEGIN
 KEY "QUALIFICA"
 PROMPT 128 1 ""
 FIELD 12->RICQUAL
END

END

END