root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : 2.2 164

Browse Source 
Files correlati     : ve0.exe
Ricompilazione Demo : [ ]
Commento            :

Aggiunti deposito e magazzino a commesse e centri di cosito


git-svn-id: svn://10.65.10.50/trunk@13315 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2005-08-23 08:43:45 +00:00
parent 758ff5de03
commit 2cbd850658
11 changed files with 182 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
ca/ca0300.cpp
View File

@ -64,7 +64,7 @@ bool TConf_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
default: break;
}
return TRUE;
return true;
}
@ -109,12 +109,12 @@ TMask* TConf_Analitica::create_mask(const TFilename& f)
bool TConf_Analitica::preprocess_config (TMask& mask, TConfig& config)
{
return TRUE;
return true;
}
bool TConf_Analitica::postprocess_config (TMask& mask, TConfig& config)
{
return TRUE;
return true;
}
bool TConf_Analitica::user_create( )
@ -122,14 +122,14 @@ bool TConf_Analitica::user_create( )
TConfig_anal config;
config.set( "EdMask", "ca0300a");
return TRUE;
return true;
}
bool TConf_Analitica::user_destroy( )
{
if (_cm != NULL)
delete _cm;
return TRUE;
return true;
}
int ca0300(int argc, char* argv[])

30
ca/ca0500.cpp
View File

