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

Corretta fromattazione

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1168 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
nik 1995-03-24 11:46:05 +00:00
parent 427a9f9178
commit b916d1c43b
23 changed files with 5212 additions and 5212 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
cg/cg2400.cpp
View File

@ -246,7 +246,7 @@ bool TRic_sistema::main_loop()
else
{
if (!leggi_marker())
return FALSE;
return FALSE;
if (_sequenza)
{
@ -394,10 +394,10 @@ void TRic_sistema::ripristina_trasfer()
if (_numdisk == 1)
set_firm(_dittaric);
// app.format("%05da", _dittaric);
// app.format("%05da", _dittaric);
// ditta << "C:\\prassi\\" << app << "\\trasfer";
// fcopy(_trasfer,/*ditta*/_trasf,TRUE);
// ditta << "C:\\prassi\\" << app << "\\trasfer";
// fcopy(_trasfer,/*ditta*/_trasf,TRUE);
_tras_file->fcopytemp(_trasfer, _trasf, TRUE);
}
@ -465,8 +465,8 @@ bool TRic_sistema::set_flag()
_sigle_file = _tras_file->sigle_file();
_nrec_file = _tras_file->nrec_file();
record = _tras_file->record();
// La fill_index e' richiamata dentro a read_control_rec
// _tras_file->fill_index(_sigle_file,_nrec_file);
// La fill_index e' richiamata dentro a read_control_rec
// _tras_file->fill_index(_sigle_file,_nrec_file);
}
for (j = 0; j < _sigle_file.len(); j++)

158
cg/cg2800.cpp
View File

