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

Aggiustamenti XI e errori corretti

Browse Source 
disabilitato cg3500 in attesa di aggiornamento per saldi


git-svn-id: svn://10.65.10.50/trunk@2883 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1996-05-22 10:40:53 +00:00
parent 47f30ceee4
commit 229fcb8bb2
7 changed files with 15 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
cg/cg3.cpp
View File

@ -17,7 +17,7 @@ int main(int argc,char** argv)
case 1: rt = cg3200(argc,argv) ; break;
case 2: rt = cg3300(argc,argv) ; break;
case 3: rt = cg3400(argc,argv) ; break;
case 4: rt = cg3500(argc,argv) ; break;
// case 4: rt = cg3500(argc,argv) ; break;
default: error_box(usage, argv[0]) ; break;
}
return rt;

2
cg/cg3100a.uml
View File

@ -85,7 +85,7 @@ BEGIN
MESSAGE FALSE ENABLE,F_STAMPA
END
RADIOBUTTON F_DECIDI 10
RADIOBUTTON F_DECIDI 12
BEGIN
PROMPT 2 10 "Stampa "
HELP "Indicare il criterio di scelta dei movimenti"

2
cg/cg3200.cpp
View File

@ -1996,7 +1996,7 @@ print_action TMastrini_application::postprocess_page(int file, int counter)
else
if (_nummast == 2)
{
if (!counter)
if (!counter)
{
if (_numcarat == 1)
carica_array_totali132();

7
cg/cg3300.cpp
View File

@ -843,10 +843,9 @@ void CG3300_application::calcola ()
_alleg->put (ALL_ANNO, _anno_stampa);
_alleg->put (ALL_CODCF, _tipoa_richiesto);
TProgind prnd (_alleg->items(),
format ("Calcolo in corso \n",
"Attendere prego... "),
FALSE, TRUE);
TProgind prnd(_alleg->items(),
"Elaborazione in corso...",
FALSE, TRUE);
if (_ricerca_att != "")
_alleg->curr().put (ALL_CODATT, _ricerca_att);

8
cg/cg3300a.uml
View File

@ -86,13 +86,13 @@ END
BOOLEAN F_ARROT
BEGIN
PROMPT 2 11 "Importi non arrotondati "
HELP "Indicare se vengano arrotondati gli importi"
HELP "Indicare se gli importi devono essere arrotondati"
END
BOOLEAN F_ANNO_PREC
BEGIN
PROMPT 31 10 "Estratto anno precedente "
HELP "Indicare se stamapre solo il saldo dell'anno precedente"
HELP "Indicare se stampare solo il saldo dell'anno precedente"
END
BOOLEAN F_ATTIVITA
@ -114,7 +114,7 @@ END
BOOLEAN F_RICALCOLA
BEGIN
PROMPT 46 13 "Ricalcola "
PROMPT 46 13 "Ricalcola"
HELP "Indicare se ricalcolare ogni ditta prima di stampare"
END
@ -140,7 +140,7 @@ BEGIN
DISPLAY "Codice" CODDITTA
DISPLAY "Ragione sociale @50" RAGSOC
OUTPUT F_A_DITTA CODDITTA
VALIDATE F_A_DITTA >= F_DA_DITTA
VALIDATE F_A_DITTA>=F_DA_DITTA
END
BUTTON DLG_OK 9 2

2
cg/cg3300c.uml
View File

@ -89,7 +89,7 @@ BEGIN
DISPLAY "Codice" CODDITTA
DISPLAY "Ragione sociale @50" RAGSOC
OUTPUT F_A_DITTA CODDITTA
VALIDATE F_A_DITTA >= F_DA_DITTA
VALIDATE F_A_DITTA>=F_DA_DITTA
END
BUTTON DLG_OK 9 3

12
cg/cg4600.cpp
View File

@ -1174,9 +1174,9 @@ void CG4600_application::chiudi_attivita()
j = 0;
numrig = 0;
for (_saldi->read(_isgteq); ; _saldi->next())
for (int err = _saldi->read(_isgteq); ; _saldi->next())
{
if (_saldi->curr() > (*_rec) || _saldi->eof())
if (_saldi->curr() > (*_rec) || _saldi->eof() || err != NOERR)
{
// Aggiungo un ulteriore riga di movimento contenente la somma
// di tutti i saldi aventi lo stesso conto, indicandola
@ -1200,15 +1200,11 @@ void CG4600_application::chiudi_attivita()
compila_mov = FALSE;
}
//numrig++;
s = _saldi->get_long(SLD_SOTTOCONTO);
//sale.calcola_ultima_immissione(_annoesch,0,g,c,s,indbil);
s = _saldi->get_long(SLD_SOTTOCONTO);
sale.ultima_immissione_bilancio(_annoesch,g,c,s,indbil, 1);
_saldo = sale.saldo();
//_saldo = ZERO;
_saldo = sale.saldo();
const int dbkey = _saldi->getkey();
_saldi->setkey(1);
// TString sldstr = _saldo.string();
if (_saldo == ZERO) continue; // *** TBC qui fa ciclo infinito