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

Patch level :10.0

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :continua la contabilizzazione cespiti


git-svn-id: svn://10.65.10.50/trunk@15966 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2008-01-10 11:57:52 +00:00
parent 6730d44e10
commit 9eeb94b570
5 changed files with 21 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ce/ce0100.cpp
View File

@ -350,12 +350,14 @@ void TCEtables::show_hide_ccc_cat(TMask& m, const bool hide_cac)
if (hide_cac)
{
m.hide(F_CODCAT_IN);
m.disable(F_CODCAT_IN);
m.show(F_CODCAT);
}
else
{
m.hide(F_CODCAT);
m.show(F_CODCAT_IN);
m.enable(F_CODCAT_IN);
}
}

26
ce/ce4400.cpp
View File

@ -182,29 +182,20 @@ int TSaldo_per_codice::compila_rmov(const int tipo, const int riga_nor, TArray&
if (quota <= ZERO)
return -1;
const TRectype& rec_cac = categoria();
const TString& stringona = rec_cac.get(field);
const TRectype& rec_ccc = categoria();
const TString& stringona = rec_ccc.get(field);
TBill zio;
if (!str2bill(stringona, pos, zio))
{
//if (tipo < 4)
//{
pos = 24;
if (tipo == 1 || !str2bill(stringona, pos, zio))
{
TString msg;
msg << TR("Manca il conto per le quote ammortamento normali della categoria ") << rec_cac.get("CODTAB");
log.log(2, msg);
return -1;
}
//}
/* else
pos = 24;
if (tipo == 1 || !str2bill(stringona, pos, zio))
{
TString msg;
msg << TR("Manca il conto per le quote perse della categoria ") << rec_cac.get("CODTAB");
msg << TR("Manca il conto per le quote ammortamento normali della categoria ")
<< _grp << " " << _spc << " " << _cat;
log.log(2, msg);
return -1;
}*/
}
}
if (pos == 24 && riga_nor >= 0)
@ -221,7 +212,7 @@ int TSaldo_per_codice::compila_rmov(const int tipo, const int riga_nor, TArray&
switch (movdett)
{
case 0: //dettaglio per categoria
rmov->put(RMV_DESCR, rec_cac.get("S0"));
rmov->put(RMV_DESCR, rmov->descr_categoria());
break;
case 1: //dettaglio per cespite
{
@ -492,6 +483,7 @@ void TTrasf_mov_ce_cg::elabora()
//report con log errori
TLog_report cont_cesp_log(TR("Contabilizzazione cespiti"));
cont_cesp_log.kill_duplicates();
//Legge un po' di parametri dal ditta.ini che servono al tipo di calcolo
TConfig config_ditta_ce(CONFIG_DITTA, "ce");

2
ce/celib.cpp
View File

@ -222,7 +222,7 @@ bool TDitta_cespiti::legge_223_06() const
const TRectype& TDitta_cespiti::categoria(int gr, const char* sp, int ca, const bool ccc) const
{
TString8 key;
if (ca >= 41)
if (ca >= 41 && !ccc)
key.format(" %02d", ca);
else
{

4
ce/cemenu.men
View File

@ -63,7 +63,6 @@ Item_02 = "Localizzazioni", "ce0 -0 loc", ""
Item_03 = "Impianti", "ce0 -0 cim" , ""
Item_04 = "Esercizi", "ce0 -0 cce", "F"
Item_05 = "Esercizi contabili", "cg0 -5 esc", "F"
Item_06 = "Categorie Collegamento Contabilita'", "ce0 -0 ccc", "F"
[CEMENU_007]
Caption = "Stampa tabelle ditta"
@ -80,7 +79,8 @@ Caption = "Collegamenti contabili"
Picture = <ce00>
Module = 11
Flags = ""
Item_01 = "Trasferimento movimenti", "ce4 -3", "F"
Item_01 = "Categorie Collegamento Contabilita'", "ce0 -0 ccc", "F"
Item_02 = "Trasferimento movimenti", "ce4 -3", "F"
[CEMENU_009]
Caption = "Operazioni giornaliere e fine esercizio"

12
ce/cetbccc.uml
View File

@ -69,28 +69,30 @@ BEGIN
FIELD CODTAB[7,8]
FLAGS "UZ"
KEY 1
USE %CCC
USE CCC
JOIN %CAC ALIAS 400 INTO CODTAB==CODTAB
INPUT CODTAB[1,2] F_CODGR
INPUT CODTAB[3,6] F_CODSP
INPUT CODTAB[7,8] F_CODCAT
DISPLAY "Gruppo" CODTAB[1,2]
DISPLAY "Specie" CODTAB[3,6]
DISPLAY "Categoria" CODTAB[7,8]
DISPLAY "Descrizione@50" S0
DISPLAY "Descrizione@50" 400@->S0
OUTPUT F_CODGR CODTAB[1,2]
OUTPUT F_CODSP CODTAB[3,6]
OUTPUT F_CODCAT CODTAB[7,8]
OUTPUT F_DESCCAT S0
OUTPUT F_DESCCAT 400@->S0
CHECKTYPE REQUIRED
END
NUMBER F_CODCAT_IN 2
BEGIN
PROMPT 2 4 "Categoria "
FLAGS "BZ"
FLAGS "BUZDH"
KEY 1
DRIVENBY F_CODGR
DRIVENBY F_CODSP
MESSAGE EMPTY COPY,F_CODCAT_IN
MESSAGE COPY,F_CODCAT
CHECKTYPE REQUIRED
END
@ -98,7 +100,7 @@ END
STRING F_DESCCAT 60 50
BEGIN
PROMPT 20 4 ""
FLAGS "BD"
FLAGS "D"
END
GROUPBOX DLG_NULL 74 8