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

Patch level :10.0

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :sistemata stampa ritenute; riporto dalla 5.0


git-svn-id: svn://10.65.10.50/trunk@18254 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2009-02-12 13:57:13 +00:00
parent 397f0dd6a8
commit 8d83ee89d5
3 changed files with 27 additions and 28 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
m770/772400.cpp
View File

@ -50,7 +50,7 @@ class TSt_vers : public TPrintapp
TLocalisamfile* _scperc; TLocalisamfile* _scperc;
TTable* _ca7; TTable* _ca7;
int _annop, _mesep, _codtribp; int _annop, _mesep, _codtribp;
TDate _datamsk; TDate _dataini, _datafine;
char _tipoap; char _tipoap;
long _codditta, _codanagp; long _codditta, _codanagp;
real _tot_cod, _tot_mese; real _tot_cod, _tot_mese;
@ -119,7 +119,7 @@ bool filter_func (const TRelation* rel)
const TDate datapag = rpag.get(PAG_DATAPAG); const TDate datapag = rpag.get(PAG_DATAPAG);
if (datapag.ok() && datapag <= app()._datamsk) if (datapag.ok() && datapag >= app()._dataini && datapag <= app()._datafine)
{ {
const long numvers = rpag.get_long(PAG_NUMVERS); const long numvers = rpag.get_long(PAG_NUMVERS);
if (numvers <= 0) if (numvers <= 0)
@ -386,26 +386,25 @@ bool TSt_vers::set_print(int)
if (tasto == K_ENTER) if (tasto == K_ENTER)
{ {
int anno = msk.get_int(F_ANNO); const int anno = msk.get_int(F_ANNO);
int mese = msk.get_int(F_MESE); const int damese = msk.get_int(F_DAMESE);
const int amese = msk.get_int(F_AMESE);
TDate d (1, mese, anno); _dataini = TDate(1, damese, anno);
int ult = d.last_day(mese, anno); _datafine = TDate(1, amese, anno);
TDate dd (ult, mese, anno); _datafine.set_end_month();
_datamsk = dd;
_cur->set_filterfunction(filter_func); _cur->set_filterfunction(filter_func);
set_real_picture ("###.###.###.###"); set_real_picture ("###.###.###.###");
set_print_zero(); set_print_zero();
set_magic_currency(TRUE); set_magic_currency(true);
printer().footerlen(5); printer().footerlen(5);
setta_intestazione(); setta_intestazione();
_prog = new TProgind(_cur->items(),"Elaborazione in corso...",FALSE); _prog = new TProgind(_cur->items(), "Elaborazione in corso...", false);
crea_sort(); crea_sort();
_sort->endsort(); _sort->endsort();
@ -413,10 +412,10 @@ bool TSt_vers::set_print(int)
delete _rig; delete _rig;
delete _prog; delete _prog;
return TRUE; return true;
} }
else else
return FALSE; return false;
} }
void TSt_vers::setta_intestazione() void TSt_vers::setta_intestazione()

7
m770/772400.h
View File

@ -1,4 +1,5 @@
#define F_CODDITTA 101 #define F_CODDITTA 101
#define F_RAGSOC 102 #define F_RAGSOC 102
#define F_ANNO 103 #define F_ANNO 103
#define F_MESE 104 #define F_DAMESE 104
#define F_AMESE 105

23
m770/772400a.uml
View File

@ -3,7 +3,11 @@
#include "772400.h" #include "772400.h"
PAGE "Calcolo e stampa versamenti ritenute" -1 -1 78 14 TOOLBAR "topbar" 0 0 0 2
#include <printbar.h>
ENDPAGE
PAGE "Calcolo e stampa versamenti ritenute" 0 2 0 0
GROUPBOX DLG_NULL 78 3 GROUPBOX DLG_NULL 78 3
BEGIN BEGIN
@ -29,27 +33,22 @@ END
NUMBER F_ANNO 4 NUMBER F_ANNO 4
BEGIN BEGIN
PROMPT 3 4 "Anno di pagamento " PROMPT 3 4 "Anno di pagamento "
FLAGS "A" FLAGS "A"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
WARNING "Inserire l'anno di pagamento" WARNING "Inserire l'anno di pagamento"
END END
LISTBOX F_MESE 9 LISTBOX F_DAMESE 9
BEGIN BEGIN
PROMPT 3 6 "Mese di pagamento " PROMPT 3 6 "Da mese di pagamento "
FLAGS "AM" FLAGS "AM"
END END
BUTTON DLG_PRINT 10 2 LISTBOX F_AMESE 9
BEGIN BEGIN
PROMPT -12 -1 "~Stampa" PROMPT 3 7 "A mese di pagamento "
MESSAGE EXIT,K_ENTER FLAGS "AM"
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -1 ""
END END
ENDPAGE ENDPAGE