#include "ce4400a.h"

TOOLBAR "" 0 -3 0 2

BUTTON DLG_ELABORA 10 2
BEGIN    
  PROMPT -13 -11 "~Elabora"
  PICTURE BMP_ELABORA
  MESSAGE EXIT,K_ENTER
END

BUTTON DLG_CONFIG 10 2
BEGIN    
  PROMPT -23 -11 "~Configura"
  PICTURE BMP_CONFIG
  MESSAGE RUN,ce0,-3
END

BUTTON DLG_QUIT 10 2
BEGIN
  PROMPT -33 -11 ""
END

ENDPAGE

PAGE "Contabilizzazione cespiti" -1 -1 0 -3

GROUPBOX DLG_NULL 78 4
BEGIN
  PROMPT 1 0 ""
END

NUMBER F_DITTA 5
BEGIN
  PROMPT 2 1 "Ditta     "
  FLAGS "DF"
END

STRING F_RAGSOC 50
BEGIN
  PROMPT 26 1 ""
  USE LF_NDITTE
  INPUT CODDITTA F_DITTA
  OUTPUT F_RAGSOC RAGSOC
  CHECKTYPE NORMAL
  FLAGS "D"
END

NUMBER F_ESERCIZIO 4
BEGIN
  PROMPT 2 2 "Esercizio "
  FLAGS "Z"
  USE CCE
  JOIN ESC ALIAS 104 INTO CODTAB==CODTAB
  INPUT CODTAB F_ESERCIZIO
  DISPLAY "Codice esercizio" CODTAB
  DISPLAY "Inizio esercizio" 104@->D0
  DISPLAY "Fine esercizio" 104@->D1
  OUTPUT F_ESERCIZIO CODTAB
  OUTPUT F_INIZIO_ES 104@->D0
  OUTPUT F_FINE_ES 104@->D1
  CHECKTYPE REQUIRED
  FIELD CODES
END

DATE F_INIZIO_ES
BEGIN
  PROMPT 26 2 "Inizio "
  FLAGS "D"
END

DATE F_FINE_ES
BEGIN
  PROMPT 50 2 "Fine "
  FLAGS "D"
END

GROUPBOX DLG_NULL 78 5
BEGIN
  PROMPT 1 5 "@bParametri cespiti"
END

BOOLEAN F_PROVDEF
BEGIN
  PROMPT 2 6 "Trasferimento definitivo"
  MESSAGE FALSE ENABLE,F_DATACALC
  MESSAGE TRUE CLEAR,F_DATACALC
END

DATA F_DATACALC
BEGIN
  PROMPT 2 8 "Data calcolo ammortamenti "
  CHECKTYPE REQUIRED
END

GROUPBOX DLG_NULL 78 5
BEGIN
  PROMPT 1 10 "@bParametri contabilita'"
END

DATA F_DATAREG
BEGIN
  PROMPT 2 11 "Data registrazione        "
  FLAGS "A"
  CHECKTYPE REQUIRED
END

DATA F_DATACOMP
BEGIN
  PROMPT 2 12 "Data competenza           "
END

BOOLEAN F_KILLOLD
BEGIN
  PROMPT 2 13 "Eliminare i movimenti provvisori cespiti"
END

ENDPAGE

ENDMASK