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

Corretta gestione descrizioni

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@2315 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-12-18 10:57:32 +00:00
parent 67d0803934
commit 7a6ad2e506
3 changed files with 11 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
sc/sc1200.cpp
View File

@ -216,7 +216,6 @@ int TCreatepart_app::crea_partite(int anno_es, int anno_rif, bool check)
TRiga_partite& riga = game.new_row();
riga.put(PART_DATAREG, _today);
riga.put(PART_DATADOC, _today);
riga.put(PART_DATAPAG, _today);
riga.put(PART_SEZ, saldo.sezione());
riga.put(PART_IMPORTO, saldo.valore());
riga.put(PART_DESCR, cf == 'C' ? _desccl : _descfo);
@ -224,7 +223,6 @@ int TCreatepart_app::crea_partite(int anno_es, int anno_rif, bool check)
// cazzata dare/avere/fare/baciare/cagare
const tipo_movimento tipo = (cf == 'C' ? (saldo.sezione() == 'D' ? tm_fattura : tm_nota_credito) :
(saldo.sezione() == 'D' ? tm_nota_credito : tm_fattura));
riga.put(PART_TIPOMOV, (int)tipo);
if (tipo == tm_fattura)
@ -236,6 +234,7 @@ int TCreatepart_app::crea_partite(int anno_es, int anno_rif, bool check)
}
else
{
riga.put(PART_DATAPAG, _today);
const int r = riga.get_int(PART_NRIGA);
TRectype& unas = game.unassigned().row(r, TRUE);
unas.put(PAGSCA_IMPORTO, saldo.valore());
@ -295,10 +294,13 @@ bool TCreatepart_app::menu(MENU_TAG)
else
message_box("Nessun saldo presente per l'esercizio %d", anno_es);
if (n_part > 0) // May be -1
m.set(F_NUMPART, n_part);
else
m.reset(F_NUMPART) ;
if (n_part > 0)
{
TString msg(80);
msg << "Sono state create " << n_part << " partite";
message_box(msg);
break;
}
} // while run
return FALSE;

5
sc/sc1200.h
View File

@ -1,4 +1,3 @@
#define F_ANNO 101
#define F_NUMPART 102
#define F_DESCCL 103
#define F_DESCFO 104
#define F_DESCCL 102
#define F_DESCFO 103

8
sc/sc1200a.uml
View File

@ -1,6 +1,6 @@
#include "sc1200.h"
PAGE "Apertura partite da saldi contabili" -1 -1 71 14
PAGE "Apertura partite da saldi contabili" -1 -1 71 12
GROUPBOX DLG_NULL 69 6
BEGIN
@ -50,12 +50,6 @@ BEGIN
FLAGS "A"
END
NUMBER F_NUMPART 3
BEGIN
PROMPT 1 11 "N. partite aperte "
FLAGS "D"
END
BUTTON DLG_OK 9 2
BEGIN
PROMPT -12 -1 "Conferma"