Corretto conflitto precedente

git-svn-id: svn://10.65.10.50/trunk@75 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-08-26 16:02:23 +00:00
parent fff1daf8af
commit 163625d934

View File

@ -1280,81 +1280,6 @@ void CG3200_application::calcola_progressivi_al()
void CG3200_application::calcola_progressivi() void CG3200_application::calcola_progressivi()
{ {
<<<<<<< cg3200.cpp
TLocalisamfile pconti(LF_PCON);
TLocalisamfile saldi (LF_SALDI);
real pdaresca,paveresca,pdarescap,paverescap;
real progdare_attuale,progavere_attuale,progdare_prec,progavere_prec;
real saldo,progredare_eseprec,progreavere_eseprec,pdarep,paverep;
int indbil;
char salini;
TRectype record(saldi.curr());
saldo = 0.00;
pdarep = 0.00;
paverep = 0.00;
pdaresca = 0.00;
paveresca = 0.00;
pdarescap = 0.00;
paverescap = 0.00;
// Ricerca sull'archivio saldi dei record con gruppo,conto,sottoconto
// uguali a quelli di rmov per il calcolo dei progressivi precedenti
record.zero();
record.put(SLD_GRUPPO, _gruppo);
record.put(SLD_CONTO, _conto);
record.put(SLD_SOTTOCONTO, _sottoc);
if (_ricerca == 'P')
indbil = atoi (current_cursor()->file(LF_PCON)->get(PCN_INDBIL));
else
{
if ((_ricerca == 'C') || (_ricerca == 'F'))
{
pconti.setkey(1);
pconti.zero();
pconti.put(PCN_GRUPPO, _gruppo);
pconti.put(PCN_CONTO , _conto);
pconti.read();
if (pconti.good())
indbil = atoi (pconti.get(PCN_INDBIL));
else
indbil = 0;
}
}
saldi.setkey(2);
saldi.zero();
saldi.put(SLD_GRUPPO, _gruppo);
saldi.put(SLD_CONTO, _conto);
saldi.put(SLD_SOTTOCONTO, _sottoc);
for ( saldi.read();
((saldi.curr()==record) && !saldi.eof());
saldi.next())
{
long annoes_saldi = saldi.curr().get_long(SLD_ANNOES);
//Calcola i progressivi dell'esercizio attuale
if (annoes_saldi == _annomsk)
{
pdaresca = saldi.curr().get_real(SLD_PDARESCA);
paveresca = saldi.curr().get_real(SLD_PAVERESCA);
saldo = saldi.curr().get_real(SLD_SALDO);
salini = saldi.curr().get(SLD_FLAGSALINI)[0];
}
//Calcola i progressivi dell'esercizio precedente
if (annoes_saldi == _annoesmsk)
{
pdarescap = saldi.curr().get_real(SLD_PDARESCA);
pdarep = saldi.curr().get_real(SLD_PDARE);
paverescap = saldi.curr().get_real(SLD_PAVERESCA);
paverep = saldi.curr().get_real(SLD_PAVERE);
=======
TLocalisamfile pconti(LF_PCON); TLocalisamfile pconti(LF_PCON);
TLocalisamfile saldi (LF_SALDI); TLocalisamfile saldi (LF_SALDI);
real pdaresca,paveresca,pdarescap,paverescap; real pdaresca,paveresca,pdarescap,paverescap;
@ -1428,7 +1353,6 @@ void CG3200_application::calcola_progressivi()
pdarep = saldi.curr().get_real(SLD_PDARE); pdarep = saldi.curr().get_real(SLD_PDARE);
paverescap = saldi.curr().get_real(SLD_PAVERESCA); paverescap = saldi.curr().get_real(SLD_PAVERESCA);
paverep = saldi.curr().get_real(SLD_PAVERE); paverep = saldi.curr().get_real(SLD_PAVERE);
>>>>>>> 1.2
// Se il saldo dell'esercizio attuale e' diverso da 0 allora significa che // Se il saldo dell'esercizio attuale e' diverso da 0 allora significa che
// quello corrisponde al saldo finale dell'esercizio precedente. Per ottenere // quello corrisponde al saldo finale dell'esercizio precedente. Per ottenere
@ -1519,12 +1443,12 @@ void CG3200_application::calcola_progressivi()
_totprogre_dare_al = progdare_attuale; _totprogre_dare_al = progdare_attuale;
_totprogre_avere_al = progavere_attuale; _totprogre_avere_al = progavere_attuale;
} }
} }
// Se la ricerca selezionata nella maschera e' per clienti, oppure fornitori, // allora ricerco su CLIFO i relativi dati, e su PCON il relativo gruppo,conto,// sottoconto e IV direttiva CEE // Se la ricerca selezionata nella maschera e' per clienti, oppure fornitori, // allora ricerco su CLIFO i relativi dati, e su PCON il relativo gruppo,conto,// sottoconto e IV direttiva CEE
void CG3200_application::ricerca_clifo() void CG3200_application::ricerca_clifo()
{ {
TString ragsoc,paiv,cofi,indcf,capcf,ptel,tel,statocf,comcf,dencom,provcom,dep; TString ragsoc,paiv,cofi,indcf,capcf,ptel,tel,statocf,comcf,dencom,provcom,dep;
TLocalisamfile pconti(LF_PCON); TLocalisamfile pconti(LF_PCON);
TString dataini,datafine; TString dataini,datafine;
@ -1597,13 +1521,13 @@ void CG3200_application::calcola_progressivi()
set_header (5,"@134g%-4s",(const char*) ptel); set_header (5,"@134g%-4s",(const char*) ptel);
set_header (5,"@138g/@139g%-10s",(const char*) tel); set_header (5,"@138g/@139g%-10s",(const char*) tel);
} }
} }
// Se la ricerca selezionata sulla maschera e' per gruppo, conto, sottoconto // Se la ricerca selezionata sulla maschera e' per gruppo, conto, sottoconto
// ricerca i corrispondenti su PCON, con relativa IV direttiva CEE // ricerca i corrispondenti su PCON, con relativa IV direttiva CEE
void CG3200_application::ricerca_gruppo() void CG3200_application::ricerca_gruppo()
{ {
TString descr,descriz,dep; TString descr,descriz,dep;
int numrivd; int numrivd;
TString dataini,datafine; TString dataini,datafine;
@ -1643,12 +1567,12 @@ void CG3200_application::calcola_progressivi()
set_header (5, "@0gPeriodo@12g%s", (const char*) dataini); set_header (5, "@0gPeriodo@12g%s", (const char*) dataini);
datafine = _data_fine.string(); datafine = _data_fine.string();
set_header (5, "@24g%s", (const char*) datafine); set_header (5, "@24g%s", (const char*) datafine);
} }
//Ricerca la descrizione relativa al gruppo da stampare //Ricerca la descrizione relativa al gruppo da stampare
const char* CG3200_application::descrizione_gruppo() const char* CG3200_application::descrizione_gruppo()
{ {
TLocalisamfile* pconti; TLocalisamfile* pconti;
long record; long record;
@ -1660,12 +1584,12 @@ void CG3200_application::calcola_progressivi()
tmp = pconti->curr().get(PCN_DESCR); tmp = pconti->curr().get(PCN_DESCR);
pconti->readat(record); pconti->readat(record);
return (tmp); return (tmp);
} }
// Ricerca la descrizione relativa al conto da stampare // Ricerca la descrizione relativa al conto da stampare
const char* CG3200_application::descrizione_conto() const char* CG3200_application::descrizione_conto()
{ {
TLocalisamfile* pconti; TLocalisamfile* pconti;
long record; long record;
@ -1678,12 +1602,12 @@ void CG3200_application::calcola_progressivi()
tmp = pconti->curr().get(PCN_DESCR); tmp = pconti->curr().get(PCN_DESCR);
pconti->readat(record); pconti->readat(record);
return (tmp); return (tmp);
} }
//Ricerca la descrizione relativa al gruppo da stampare //Ricerca la descrizione relativa al gruppo da stampare
const char* CG3200_application::descrizione_gruppo_clifo() const char* CG3200_application::descrizione_gruppo_clifo()
{ {
TLocalisamfile pconti(LF_PCON); TLocalisamfile pconti(LF_PCON);
pconti.curr().zero(); pconti.curr().zero();
@ -1691,12 +1615,12 @@ void CG3200_application::calcola_progressivi()
pconti.read(); pconti.read();
tmp = pconti.curr().get(PCN_DESCR); tmp = pconti.curr().get(PCN_DESCR);
return (tmp); return (tmp);
} }
// Ricerca la descrizione relativa al conto da stampare // Ricerca la descrizione relativa al conto da stampare
const char* CG3200_application::descrizione_conto_clifo() const char* CG3200_application::descrizione_conto_clifo()
{ {
TLocalisamfile pconti(LF_PCON); TLocalisamfile pconti(LF_PCON);
pconti.curr().zero(); pconti.curr().zero();
@ -1705,10 +1629,10 @@ void CG3200_application::calcola_progressivi()
pconti.read(); pconti.read();
tmp = pconti.curr().get(PCN_DESCR); tmp = pconti.curr().get(PCN_DESCR);
return (tmp); return (tmp);
} }
void CG3200_application::user_create() void CG3200_application::user_create()
{ {
TToken_string exp,exp1; TToken_string exp,exp1;
_rel = new TRelation (LF_PCON); _rel = new TRelation (LF_PCON);
@ -1746,10 +1670,10 @@ void CG3200_application::calcola_progressivi()
_msk->set_handler(F_ANNO, our_handler); _msk->set_handler(F_ANNO, our_handler);
_inizio_stampa = TRUE; _inizio_stampa = TRUE;
} }
void CG3200_application::user_destroy() void CG3200_application::user_destroy()
{ {
delete _msk; delete _msk;
delete _rel; delete _rel;
delete _rel_clifo; delete _rel_clifo;
@ -1764,17 +1688,17 @@ void CG3200_application::calcola_progressivi()
delete _tabreg; delete _tabreg;
delete _tabesc; delete _tabesc;
} }
int cg3200(int argc, char* argv[]) int cg3200(int argc, char* argv[])
{ {
CG3200_application a; CG3200_application a;
a.run(argc, argv, "Stampa Mastrini"); a.run(argc, argv, "Stampa Mastrini");
return 0; return 0;
} }