#include "ce3300.h"

GENERAL
BEGIN
//  OFFSET 0 1
//  FONT "Courier New"
//  SIZE 10
END

//------------------------intestazione------------------------------------------------//
SECTION HEADER FIRST 12

  STRINGA -1
  BEGIN
    KEY "titolo"
    PROMPT 36 1 "ALLEGATO AL BILANCIO FISCALE"
  END

STRINGA FR_CODDITTA
  BEGIN
    KEY "Codice ditta"
    PROMPT 1 2 "Ditta  "
    PICTURE "#####"
  END  
    
  STRINGA FR_RAGSOC
  BEGIN
    KEY "Ragione sociale"
    PROMPT 15 2 ""
  END
  
  STRINGA FR_GRUPPO
  BEGIN
    KEY "Gruppo"
    PROMPT 1 3 "Gruppo "
    PICTURE "#####"
  END

  STRINGA FR_D_GRUPPO
  BEGIN
    KEY "Descrizione Gruppo"
    PROMPT 15 3 ""
  END

  STRINGA FR_SPECIE
  BEGIN
    KEY "Specie"
    PROMPT 1 4 "Specie "
    PICTURE "#####"
  END

  STRINGA FR_D_SPECIE
  BEGIN    
    KEY "Descrizione Specie"
    PROMPT 15 4 ""
  END
  
  DATA FR_DATAINIZIO
  BEGIN
    KEY "Data inizio esercizio"
    PROMPT 1 5 "Esercizio     " 
  END
  
  DATA FR_DATAFINE
  BEGIN
    KEY "Data fine esercizio"
    PROMPT 25 5 " - "
  END

  STRINGA -1
  BEGIN
    KEY "tipo situaz. da stampare"
    PROMPT 1 6 "Situazione "
  END

  STRINGA FR_SITUAZIONE
  BEGIN
    KEY "tipo situaz. da stampare"
    PROMPT 12 6 ""
  END
  
  STRINGA -1
  BEGIN
    PROMPT 1 7 "==================================================================================================================================================="
  END
  
  STRINGA FR_INT_COD
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 1 8 ""
  END

  STRINGA FR_INT_DESC
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 8 8 ""
  END
  
  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 64 8 "Costo storico"
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 106 8 "Tot. rivalutazioni"
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 130 8 "Val. inizio eser."
  END
  
  STRINGA -1 
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 59 9 "Rival. esercizio"
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 82 9 "Acq/incrementi"
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 106 9 "Cessioni/Elimin."
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 128 9 "Valore a bilancio"
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 55 10 "Fondo inizio eser."
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 84 10 "Incrementi"
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 104 10 "Cessioni/Elimin."
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 127 10 "Reinvest. Plusv."
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 34 11 "Amm. normale"
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 56 11 "Amm. accelerato"
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 77 11 "Amm. anticipato"
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 102 11 "Fondo a bilancio"
  END

  STRINGA -1
  BEGIN
    KEY "Intestazione stampa"
    PROMPT 123 11 "Residuo a bilancio"
  END

  STRINGA -1
  BEGIN
    KEY "riga"
    PROMPT 1 12 "==================================================================================================================================================="
  END
  
END //section header first
//--------------------------------------------------------------//
SECTION BODY ODD 5
  
  STRINGA FR_TC_CAT 10
  BEGIN
    KEY "codice categoria"
    PROMPT 1 1 ""
  END
  
  STRINGA FR_TC_D_CAT 55
  BEGIN
    KEY "descrizione categoria"
    PROMPT 12 1 ""
  END
  
  VALUTA FR_TC_CSTO 15
  BEGIN
    KEY "costo storico"
    PROMPT 62 1 ""
  END

  VALUTA FR_TC_TOTRIV 15
  BEGIN
    KEY "totale rivalutazioni"
    PROMPT 109 1 ""
  END
  
  VALUTA FR_TC_VALINIES 15
  BEGIN
    KEY "valore inizio esercizio"
    PROMPT 132 1 ""
  END
  
  VALUTA FR_TC_RIVALES 15
  BEGIN
    KEY "rivalutazione esercizio"
    PROMPT 60 2 ""
  END
  
  VALUTA FR_TC_ACQINCR 15
  BEGIN
    KEY "acquisti/incrementi"
    PROMPT 81 2 ""
  END
  
  VALUTA FR_TC_CESSELIM2 15
  BEGIN
    KEY "cessioni/elimin. riga 2"
    PROMPT 107 2 ""
  END
  
  VALUTA FR_TC_VALBIL 15
  BEGIN
    KEY "valore a bilancio"
    PROMPT 130 2 ""
  END
  
  VALUTA FR_TC_FONDINIES 15
  BEGIN
    KEY "fondo inizio esercizio"
    PROMPT 58 3 ""
  END
  
  VALUTA FR_TC_INCR 15
  BEGIN
    KEY "incrementi"
    PROMPT 79 3 ""
  END
  
  VALUTA FR_TC_CESSELIM3 15
  BEGIN
    KEY "cessioni/elimin. riga 3"
    PROMPT 105 3 ""
  END
  
  VALUTA FR_TC_REINPLUS 15
  BEGIN
    KEY "reinvest. plusv."
    PROMPT 128 3 ""
  END
  
  VALUTA FR_TC_AMMNOR 15
  BEGIN
    KEY "ammortamento normale"
    PROMPT 31 4 ""
  END
  
  VALUTA FR_TC_AMMACC 15
  BEGIN
    KEY "ammortamento accelerato"
    PROMPT 56 4 ""
  END
  
  VALUTA FR_TC_AMMANT 15
  BEGIN
    KEY "ammortamento anticipato"
    PROMPT 77 4 ""
  END
  
  VALUTA FR_TC_FONDBIL 15
  BEGIN
    KEY "fondo a bilancio"
    PROMPT 103 4 ""
  END
  
  VALUTA FR_TC_RESBIL 15
  BEGIN
    KEY "residuo a bilancio"
    PROMPT 126 4 ""
  END
      
  STRINGA -1
  BEGIN
    KEY "riga"
    PROMPT 1 5 "---------------------------------------------------------------------------------------------------------------------------------------------------"
  END

END //section body odd
//-------------------------------------------------------------// 
//vero footer di pagina!//
SECTION FOOTER FIRST 4

  STRINGA -1
  BEGIN
    KEY "riga"
    PROMPT 1 1 "---------------------------------------------------------------------------------------------------------------------------------------------------"
  END

  STRINGA -1
  BEGIN
   KEY "Data"
   PROMPT 1 2 "Data Stampa "
   MESSAGE _TODAY
  END
  
  NUMERO -1 7
  BEGIN
   KEY "Nr. pagina"
   PROMPT  130 2 "Pagina n. "
   MESSAGE _PAGENO
  END

END // section footer last (footer pagina)

END // form