campo-sirio/ce/cetbcce.uml

#include "cetbcce.h"

TOOLBAR "" 0 -4 0 4

BUTTON DLG_ATTIV 10 2
BEGIN
  PROMPT -16 -3 "~Attivit<69>"
END

#include <toolbar.h>

ENDPAGE

PAGE "Esercizi Cespiti" -1 -1 60 6

GROUPBOX DLG_NULL 76 4
BEGIN
  PROMPT 1 0 ""
  FLAGS "R"
END

NUMBER F_CODESER 4
BEGIN
  PROMPT 2 1 "Codice esercizio "
  FLAGS "Z"
  KEY 1
  FIELD CODTAB   
  USE ESC
  INPUT CODTAB F_CODESER
  DISPLAY "Codice esercizio" CODTAB 
  DISPLAY "Data inizio esercizio" D0
  DISPLAY "Data fine esercizio" D1
  OUTPUT F_CODESER CODTAB
  OUTPUT F_DATAINI D0
  OUTPUT F_DATAFINE D1
  CHECKTYPE FORCED
END


DATE F_DATAINI
BEGIN
  PROMPT 2 2 "Data inizio  "
  FLAGS "D"
END

DATE F_DATAFINE
BEGIN
  PROMPT 28 2 "Data fine "
  FLAGS "D"
END

LISTBOX F_TIPOCONTAB 1 12
BEGIN
  PROMPT 2 4 "Tipo Contabilita' "
  ITEM "1|Ordinaria"
  ITEM "2|Semplificata"
  FIELD I0
END

BOOLEAN F_DIT_PROF
BEGIN
  PROMPT 2 5 "Ditta relativa a professionista"
  FIELD B0  
END

BOOLEAN F_ESERCOST
BEGIN
  PROMPT 2 6 "Esercizio di costituzione"
  FIELD B1  
END

BOOLEAN F_RINV_AMM
BEGIN
  PROMPT 2 7 "Rinvio ammortamento a data conseguimento primi ricavi"
  FIELD B2  
END

BOOLEAN F_ES_ART14
BEGIN
  PROMPT 2 8 "Esercizio soggetto all'art. 14 c.2. Legge 449/97"
  FIELD B7
END

GROUPBOX DLG_NULL 76 7
BEGIN
  PROMPT 1 10 "@BParametri di calcolo"
  FLAGS "R"
END

LISTBOX F_TIPO_ARR 1 12
BEGIN
  PROMPT 2 11 "Tipo arrotondamento "
  ITEM "/|al centesimo"
  ITEM "+|per eccesso"
  ITEM "-|per difetto"
  FIELD S6
END

LISTBOX F_TIPO_RIP 1 8
BEGIN
  PROMPT 40 11 "Tipo riproporzionamento "
  ITEM "2|a giorni"
  ITEM "1|a mesi"
  FIELD I1
END

BOOLEAN F_AMM_VEND
BEGIN
  PROMPT 2 12 "Ammortamento anche parti vendute"
  FIELD B3
END

BOOLEAN F_RAGGUAGLIO
BEGIN
  PROMPT 2 13 "Ragguaglio al periodo di possesso degli ammortamenti sulle parti vendute"
  FIELD B4
END

BOOLEAN F_ESPOSIZIONE
BEGIN
  PROMPT 2 14 "Esposizione fondi per ammortamenti diretti su LIBRO CESPITI"
  FIELD B5
END

NUMBER F_DURATA 3
BEGIN
  PROMPT 2 15 "Giorni di durata esercizio "
  FLAGS "DG"
  FIELD I3
END

NUMBER F_COEFF_DURATA 11 9
BEGIN
  PROMPT 41 15 "Coefficiente di durata "
  FLAGS "DG"        
  FIELD S5
END
ENDPAGE
END
ENDPAGE
ENDMASK