USE 20
JOIN 13 INTO STATO==STATOCF|COM==COMCF

END

DESCRIPTION
BEGIN
  20->* "Clienti/Fornitori"
  13->* "Comuni"
END

GENERAL
BEGIN
  OFFSET 0 0
  FONT "Courier New"
  SIZE 7
END

SECTION GRAPHICS ODD 

FIGURA 500 0  
BEGIN
  PROMPT 0 0 ""
END

END


SECTION HEADER LAST 1

STRINGA 100
BEGIN          
  KEY "Flags generali VALUTA|FINCATURA"
  PROMPT 0 0 " |2|"
  FLAGS "DH"
END

STRING 301
BEGIN
 KEY "Descrizione saldo partita"
 PROMPT 2 1 "*** Saldo partita"
 FLAGS "DH"
END

STRING 302
BEGIN
 KEY "Descrizione abbuoni"
 PROMPT 2 1 "*** Abbuoni"
 FLAGS "DH"
END

STRING 303
BEGIN
 KEY "Descrizione differenza cambi"
 PROMPT 2 1 "*** Differenza cambi"
 FLAGS "DH"
END

STRING 304
BEGIN
 KEY "Ritenute"
 PROMPT 2 1 "*** Ritenute"
 FLAGS "DH"
END

STRING 400
BEGIN                      
 KEY "Descrizione riporto"
 PROMPT 2 1 "*** Riporto"
 FLAGS "DH"
END

END

SECTION HEADER ODD 12

STRINGA 1
BEGIN
 KEY "Spettabile/Egregio"
 PROMPT 2 1 "Spettabile"
END

NUMERO 218
BEGIN
 KEY "Pagina"
 PROMPT 70 1 "Pagina "
END

STRINGA 3
BEGIN
 KEY "Codice cliente/fornitore"
 PROMPT 2 2 ""
 FIELD CODCF
END

STRINGA 4
BEGIN
 KEY "Ragione sociale"
 PROMPT 8 2 ""
 FIELD RAGSOC
END

STRINGA 5
BEGIN
 KEY "Indirizzo"
 PROMPT 2 3 ""
 FLAGS "H"
 FIELD INDCF
 MESSAGE COPY,7
END

STRINGA 6
BEGIN
 KEY "Numero civico"
 PROMPT 52 3 ""
 FLAGS "H"
 FIELD CIVCF
 MESSAGE APPEND,7
END

STRINGA 7
BEGIN
 KEY "Indirizzo completo"
 PROMPT 2 3 ""
END

STRINGA 8
BEGIN
 KEY "C.A.P."
 PROMPT 2 4 "C.A.P. "
 FIELD CAPCF
END

STRINGA 9
BEGIN
 KEY "Localita'"
 PROMPT 26 4 ""
 FIELD LOCALITACF
END

STRINGA 10
BEGIN
 KEY "Comune"
 PROMPT 2 5 ""
 FLAGS "H"
 FIELD 13->DENCOM
 MESSAGE COPY,12
END

STRINGA 11
BEGIN
 KEY "Provincia"
 PROMPT 52 5 ""
 FLAGS "H"
 FIELD 13->PROVCOM
 MESSAGE APPEND,12
END

STRINGA 12
BEGIN
 KEY "Comune completo"
 PROMPT 2 5 ""
END

STRINGA 13
BEGIN
 KEY "Prefisso telefonico"
 PROMPT 2 6 "Telefono "
 FLAGS "H"
 FIELD PTEL
 MESSAGE COPY,15
END

STRINGA 14
BEGIN
 KEY "Telefono"
 PROMPT 24 6 "/ "
 FLAGS "H"
 FIELD TEL
 MESSAGE APPEND,15
END

STRINGA 15
BEGIN
 KEY "Telefono completo"
 PROMPT 2 6 "Telefono "
END

STRINGA 101
BEGIN
 KEY "Luogo d'invio"
 PROMPT 2 7 ""
END

DATA 102
BEGIN
 KEY "Data d'invio"
 PROMPT 52 7 ""
 FORMAT "1444-"
END

STRINGA 103 40 3
BEGIN
 KEY "Testo fisso"
 FLAG "M"
 PROMPT 2 8 ""
