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

Patch level :10.0 no patch

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :eliminate inutili righe di commento


git-svn-id: svn://10.65.10.50/trunk@17810 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2008-12-04 16:30:41 +00:00
parent c9f8b40261
commit b5f5be5f06
1 changed files with 31 additions and 57 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

88
cg/cg6700.cpp
View File

@ -119,7 +119,7 @@ public:
bool esiste_rata(); bool esiste_rata();
const char * get_error(int err); const char * get_error(int err);
void apri_file_SC(); void apri_file_SC();
void chiudi_file_SC(); void chiudi_file_SC();
TLibro_giornale& giornale() { return *_giornale; } TLibro_giornale& giornale() { return *_giornale; }
@ -447,20 +447,7 @@ void TRic_ListaMov::stampa_errori_mov(int riga)
int TRic_ListaMov::cerca_anno_solare_esercizio(int codice) int TRic_ListaMov::cerca_anno_solare_esercizio(int codice)
{ {
int anno = 0; int anno = 0;
/*
TTable ese ("ESC");
TDate datafine;
TString4 dep; dep.format("%04d", codice);
ese.zero();
ese.put("CODTAB", dep);
if (ese.read() == NOERR)
datafine = ese.get_date("D1");
if (datafine != botime)
anno = datafine.year();
*/
TEsercizi_contabili esc; TEsercizi_contabili esc;
if (esc.exist(codice)) if (esc.exist(codice))
anno = esc[codice].fine().year(); anno = esc[codice].fine().year();
@ -535,32 +522,29 @@ bool TRic_ListaMov::controlla_mov()
if ( !TDate::isdate(_datadoc.string()) ) if ( !TDate::isdate(_datadoc.string()) )
_err.set(6); _err.set(6);
//if (_causale.not_empty()) TLocalisamfile caus(LF_CAUSALI);
//{ caus.setkey(1);
TLocalisamfile caus(LF_CAUSALI); caus.zero();
caus.setkey(1); caus.put(CAU_CODCAUS,_causale);
if (caus.read() == NOERR)
{
_tipodoc = caus.get(CAU_TIPODOC);
if (_is_salda)
_tipom_cau = caus.get(CAU_TIPOMOV);
}
else
{
caus.zero(); caus.zero();
caus.put(CAU_CODCAUS,_causale); if (_causale.not_empty()) //se la causale e' significativa
if (caus.read() == NOERR)
{
_tipodoc = caus.get(CAU_TIPODOC);
if (_is_salda)
_tipom_cau = caus.get(CAU_TIPOMOV);
}
else
{ {
caus.zero(); _errore_grave = TRUE;
if (_causale.not_empty()) //se la causale e' significativa _err.set(7);
{
_errore_grave = TRUE;
_err.set(7);
}
} }
//_tipodoc = caus.get(CAU_TIPODOC); ho sempre quello letto sul movimento! }
causreg = caus.get(CAU_REG); //_tipodoc = caus.get(CAU_TIPODOC); ho sempre quello letto sul movimento!
_descr_causale = caus.get(CAU_DESCR); causreg = caus.get(CAU_REG);
_mov_sez = caus.get_bool(CAU_MOVSEZ); _descr_causale = caus.get(CAU_DESCR);
//} _mov_sez = caus.get_bool(CAU_MOVSEZ);
if (!_codpag.blank()) if (!_codpag.blank())
{ {
@ -2383,8 +2367,7 @@ bool TRic_ListaMov::preprocess_page(int file,int counter)
bool controlla = controlla_partite(); //se TRUE => ci sono errori nella testata bool controlla = controlla_partite(); //se TRUE => ci sono errori nella testata
bool verifica = (verpagsca || verscad); bool verifica = (verpagsca || verscad);
if ( (_controllo == 1 && controlla) || _controllo == 2 || if ( (_controllo == 1 && controlla) || _controllo == 2 || (_controllo == 1 && verifica) )
(_controllo == 1 && verifica) )
{ {
TString16 datareg_str = _datareg.string(); TString16 datareg_str = _datareg.string();
// "Fai vedere lo stesso ..-..-.... anche se non c'e' la data..." // "Fai vedere lo stesso ..-..-.... anche se non c'e' la data..."
@ -2427,8 +2410,10 @@ bool TRic_ListaMov::preprocess_page(int file,int counter)
if (_tipocf != _tipocf_p || _gruppo != _gruppo_p || _conto != _conto_p || if (_tipocf != _tipocf_p || _gruppo != _gruppo_p || _conto != _conto_p ||
_codcf != _codcf_p || _numpart != _numpart_prec || _anno != _anno_prec) _codcf != _codcf_p || _numpart != _numpart_prec || _anno != _anno_prec)
set_row(r,FR("@0g@rRif. partita")); set_row(r,FR("@0g@rRif. partita"));
set_row(r,FR("@14gN.riga@22gN.operaz./riga Data oper. Data doc. N.doc. Reg Prot. Causale")); set_row(r,FR("@14gN.riga@22gN.operaz./riga Data oper. Data doc. N.doc. Reg Prot. Causale"));
set_row(r++,FR("@142gTipo/Data pag. Cod.val Cambio Data cambio Sez")); set_row(r++,FR("@142gTipo/Data pag. Cod.val Cambio Data cambio Sez"));
if (_tipocf != _tipocf_p || _gruppo != _gruppo_p || _conto != _conto_p || if (_tipocf != _tipocf_p || _gruppo != _gruppo_p || _conto != _conto_p ||
_codcf != _codcf_p || _numpart != _numpart_prec || _anno != _anno_prec) _codcf != _codcf_p || _numpart != _numpart_prec || _anno != _anno_prec)
{ {
@ -3078,24 +3063,13 @@ void TRic_ListaMov::aggiorna_partite()
} }
if (_tipomov != 1 && _tipomov != 4) if (_tipomov != 1 && _tipomov != 4)
{ {
/* if (_prima_volta) real doc;
real val;
if (calcola_impdocval(_numreg,_numrig,_tipocf,_gruppo,_conto,_codcf,_anno,_numpart,_nriga,doc,val))
{ {
_prima_volta = FALSE; part.put(PART_IMPTOTDOC, doc);
if (part.get_real(PART_IMPTOTDOC) == ZERO) part.put(PART_IMPTOTVAL, val);
_calcola = TRUE; }
else
_calcola = FALSE;
} */
// if (_calcola)
// {
real doc;
real val;
if (calcola_impdocval(_numreg,_numrig,_tipocf,_gruppo,_conto,_codcf,_anno,_numpart,_nriga,doc,val))
{
part.put(PART_IMPTOTDOC, doc);
part.put(PART_IMPTOTVAL, val);
}
// }
} }
if (_tipomov == 1 ) //&& (part.get_real(PART_IMPORTO) == ZERO) ) if (_tipomov == 1 ) //&& (part.get_real(PART_IMPORTO) == ZERO) )
{ {