campo-sirio/ca/ca0300a.uml

#include "ca0300a.h"

TOOLBAR "" 0 20 0 2

BUTTON DLG_OK 10 2
BEGIN
	PROMPT -12 -1 ""
END

BUTTON DLG_QUIT 10 2
BEGIN
	PROMPT -22 -1 ""
END

ENDPAGE

PAGE "Pagina 1" -1 -1 78 10

GROUPBOX DLG_NULL 78 7
BEGIN
  PROMPT 1 1 "@bLivelli generali"
END

DATE F_DATAATTCA 
BEGIN
   PROMPT 2 2 "Data attivazione "
   FIELD DtAttCa
END

LIST F_LEVEL_1 3 15
BEGIN
  PROMPT 2 3 "Primo livello    "
  ITEM "CDC|Centro di Costo"
  ITEM "CMS|Commessa"
  FIELD Level(1)
END

LIST F_LEVEL_2 3 15
BEGIN
  PROMPT 2 4 "Secondo livello  "
  ITEM "   |Nessuno"
  ITEM "CDC|Centro di Costo"
  ITEM "CMS|Commessa"
  FIELD Level(2)
END

BOOLEAN F_ATTIVA_FASI
BEGIN
  PROMPT 2 5 "Utilizza le fasi "
  MESSAGE FALSE CLEAR,F_FATHER_FASI
  MESSAGE TRUE ENABLE,F_FATHER_FASI
  FIELD AttFasi
END

LIST F_FATHER_FASI 3 15
BEGIN
  PROMPT 2 6 "Liv. sup. fase   "
  ITEM "   |Nessuno"
  ITEM "CDC|Centro di Costo"
  ITEM "CMS|Commessa"
  FIELD FathFasi
END

GROUPBOX DLG_NULL 78 7
BEGIN
  PROMPT 1 8 "@bCentro di costo"
END

TEXT -1
BEGIN
  PROMPT 4 9 "Formato codice"
END

TEXT -1
BEGIN
  PROMPT 27 9 "Descrizione"
END

STRING F_CDC_1 20
BEGIN
  PROMPT 2 10 "1 "
  MESSAGE EMPTY CLEAR,F_CDC_2|CLEAR,F_DESCDC_2|K_TAB,F_CDC_2|RESET,F_DESCDC_1
  MESSAGE ENABLE,F_CDC_2|ENABLE,F_DESCDC_2
  FIELD CdC(1)
END

STRING F_DESCDC_1 50
BEGIN
  PROMPT 27 10 ""
  FIELD CdCDes(1)
END

STRING F_CDC_2 20
BEGIN
  PROMPT 2 11 "2 "
  MESSAGE EMPTY CLEAR,F_CDC_3|CLEAR,F_DESCDC_3|K_TAB,F_CDC_3|RESET,F_DESCDC_2
  MESSAGE ENABLE,F_CDC_3|ENABLE,F_DESCDC_3
  FLAGS "G"
  FIELD CdC(2)
END

STRING F_DESCDC_2 50
BEGIN
  PROMPT 27 11 ""
  FIELD CdCDes(2)
END

STRING F_CDC_3 20
BEGIN
  PROMPT 2 12 "3 "
  MESSAGE EMPTY CLEAR,F_CDC_4|CLEAR,F_DESCDC_4|K_TAB,F_CDC_4|RESET,F_DESCDC_3
  MESSAGE ENABLE,F_CDC_4|ENABLE,F_DESCDC_4
  FLAGS "G"
  FIELD CdC(3)
END

STRING F_DESCDC_3 50
BEGIN
  PROMPT 27 12 ""
  FIELD CdCDes(3)
END

STRING F_CDC_4 20
BEGIN
  PROMPT 2 13 "4 "
  MESSAGE EMPTY RESET,F_DESCDC_4
  FLAGS "G"
  FIELD CdC(4)
END

STRING F_DESCDC_4 50
BEGIN
  PROMPT 27 13 ""
  FIELD CdCDes(4)
END

GROUPBOX DLG_NULL 78 7
BEGIN
  PROMPT 1 15 "@bCommessa"
END

TEXT -1
BEGIN
  PROMPT 4 16 "Formato codice"
END

TEXT -1
BEGIN
  PROMPT 27 16 "Descrizione"
END

STRING F_CMS_1 20
BEGIN
  PROMPT 2 17 "1 "
  MESSAGE EMPTY CLEAR,F_CMS_2|CLEAR,F_DESCMS_2|K_TAB,F_CMS_2|RESET,F_DESCMS_1
  MESSAGE ENABLE,F_CMS_2|ENABLE,F_DESCMS_2
  FIELD Cms(1)
END

STRING F_DESCMS_1 50
BEGIN
  PROMPT 27 17 ""
  FIELD CmsDes(1)
END

STRING F_CMS_2 20
BEGIN
  PROMPT 2 18 "2 "
  MESSAGE EMPTY CLEAR,F_CMS_3|CLEAR,F_DESCMS_3|K_TAB,F_CMS_3|RESET,F_DESCMS_2
  MESSAGE ENABLE,F_CMS_3|ENABLE,F_DESCMS_3
  FLAGS "G"
  FIELD Cms(2)
END

STRING F_DESCMS_2 50
BEGIN
  PROMPT 27 18 ""
  FIELD CmsDes(2)
END

STRING F_CMS_3 20
BEGIN
  PROMPT 2 19 "3 "
  MESSAGE EMPTY CLEAR,F_CMS_4|CLEAR,F_DESCMS_4|K_TAB,F_CMS_4|RESET,F_DESCMS_3
  MESSAGE ENABLE,F_CMS_4|ENABLE,F_DESCMS_4
  FLAGS "G"
  FIELD Cms(3)
