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

Patch level : 2.1 88

Browse Source 
Files correlati     : in0.exe in0100a.msk
Ricompilazione Demo : [ ]
Commento            : bug 0000037
Su stampa riepiloghi aggiunta possibilita' di stampare solo il frontespizio


git-svn-id: svn://10.65.10.50/trunk@12245 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 2004-07-14 13:11:31 +00:00
parent 970decc936
commit a2eabd022e
3 changed files with 18 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
in/in0100.cpp
View File

@ -29,6 +29,7 @@ class TStampaIntra_form : public TForm
real _totaleprog1, _totaleprog2; // Totale progressivo per pagina, sezioni 1 e 2
int _decimals;
bool _solofronte;
protected:
void print_page(const pagetype p);
@ -39,7 +40,7 @@ protected:
public:
void print();
TStampaIntra_form (const char* name, char t, char f, int p, int a);
TStampaIntra_form (const char* name, char t, char f, int p, int a, bool sf);
virtual ~TStampaIntra_form ();
};
@ -67,12 +68,13 @@ bool TStampaIntra_form::validate(TForm_item& fld, TToken_string& val)
return TForm::validate(fld, val);
}
TStampaIntra_form::TStampaIntra_form(const char* name, char t, char f, int p, int a) : TForm(name)
TStampaIntra_form::TStampaIntra_form(const char* name, char t, char f, int p, int a, bool sf) : TForm(name)
{
_tipo << t;
_frequenza << f;
_periodo << p;
_anno << a;
_solofronte = sf;
TRectype dep(cursor()->file(LF_RIEPRETT).curr());
dep.zero();
@ -312,7 +314,8 @@ void TStampaIntra_form::print()
arrange_form();
// Ed ecco qui... il Lievito Svi$$ero (sempre per rimanere in tema di Ali' Baba' ed i 40 Kazzoni)
while (good())
bool verygood = good();
while (verygood)
{
for (int pagina = 1; pagina <= 4; pagina++)
{
@ -331,8 +334,9 @@ void TStampaIntra_form::print()
default:
break;
}
bool verygood = good();
if (!verygood)
verygood = good();
if (_solofronte) verygood = FALSE;
if (!verygood || _solofronte)
break;
}
}
@ -354,6 +358,7 @@ protected:
virtual short type_field() const { return R_TIPO; }
virtual short period_field() const { return R_PERIODO_M; }
virtual int anno() const { return get_int(R_ANNO); }
virtual bool solofronte() const { return get_bool(R_SOLOFRONTE); }
public:
void print();
@ -368,7 +373,7 @@ TStampaIntra_mask::TStampaIntra_mask()
void TStampaIntra_mask::print()
{
const int anno_s = anno();
TStampaIntra_form form(tipo() == 'A' ? "in0100a" : "in0100b", tipo(), frequenza(anno_s), periodo(), anno_s);
TStampaIntra_form form(tipo() == 'A' ? "in0100a" : "in0100b", tipo(), frequenza(anno_s), periodo(), anno_s, solofronte());
form.print();
}

1
in/in0100a.h
View File

@ -4,3 +4,4 @@
#define R_PERIODO_M 103
#define R_PERIODO_T 104
#define R_PERIODO_A 105
#define R_SOLOFRONTE 106

7
in/in0100a.uml
View File

@ -1,6 +1,6 @@
#include "in0100a.h"
PAGE "Stampa Riepiloghi" -1 -1 32 6
PAGE "Stampa Riepiloghi" -1 -1 32 8
LIST R_TIPO 1 10
BEGIN
@ -42,6 +42,11 @@ BEGIN
MESSAGE COPY,R_PERIODO_M
END
BOOLEAN R_SOLOFRONTE
BEGIN
PROMPT 1 5 "Stampa solo il frontespizio"
END
BUTTON DLG_PRINT 10 2
BEGIN
PROMPT -12 -1 ""