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

aggiunta busta e corretta stampa firme

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@3351 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1996-08-09 08:32:24 +00:00
parent 9687be385a
commit 8f2fd1122d
2 changed files with 61 additions and 37 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
m770/77busta.frm
View File

@ -335,7 +335,7 @@ BEGIN
KEY "C.A.P. Ufficio distrettuale"
PROMPT 138 46 ""
FIELD 204@->S7
FILED 213@->CAPCOM
FIELD 213@->CAPCOM
GROUP 20
END

26
m770/77stq.cpp
View File

@ -4003,6 +4003,7 @@ protected:
void stampa_corpo(TPrinter& pr);
void stampa_totali(TPrinter& pr);
void stampa_firma(TPrinter& pr);
public:
TQuadroA(const char* form, const char* quadro) : TDicForm(form, quadro) {}
@ -4044,6 +4045,26 @@ void TQuadroA::stampa_totali(TPrinter& pr)
}
}
void TQuadroA::stampa_firma(TPrinter& pr)
{
TPrint_section& totali = section('F', last_page);
totali.update();
TForm_item& signature = totali.find_field(2);
const int lasty = signature.y();
TPrintrow empty;
for (int i = 0; i < totali.items(); i++)
{
if (i < lasty)
pr.print(empty);
else
pr.print(totali.row(i));
_RigaCorr++;
}
}
void TQuadroA::next_page(TPrinter& pr)
{
fill_page(pr, -1); // formfeed "adattato"
@ -4184,12 +4205,15 @@ bool TQuadroA::print(const long codditta, const long NumFis, const long NumNoFis
if (elementi >= elementi_pagina(QUARTA))
{
jump_to_line(pr, riga_totali(QUARTA));
if (stampato_ultimo)
{
jump_to_line(pr, riga_totali(QUARTA));
stampa_totali(pr);
stampati_totali = TRUE;
}
else
stampa_firma(pr);
next_page(pr);
elementi = 0;
}