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

Patch level :2.0 p@rtners 680

Browse Source 
Files correlati     :cg3.exe
Ricompilazione Demo : [ ]
Commento            :
CM20083(nuova lista fatture doppie)
Nel menù iva, sotto la voce Lista fatture, aggiungere una nuova lista con nome 'Lista fatture
doppie' che stampi l'elenco delle fatture fornitori e clienti inserite due volte. Quindi oltre
alla segnalazione che diamo in fase di inserimento questa lista permette agli utenti un po'
'utonti' di non fare cavolate.


git-svn-id: svn://10.65.10.50/trunk@11750 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2004-02-06 14:38:52 +00:00
parent 15d1490823
commit cdef646712
1 changed files with 25 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
cg/cg3800.cpp
View File

@ -114,22 +114,40 @@ void TDouble_fatt_form::fill_body_odd(int i, int j)
void TDouble_fatt_form::print(const TMask& m)
{
const TDate dataini = m.get(F_DADATA);
const TDate datafine = m.get(F_ADATA);
TPrint_section& header = section('H', odd_page);
header.find_field(FR_DADATA).set(m.get(F_DADATA));
header.find_field(FR_ADATA).set(m.get(F_ADATA));
header.find_field(FR_DADATA).set(dataini);
header.find_field(FR_ADATA).set(datafine);
header.update();
set_background(1, TRUE);
set_header(1, TRUE);
set_footer(1, FALSE);
printer().open();
for (int i = 0; i < _duplicati.items(); i++)
for (int i = 0; i < _duplicati.items(); i++) //scan dell'array dei movimenti che presentano duplicati
{
fill_header_last(i);
const TPointer_array& dup = (const TPointer_array&)_duplicati[i];
//controlla se le date di registrazione dei movimenti sono incluse nell'intervallo proposto nella maschera
bool stampa = false;
for (int j = 0; j < dup.items(); j++)
fill_body_odd(i,j);
{
const TRectype& mov = get_mov(i,j);
const TDate datareg = mov.get(MOV_DATAREG);
if ((datareg >= dataini)&&(datareg <= datafine))
{
stampa = true;
break;
}
}
if (stampa)
{
fill_header_last(i);
for (int k = 0; k < dup.items(); k++)
fill_body_odd(i,k);
}
}
printer().close();
@ -270,6 +288,7 @@ void TDouble_fatt::main_loop()
TCursor cur(&rel, "TIPO=='F'", 2, &darec, &arec);
_movimenti.destroy();
_duplicati.destroy();
scan_cursor(cur, "Ricerca fatture doppie...", mov_callback, this);
if (_duplicati.items() > 0)