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

Patch level : 10.0

Browse Source 
Files correlati     : ca3
Ricompilazione Demo : [ ]
Commento            :
Riporto modifiche di Bonazzi


git-svn-id: svn://10.65.10.50/branches/R_10_00@22607 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2012-03-09 15:49:52 +00:00
parent ef4b34f000
commit ebeaf18246
1 changed files with 31 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
ca/ca3700.cpp
View File

@ -824,7 +824,7 @@ void TPrint_rendiconto_ca_recordset::scrive_riga(TLocalisamfile& tmp, const TRec
const char tipomov = movana.get_char(MOVANA_TIPOMOV);
#ifdef DBG
const long movana_numreg = movana.get_long(MOVANA_NUMREG);
if (movana_numreg == 32736)
if (movana_numreg == 19571)
const int cazzone = 1;
#endif
@ -905,8 +905,6 @@ void TPrint_rendiconto_ca_recordset::scrive_riga(TLocalisamfile& tmp, const TRec
if (!codcdc_rmovana.full())
codcdc_rmovana = rmovana.get(RMOVANA_CODCCOSTO);
if (codcms_rigadoc == codcms_rmovana && codfase_rigadoc == codfase_rmovana && codcdc_rigadoc == codcdc_rmovana)
{
const TRectype* babbo = riga.find_original_rdoc(); //cerca il doc padre della riga doc attuale
if (babbo != NULL) //se trova il doc padre..
{
@ -915,6 +913,13 @@ void TPrint_rendiconto_ca_recordset::scrive_riga(TLocalisamfile& tmp, const TRec
const long ndoc = babbo->get_long(RDOC_NDOC);
rif.cut(0) << babbo_codnum << '-' << anno << '-' << ndoc;
if (tipo_babbo == TTipo_documento::_altro)
{
TDocumento doc_babbo('D', anno, babbo_codnum, ndoc); //crea una copia del doc padre per prendere..
tipo_babbo = doc_babbo.tipo_riclassificato(); //..il tipo documento..
}
if (codcms_rigadoc == codcms_rmovana && codfase_rigadoc == codfase_rmovana && codcdc_rigadoc == codcdc_rmovana)
{
//caso particolare dei conti del CRPA. Se il conto non e' riclassificato (ma siamo in presenza..
//.di un piano dei conti riclassificato)...
if (conto_non_riclass)
@ -961,8 +966,8 @@ void TPrint_rendiconto_ca_recordset::scrive_riga(TLocalisamfile& tmp, const TRec
TDocumento doc_babbo('D', anno, babbo_codnum, ndoc); //crea una copia del doc padre per prendere..
tipo_babbo = doc_babbo.tipo_riclassificato(); //..il tipo documento..
}
} //if (babbo != NULL)..
} //if (codcms_rigadoc == codcms_rmovana..
} //if (babbo != NULL)..
} //for (int i..
tmpcurr.put("DOCORIG", riferimento); //documento di riferimento (mitologico documento originale)
@ -1006,6 +1011,26 @@ F=IMF*/
break;
}
const TString4 dacodnum = movana.get(MOVANA_DCODNUM);
if (_num_fdr.find(dacodnum) >= 0) // is_special_doc
{
TLocalisamfile rdoc(LF_RIGHEDOC);
rdoc.setkey(4);
rdoc.put(RDOC_DAPROVV, movana.get(MOVANA_DPROVV));
rdoc.put(RDOC_DAANNO, movana.get(MOVANA_DANNO));
rdoc.put(RDOC_DACODNUM, dacodnum);
rdoc.put(RDOC_DANDOC, movana.get(MOVANA_DNDOC));
if (rdoc.read(_isgteq) == NOERR &&
rdoc.get(RDOC_DAPROVV) == movana.get(MOVANA_DPROVV) &&
rdoc.get_int(RDOC_DAANNO) == movana.get_int(MOVANA_DANNO) &&
rdoc.get(RDOC_DACODNUM) == dacodnum &&
rdoc.get_long(RDOC_DANDOC) == movana.get_long(MOVANA_DNDOC))
selettore &= ~FATTURATO;
}
} //if(original_doc != NULL)
else //movimenti puri di analitica (no documento di origine!)
{
@ -1582,12 +1607,12 @@ void TPrint_rendiconto_ca_recordset::crea_righe_da_rdoc(TLocalisamfile& tmp, con
const TRectype& curr_rdoc = cur_rdoc.curr();
const TString& rdoc_dacodnum = curr_rdoc.get(RDOC_DACODNUM);
#ifdef DBG
if (rdoc_dacodnum == "FDR" && curr_rdoc.get_int(RDOC_ANNO) == 2010 && curr_rdoc.get_int(RDOC_NDOC) == 66)
if (rdoc_dacodnum == "FDE" && curr_rdoc.get_int(RDOC_ANNO) == 2011 && curr_rdoc.get_int(RDOC_NDOC) == 3)
const int culone = 1;
#endif
const bool is_special_doc = _num_fdr.find(rdoc_dacodnum) >= 0;
//documento non contabilizzato o fattura da ricevere con numerazione configurata speciale
if (numregca == 0 || is_special_doc)
if (numregca == 0) // || is_special_doc)
{
const TString curr_key = curr_doc.build_key();
if (curr_key == old_key)