@ -8,13 +8,13 @@
////////////////////////////////////////////////////////////////////////
//MASCHERA
////////////////////////////////////////////////////////////////////////
class TCdc_anal_msk : public TSimple_anal_msk
class TCdC_anal_msk : public TSimple_anal_msk
{
protected:
virtual int get_logicnum() const { return LF_CDC; }
public:
TCdc_anal_msk() { read("ca0500a"); }
TCdC_anal_msk() { read("ca0500a"); }
};
////////////////////////////////////////////////////////////////////////
@ -23,15 +23,37 @@ public:
// applicazione per la gestione dei Centri di Costo
class TCdC_app : public TAnal_app
{
int _maxlev;
protected:
virtual TSimple_anal_msk* create_mask() const { return new TCdc_anal_msk; }
virtual void init_modify_mode(TMask& mask);
virtual void init_insert_mode(TMask& mask);
virtual TSimple_anal_msk* create_mask() const { return new TCdC_anal_msk; }
virtual bool user_create();
};
void TCdC_app::init_modify_mode(TMask& mask)
{
const short id = ((TCdC_anal_msk &)mask).get_field_id(_maxlev - 1, 1);
mask.enable(-1, mask.get(id).not_empty());
TAnal_app::init_modify_mode(mask);
}
void TCdC_app::init_insert_mode(TMask& mask)
{
const short id = ((TCdC_anal_msk &)mask).get_field_id(_maxlev - 1, 1);
mask.enable(-1, mask.get(id).not_empty());
TAnal_app::init_insert_mode(mask);
}
bool TCdC_app::user_create()
{
const TMultilevel_code_info& mci = ca_multilevel_code_info(LF_CDC);
if (mci.levels() <= 0)
_maxlev = mci.levels();
if (_maxlev <= 0)
return error_box(TR("I centri di costo non sono stati configurati"));
return TAnal_app::user_create();

5
ca/ca0500a.h
View File

@ -4,3 +4,8 @@
#define F_CDC_ADDETTI 202
#define F_CDC_GESTFASI 203
#define F_CDC_APPOGGIO 204
#define F_CDC_MAG 205
#define F_CDC_DESCMAG 206
#define H_CDC_MAG 207
#define F_CDC_DEP 208
#define F_CDC_DESCDEP 209

55
ca/ca0500a.uml
View File

@ -35,6 +35,61 @@ BEGIN
FIELD APPOGGIO
END
STRING F_CDC_MAG 3
BEGIN
FLAGS "U"
PROMPT 2 18 "Magazzino "
FIELD CODMAG[1,3]
USE MAG SELECT CODTAB[4,5]==""
INPUT CODTAB F_CDC_MAG
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_CDC_MAG CODTAB
OUTPUT F_CDC_DESCMAG S0
OUTPUT H_CDC_MAG B0
MESSAGE EMPTY CLEAR,F_CDC_DEP
MESSAGE ENABLE,F_CDC_DEP
CHECKTYPE NORMAL
GROUP 1
END
STRING F_CDC_DESCMAG 70 45
BEGIN
FLAGS "D"
PROMPT 32 18 ""
END
BOOL H_CDC_MAG
BEGIN
FLAGS "HG"
PROMPT 2 18 "divisione in dep"
MESSAGE FALSE CLEAR,F_CDC_DEP
MESSAGE TRUE ENABLE,F_CDC_DEP
END
STRING F_CDC_DEP 2
BEGIN
FLAGS "U"
PROMPT 2 19 "Deposito "
FIELD CODMAG[4,5]
USE MAG SELECT CODTAB[4,5]!=""
INPUT CODTAB[1,3] F_CDC_MAG SELECT
INPUT CODTAB[4,5] F_CDC_DEP
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_CDC_MAG CODTAB[1,3]
OUTPUT F_CDC_DEP CODTAB[4,5]
OUTPUT F_CDC_DESCDEP S0
GROUP 1
CHECKTYPE NORMAL
END
STRING F_CDC_DESCDEP 70 45
BEGIN
FLAGS "D"
PROMPT 32 19 ""
END
ENDPAGE
ENDMASK

24
ca/ca0600.cpp
View File

@ -23,15 +23,37 @@ public:
// applicazione per la gestione delle commesse
class TCms_app : public TAnal_app
{
int _maxlev;
protected:
virtual void init_modify_mode(TMask& mask);
virtual void init_insert_mode(TMask& mask);
virtual TSimple_anal_msk* create_mask() const { return new TCms_anal_msk; }
virtual bool user_create();
};
void TCms_app::init_modify_mode(TMask& mask)
{
const short id = ((TCms_anal_msk &)mask).get_field_id(_maxlev - 1 , 1);
mask.enable(-1, mask.get(id).not_empty());
TAnal_app::init_modify_mode(mask);
}
void TCms_app::init_insert_mode(TMask& mask)
{
const short id = ((TCms_anal_msk &)mask).get_field_id(_maxlev - 1, 1);
mask.enable(-1, mask.get(id).not_empty());
TAnal_app::init_insert_mode(mask);
}
bool TCms_app::user_create()
{
const TMultilevel_code_info& mci = ca_multilevel_code_info(LF_COMMESSE);
if (mci.levels() <= 0)
_maxlev = mci.levels();
if (_maxlev <= 0)
return error_box(TR("Le commesse non sono state configurate"));
return TAnal_app::user_create();

6
ca/ca0600a.h
View File

@ -54,3 +54,9 @@
#define F_CMS_DATACOLLP 250
#define F_CMS_DATAGAR 251
#define F_CMS_SALMIN 252
#define F_CMS_MAG 353
#define F_CMS_DESCMAG 354
#define H_CMS_MAG 355
#define F_CMS_DEP 356
#define F_CMS_DESCDEP 357

55
ca/ca0600a.uml
View File

@ -485,6 +485,61 @@ BEGIN
FIELD SALMIN
END
STRING F_CMS_MAG 3
BEGIN
FLAGS "U"
PROMPT 2 19 "Magazzino "
FIELD CODMAG[1,3]
USE MAG SELECT CODTAB[4,5]==""
INPUT CODTAB F_CMS_MAG
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_CMS_MAG CODTAB
OUTPUT F_CMS_DESCMAG S0
OUTPUT H_CMS_MAG B0
MESSAGE EMPTY CLEAR,F_CMS_DEP
MESSAGE SHOW,F_CMS_DEP
GROUP 1
CHECKTYPE NORMAL
END
STRING F_CMS_DESCMAG 70 40
BEGIN
FLAGS "D"
PROMPT 35 19 ""
END
BOOL H_CMS_MAG
BEGIN
FLAGS "HG"
PROMPT 2 19 "divisione in dep"
MESSAGE FALSE CLEAR,F_CMS_DEP
MESSAGE TRUE ENABLE,F_CMS_DEP
END
STRING F_CMS_DEP 2
BEGIN
FLAGS "U"
PROMPT 2 20 "Deposito "
FIELD CODMAG[4,5]
USE MAG SELECT CODTAB[4,5]!=""
INPUT CODTAB[1,3] F_CMS_MAG SELECT
INPUT CODTAB[4,5] F_CMS_DEP
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_CMS_MAG CODTAB[1,3]
OUTPUT F_CMS_DEP CODTAB[4,5]
OUTPUT F_CMS_DESCDEP S0
GROUP 1
CHECKTYPE NORMAL
END
STRING F_CMS_DESCDEP 70 40
BEGIN
FLAGS "D"
PROMPT 35 20 ""
END
ENDPAGE
ENDMASK

2
ca/f146.dir
View File

@ -1,3 +1,3 @@
146
0
$cdc|0|0|88|0|Archivio Centri di Costo|||
$cdc|0|0|93|0|Archivio Centri di Costo|||

3
ca/f146.trr
View File

@ -1,11 +1,12 @@
146
6
7
CODCOSTO|1|20|0|Codice Centro di Costo
DESCRIZ|1|50|0|Descrizione
DESCRAGG|11|10|0|Descrizione aggiuntiva
ADDETTI|1|5|0|Numero Addetti
GESTFASI|8|1|0|Gestione Fasi
APPOGGIO|8|1|0|Centro di costo di appoggio
CODMAG|1|5|0|Codice magazzino e deposito
2
CODCOSTO|
UPPER(DESCRIZ)|X

2
ca/f147.dir
View File

@ -1,3 +1,3 @@
147
0
$commesse|0|0|413|0|Archivio Commesse|||
$commesse|31|31|420|0|Archivio Commesse|||

5
ca/f147.trr
View File

@ -1,5 +1,5 @@
147
49
50
CODCMS|1|20|0|Codice Commessa
DESCRIZ|1|50|0|Descrizione
DESCRAGG|11|10|0|Descrizione aggiuntiva
@ -12,7 +12,7 @@ STATO|1|3|0|Stato
COM|1|4|0|Comune
CAP|1|5|0|CAP
CODCF|1|6|0|Codice cliente
REGIVA|1|0|0|Regime IVA (" "=Normale,NR=Non rilevante,ES=Esente,NI=Non imponibile,NS=Non Soggetta,FC=Fuori Campo)
REGIVA|1|2|0|Regime IVA (" "=Normale,NR=Non rilevante,ES=Esente,NI=Non imponibile,NS=Non Soggetta,FC=Fuori Campo)
PRORATA|8|1|0|Gestione Pro Rata
PUBBLICA|8|1|0|Pubblica
RENDIC|8|1|0|Da redicontare
@ -49,6 +49,7 @@ DATACOLL|5|8|0|Data collaudo
DATACOLLP|5|8|0|Data collaudo con proroga
DATAGAR|5|8|0|Periodo di gazanzia data
SALMIN|1|20|0|Modalità di fatturazione
CODMAG|1|5|0|Codice magazzino e deposito
2
CODCMS|
UPPER(DESCRIZ)|X