END

END

SECTION BODY ODD 1 COLUMNWISE

STRINGA 201 4
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Cod." "Codice Causale"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Codice causale"
 PROMPT 1 1 ""
 FLAGS "H"
END

STRINGA 202 22 1
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Descrizione" "Descrizione"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Descrizione"
 PROMPT 2 1 "<DES PART>"
END

DATA 205 10
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Data doc." "Data documento"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Data documento"
 PROMPT 3 1 ""
END

NUMERO 206 8
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Num prot." "Numero potocollo"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Numero protocollo"
 PROMPT 4 1 ""
 FLAGS "H"
END

STRINGA 207 8
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Num doc." "Numero documento"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Numero documento"
 PROMPT 5 1 ""
END

NUMERO 208 15
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Tot.documento" "Totale documento"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Totale documento"
 PROMPT 6 1 ""
 FLAGS "H"
 PICTURE "###.###.###.###"
END

DATA 209 10
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Data scad." "Data scadenza"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Data scadenza"
 PROMPT 7 1 ""
END

NUMERO 210 17
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Dare" "Dare"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Dare"
 PROMPT 8 1 ""
 PICTURE "###.###.###.###"
END

NUMERO 211 17
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Avere" "Avere"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Avere"
 PROMPT 9 1 ""
 PICTURE "###.###.###.###"
END

NUMERO 212 17
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Scaduto" "Scaduto"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Scaduto"
 PROMPT 10 1 ""
 PICTURE "###.###.###.###"
END          

NUMERO 213 17
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Esposto" "Esposto"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Esposto"
 PROMPT 11 1 ""
 PICTURE "###.###.###.###"
END

NUMERO 215 17
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Imp. in lire" "Importi in lire"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Importi in lire"
 FLAGS "H"
 PROMPT 12 1 ""
 PICTURE "###.###.###.###"
END
 
NUMERO 216 17
BEGIN          
  SPECIAL STRINGA INTESTAZIONE "Cambio" "Cambio"
  SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
  SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
  KEY "Cambio"
  PROMPT 13 1 ""
  PICTURE "###.###.###.###"
  FLAGS "H"
END 

DATA 217 10
BEGIN          
  SPECIAL STRINGA INTESTAZIONE "Data cam." "Data cambio"
  SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
  SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
  KEY "Data cambio"
  PROMPT 14 1 ""
  FLAGS "H"
END 


END    // Fine body

SECTION FOOTER ODD 9

NUMERO 210
BEGIN
 KEY "Dare"
 PROMPT 0 1 ""
 PICTURE "###.###.###.###"
END

NUMERO 211
BEGIN
 KEY "Avere"
 PROMPT 0 1 ""
 PICTURE "###.###.###.###"
END

NUMERO 212
BEGIN
 KEY "Scaduto"
 PROMPT 0 2 ""
 PICTURE "###.###.###.###"
END          

NUMERO 213
BEGIN
 KEY "Esposto"
 PROMPT 0 3 ""
 PICTURE "###.###.###.###"
END

NUMERO 215
BEGIN
 KEY "Importi in lire"
 PROMPT 0 4 ""
 PICTURE "###.###.###.###"
END

NUMERO 219
BEGIN
 KEY "Importi non assegnati"
 PROMPT 0 5 ""
 PICTURE "###.###.###.###"
END

STRING 401
BEGIN                      
 KEY "Descrizione totale"
 PROMPT 0 1 "Saldo <VALUTA> al <DATA>"
END

STRING 402
BEGIN
 KEY "Descrizione totale scaduto"
 PROMPT 0 2 "Scaduto al <DATA SCADUTO>"
END

STRING 403
BEGIN
 KEY "Descrizione totale esposto"
 PROMPT 0 3 "Totale esposto"
END

STRING 404
BEGIN
 KEY "Descrizione totale importi in lire"
 PROMPT 0 4 "Totale in lire <DESCRIZIONE VALUTA>"
END

STRING 405
BEGIN
 KEY "Descrizione totale pagamenti non assegnati"
 PROMPT 0 5 "Totale pagamenti non assegnati al <DATA>"
END

END    // Fine footer


END    // Fine Form
