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

Another commitment..

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@3645 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
nik 1996-09-23 10:29:30 +00:00
parent c6e0068a17
commit 94f5183eee
6 changed files with 1837 additions and 1825 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
m770/77stba.cpp
View File

@ -20,6 +20,8 @@ TBase1::~TBase1()
void TBase1::stampa_corpo(TPrinter& pr)
{
// Salta due righe nelle prime pagine successive alla prima
if (!PaginaPosizionamento()) fill_page(pr, HEADER_PRIMA_NOPOS);
TPrint_section& body = section('B', first_page);
body.reset();
body.update();
@ -134,6 +136,7 @@ bool TBase1::print(const long codditta, const long NumFis, const long NumNoFis)
}
jump_to_line(pr, prima_riga(PRIMA));
stampa_corpo(pr);
_PaginaPosizionamento=FALSE;
stampa_soci(pr);
next_page(pr);
close_print();

2
m770/77stq.cpp
View File

@ -87,6 +87,8 @@ bool TDicForm::InitPrint(const long codditta)
// pr.set_char_size(fontsize()); // Set font name and size
// pr.set_fontname(fontname()); // according to current form
_posiziona=pr.printtype()==winprinter;
// if (_posiziona && !_GiaPosizionato && pr.printtype() == winprinter)
if (_posiziona && !_GiaPosizionato && pr.printtype() == winprinter)
{
posiziona();

5
m770/77stq.h
View File

@ -21,6 +21,10 @@
#include "77stqd.h"
#include "77lib.h"
// Righe da saltare nelle prime pag. dei moduli successivi al primo (che' son
// senza le righe del posizionamento...)
HIDDEN int HEADER_PRIMA_NOPOS = 2;
// Chincaglieria che serve per posiziona()
typedef long HWND;
HIDDEN const int MAX_LEN = 300;
@ -112,6 +116,7 @@ class TDicForm : public TForm
virtual void inc_curr_page();
virtual void next_page(TPrinter& pr);
bool _modulaser; // se stampa per modulaser
bool _posiziona;
TipoDitta _tipo_ditta; // tipo ditta: normale, estinto, dichiarante
int _num_foglio; // numero foglio
TString _cofi_dic; // cod.fis. dichiarante

2
m770/77stqab.cpp
View File

@ -287,6 +287,7 @@ bool TQuadroA::print(const long codditta, const long NumFis, const long NumNoFis
next_page(pr);
elementi = 0;
}
_PaginaPosizionamento=FALSE;
break;
case SECONDA:
case TERZA:
@ -589,6 +590,7 @@ bool TQuadroH::print(const long codditta, const long NumFis, const long NumNoFis
next_page(pr);
elementi = 0;
}
_PaginaPosizionamento=FALSE;
break;
case SECONDA:
if (!stampato_ultimo)