@ -125,15 +125,15 @@ TVar_mov::TVar_mov(char mov) : _scelta(toupper(mov))
{
switch (_scelta)
{
case 'P':
case 'P':
_titolo = "Variazione movimenti prima nota";
break;
case 'I':
case 'I':
_titolo = "Variazione movimenti iva";
break;
default:
default:
break;
}
}
@ -285,19 +285,19 @@ bool TVar_mov::video_PN()
switch (tasto)
{
case K_ESC :
case K_ESC :
break;
case K_QUIT :
case K_QUIT :
break;
case K_SAVE :
{
registra_PN(mask);
}
case K_SAVE :
{
registra_PN(mask);
}
break;
default:
default:
break;
}
}
@ -361,19 +361,19 @@ bool TVar_mov::video_IVA()
switch (tasto)
{
case K_ESC :
case K_ESC :
break;
case K_QUIT :
case K_QUIT :
break;
case K_SAVE :
{
registra_IVA(mask);
}
case K_SAVE :
{
registra_IVA(mask);
}
break;
default:
default:
break;
}
}
@ -1084,28 +1084,28 @@ void TVar_mov::registra_PN(TMask& m)
}
void TVar_mov::registra_file_temp_mov(long nr,const TDate& dr,const TDate& dd,const TString& nd,TString& ri,
long pi,long upi,const TString& cc,TString& cp)
long pi,long upi,const TString& cc,TString& cp)
{
_tmov->setkey(1);
_tmov->zero();
_tmov->put(MOV_NUMREG, nr);
if (_tmov->read() == NOERR)
{
_tmov->put(MOV_DATAREG, dr);
_tmov->put(MOV_DATADOC, dd);
_tmov->put(MOV_NUMDOC, nd);
_tmov->put(MOV_REG, ri);
_tmov->put(MOV_PROTIVA, pi);
_tmov->put(MOV_UPROTIVA, upi);
_tmov->put(MOV_CODCAUS, cc);
_tmov->put(MOV_CODPAG, cp);
_tmov->put(MOV_DATAREG, dr);
_tmov->put(MOV_DATADOC, dd);
_tmov->put(MOV_NUMDOC, nd);
_tmov->put(MOV_REG, ri);
_tmov->put(MOV_PROTIVA, pi);
_tmov->put(MOV_UPROTIVA, upi);
_tmov->put(MOV_CODCAUS, cc);
_tmov->put(MOV_CODPAG, cp);
_tmov->rewrite();
_tmov->rewrite();
}
}
void TVar_mov::registra_file_trasfer_t(long nr,int ar,const TDate& dr,const TDate& dd,const TString& nd,TString& ri,
long pi,long upi,const TString& cc,const TString& cp)
long pi,long upi,const TString& cc,const TString& cp)
{
TString app,str;
TRectype* rec;
@ -1161,17 +1161,17 @@ void TVar_mov::registra_file_temp_rmov(long nr,int nri,int g,int c,long s,char s
_trmov->put(RMV_NUMRIG, nri);
if (_trmov->read() == NOERR)
{
_trmov->put(RMV_GRUPPO, g);
_trmov->put(RMV_CONTO, c);
_trmov->put(RMV_SOTTOCONTO, s);
_trmov->put(RMV_SEZIONE, sez);
_trmov->put(RMV_DESCR, desc);
_trmov->put(RMV_GRUPPOC, gc);
_trmov->put(RMV_CONTOC, cc);
_trmov->put(RMV_SOTTOCONTOC, sc);
_trmov->put(RMV_IMPORTO, imp);
_trmov->put(RMV_GRUPPO, g);
_trmov->put(RMV_CONTO, c);
_trmov->put(RMV_SOTTOCONTO, s);
_trmov->put(RMV_SEZIONE, sez);
_trmov->put(RMV_DESCR, desc);
_trmov->put(RMV_GRUPPOC, gc);
_trmov->put(RMV_CONTOC, cc);
_trmov->put(RMV_SOTTOCONTOC, sc);
_trmov->put(RMV_IMPORTO, imp);
_trmov->rewrite();
_trmov->rewrite();
}
}
@ -1233,10 +1233,10 @@ void TVar_mov::registra_IVA(TMask& m)
_tmov->put(MOV_NUMREG, numreg);
if (_tmov->read() == NOERR)
{
_tmov->put(MOV_DATA74TER, data74ter);
_tmov->put(MOV_CODCF, codcf);
_tmov->put(MOV_DATA74TER, data74ter);
_tmov->put(MOV_CODCF, codcf);
_tmov->rewrite();
_tmov->rewrite();
}
registra_file_trasfer_t_iva(numreg,data74ter,codcf,ragsococc,indocc,localita,capocc,provocc);
@ -1312,16 +1312,16 @@ void TVar_mov::registra_file_temp_riva(long nr,int nri,const real& imp,const TSt
_tiva->put(RMI_NUMRIG, nri);
if (_tiva->read() == NOERR)
{
_tiva->put(RMI_IMPONIBILE, imp);
_tiva->put(RMI_CODIVA, civa);
_tiva->put(RMI_IMPOSTA, imposta);
_tiva->put(RMI_TIPODET, tdet);
_tiva->put(RMI_TIPOCR, tcr);
_tiva->put(RMI_GRUPPO, g);
_tiva->put(RMI_CONTO, c);
_tiva->put(RMI_SOTTOCONTO, s);
_tiva->put(RMI_IMPONIBILE, imp);
_tiva->put(RMI_CODIVA, civa);
_tiva->put(RMI_IMPOSTA, imposta);
_tiva->put(RMI_TIPODET, tdet);
_tiva->put(RMI_TIPOCR, tcr);
_tiva->put(RMI_GRUPPO, g);
_tiva->put(RMI_CONTO, c);
_tiva->put(RMI_SOTTOCONTO, s);
_tiva->rewrite();
_tiva->rewrite();
}
}
@ -1444,34 +1444,34 @@ int cg2800 (int argc, char* argv[])
{
switch (*argv[2])
{
case 'P':
{
TVar_mov main_app(*argv[2]);
main_app.run(argc, argv,main_app._titolo);
}
break;
case 'I':
{
TVar_mov main_app(*argv[2]);
main_app.run(argc, argv,main_app._titolo);
}
break;
case 'S':
{
TDitta_ric a;
a.run(argc, argv,"Scelta ditta per ricezione");
}
break;
case 'A':
{
TAnn_mov a;
a.run(argc, argv,"Annullamento movimenti da ricevere");
}
break;
default:
break;
case 'P':
{
TVar_mov main_app(*argv[2]);
main_app.run(argc, argv,main_app._titolo);
}
//main_app.run(argc, argv,main_app._titolo);
return TRUE;
break;
case 'I':
{
TVar_mov main_app(*argv[2]);
main_app.run(argc, argv,main_app._titolo);
}
break;
case 'S':
{
TDitta_ric a;
a.run(argc, argv,"Scelta ditta per ricezione");
}
break;
case 'A':
{
TAnn_mov a;
a.run(argc, argv,"Annullamento movimenti da ricevere");
}
break;
default:
break;
}
//main_app.run(argc, argv,main_app._titolo);
return TRUE;
}

14
cg/cg2802.cpp
View File

@ -95,19 +95,19 @@ bool TAnn_mov::video()
switch (tasto)
{
case K_ESC :
case K_ESC :
break;
case K_QUIT :
case K_QUIT :
break;
case K_SAVE :
{
annulla(mask);
}
case K_SAVE :
{
annulla(mask);
}
break;
default:
default:
break;
}
}