#include "ca3883a.h"

TOOLBAR "topbar" 0 0 0 2
#include <printbar.h>
ENDPAGE

PAGE "Stampa bilancio commessa" 0 0 0 2

GROUPBOX DLG_NULL 76 4
BEGIN
  PROMPT 0 1 ""
END

NUMBER F_ESERCIZIO 4
BEGIN
  PROMPT 1 2 "Esercizio "
  FLAGS "AZ"
  USE ESC
  INPUT CODTAB F_ESERCIZIO
  DISPLAY "Codice esercizio" CODTAB
  DISPLAY "Inizio esercizio" D0
  DISPLAY "Fine esercizio" D1
  OUTPUT F_ESERCIZIO CODTAB
  OUTPUT F_INIZIO_ES D0
  CHECKTYPE REQUIRED
END

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

DATE F_FINE_ES
BEGIN
  PROMPT 44 2 "Fine "
END

BOOLEAN F_VITAINTERA
BEGIN
  PROMPT 1 3 "Inclusi esercizi successivi (vita intera)"
  MESSAGE FALSE ENABLE,F_FINE_ES
  MESSAGE TRUE CLEAR,F_FINE_ES
END

DATE F_DATASTAMPA
BEGIN
  PROMPT 2 5 "Data stampa "
  FLAGS "A"
END

GROUPBOX DLG_NULL 76 8
BEGIN
  PROMPT 0 6 "@bParametri"
END

LISTBOX F_TIPOSTAMPA 1 30
BEGIN
  PROMPT 1 7 "Stampa "
  ITEM "0|Normale"
	MESSAGE CLEAR,F_FASE|CLEAR,F_CDC
  ITEM "1|Dettaglia per Fase"
	MESSAGE ENABLE,F_FASE|CLEAR,F_CDC
  ITEM "2|Dettaglia per CdC"
	MESSAGE CLEAR,F_FASE|ENABLE,F_CDC
  ITEM "3|Dettaglia per Fase e CdC"
	MESSAGE ENABLE,F_FASE|ENABLE,F_CDC
  ITEM "4|Riassuntiva per Fase"
	MESSAGE CLEAR,F_FASE|CLEAR,F_CDC
  ITEM "8|Riassuntiva per CdC"
	MESSAGE CLEAR,F_FASE|CLEAR,F_CDC
END

STRING F_FASE 10
BEGIN
  PROMPT 2 8 "Fase  "
END

STRING F_CDC 20
BEGIN
  PROMPT 2 9 "CdC   "
  USE LF_CDC
  INPUT CODCOSTO F_CDC
  DISPLAY "Codice centro di costo" CODCOSTO
  DISPLAY "Descrizione@50" DESCRIZ
  OUTPUT F_CDC CODCOSTO
END

RADIOBUTTON F_TIPOSTIMA 1 30
BEGIN
  PROMPT 45 9 "Tipo di stima   Costi\Ricavi"
  ITEM "T|C prev.\R prev. (Tempo)"
  MESSAGE SHOW,F_TIPODETR|ENABLE,F_TIPODETR
  ITEM "C|C cons.\R prev."
  MESSAGE CLEAR,F_TIPODETR|HIDE,F_TIPODETR
  ITEM "R|C cons.\R cons."
  MESSAGE CLEAR,F_TIPODETR|HIDE,F_TIPODETR
END

BOOLEAN F_TIPODETR
BEGIN
  PROMPT 1 10 "Utilizzare consuntivi per le detrazioni "
END

GROUPBOX F_PRE0 76 5
BEGIN
  PROMPT 0 14 "@bPrefisso del piano dei conti analitico:"
  GROUP 6
END

LISTBOX F_DEPTH 1 20
BEGIN
  PROMPT 1 19 "Profondita' del piano dei conti da considerare "
  ITEM "1|Gruppo"
  ITEM "2|Conto"
END

STRING F_REPORT 256 64
BEGIN
  PROMPT 1 20 "Report "
  FLAGS "B"
END

STRING DLG_PROFILE 50
BEGIN
  PROMPT 1 -1 "Profilo "
  PSELECT
END

ENDPAGE

ENDMASK