END

STRING F_DESCMS_3 50
BEGIN
  PROMPT 27 19 ""
  FIELD CmsDes(3)
END

STRING F_CMS_4 20
BEGIN
  PROMPT 2 20 "4 "
  MESSAGE EMPTY RESET,F_DESCMS_4
  FLAGS "G"
  FIELD Cms(4)
END

STRING F_DESCMS_4 50
BEGIN
  PROMPT 27 20 ""
  FIELD CmsDes(4)
END

ENDPAGE

PAGE "Pagina 2" -1 -1 78 10

GROUPBOX DLG_NULL 78 7
BEGIN
  PROMPT 1 1 "@bFase"
END

TEXT -1
BEGIN
  PROMPT 4 2 "Formato codice"
END

TEXT -1
BEGIN
  PROMPT 17 2 "Descrizione"
END

STRING F_FASE_1 10
BEGIN
  PROMPT 2 3 "1 "
  MESSAGE EMPTY CLEAR,F_FASE_2|CLEAR,F_DESFASE_2|K_TAB,F_FASE_2|RESET,F_DESFASE_1
  MESSAGE ENABLE,F_FASE_2|ENABLE,F_DESFASE_2
  FIELD Cfs(1)
END

STRING F_DESFASE_1 50
BEGIN
  PROMPT 17 3 ""
  FIELD CfsDes(1)
END

STRING F_FASE_2 10
BEGIN
  PROMPT 2 4 "2 "
  MESSAGE EMPTY CLEAR,F_FASE_3|CLEAR,F_DESFASE_3|K_TAB,F_FASE_3|RESET,F_DESFASE_2
  MESSAGE ENABLE,F_FASE_3|ENABLE,F_DESFASE_3
  FLAGS "G"
  FIELD Cfs(2)
END

STRING F_DESFASE_2 50
BEGIN
  PROMPT 17 4 ""
  FIELD CfsDes(2)
END

STRING F_FASE_3 10
BEGIN
  PROMPT 2 5 "3 "
  MESSAGE EMPTY CLEAR,F_FASE_4|CLEAR,F_DESFASE_4|K_TAB,F_FASE_4|RESET,F_DESFASE_3
  MESSAGE ENABLE,F_FASE_4|ENABLE,F_DESFASE_4
  FLAGS "G"
  FIELD Cfs(3)
END

STRING F_DESFASE_3 50
BEGIN
  PROMPT 17 5 ""
  FIELD CfsDes(3)
END

STRING F_FASE_4 10
BEGIN
  PROMPT 2 6 "4 "
  MESSAGE EMPTY RESET,F_DESFASE_4
  FLAGS "G"
  FIELD Cfs(4)
END

STRING F_DESFASE_4 50
BEGIN
  PROMPT 17 6 ""
  FIELD CfsDes(4)
END

GROUPBOX DLG_NULL 78 8
BEGIN
  PROMPT 1 8 "@bPiano dei conti industriale"
END

BOOLEAN F_USE_PDCC
BEGIN
  PROMPT 2 9 "Utilizza il piano dei conti contabile"
  MESSAGE TRUE CLEAR,F_PDCI_1|CLEAR,F_DESPDCI_1
  MESSAGE FALSE ENABLE,F_PDCI_1|ENABLE,F_DESPDCI_1
  FIELD UsePdcc
END

TEXT -1
BEGIN
  PROMPT 4 10 "Formato codice"
END

TEXT -1
BEGIN
  PROMPT 27 10 "Descrizione"
END

STRING F_PDCI_1 20
BEGIN
  PROMPT 2 11 "1 "
  MESSAGE EMPTY CLEAR,F_PDCI_2|CLEAR,F_DESPDCI_2|K_TAB,F_PDCI_2|RESET,F_DESPDCI_1
  MESSAGE ENABLE,F_PDCI_2|ENABLE,F_DESPDCI_2
  FIELD Pdci(1)
END

STRING F_DESPDCI_1 50
BEGIN
  PROMPT 27 11 ""
  FIELD PdciDes(1)
END

STRING F_PDCI_2 20
BEGIN
  PROMPT 2 12 "2 "
  MESSAGE EMPTY CLEAR,F_PDCI_3|CLEAR,F_DESPDCI_3|K_TAB,F_PDCI_3|RESET,F_DESPDCI_2
  MESSAGE ENABLE,F_PDCI_3|ENABLE,F_DESPDCI_3
  FLAGS "G"
  FIELD Pdci(2)
END

STRING F_DESPDCI_2 50
BEGIN
  PROMPT 27 12 ""
  FIELD PdciDes(2)
END

STRING F_PDCI_3 20
BEGIN
  PROMPT 2 13 "3 "
  MESSAGE EMPTY CLEAR,F_PDCI_4|CLEAR,F_DESPDCI_4|K_TAB,F_PDCI_4|RESET,F_DESPDCI_3
  MESSAGE ENABLE,F_PDCI_4|ENABLE,F_DESPDCI_4
  FLAGS "G"
  FIELD Pdci(3)
END

STRING F_DESPDCI_3 50
BEGIN
  PROMPT 27 13 ""
  FIELD PdciDes(3)
END

STRING F_PDCI_4 20
BEGIN
  PROMPT 2 14 "4 "
  MESSAGE EMPTY RESET,F_DESPDCI_4
  FLAGS "G"
  FIELD Pdci(4)
END

STRING F_DESPDCI_4 50
BEGIN
  PROMPT 27 14 ""
  FIELD PdciDes(4)
END

ENDPAGE

ENDMASK