campo-sirio/ca/ca0300a.uml
guy 1cf194aed9 Patch level : 2.2.
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
Aggiunto recordset per gestire "trasparentemente" i piani dei conti contabile o analitico.
Potenziato calcolo saldi per gestire anche i livelli intermedi dei conti e
soprattutto gestire la riclassificazione dei conti analitici tramite la tabella panapdc
Potenziato il generatore di movimenti casuale per gestire anche il piano dei conti contabile
nonche' la generazione automatica della tabela panapdc.


git-svn-id: svn://10.65.10.50/trunk@13265 c028cbd2-c16b-5b4b-a496-9718f37d4682
2005-07-07 17:05:02 +00:00

409 lines
6.2 KiB
Plaintext
Executable File

#include "ca0300a.h"
TOOLBAR "" 0 -2 0 2
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -11 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -11 ""
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
ENDPAGE
PAGE "Pagina 2" -1 -1 78 10
GROUPBOX DLG_NULL 78 8
BEGIN
PROMPT 1 1 "@bCentro di costo"
END
TEXT -1
BEGIN
PROMPT 4 2 "Formato codice"
END
TEXT -1
BEGIN
PROMPT 27 2 "Descrizione"
END
STRING F_CDC_1 20
BEGIN
PROMPT 2 3 "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 3 ""
FIELD CdCDes(1)
END
STRING F_CDC_2 20
BEGIN
PROMPT 2 4 "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 4 ""
FIELD CdCDes(2)
END
STRING F_CDC_3 20
BEGIN
PROMPT 2 5 "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 5 ""
FIELD CdCDes(3)
END
STRING F_CDC_4 20
BEGIN
PROMPT 2 6 "4 "
MESSAGE EMPTY RESET,F_DESCDC_4
FLAGS "G"
FIELD CdC(4)
END
STRING F_DESCDC_4 50
BEGIN
PROMPT 27 6 ""
FIELD CdCDes(4)
END
BOOLEAN F_CDCREQ
BEGIN
PROMPT 2 7 "Obbligatorio nelle righe dei movimenti"
FIELD CdcRequired
END
GROUPBOX DLG_NULL 78 8
BEGIN
PROMPT 1 9 "@bCommessa"
END
TEXT -1
BEGIN
PROMPT 4 10 "Formato codice"
END
TEXT -1
BEGIN
PROMPT 27 10 "Descrizione"
END
STRING F_CMS_1 20
BEGIN
PROMPT 2 11 "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 11 ""
FIELD CmsDes(1)
END
STRING F_CMS_2 20
BEGIN
PROMPT 2 12 "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 12 ""
FIELD CmsDes(2)
END
STRING F_CMS_3 20
BEGIN
PROMPT 2 13 "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 13 ""
FIELD CmsDes(3)
END
STRING F_CMS_4 20
BEGIN
PROMPT 2 14 "4 "
MESSAGE EMPTY RESET,F_DESCMS_4
FLAGS "G"
FIELD Cms(4)
END
STRING F_DESCMS_4 50
BEGIN
PROMPT 27 14 ""
FIELD CmsDes(4)
END
BOOLEAN F_CMSREQ
BEGIN
PROMPT 2 15 "Obbligatorio nelle righe dei movimenti"
FIELD CmsRequired
END
ENDPAGE
PAGE "Pagina 3" -1 -1 78 10
GROUPBOX DLG_NULL 78 8
BEGIN
PROMPT 1 1 "@bFase"
END
TEXT -1
BEGIN
PROMPT 4 2 "Formato codice"
END
TEXT -1
BEGIN
PROMPT 21 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 Fsc(1)
END
STRING F_DESFASE_1 50
BEGIN
PROMPT 21 3 ""
FIELD FscDes(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 Fsc(2)
END
STRING F_DESFASE_2 50
BEGIN
PROMPT 21 4 ""
FIELD FscDes(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 Fsc(3)
END
STRING F_DESFASE_3 50
BEGIN
PROMPT 21 5 ""
FIELD FscDes(3)
END
STRING F_FASE_4 10
BEGIN
PROMPT 2 6 "4 "
MESSAGE EMPTY RESET,F_DESFASE_4
FLAGS "G"
FIELD Fsc(4)
END
STRING F_DESFASE_4 50
BEGIN
PROMPT 21 6 ""
FIELD FscDes(4)
END
BOOLEAN F_FSCREQ
BEGIN
PROMPT 2 7 "Obbligatorio nelle righe dei movimenti"
FIELD FscRequired
END
GROUPBOX DLG_NULL 78 9
BEGIN
PROMPT 1 10 "@bPiano dei conti industriale"
END
BOOLEAN F_USE_PDCC
BEGIN
PROMPT 2 11 "Utilizza il piano dei conti contabile"
FIELD UsePdcc
MESSAGE FALSE HIDE,F_PREFIX
MESSAGE TRUE SHOW,F_PREFIX
END
LIST F_PREFIX 1 10
BEGIN
PROMPT 54 11 "Prefisso "
ITEM "0|Nessuno"
ITEM "1|Livello 1"
ITEM "2|Livello 2"
ITEM "3|Livello 3"
FIELD PdcPrefix
END
TEXT -1
BEGIN
PROMPT 4 12 "Formato codice"
GROUP 5
END
TEXT -1
BEGIN
PROMPT 27 12 "Descrizione"
END
STRING F_PDCI_1 20
BEGIN
PROMPT 2 13 "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 13 ""
FIELD PdciDes(1)
END
STRING F_PDCI_2 20
BEGIN
PROMPT 2 14 "2 "
MESSAGE EMPTY CLEAR,F_PDCI_3|CLEAR,F_DESPDCI_3|K_TAB,F_PDCI_3|RESET,F_DESPDCI_2|CLEAR,F_PREFIX
MESSAGE ENABLE,F_PDCI_3|ENABLE,F_DESPDCI_3|ENABLE,F_PREFIX
FLAGS "G"
FIELD Pdci(2)
END
STRING F_DESPDCI_2 50
BEGIN
PROMPT 27 14 ""
FIELD PdciDes(2)
END
STRING F_PDCI_3 20
BEGIN
PROMPT 2 15 "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 15 ""
FIELD PdciDes(3)
END
STRING F_PDCI_4 20
BEGIN
PROMPT 2 16 "4 "
MESSAGE EMPTY RESET,F_DESPDCI_4
FLAGS "G"
FIELD Pdci(4)
END
STRING F_DESPDCI_4 50
BEGIN
PROMPT 27 16 ""
FIELD PdciDes(4)
END
BOOLEAN F_PDCREQ
BEGIN
PROMPT 2 17 "Obbligatorio nelle righe dei movimenti"
FIELD PdciRequired
END
ENDPAGE
ENDMASK