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

Patch level : 2.0 686

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

GF20131
Nella stampa del bilancio 4° direttiva ripete due volte la specifica
dell'importo del patrimonio netto e inoltre il risoltato a prima delle
imposte è lo stesso del risultato del conto economico.


git-svn-id: svn://10.65.10.50/trunk@11767 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2004-02-19 11:18:57 +00:00
parent 49b851ce5a
commit 38c5d35b88
1 changed files with 10 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
cg/cg1600.cpp
View File

@ -1043,9 +1043,9 @@ void TStampa_IVdirettiva::crea_sort_piano_conti_scalare()
for (int i=0; i<items; i++) for (int i=0; i<items; i++)
{ {
TRiga_sez_opp * lriga = _sezopps.riga(); TRiga_sez_opp * lriga = _sezopps.riga();
TString sez_opp = lriga->sezione(); TString4 sez_opp = lriga->sezione();
TString let_opp = lriga->lettera(); TString4 let_opp = lriga->lettera();
TString numr_opp = lriga->num_rom(); TString4 numr_opp = lriga->num_rom();
if (numr_opp == " ") //Sembrerebbe che il metodo sezione() quando il numero romano non esiste, ritorni if (numr_opp == " ") //Sembrerebbe che il metodo sezione() quando il numero romano non esiste, ritorni
numr_opp.ltrim(); //una TString contenente uno spazio e non un NULL, sconvolgendo l' ordinamento. numr_opp.ltrim(); //una TString contenente uno spazio e non un NULL, sconvolgendo l' ordinamento.
//Per evitare tutto cio' aggiungo il metodo ltrim(), che toglie gli spazi. //Per evitare tutto cio' aggiungo il metodo ltrim(), che toglie gli spazi.
@ -2169,6 +2169,7 @@ void TStampa_IVdirettiva::stampa_risultato_prima_delle_imposte()
} }
set_row (_i,"@4g%s@81g%r", TR("Risultato prima delle imposte"), &_totale_economico); set_row (_i,"@4g%s@81g%r", TR("Risultato prima delle imposte"), &_totale_economico);
_totale_economico += _sale; // Guy was here 18/02./2004: Altrimenti ignora la prima imposta
if (raff) if (raff)
set_row (_i,"@111g%r", &_totale_economico_raf); set_row (_i,"@111g%r", &_totale_economico_raf);
@ -2180,7 +2181,7 @@ void TStampa_IVdirettiva::stampa_risultato_prima_delle_imposte()
void TStampa_IVdirettiva::stampa_totali() void TStampa_IVdirettiva::stampa_totali()
{ {
bool gia_stampato_conto_ord = FALSE; bool gia_stampato_conto_ord = FALSE;
const char* diff_prod = "9B"; const char* diff_prod = "9B";
TString16 classe; TString16 classe;
classe.format("%c%c%8s%2s", _sez_da_stamp,_let_da_stamp,(const char*)_numr_da_stamp,(const char*)_num_da_stamp); classe.format("%c%c%8s%2s", _sez_da_stamp,_let_da_stamp,(const char*)_numr_da_stamp,(const char*)_num_da_stamp);
@ -4078,8 +4079,11 @@ void TStampa_IVdirettiva::set_page(int file, int counter)
setta_righe (TR("STATO PATRIMONIALE")); setta_righe (TR("STATO PATRIMONIALE"));
_statopatr_no_stamp = FALSE; _statopatr_no_stamp = FALSE;
} }
if (_sez_da_stamp == '2') else // Guy was here: aggiunto else 18/02/2004 altrimenti fa due volte la setta righe
setta_righe(""); {
if (_sez_da_stamp == '2')
setta_righe("");
}
if ((_sez_da_stamp == '5') || (_sez_da_stamp == '9')) if ((_sez_da_stamp == '5') || (_sez_da_stamp == '9'))
set_auto_ff(TRUE); set_auto_ff(TRUE);
} }