Patch level :2.2 nopatch
Files correlati : Ricompilazione Demo : [ ] Commento : modifiche alle maschere di files e tabelle git-svn-id: svn://10.65.10.50/trunk@12554 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca
parent
163fab4d7d
commit
717c62fcf5
@ -3,8 +3,21 @@
|
||||
#include <modaut.h>
|
||||
#include <tabapp.h>
|
||||
|
||||
#include "calib01.h"
|
||||
|
||||
//identificatori dei campi automatici delle maschere (messi qui per evitare di ripeterli nel .h
|
||||
//di ogni maschera)
|
||||
#define F_KEY1 101
|
||||
#define F_KEY2 102
|
||||
#define F_KEY3 103
|
||||
#define F_KEY4 104
|
||||
#define F_DES1 111
|
||||
#define F_DES2 112
|
||||
#define F_DES3 113
|
||||
#define F_DES4 114
|
||||
|
||||
////////////////////////////////////////////////////////////////////////
|
||||
//MASCHERA
|
||||
//MASCHERA GENERICA DI TABELLA NON GERARCHICA
|
||||
////////////////////////////////////////////////////////////////////////
|
||||
// maschere delle tabelle di Contabilita' Analitica
|
||||
class TMask_tabca : public TAutomask
|
||||
@ -37,6 +50,49 @@ bool TMask_tabca::on_field_event(TOperable_field& o, TField_event e, long jolly)
|
||||
}
|
||||
|
||||
|
||||
////////////////////////////////////////////////////////////////////////
|
||||
//MASCHERA GENERICA DI TABELLA GERARCHICA (attualmente usata per tutte le tabelle catbxxx)
|
||||
////////////////////////////////////////////////////////////////////////
|
||||
class TMask_tabanal : public TSimple_anal_msk
|
||||
{
|
||||
const char* _codtab;
|
||||
const char* _keyvar;
|
||||
const char* _desvar;
|
||||
|
||||
protected:
|
||||
virtual int get_logicnum() const { return LF_TAB; }
|
||||
virtual const char* get_tabname() const {return _codtab; }
|
||||
virtual const char* get_key_var() const { return _keyvar; }
|
||||
virtual const char* get_des_var() const { return _desvar; }
|
||||
virtual short get_field_id(int n, int k) const;
|
||||
|
||||
public:
|
||||
TMask_tabanal(const char* c, const char* k, const char* d);
|
||||
};
|
||||
|
||||
short TMask_tabanal::get_field_id(int n, int k) const
|
||||
{
|
||||
const int tot = fieldrefs(1);
|
||||
short id = 0;
|
||||
if (n >= 0 && n < tot)
|
||||
{
|
||||
if (k == 2)
|
||||
id = F_DES1+n;
|
||||
else
|
||||
id = F_KEY1+n;
|
||||
}
|
||||
return id;
|
||||
}
|
||||
|
||||
|
||||
TMask_tabanal::TMask_tabanal(const char* c, const char* k, const char* d)
|
||||
: _codtab(c),_keyvar(k),_desvar(d)
|
||||
{
|
||||
TString16 maskname;
|
||||
maskname << "catb" << c;
|
||||
read(maskname);
|
||||
}
|
||||
|
||||
////////////////////////////////////////////////////////////////////////
|
||||
//APPLICAZIONE
|
||||
////////////////////////////////////////////////////////////////////////
|
||||
@ -68,10 +124,20 @@ TMask * Tab_app_ca::set_mask(TMask * _m)
|
||||
{
|
||||
if (_m != NULL)
|
||||
return Tab_application::set_mask(_m);
|
||||
else {
|
||||
TFixed_string tabname(get_tabname());
|
||||
else
|
||||
{
|
||||
const TFixed_string tabname(get_tabname());
|
||||
TString maskname;
|
||||
return Tab_application::set_mask(new TMask_tabca((const char *)get_mask_name(maskname),tabname));
|
||||
TMask * m = NULL;
|
||||
if (tabname == "CDC")
|
||||
m = new TMask_tabanal("CDC", "CdC", "CdCDes"); else
|
||||
if (tabname == "CMS")
|
||||
m = new TMask_tabanal("CDC", "Cms", "CmsDes"); else
|
||||
if (tabname == "FSC")
|
||||
m = new TMask_tabanal("FSC", "Fsc", "FscDes");
|
||||
else
|
||||
m = new TMask_tabca((const char *)get_mask_name(maskname),tabname);
|
||||
return Tab_application::set_mask(m);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
10
ca/ca0201a.h
Executable file
10
ca/ca0201a.h
Executable file
@ -0,0 +1,10 @@
|
||||
//id campi maschera catbcdc (tabella centri di costo)
|
||||
|
||||
|
||||
|
||||
//campi normali
|
||||
#define F_CDC_DESCRIZ 201
|
||||
#define F_CDC_DESCRAGG 202
|
||||
#define F_CDC_ADDETTI 203
|
||||
#define F_CDC_GESTFASI 204
|
||||
#define F_CDC_APPOGGIO 205
|
||||
@ -1,6 +1,6 @@
|
||||
#include "catbcdc.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
TOOLBAR "" 0 -2 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
@ -11,31 +11,31 @@ BEGIN
|
||||
PROMPT 1 0 "@bCodici"
|
||||
END
|
||||
|
||||
STRING F_DESCRIZ 50
|
||||
STRING F_CDC_DESCRIZ 50
|
||||
BEGIN
|
||||
PROMPT 2 7 "Descrizione "
|
||||
FIELD DESCRIZ
|
||||
END
|
||||
|
||||
MEMO F_DESCRAGG 78 6
|
||||
MEMO F_CDC_DESCRAGG 78 6
|
||||
BEGIN
|
||||
PROMPT 2 8 "Descrizione aggiuntiva"
|
||||
FIELD DESCRAGG
|
||||
END
|
||||
|
||||
STRING F_ADDETTI 5
|
||||
STRING F_CDC_ADDETTI 5
|
||||
BEGIN
|
||||
PROMPT 2 15 "Addetti "
|
||||
FIELD ADDETTI
|
||||
END
|
||||
|
||||
BOOLEAN F_GESTFASI
|
||||
BOOLEAN F_CDC_GESTFASI
|
||||
BEGIN
|
||||
PROMPT 2 16 "Gestione fasi"
|
||||
FIELD GESTFASI
|
||||
END
|
||||
|
||||
BOOLEAN F_APPOGGIO
|
||||
BOOLEAN F_CDC_APPOGGIO
|
||||
BEGIN
|
||||
PROMPT 2 17 "Centro di costo di appoggio"
|
||||
FIELD APPOGGIO
|
||||
50
ca/ca0202a.h
Executable file
50
ca/ca0202a.h
Executable file
@ -0,0 +1,50 @@
|
||||
//id campi maschera catbcms (tabella commesse)
|
||||
//campi normali
|
||||
#define F_CMS_DESCRIZ 201
|
||||
#define F_CMS_DESCRAGG 202
|
||||
#define F_CMS_ANNO 203
|
||||
#define F_CMS_LOCDIV 204
|
||||
#define F_CMS_INDIR 205
|
||||
#define F_CMS_CIV 206
|
||||
#define F_CMS_LOC 207
|
||||
#define F_CMS_STATO 208
|
||||
#define F_CMS_COM 209
|
||||
#define F_CMS_CAP 210
|
||||
#define F_CMS_CODCF 211
|
||||
#define F_CMS_REGIVA 212
|
||||
#define F_CMS_PRORATA 213
|
||||
#define F_CMS_PUBBLICA 214
|
||||
#define F_CMS_RENDIC 215
|
||||
#define F_CMS_DATAINIZIO 216
|
||||
#define F_CMS_DATAFINE 217
|
||||
#define F_CMS_AVANZ 218
|
||||
#define F_CMS_CHIUSA 219
|
||||
#define F_CMS_PROROGA 220
|
||||
#define F_CMS_DATAPROR 221
|
||||
#define F_CMS_CODRESP 222
|
||||
#define F_CMS_CODTIPO 223
|
||||
#define F_CMS_CODTIPCM 224
|
||||
#define F_CMS_GESTFASI 225
|
||||
#define F_CMS_RIFER 226
|
||||
#define F_CMS_DATAPREV 227
|
||||
#define F_CMS_PROVVP 228
|
||||
#define F_CMS_ANNOP 229
|
||||
#define F_CMS_CODNUMP 230
|
||||
#define F_CMS_NDOCP 231
|
||||
#define F_CMS_APPOGGIO 232
|
||||
#define F_CMS_CONTRATTO 233
|
||||
#define F_CMS_ANNOC 234
|
||||
#define F_CMS_NROCONT 235
|
||||
#define F_CMS_DATAGARA 236
|
||||
#define F_CMS_IMPORTOB 237
|
||||
#define F_CMS_RIBASSO 238
|
||||
#define F_CMS_AUMENTO 239
|
||||
#define F_CMS_GARANZIA 240
|
||||
#define F_CMS_ANTICIPO 241
|
||||
#define F_CMS_DATAANTIC 242
|
||||
#define F_CMS_DATAULT 243
|
||||
#define F_CMS_DATAULTP 244
|
||||
#define F_CMS_DATACOLL 245
|
||||
#define F_CMS_DATACOLLP 246
|
||||
#define F_CMS_DATAGAR 247
|
||||
#define F_CMS_SALMIN 248
|
||||
@ -1,6 +1,6 @@
|
||||
#include "catbcms.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
TOOLBAR "" 0 -2 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
@ -11,25 +11,25 @@ BEGIN
|
||||
PROMPT 1 0 "@bCodici"
|
||||
END
|
||||
|
||||
STRING F_DESCRIZ 50
|
||||
STRING F_CMS_DESCRIZ 50
|
||||
BEGIN
|
||||
PROMPT 2 7 "Descrizione "
|
||||
FIELD DESCRIZ
|
||||
END
|
||||
|
||||
MEMO F_DESCRAGG 78 5
|
||||
MEMO F_CMS_DESCRAGG 78 5
|
||||
BEGIN
|
||||
PROMPT 2 8 "Descrizione aggiuntiva"
|
||||
FIELD DESCRAGG
|
||||
END
|
||||
|
||||
STRING F_ANNO 4
|
||||
STRING F_CMS_ANNO 4
|
||||
BEGIN
|
||||
PROMPT 2 14 "Anno "
|
||||
FIELD ANNO
|
||||
END
|
||||
|
||||
BOOLEAN F_LOCDIV
|
||||
BOOLEAN F_CMS_LOCDIV
|
||||
BEGIN
|
||||
PROMPT 2 15 "Commessa in località diversa"
|
||||
FIELD LOCDIV
|
||||
@ -40,37 +40,37 @@ BEGIN
|
||||
PROMPT 1 16 "@bLocazione"
|
||||
END
|
||||
|
||||
STRING F_INDIR 35
|
||||
STRING F_CMS_INDIR 35
|
||||
BEGIN
|
||||
PROMPT 2 17 "Indirizzo "
|
||||
FIELD INDIR
|
||||
END
|
||||
|
||||
STRING F_CIV 10
|
||||
STRING F_CMS_CIV 10
|
||||
BEGIN
|
||||
PROMPT 50 17 "N. "
|
||||
FIELD CIV
|
||||
END
|
||||
|
||||
STRING F_LOC 35
|
||||
STRING F_CMS_LOC 35
|
||||
BEGIN
|
||||
PROMPT 2 18 "Localita' "
|
||||
FIELD LOC
|
||||
END
|
||||
|
||||
STRING F_COM 4
|
||||
STRING F_CMS_COM 4
|
||||
BEGIN
|
||||
PROMPT 2 19 "Comune "
|
||||
FIELD COM
|
||||
END
|
||||
|
||||
STRING F_CAP 5
|
||||
STRING F_CMS_CAP 5
|
||||
BEGIN
|
||||
PROMPT 2 20 "CAP "
|
||||
FIELD CAP
|
||||
END
|
||||
|
||||
STRING F_STATO 3
|
||||
STRING F_CMS_STATO 3
|
||||
BEGIN
|
||||
PROMPT 2 21 "Stato "
|
||||
FIELD STATO
|
||||
@ -80,13 +80,13 @@ ENDPAGE
|
||||
|
||||
PAGE "Pagina 2" -1 -1 64 6
|
||||
|
||||
STRING F_CODCF 6
|
||||
STRING F_CMS_CODCF 6
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice cliente "
|
||||
FIELD CODCF
|
||||
END
|
||||
|
||||
LIST F_REGIVA 2 14
|
||||
LIST F_CMS_REGIVA 2 14
|
||||
BEGIN
|
||||
PROMPT 2 2 "Regime IVA "
|
||||
ITEM " |Normale"
|
||||
@ -103,91 +103,91 @@ BEGIN
|
||||
PROMPT 1 3 "@bParametri"
|
||||
END
|
||||
|
||||
DATE F_DATAINIZIO
|
||||
DATE F_CMS_DATAINIZIO
|
||||
BEGIN
|
||||
PROMPT 2 4 "Data inizio "
|
||||
FIELD DATAINIZIO
|
||||
END
|
||||
|
||||
DATE F_DATAFINE
|
||||
DATE F_CMS_DATAFINE
|
||||
BEGIN
|
||||
PROMPT 28 4 "Data fine "
|
||||
FIELD DATAFINE
|
||||
END
|
||||
|
||||
NUMBER F_AVANZ 5 2
|
||||
NUMBER F_CMS_AVANZ 5 2
|
||||
BEGIN
|
||||
PROMPT 2 5 "Percentuale di avanzamento "
|
||||
FIELD AVANZ
|
||||
END
|
||||
|
||||
BOOLEAN F_PRORATA
|
||||
BOOLEAN F_CMS_PRORATA
|
||||
BEGIN
|
||||
PROMPT 2 6 "Gestione Pro Rata"
|
||||
FIELD PRORATA
|
||||
END
|
||||
|
||||
BOOLEAN F_PUBBLICA
|
||||
BOOLEAN F_CMS_PUBBLICA
|
||||
BEGIN
|
||||
PROMPT 22 6 "Pubblica"
|
||||
FIELD PUBBLICA
|
||||
END
|
||||
|
||||
BOOLEAN F_RENDIC
|
||||
BOOLEAN F_CMS_RENDIC
|
||||
BEGIN
|
||||
PROMPT 35 6 "Da rendicontare"
|
||||
FIELD RENDIC
|
||||
END
|
||||
|
||||
BOOLEAN F_CHIUSA
|
||||
BOOLEAN F_CMS_CHIUSA
|
||||
BEGIN
|
||||
PROMPT 55 6 "Chiusa"
|
||||
FIELD CHIUSA
|
||||
END
|
||||
|
||||
BOOLEAN F_PROROGA
|
||||
BOOLEAN F_CMS_PROROGA
|
||||
BEGIN
|
||||
PROMPT 2 7 "Prorogata"
|
||||
FIELD PROROGA
|
||||
MESSAGE FALSE CLEAR,F_DATAPROR|CLEAR,F_DATAULTP|CLEAR,F_DATACOLLP
|
||||
MESSAGE TRUE ENABLE,F_DATAPROR|ENABLE,F_DATAULTP|ENABLE,F_DATACOLLP
|
||||
MESSAGE FALSE CLEAR,F_CMS_DATAPROR|CLEAR,F_CMS_DATAULTP|CLEAR,F_CMS_DATACOLLP
|
||||
MESSAGE TRUE ENABLE,F_CMS_DATAPROR|ENABLE,F_CMS_DATAULTP|ENABLE,F_CMS_DATACOLLP
|
||||
END
|
||||
|
||||
DATE F_DATAPROR
|
||||
DATE F_CMS_DATAPROR
|
||||
BEGIN
|
||||
PROMPT 20 7 "Data proroga "
|
||||
FIELD DATAPROR
|
||||
END
|
||||
|
||||
STRING F_CODTIPCM 5
|
||||
STRING F_CMS_CODTIPCM 5
|
||||
BEGIN
|
||||
PROMPT 2 8 "Tipologia di commessa "
|
||||
FIELD CODTIPCM
|
||||
END
|
||||
|
||||
/*STRING F_DESTIPCM 50
|
||||
/*STRING F_CMS_DESTIPCM 50
|
||||
BEGIN
|
||||
PROMPT 32 8 ""
|
||||
END*/
|
||||
|
||||
STRING F_CODTIPO 5
|
||||
STRING F_CMS_CODTIPO 5
|
||||
BEGIN
|
||||
PROMPT 2 9 "Tipologia di lavoro "
|
||||
FIELD CODTIPO
|
||||
END
|
||||
|
||||
/*STRING F_DESTIPO 50
|
||||
/*STRING F_CMS_DESTIPO 50
|
||||
BEGIN
|
||||
PROMPT 32 9 ""
|
||||
END*/
|
||||
|
||||
STRING F_CODRESP 10
|
||||
STRING F_CMS_CODRESP 10
|
||||
BEGIN
|
||||
PROMPT 2 10 "Responsabile "
|
||||
FIELD CODRESP
|
||||
END
|
||||
|
||||
BOOLEAN F_GESTFASI
|
||||
BOOLEAN F_CMS_GESTFASI
|
||||
BEGIN
|
||||
PROMPT 2 11 "Gestione fasi"
|
||||
FIELD GESTFASI
|
||||
@ -198,13 +198,13 @@ BEGIN
|
||||
PROMPT 1 14 "@bPreventivo"
|
||||
END
|
||||
|
||||
STRING F_RIFER 15
|
||||
STRING F_CMS_RIFER 15
|
||||
BEGIN
|
||||
PROMPT 2 15 "N. di riferimento "
|
||||
FIELD RIFER
|
||||
END
|
||||
|
||||
DATE F_DATAPREV
|
||||
DATE F_CMS_DATAPREV
|
||||
BEGIN
|
||||
PROMPT 40 15 "Data "
|
||||
FIELD DATAPREV
|
||||
@ -216,25 +216,25 @@ BEGIN
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
STRING F_PROVVP 1
|
||||
STRING F_CMS_PROVVP 1
|
||||
BEGIN
|
||||
PROMPT 3 17 "Provv. / Def. "
|
||||
FIELD PROVVP
|
||||
END
|
||||
|
||||
NUMBER F_ANNOP 4
|
||||
NUMBER F_CMS_ANNOP 4
|
||||
BEGIN
|
||||
PROMPT 21 17 "Anno "
|
||||
FIELD ANNOP
|
||||
END
|
||||
|
||||
STRING F_CODNUMP 4
|
||||
STRING F_CMS_CODNUMP 4
|
||||
BEGIN
|
||||
PROMPT 35 17 "Cod. num. "
|
||||
FIELD CODNUMP
|
||||
END
|
||||
|
||||
NUMBER F_NDOCP 7
|
||||
NUMBER F_CMS_NDOCP 7
|
||||
BEGIN
|
||||
PROMPT 54 17 "N. doc. "
|
||||
FIELD NDOCP
|
||||
@ -245,7 +245,7 @@ ENDPAGE
|
||||
|
||||
PAGE "Pagina 3" -1 -1 64 6
|
||||
|
||||
BOOLEAN F_APPOGGIO
|
||||
BOOLEAN F_CMS_APPOGGIO
|
||||
BEGIN
|
||||
PROMPT 2 1 "Commessa di appoggio"
|
||||
END
|
||||
@ -255,33 +255,33 @@ BEGIN
|
||||
PROMPT 1 2 ""
|
||||
END
|
||||
|
||||
BOOLEAN F_CONTRATTO
|
||||
BOOLEAN F_CMS_CONTRATTO
|
||||
BEGIN
|
||||
PROMPT 2 3 "Commessa con contratto"
|
||||
FIELD CONTRATTO
|
||||
MESSAGE FALSE CLEAR,F_ANNOC|CLEAR,F_NROCONT
|
||||
MESSAGE TRUE ENABLE,F_ANNOC|ENABLE,F_NROCONT
|
||||
MESSAGE FALSE CLEAR,F_CMS_ANNOC|CLEAR,F_CMS_NROCONT
|
||||
MESSAGE TRUE ENABLE,F_CMS_ANNOC|ENABLE,F_CMS_NROCONT
|
||||
END
|
||||
|
||||
STRING F_ANNOC 4
|
||||
STRING F_CMS_ANNOC 4
|
||||
BEGIN
|
||||
PROMPT 2 4 "Anno contratto "
|
||||
FIELD ANNOC
|
||||
END
|
||||
|
||||
STRING F_NROCONT 15
|
||||
STRING F_CMS_NROCONT 15
|
||||
BEGIN
|
||||
PROMPT 25 4 "Numero contratto "
|
||||
FIELD NROCONT
|
||||
END
|
||||
|
||||
DATE F_DATAGARA
|
||||
DATE F_CMS_DATAGARA
|
||||
BEGIN
|
||||
PROMPT 2 6 "Data gara "
|
||||
FIELD DATAGARA
|
||||
END
|
||||
|
||||
CURRENCY F_IMPORTOB 18
|
||||
CURRENCY F_CMS_IMPORTOB 18
|
||||
BEGIN
|
||||
PROMPT 2 7 "Importo base "
|
||||
FIELD IMPORTOB
|
||||
@ -292,45 +292,45 @@ BEGIN
|
||||
PROMPT 1 8 "@bPercentuali"
|
||||
END
|
||||
|
||||
NUMBER F_RIBASSO 5 2
|
||||
NUMBER F_CMS_RIBASSO 5 2
|
||||
BEGIN
|
||||
PROMPT 2 9 "Ribasso "
|
||||
FIELD RIBASSO
|
||||
FLAGS "U"
|
||||
NUM_EXPR #F_RIBASSO<=100
|
||||
NUM_EXPR #F_CMS_RIBASSO<=100
|
||||
WARNING "La percentuale deve essere compresa tra 0 e 100"
|
||||
END
|
||||
|
||||
NUMBER F_AUMENTO 5 2
|
||||
NUMBER F_CMS_AUMENTO 5 2
|
||||
BEGIN
|
||||
PROMPT 20 9 "Aumento "
|
||||
FIELD AUMENTO
|
||||
FLAGS "U"
|
||||
NUM_EXPR #F_AUMENTO<=100
|
||||
NUM_EXPR #F_CMS_AUMENTO<=100
|
||||
WARNING "La percentuale deve essere compresa tra 0 e 100"
|
||||
END
|
||||
|
||||
NUMBER F_GARANZIA 5 2
|
||||
NUMBER F_CMS_GARANZIA 5 2
|
||||
BEGIN
|
||||
PROMPT 38 9 "A garanzia "
|
||||
FIELD GARANZIA
|
||||
FLAGS "U"
|
||||
NUM_EXPR #F_GARANZIA<=100
|
||||
NUM_EXPR #F_CMS_GARANZIA<=100
|
||||
WARNING "La percentuale deve essere compresa tra 0 e 100"
|
||||
END
|
||||
|
||||
NUMBER F_ANTICIPO 5 2
|
||||
NUMBER F_CMS_ANTICIPO 5 2
|
||||
BEGIN
|
||||
PROMPT 63 9 "Anticipo "
|
||||
FIELD ANTICIPO
|
||||
FLAGS "U"
|
||||
NUM_EXPR #F_ANTICIPO<=100
|
||||
NUM_EXPR #F_CMS_ANTICIPO<=100
|
||||
WARNING "La percentuale deve essere compresa tra 0 e 100"
|
||||
MESSAGE EMPTY CLEAR,F_DATAANTIC
|
||||
MESSAGE ENABLE,F_DATAANTIC
|
||||
MESSAGE EMPTY CLEAR,F_CMS_DATAANTIC
|
||||
MESSAGE ENABLE,F_CMS_DATAANTIC
|
||||
END
|
||||
|
||||
DATE F_DATAANTIC
|
||||
DATE F_CMS_DATAANTIC
|
||||
BEGIN
|
||||
PROMPT 53 10 "Data anticipo "
|
||||
FIELD DATAANTIC
|
||||
@ -341,37 +341,37 @@ BEGIN
|
||||
PROMPT 1 12 "@bScadenze"
|
||||
END
|
||||
|
||||
DATE F_DATAULT
|
||||
DATE F_CMS_DATAULT
|
||||
BEGIN
|
||||
PROMPT 2 13 "Data ultimazione lavori "
|
||||
FIELD DATAULT
|
||||
END
|
||||
|
||||
DATE F_DATAULTP
|
||||
DATE F_CMS_DATAULTP
|
||||
BEGIN
|
||||
PROMPT 50 13 "Con proroga "
|
||||
FIELD DATAULTP
|
||||
END
|
||||
|
||||
DATE F_DATACOLL
|
||||
DATE F_CMS_DATACOLL
|
||||
BEGIN
|
||||
PROMPT 2 14 "Data collaudo "
|
||||
FIELD DATACOLL
|
||||
END
|
||||
|
||||
DATE F_DATACOLLP
|
||||
DATE F_CMS_DATACOLLP
|
||||
BEGIN
|
||||
PROMPT 50 14 "Con proroga "
|
||||
FIELD DATACOLLP
|
||||
END
|
||||
|
||||
DATE F_DATAGAR
|
||||
DATE F_CMS_DATAGAR
|
||||
BEGIN
|
||||
PROMPT 2 17 "Periodo di gazanzia data "
|
||||
FIELD DATAGAR
|
||||
END
|
||||
|
||||
STRING F_SALMIN 20
|
||||
STRING F_CMS_SALMIN 20
|
||||
BEGIN
|
||||
PROMPT 2 18 "Modalità di fatturazione "
|
||||
FIELD SALMIN
|
||||
3
ca/ca0203a.h
Executable file
3
ca/ca0203a.h
Executable file
@ -0,0 +1,3 @@
|
||||
//id maschera catbfsc (tabella fasi)
|
||||
//campi normali
|
||||
#define F_FSC_DESCRIZ 201
|
||||
@ -1,6 +1,6 @@
|
||||
#include "catbfsc.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
TOOLBAR "" 0 -2 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
@ -16,7 +16,7 @@ BEGIN
|
||||
PROMPT 1 8 "@bCodici"
|
||||
END
|
||||
|
||||
STRING F_DESCRIZ 50
|
||||
STRING F_FSC_DESCRIZ 50
|
||||
BEGIN
|
||||
PROMPT 2 15 "Descrizione "
|
||||
FIELD DESCRIZ
|
||||
@ -231,13 +231,13 @@ 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)
|
||||
FIELD Fsc(1)
|
||||
END
|
||||
|
||||
STRING F_DESFASE_1 50
|
||||
BEGIN
|
||||
PROMPT 17 3 ""
|
||||
FIELD CfsDes(1)
|
||||
FIELD FscDes(1)
|
||||
END
|
||||
|
||||
STRING F_FASE_2 10
|
||||
@ -246,13 +246,13 @@ BEGIN
|
||||
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)
|
||||
FIELD Fsc(2)
|
||||
END
|
||||
|
||||
STRING F_DESFASE_2 50
|
||||
BEGIN
|
||||
PROMPT 17 4 ""
|
||||
FIELD CfsDes(2)
|
||||
FIELD FscDes(2)
|
||||
END
|
||||
|
||||
STRING F_FASE_3 10
|
||||
@ -261,13 +261,13 @@ BEGIN
|
||||
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)
|
||||
FIELD Fsc(3)
|
||||
END
|
||||
|
||||
STRING F_DESFASE_3 50
|
||||
BEGIN
|
||||
PROMPT 17 5 ""
|
||||
FIELD CfsDes(3)
|
||||
FIELD FscDes(3)
|
||||
END
|
||||
|
||||
STRING F_FASE_4 10
|
||||
@ -275,13 +275,13 @@ BEGIN
|
||||
PROMPT 2 6 "4 "
|
||||
MESSAGE EMPTY RESET,F_DESFASE_4
|
||||
FLAGS "G"
|
||||
FIELD Cfs(4)
|
||||
FIELD Fsc(4)
|
||||
END
|
||||
|
||||
STRING F_DESFASE_4 50
|
||||
BEGIN
|
||||
PROMPT 17 6 ""
|
||||
FIELD CfsDes(4)
|
||||
FIELD FscDes(4)
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 78 8
|
||||
|
||||
35
ca/cacnv.cpp
35
ca/cacnv.cpp
@ -4,7 +4,7 @@
|
||||
#include <tabutil.h>
|
||||
#include <utility.h>
|
||||
|
||||
#define usage "Errore - uso : cacnv [1|2] ditta"
|
||||
#define usage "Errore - uso : cacnv [1|2|3] ditta"
|
||||
|
||||
|
||||
//----------------------------------------------------------
|
||||
@ -24,6 +24,7 @@ protected:
|
||||
public:
|
||||
bool convert_clerks();
|
||||
bool convert_phases();
|
||||
bool set_anal();
|
||||
|
||||
TConversione_cm2ca() : _oldditta(0), _codditta(0) {}
|
||||
~TConversione_cm2ca() {}
|
||||
@ -64,6 +65,12 @@ void TConversione_cm2ca::main_loop()
|
||||
convert_phases(); //da tabella fsc a fasi
|
||||
break;
|
||||
}
|
||||
case 3:
|
||||
{
|
||||
if (_codditta > 0)
|
||||
set_anal(); //setta il flag anal nel pcon
|
||||
break;
|
||||
}
|
||||
default:
|
||||
break;
|
||||
}
|
||||
@ -144,6 +151,32 @@ bool TConversione_cm2ca::convert_phases()
|
||||
}
|
||||
}
|
||||
|
||||
bool TConversione_cm2ca::set_anal()
|
||||
{
|
||||
TRelation relpcon(LF_PCON);
|
||||
TCursor curpcon(&relpcon);
|
||||
TRectype& recpcon = relpcon.curr();
|
||||
|
||||
if (!recpcon.exist("ANAL")) //check se gia' avvenuta la conversione con aggiunta del campo ANAL
|
||||
return error_box(TR("Prima del controllo e' necessario eseguire una conversione archivi"));
|
||||
else
|
||||
{
|
||||
const long nrecpcon = curpcon.items();
|
||||
curpcon.freeze();
|
||||
TProgind pi(nrecpcon, "Controllo commesse e fasi sul piano dei conti");
|
||||
for (curpcon = 0; curpcon.pos() < nrecpcon; ++curpcon)
|
||||
{
|
||||
pi.addstatus(1);
|
||||
if (recpcon.get("CODCMS").not_empty() || recpcon.get("FASCMS").not_empty())
|
||||
{
|
||||
recpcon.put("ANAL", "X");
|
||||
relpcon.rewrite();
|
||||
}
|
||||
}
|
||||
return true;
|
||||
}
|
||||
}
|
||||
|
||||
///////////////////////////////////////////////////////////
|
||||
// Programma di conversione da CM a CA
|
||||
///////////////////////////////////////////////////////////
|
||||
|
||||
@ -188,7 +188,7 @@ short TAnal_msk::create_tree_field()
|
||||
if (delta > 0)
|
||||
{
|
||||
id = F_TREE;
|
||||
add_tree(id, 0, 0, 1, delta*2, -1);
|
||||
add_tree(id, 0, 0, 1, (delta-1)*2, -1);
|
||||
|
||||
TAnal_tree* t = new TAnal_tree(get_logicnum(), get_tabname(), _key1_fields, _key2_fields);
|
||||
tfield(id).set_tree(t);
|
||||
@ -526,7 +526,7 @@ void TSimple_anal_msk::create_key_browse(TEdit_field& kfld, int level, TConfig&
|
||||
const int logic = get_logicnum();
|
||||
out << "US ";
|
||||
if (logic == LF_TAB || logic == LF_TABCOM)
|
||||
out << '"' << get_tabname() << '"';
|
||||
out << get_tabname();
|
||||
else
|
||||
out << get_logicnum();
|
||||
out << " KE 1";
|
||||
@ -568,7 +568,7 @@ void TSimple_anal_msk::create_des_browse(TEdit_field& kfld, int level, TConfig&
|
||||
const int logic = get_logicnum();
|
||||
out << "US ";
|
||||
if (logic == LF_TAB || logic == LF_TABCOM)
|
||||
out << '"' << get_tabname() << '"';
|
||||
out << get_tabname();
|
||||
else
|
||||
out << get_logicnum();
|
||||
out << " KE 2";
|
||||
|
||||
@ -1,6 +0,0 @@
|
||||
//id campi maschera catbcdc (tabella centri di costo)
|
||||
#define F_DESCRIZ 101
|
||||
#define F_DESCRAGG 102
|
||||
#define F_ADDETTI 103
|
||||
#define F_GESTFASI 104
|
||||
#define F_APPOGGIO 105
|
||||
49
ca/catbcms.h
49
ca/catbcms.h
@ -1,49 +0,0 @@
|
||||
//id campi maschera catbcms (tabella commesse)
|
||||
#define F_DESCRIZ 101
|
||||
#define F_DESCRAGG 102
|
||||
#define F_ANNO 103
|
||||
#define F_LOCDIV 104
|
||||
#define F_INDIR 105
|
||||
#define F_CIV 106
|
||||
#define F_LOC 107
|
||||
#define F_STATO 108
|
||||
#define F_COM 109
|
||||
#define F_CAP 110
|
||||
#define F_CODCF 111
|
||||
#define F_REGIVA 112
|
||||
#define F_PRORATA 113
|
||||
#define F_PUBBLICA 114
|
||||
#define F_RENDIC 115
|
||||
#define F_DATAINIZIO 116
|
||||
#define F_DATAFINE 117
|
||||
#define F_AVANZ 118
|
||||
#define F_CHIUSA 119
|
||||
#define F_PROROGA 120
|
||||
#define F_DATAPROR 121
|
||||
#define F_CODRESP 122
|
||||
#define F_CODTIPO 123
|
||||
#define F_CODTIPCM 124
|
||||
#define F_GESTFASI 125
|
||||
#define F_RIFER 126
|
||||
#define F_DATAPREV 127
|
||||
#define F_PROVVP 128
|
||||
#define F_ANNOP 129
|
||||
#define F_CODNUMP 130
|
||||
#define F_NDOCP 131
|
||||
#define F_APPOGGIO 132
|
||||
#define F_CONTRATTO 133
|
||||
#define F_ANNOC 134
|
||||
#define F_NROCONT 135
|
||||
#define F_DATAGARA 136
|
||||
#define F_IMPORTOB 137
|
||||
#define F_RIBASSO 138
|
||||
#define F_AUMENTO 139
|
||||
#define F_GARANZIA 140
|
||||
#define F_ANTICIPO 141
|
||||
#define F_DATAANTIC 142
|
||||
#define F_DATAULT 143
|
||||
#define F_DATAULTP 144
|
||||
#define F_DATACOLL 145
|
||||
#define F_DATACOLLP 146
|
||||
#define F_DATAGAR 147
|
||||
#define F_SALMIN 148
|
||||
@ -1,2 +0,0 @@
|
||||
//id maschera catbfsc (tabella fasi)
|
||||
#define F_DESCRIZ 101
|
||||
@ -1,2 +1,4 @@
|
||||
#define F_CODICE 101
|
||||
#define F_DESCR 102
|
||||
//id campi maschera catbrsp (tabella responsabili)
|
||||
//campi normali
|
||||
#define F_RSP_CODICE 201
|
||||
#define F_RSP_DESCR 202
|
||||
|
||||
@ -1,17 +1,17 @@
|
||||
#include "catbrsp.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
TOOLBAR "" 0 -2 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Responsabili" -1 -1 64 6
|
||||
|
||||
STRING F_CODICE 10
|
||||
STRING F_RSP_CODICE 10
|
||||
BEGIN
|
||||
PROMPT 2 2 "Codice "
|
||||
END
|
||||
|
||||
STRING F_DESCR 50
|
||||
STRING F_RSP_DESCR 50
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
END
|
||||
|
||||
@ -1,2 +1,4 @@
|
||||
#define F_CODICE 101
|
||||
#define F_DESCR 102
|
||||
//id campi maschera catbtpc (tabella tipi commessa)
|
||||
//campi normali
|
||||
#define F_TPC_CODICE 201
|
||||
#define F_TPC_DESCR 202
|
||||
|
||||
@ -1,17 +1,17 @@
|
||||
#include "catbtpc.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
TOOLBAR "" 0 -2 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tipo Commessa" -1 -1 64 6
|
||||
|
||||
STRING F_CODICE 5
|
||||
STRING F_TPC_CODICE 5
|
||||
BEGIN
|
||||
PROMPT 2 2 "Codice "
|
||||
END
|
||||
|
||||
STRING F_DESCR 50
|
||||
STRING F_TPC_DESCR 50
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
END
|
||||
|
||||
@ -1,2 +1,4 @@
|
||||
#define F_CODICE 101
|
||||
#define F_DESCR 102
|
||||
//id campi maschera catbtpl (tabella tipi lavoro)
|
||||
//campi normali
|
||||
#define F_TPL_CODICE 201
|
||||
#define F_TPL_DESCR 202
|
||||
|
||||
@ -1,17 +1,17 @@
|
||||
#include "catbtpl.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
TOOLBAR "" 0 -2 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tipo Lavoro" -1 -1 64 6
|
||||
|
||||
STRING F_CODICE 5
|
||||
STRING F_TPL_CODICE 5
|
||||
BEGIN
|
||||
PROMPT 2 2 "Codice "
|
||||
END
|
||||
|
||||
STRING F_DESCR 50
|
||||
STRING F_TPL_DESCR 50
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
END
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user