USE 56
JOIN 45 INTO CODDITTA=CODDITTA CODDIP=CODDIP
JOIN %CAF ALIAS 104 INTO CODTAB==CODCAAF
JOIN 9 INTO CODDITTA=CODDITTA
JOIN 6 TO 9 ALIAS 206 INTO TIPOA=TIPOA CODANAGR=CODANAGR

END
DESCRIPTION
BEGIN
  56->* "Quadro A1 770"
  45->* "Anagrafica dei dipendenti"
  104@->* "Tabella CAAF"
  9->* "Ditte"
  206@->* "Anagrafica persone fisiche e giuridiche (ditta)"
END

GENERAL
BEGIN
  OFFSET 0 0
  FONT "Roman 17cpi"
  SIZE 11
  CARATTERE "X"
  INIZIO_POS 3 3
  FINE_POS 130
  GRID "+++++++++-|"
END

SECTION HEADER FIRST 22

STRINGA 1 
BEGIN
  KEY "CODICE FISCALE"
  PROMPT 55 8  ""
  FIELD 206@->COFI
END

STRINGA 13
BEGIN
  KEY "CODICE FISCALE DICHIARANTE"
  PROMPT 88 8  ""
END

NUMBER 14
BEGIN
  KEY "NUM. FOGLIO"
  PROMPT 123 8  ""
END

END

SECTION HEADER ODD 5
// Header pagine successive
END


SECTION BODY ODD 10

STRINGA 1
BEGIN
 KEY "COD.FIS"
 PROMPT 11 1 ""
 FIELD 45->CODFI
END

STRINGA 2
BEGIN
 KEY "COGNOME"
 PROMPT 43 1 ""
 FIELD 45->COGNOME
END

STRINGA 3
BEGIN
 KEY "NOME"
 PROMPT 80 1 ""
 FIELD 45->NOME
END

DATA 4
BEGIN
 KEY "DATA NASCITA"
 PROMPT 112 1 ""
 FIELD 45->DATANA
 FORMAT "1444-"
END

STRINGA 5
BEGIN
 KEY "SESSO"
 PROMPT 128 1 ""
 FIELD 45->SESSO
END

STRINGA 6
BEGIN
 KEY "COMUNE DI NASCITA"
 PROMPT 11 3 ""
 FIELD 45->COMUNENA
END

STRINGA 7
BEGIN
 KEY "PROV DI NASCITA"
 PROMPT 48 3 ""
 FIELD 45->PROVNA
END

NUMERO 8
BEGIN
 KEY "MESE DI RIFERIMENTO"
 PROMPT 13 5 ""
 FIELD 56->MESERIF
END

NUMERO 9
BEGIN
 KEY "IMPOSTA RIMBORSATA"
 PROMPT 25 5 ""
 PICTURE "###.###.###.###^^^"
 FIELD 56->IMPRIMB9
END

NUMERO 10
BEGIN
 KEY "IMPOSTA VERSATA"
 PROMPT 43 5 ""
 PICTURE "###.###.###.###^^^"
 FIELD 56->IMPVERS10
END    

NUMERO 11
BEGIN
 KEY "INTERESSI"
 PROMPT 62 5 ""
 PICTURE "###.###.###.###^^^"
 FIELD 56->INTER11
END

NUMERO 12
BEGIN
 KEY "IMPOSTA VERSATA"
 PROMPT 81 5 ""
 PICTURE "###.###.###.###^^^"
 FIELD 56->IMPVERS12
END

NUMERO 13
BEGIN
 KEY "INTERESSI"
 PROMPT 100 5 ""
 PICTURE "###.###.###.###^^^"
 FIELD 56->INTER13
END

NUMERO 14
BEGIN
 KEY "SOPRATTASSA SU IRPEF"
 PROMPT 115 5 ""
 PICTURE "###.###.###.###^^^"
 FIELD 56->STASSA14
END

NUMERO 15
BEGIN
 KEY "CONTRIBUTO A RIMBORSO"
 PROMPT 11 7 ""
 PICTURE "###.###.###.###^^^"
 FIELD 56->CONTRIMB15
END

NUMERO 16
BEGIN
 KEY "CONTRIBUTO VERSATO"
 PROMPT 30 7 ""
 PICTURE "###.###.###.###^^^"
 FIELD 56->CONTVERS16
END

NUMERO 17
BEGIN
 KEY "INTERESSI"
 PROMPT 48 7 ""
 PICTURE "###.###.###.###^^^"
 FIELD 56->INTER17
END

NUMERO 18
BEGIN
 KEY "CONTRIBUTO VERSATO"
 PROMPT 67 7 ""
 PICTURE "###.###.###.###^^^"
 FIELD 56->CONTVER18
END

NUMERO 19
BEGIN
 KEY "INTERESSI"
 PROMPT 86 7 ""
 PICTURE "###.###.###.###^^^"
 FIELD 56->INTER19
END

NUMERO 20
BEGIN
 KEY "SOPRATTASSA SU IRPEF"
 PROMPT 101 7 ""
 PICTURE "###.###.###.###^^^"
 FIELD 56->STASSA20
END

STRINGA 21
BEGIN
 KEY "CONGUAGLI NON EFFETTUATI"
 PROMPT 121 7 ""
 FIELD 56->CONNEFF21
END

STRINGA 22
BEGIN
 KEY "TIPO CONGUAGLIO"
 PROMPT 128 7 ""
 FIELD 56->TIPOCONG22
END

STRINGA 23
BEGIN
 KEY "CODICE FISCALE CAAF"
 PROMPT 11 9 ""
 FIELD 104@->S1
END

STRINGA 24
BEGIN
 KEY "DENOMINAZIONE CAAF"
 PROMPT 43 9 ""
 FIELD 104@->S0
END

NUMERO 25
BEGIN
 KEY "NUMERO ISCRIZIONE ALBO"
 PROMPT 100 9 ""
 PICTURE "#####"
 FIELD 104@->I1
END

DATA 26
BEGIN
 KEY "DATA RICEZIONE MOD.730-5"
 PROMPT 115 9 ""      
 FORMAT "1444-"    
 PICTURE "## ^ ##^^^^^"
 FIELD 56->DATARIC26 
END

END

SECTION FOOTER LAST 6

STRINGA 2
BEGIN
 KEY "FIRMA"
 PROMPT 83 6 ""
 FIELD 206@->RAGSOC
END

END

END