USE 5 KEY 2
JOIN LF_CLIFO INTO TIPOCF=S8|CODCF=I8
JOIN LF_COMUNI TO LF_CLIFO INTO STATO==STATOCF|COM==COMCF

END

DESCRIPTION
BEGIN
  5->* "Tabella temporanea di stampa"
END

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


SECTION HEADER ODD 8

NUMERO 1
BEGIN
 KEY "Pagina"
 PROMPT 70 1 "Pagina "
 MESSAGE _PAGENO
END

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

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

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

STRINGA 6
BEGIN
 KEY "Numero civico"
 PROMPT 52 3 ""
 FLAGS "H"
 FIELD LF_CLIFO->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 LF_CLIFO->CAPCF
END

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

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

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

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

END

SECTION BODY ODD -2 COLUMNWISE

STRINGA 101 25 2
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Descrizione" "Descrizione"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Descrizione"
 PROMPT 1 1 ""
 FIELD S1
END

NUMERO 102 17
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Netto" "Netto"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Netto"
 PROMPT 2 1 ""
 PICTURE "#.###.###.###.###"
 FIELD R0
END

NUMERO 103 17
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Totale" "Totale"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Totale"
 PROMPT 3 1 ""
 PICTURE "#.###.###.###.###"
 FIELD R1
END

NUMERO 104 17
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Jolly1" "Jolly1"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Jolly1"
 PROMPT 4 1 ""
 PICTURE "#.###.###.###.###"
 FIELD R2
END

NUMERO 105 17
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Jolly2" "Jolly2"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Jolly2"
 PROMPT 5 1 ""
 PICTURE "#.###.###.###.###"
 FIELD R3
END

NUMERO 106 17
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Jolly3" "Jolly3"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Jolly3"
 PROMPT 6 1 ""
 PICTURE "#.###.###.###.###"
 FIELD R4
END

NUMERO 107 17
BEGIN
 SPECIAL STRINGA INTESTAZIONE "Jolly4" "Jolly4"
 SPECIAL NUMERO OFFSET "0" "Offset iniziale campo"
 SPECIAL STRINGA FINCATURA "XX" "Fincatura sinistra e destra"
 KEY "Jolly4"
 PROMPT 7 1 ""
 PICTURE "#.###.###.###.###"
 FIELD R5
END

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

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

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

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

  SECTION RIGAVUOTA 2 1 1 NORMAL STREXPR (5->B8!="")
  
  STRINGA 883
  BEGIN
    PROMPT 1 1 ""
  END
  
  END

END    // Fine body

SECTION FOOTER ODD 3 

END    // Fine footer

END    // Fine Form