Ho spezzato il file 77stq.cpp creando i file 77stq.h - 77stqab.h - 77stqab.cpp
77stqc.h - 77stqc.cpp git-svn-id: svn://10.65.10.50/trunk@3567 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
ale
parent
041a533510
commit
9657425c9e
@ -81,7 +81,7 @@ END
|
|||||||
STRINGA 5
|
STRINGA 5
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "SESSO"
|
KEY "SESSO"
|
||||||
PROMPT 56 13 ""
|
PROMPT 59 13 ""
|
||||||
FIELD 118@->SESSO
|
FIELD 118@->SESSO
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
@ -105,7 +105,7 @@ END
|
|||||||
STRINGA 8
|
STRINGA 8
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "PROV. DI NASCITA"
|
KEY "PROV. DI NASCITA"
|
||||||
PROMPT 122 13 ""
|
PROMPT 125 13 ""
|
||||||
FIELD 113@->PROVCOM
|
FIELD 113@->PROVCOM
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
@ -120,7 +120,7 @@ END
|
|||||||
STRINGA 11
|
STRINGA 11
|
||||||
BEGIN
|
BEGIN
|
||||||
KEY "PROV DI RES.FISCALE"
|
KEY "PROV DI RES.FISCALE"
|
||||||
PROMPT 56 15 ""
|
PROMPT 59 15 ""
|
||||||
FIELD 213@->PROVCOM
|
FIELD 213@->PROVCOM
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|||||||
1444
m770/77stq.cpp
1444
m770/77stq.cpp
File diff suppressed because it is too large
Load Diff
275
m770/77stq.h
Executable file
275
m770/77stq.h
Executable file
@ -0,0 +1,275 @@
|
|||||||
|
#ifndef __77STQ_H
|
||||||
|
#define __77STQ_H
|
||||||
|
|
||||||
|
#include <xvt.h>
|
||||||
|
#include <applicat.h>
|
||||||
|
#include <relation.h>
|
||||||
|
#include <config.h>
|
||||||
|
#include <mask.h>
|
||||||
|
#include <form.h>
|
||||||
|
#include <printer.h>
|
||||||
|
#include <progind.h>
|
||||||
|
#include "base.h"
|
||||||
|
#include <urldefid.h>
|
||||||
|
#include <nditte.h>
|
||||||
|
#include <anagr.h>
|
||||||
|
#include "quadroc.h"
|
||||||
|
#include "quadrod.h"
|
||||||
|
#include "quadrod1.h"
|
||||||
|
#include "quadrogd.h"
|
||||||
|
#include "quadrif.h"
|
||||||
|
#include "77stqd.h"
|
||||||
|
#include "77lib.h"
|
||||||
|
|
||||||
|
// Chincaglieria che serve per posiziona()
|
||||||
|
typedef long HWND;
|
||||||
|
HIDDEN const int MAX_LEN = 300;
|
||||||
|
extern "C" {
|
||||||
|
BOOLEAN PrintLineNow( char *pData, word cbBytes, HWND hInst );
|
||||||
|
};
|
||||||
|
|
||||||
|
|
||||||
|
HIDDEN TString16 __dep16;
|
||||||
|
HIDDEN TString80 __dep80;
|
||||||
|
|
||||||
|
// Vega-Key di Modulaser
|
||||||
|
HIDDEN const char* VK_STARTDOC = "<VK>&MA796&0&1";
|
||||||
|
HIDDEN const char* VK_ENDDOC = "<VK>!0";
|
||||||
|
typedef enum { STARTDOC, STARTDITTA, STARTPAGE, ENDDOC } ModulaserKey;
|
||||||
|
|
||||||
|
// Campi form
|
||||||
|
#define TOT_TOTALE 1
|
||||||
|
#define TOT_SNSRIT 2
|
||||||
|
#define TOT_IMPON 3
|
||||||
|
#define TOT_IMPOR 4
|
||||||
|
#define TOT_NETTO 5
|
||||||
|
|
||||||
|
#define D_TOTALE 16
|
||||||
|
#define D_SNSRIT 17
|
||||||
|
#define D_IMPONIBILE 18
|
||||||
|
#define D_IMPORTO 20
|
||||||
|
#define D_NETTO 21
|
||||||
|
|
||||||
|
#define D1_TOTALE 12
|
||||||
|
#define D1_QUOTAPRO 13
|
||||||
|
#define D1_SPESEANT 14
|
||||||
|
#define D1_IMPONIBILE 15
|
||||||
|
#define D1_IMPORTO 17
|
||||||
|
#define D1_NETTO 18
|
||||||
|
|
||||||
|
#define C_TOTALE 14
|
||||||
|
#define C_CONTSSN 15
|
||||||
|
#define C_SOMME 16
|
||||||
|
#define C_IMPONIBILE 17
|
||||||
|
#define C_RITENUTE 18
|
||||||
|
#define C_NETTO 19
|
||||||
|
|
||||||
|
#define H_COFI_DIC 13
|
||||||
|
#define H_NUM_FOGLIO 14
|
||||||
|
|
||||||
|
// Quadro D
|
||||||
|
HIDDEN const int QD_FORMLEN_PRIMA = 70; // 72 - 3 (3 e' la posizione della X di posiz.)
|
||||||
|
HIDDEN const int QD_FORMLEN = 72;
|
||||||
|
HIDDEN const int POS_DITTA = 120; // Colonna del codice ditta a pie' di modulo
|
||||||
|
HIDDEN const int QD_PAGINE = 4;
|
||||||
|
HIDDEN const int QD_RIGHE_PRIMA = 4;
|
||||||
|
HIDDEN const int QD_RIGHE_SECONDA = 7;
|
||||||
|
HIDDEN const int QD_RIGHE_TERZA = 7;
|
||||||
|
HIDDEN const int QD_RIGHE_QUARTA = 7;
|
||||||
|
HIDDEN const int QD1_RIGHE_PRIMA = 6;
|
||||||
|
HIDDEN const int QD1_RIGHE_SECONDA = 9;
|
||||||
|
HIDDEN const int QD1_RIGHE_TERZA = 9;
|
||||||
|
HIDDEN const int QD1_RIGHE_QUARTA = 8;
|
||||||
|
|
||||||
|
HIDDEN const int HEADER_SECONDA = 8;
|
||||||
|
HIDDEN const int HEADER_TERZA = 8; // Sarebbero 9 col righello...
|
||||||
|
HIDDEN const int HEADER_QUARTA = 13; // 15 col righello...
|
||||||
|
|
||||||
|
HIDDEN const int HEADER_D1_SECONDA = 8;
|
||||||
|
HIDDEN const int HEADER_D1_TERZA = 8;
|
||||||
|
HIDDEN const int HEADER_D1_QUARTA = 14;
|
||||||
|
|
||||||
|
typedef enum { PRIMA=1, SECONDA, TERZA, QUARTA } PaginaQuadro;
|
||||||
|
typedef enum { fisiche, nofisiche } TipoPagina;
|
||||||
|
|
||||||
|
class TDicForm : public TForm
|
||||||
|
{
|
||||||
|
private:
|
||||||
|
real _f_tot_totale, _f_tot_snsrit, _f_tot_impon, _f_tot_impor, _f_tot_netto;
|
||||||
|
real _nf_tot_totale, _nf_tot_snsrit, _nf_tot_impon, _nf_tot_impor, _nf_tot_netto;
|
||||||
|
|
||||||
|
TCursor* _cur;
|
||||||
|
|
||||||
|
protected:
|
||||||
|
long _Items; // numero di record che hanno passato il filtro
|
||||||
|
PaginaQuadro _PaginaCorrente;
|
||||||
|
|
||||||
|
void set_curr_page(PaginaQuadro pagina) { _PaginaCorrente = pagina; }
|
||||||
|
virtual int dic_form_len() const;
|
||||||
|
virtual void inc_curr_page();
|
||||||
|
virtual void next_page(TPrinter& pr);
|
||||||
|
bool _modulaser; // se stampa per modulaser
|
||||||
|
bool _posiziona; // se deve fare posizionamento
|
||||||
|
TipoDitta _tipo_ditta; // tipo ditta: normale, estinto, dichiarante
|
||||||
|
int _num_foglio; // numero foglio
|
||||||
|
TString _cofi_dic; // cod.fis. dichiarante
|
||||||
|
bool _can_print_tot_fis, _can_print_tot_nofis;
|
||||||
|
bool _finite_fis, _finite_nofis, _LastDitta, _EndPrintDitta;
|
||||||
|
bool _GiaStampatiFis, _GiaStampatiNoFis, _PaginaPosizionamento;
|
||||||
|
bool _GiaPosizionato, _GiaMessoStartDoc, _GiaMessoStartPage[QD_PAGINE]; // flag per modulaser
|
||||||
|
int _CtrNoFisStampati, _CtrFisStampati; // contatori p.f. e p.g. stampate
|
||||||
|
long _codditta, _codditta_dic; // cod.ditta e cod.ditta dichiarante
|
||||||
|
int _RigaCorr; // contatore riga corrente
|
||||||
|
TString16 _quadro; // codice quadro in stampa
|
||||||
|
|
||||||
|
void stampa_testata(TPrinter& pr);
|
||||||
|
virtual bool ultima_pagina() const { return _PaginaCorrente==QUARTA; }
|
||||||
|
virtual void stampa_totali(TPrinter& pr);
|
||||||
|
// virtual void aggiorna_totali(const char tipo);
|
||||||
|
virtual void set_body(TPrinter& pr, const char tipo);
|
||||||
|
void StampaPagina(PaginaQuadro PaginaCorrente, const bool StampaTotali, const long Fis, const long NoFis);
|
||||||
|
void posiziona();
|
||||||
|
void fill_page(TPrinter& pr, const int righe);
|
||||||
|
void jump_to_line(TPrinter& pr, const int riga);
|
||||||
|
const char* BuildModulaserStartPage();
|
||||||
|
void put_modulaser(TPrintrow& row, ModulaserKey key, int page=0);
|
||||||
|
void ClearFlagModulaser();
|
||||||
|
bool PaginaPosizionamento() const;
|
||||||
|
virtual bool InitPrint(const long codditta);
|
||||||
|
|
||||||
|
public:
|
||||||
|
virtual TCursor* cursor() const { return _cur; }
|
||||||
|
virtual TRelation* relation() const { return _cur->relation(); }
|
||||||
|
|
||||||
|
virtual long filtra(const long codditta);
|
||||||
|
|
||||||
|
TProgind* _prog; // progind usata in print()
|
||||||
|
|
||||||
|
long codditta() const { return _codditta; }
|
||||||
|
void set_codditta(const long ditta) { _codditta = ditta; }
|
||||||
|
void set_posiziona(const bool posiz) { _posiziona = posiz; _GiaPosizionato = FALSE; }
|
||||||
|
void can_print_tot_fis(const bool canpr) { _can_print_tot_fis = canpr; }
|
||||||
|
void can_print_tot_nofis(const bool canpr) { _can_print_tot_nofis = canpr; }
|
||||||
|
void set_last_ditta(const bool last) { _LastDitta = last; }
|
||||||
|
bool last_ditta() const { return _LastDitta; }
|
||||||
|
bool EndJob() const { return _LastDitta && _EndPrintDitta; }
|
||||||
|
bool ultima_fis();
|
||||||
|
bool ultima_nofis();
|
||||||
|
TString& cofi_dic() { return _cofi_dic; }
|
||||||
|
void set_cofi_dic(const char* cofi);
|
||||||
|
TipoDitta tipo_ditta() const { return _tipo_ditta; }
|
||||||
|
void set_tipo_ditta(TipoDitta tipo) { _tipo_ditta = tipo; }
|
||||||
|
bool modulaser() const { return _modulaser; }
|
||||||
|
void set_modulaser(const bool modul) { _modulaser = modul; }
|
||||||
|
void set_num_foglio(const int foglio) { _num_foglio = foglio; }
|
||||||
|
int num_foglio() const { return _num_foglio; }
|
||||||
|
virtual void azzera_totali();
|
||||||
|
PaginaQuadro curr_page() const { return _PaginaCorrente; }
|
||||||
|
TCursor& cur();
|
||||||
|
|
||||||
|
void set_progind(TProgind* prog) { _prog = prog; }
|
||||||
|
TProgind* progind() { return _prog; }
|
||||||
|
bool usa_progind() const { return _prog != NULL; }
|
||||||
|
|
||||||
|
virtual void set_cursor(TCursor* cur);
|
||||||
|
virtual void close_print();
|
||||||
|
virtual bool print(const long codditta, const long NumFis, const long NumNoFis);
|
||||||
|
|
||||||
|
const TString& quadro() const { return _quadro; }
|
||||||
|
|
||||||
|
TDicForm(const char* form, const char* quadro);
|
||||||
|
virtual ~TDicForm() {}
|
||||||
|
};
|
||||||
|
|
||||||
|
////////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
////////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
//
|
||||||
|
// TStDicArray
|
||||||
|
//
|
||||||
|
// Array delle ditte da stampare. Contiene una riga per ogni ditta che si vuole stampare
|
||||||
|
// Il formato della riga e':
|
||||||
|
// codditta|estinti|numfis|numnofis|ultimafis|ultimanofis
|
||||||
|
//
|
||||||
|
/////////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
class TStDicArray : public TObject
|
||||||
|
{
|
||||||
|
private:
|
||||||
|
TString_array _store;
|
||||||
|
|
||||||
|
public:
|
||||||
|
TToken_string& operator[](int i) const;
|
||||||
|
int curr_index() const { return _store.last(); }
|
||||||
|
void set(const int index, const TipoDitta tipo=normale, const int num_fis=0, const int num_nofis=0,
|
||||||
|
bool ultima_con_fis=FALSE, bool ultima_con_nofis=FALSE, const char* cofidic=NULL);
|
||||||
|
void set_tipo(const int index, const TipoDitta tipo);
|
||||||
|
void set_ultima_con_fis(const int index, const bool ultima_fis);
|
||||||
|
void set_ultima_con_nofis(const int index, const bool ultima_nofis);
|
||||||
|
void set_flag_tipi(const int index, const bool ultima_fis, const bool ultima_nofis);
|
||||||
|
void set_ctr_tipi(const int index, const int num_fis, const int num_nofis);
|
||||||
|
void add(const long codditta, const TipoDitta tipo=normale, const int num_fis=0, const int num_nofis=0,
|
||||||
|
bool ultima_con_fis=FALSE, bool ultima_con_nofis=FALSE, const char* cofidic=NULL);
|
||||||
|
int items() const { return _store.items(); }
|
||||||
|
void destroy() { _store.destroy(); }
|
||||||
|
};
|
||||||
|
|
||||||
|
/////////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
//
|
||||||
|
// STAMPA QUADRO
|
||||||
|
//
|
||||||
|
/////////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
class TStampaQuadro : public TApplication
|
||||||
|
{
|
||||||
|
TMask* _m; // Maschera di stampa
|
||||||
|
|
||||||
|
TConfig* _cnf; // Configurazione
|
||||||
|
TString16 _section; // Paragrafo del config
|
||||||
|
long _codditta;
|
||||||
|
int _anno_dic;
|
||||||
|
|
||||||
|
TString _quadro;
|
||||||
|
char _livello; // "S" studio, "D" singola ditta
|
||||||
|
TString _title;
|
||||||
|
|
||||||
|
TStDicArray _ditte;
|
||||||
|
|
||||||
|
protected: // TApplication
|
||||||
|
virtual bool menu(MENU_TAG);
|
||||||
|
virtual void on_config_change();
|
||||||
|
|
||||||
|
virtual bool create();
|
||||||
|
virtual bool destroy();
|
||||||
|
|
||||||
|
protected:
|
||||||
|
virtual bool user_create() pure;
|
||||||
|
virtual bool user_destroy() pure;
|
||||||
|
|
||||||
|
virtual TDicForm* get_form() const pure;
|
||||||
|
virtual TCursor* get_cursor() const pure;
|
||||||
|
|
||||||
|
virtual const char* mask_name() const;
|
||||||
|
virtual const char* form_name() const;
|
||||||
|
|
||||||
|
virtual bool conta_tipi_per() const { return TRUE; }
|
||||||
|
void fill_estinti(const long CodDic);
|
||||||
|
const TStDicArray& ditte() const { return _ditte; }
|
||||||
|
|
||||||
|
virtual bool print_quadro(const int OffsetDitta, const bool modulaser);
|
||||||
|
virtual void print(const bool modulaser);
|
||||||
|
|
||||||
|
bool singola_ditta() const { return _livello == 'D'; }
|
||||||
|
const TString& quadro() const { return _quadro; }
|
||||||
|
|
||||||
|
void set_taitol(const char* t) { _title = t; }
|
||||||
|
|
||||||
|
TStampaQuadro(const char* quad, char liv);
|
||||||
|
|
||||||
|
public:
|
||||||
|
const TString& taitol() const { return _title; }
|
||||||
|
|
||||||
|
virtual ~TStampaQuadro() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
#endif
|
||||||
642
m770/77stqab.cpp
Executable file
642
m770/77stqab.cpp
Executable file
@ -0,0 +1,642 @@
|
|||||||
|
///////////////////////////////////////////////////////////
|
||||||
|
// Quadro 770/A
|
||||||
|
///////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
#include "77stqab.h"
|
||||||
|
|
||||||
|
TDipendente::TDipendente(const TCursor& cur)
|
||||||
|
{
|
||||||
|
_pos = ((TCursor&)cur).pos();
|
||||||
|
|
||||||
|
const TRectype& rec = cur.curr();
|
||||||
|
const TRectype& dip = cur.curr(LF_DIPEND);
|
||||||
|
|
||||||
|
_codice_ditta = rec.get_long("CODDITTA");
|
||||||
|
_ragsoc = dip.get("COGNOME"); _ragsoc << ' ' << dip.get("NOME");
|
||||||
|
_codice_deceduto = dip.get_long("CODDIPDEC");
|
||||||
|
_codice_dipendente = rec.get_long("CODDIP");
|
||||||
|
|
||||||
|
if (rec.num() == LF_QUAA)
|
||||||
|
{
|
||||||
|
_fine_rapporto = rec.get("DATAFR");
|
||||||
|
_lavoro_precedente = rec.get("CFDLPREC").not_empty();
|
||||||
|
_causa = toupper(rec.get_char("CAUSA"));
|
||||||
|
_rettifica_conguaglio = toupper(rec.get_char("RETCON"));
|
||||||
|
_numero_progressivo = rec.get_int("NPROG");
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
_fine_rapporto = rec.get("DATAFIN");
|
||||||
|
_lavoro_precedente = FALSE;
|
||||||
|
_causa = ' ';
|
||||||
|
_rettifica_conguaglio = ' ';
|
||||||
|
_numero_progressivo = rec.get_int("NPROG");
|
||||||
|
}
|
||||||
|
|
||||||
|
if (_rettifica_conguaglio == 'B' || !_fine_rapporto.ok())
|
||||||
|
_fine_rapporto = eotime;
|
||||||
|
}
|
||||||
|
|
||||||
|
int TDipendente::compare(const TSortable& s) const
|
||||||
|
{
|
||||||
|
const TDipendente& rec = (const TDipendente&)s;
|
||||||
|
|
||||||
|
if (_codice_ditta != rec._codice_ditta)
|
||||||
|
return _codice_ditta > rec._codice_ditta ? +1 : -1;
|
||||||
|
|
||||||
|
const int diff = _ragsoc.compare(rec._ragsoc, -1, TRUE);
|
||||||
|
if (diff != 0)
|
||||||
|
return diff;
|
||||||
|
|
||||||
|
if (_codice_dipendente != rec._codice_dipendente)
|
||||||
|
return _codice_dipendente > rec._codice_dipendente ? +1 : -1;
|
||||||
|
|
||||||
|
if (_fine_rapporto != rec._fine_rapporto)
|
||||||
|
return _fine_rapporto > rec._fine_rapporto ? +1 : -1;
|
||||||
|
|
||||||
|
if (_lavoro_precedente != rec._lavoro_precedente)
|
||||||
|
return _lavoro_precedente ? +1 : -1;
|
||||||
|
|
||||||
|
if (_causa != rec._causa)
|
||||||
|
return _causa > rec._causa ? +1 : -1;
|
||||||
|
|
||||||
|
if (_rettifica_conguaglio != rec._rettifica_conguaglio)
|
||||||
|
return _rettifica_conguaglio > rec._rettifica_conguaglio ? +1 : -1;
|
||||||
|
|
||||||
|
return _numero_progressivo - rec._numero_progressivo;
|
||||||
|
}
|
||||||
|
|
||||||
|
int TDipendenti::find(long cod) const
|
||||||
|
{
|
||||||
|
for (int i = _data.last(); i >= 0; i--)
|
||||||
|
if (dip(i).codice() == cod)
|
||||||
|
break;
|
||||||
|
return i;
|
||||||
|
}
|
||||||
|
|
||||||
|
int TDipendenti::fill(TCursor& cur)
|
||||||
|
{
|
||||||
|
for (cur = 0; cur.ok(); ++cur)
|
||||||
|
{
|
||||||
|
TDipendente* n = new TDipendente(cur);
|
||||||
|
if (n->pos() >= 0)
|
||||||
|
_data.add(n);
|
||||||
|
else
|
||||||
|
delete n;
|
||||||
|
}
|
||||||
|
const int i = _data.items();
|
||||||
|
if (i > 0)
|
||||||
|
{
|
||||||
|
_data.sort();
|
||||||
|
for (int d = i-1; d >= 0; d--)
|
||||||
|
{
|
||||||
|
const long coddec = dip(d).codice_deceduto();
|
||||||
|
if (coddec > 0) // E' un erede!
|
||||||
|
{
|
||||||
|
const int posdec = find(coddec);
|
||||||
|
if (posdec >= 0 && posdec != d-1) // Il deceduto esiste
|
||||||
|
{
|
||||||
|
TDipendente* dipen = (TDipendente*)_data.remove(d, TRUE);
|
||||||
|
dipen->reset_deceduto(); // Non e' piu' un erede
|
||||||
|
_data.insert(dipen, posdec+1); // Attaccalo dietro al deceduto
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return i;
|
||||||
|
}
|
||||||
|
|
||||||
|
void TQuadroA::azzera_totali()
|
||||||
|
{
|
||||||
|
TPrint_section& totali = section('F', last_page);
|
||||||
|
totali.reset(); // Azzera le righe
|
||||||
|
|
||||||
|
for (int i = totali.fields()-1; i >= 0; i--)
|
||||||
|
totali.field(i).set(""); // Azzera i campi
|
||||||
|
}
|
||||||
|
|
||||||
|
void TQuadroA::preprocess_corpo(const TRectype& rec)
|
||||||
|
{
|
||||||
|
if (rec.num() == LF_QUAA)
|
||||||
|
{
|
||||||
|
const bool lav_prec = rec.get("CFDLPREC").not_empty();
|
||||||
|
const char rett_con = toupper(rec.get_char("RETCON"));
|
||||||
|
|
||||||
|
const bool add = !lav_prec && rett_con != 'B';
|
||||||
|
enable_message_add(add);
|
||||||
|
|
||||||
|
// Nasconde i dati anagrafici quando rett_con = B
|
||||||
|
TPrint_section& body = section('B', odd_page);
|
||||||
|
for (int i = 2; i <= 12; i++)
|
||||||
|
{
|
||||||
|
TForm_item& f = body.field(i);
|
||||||
|
f.enable(rett_con != 'B');
|
||||||
|
}
|
||||||
|
|
||||||
|
// Stampa solo le date di fine rapporto del 95
|
||||||
|
TForm_item& datafr = body.field(16);
|
||||||
|
const TDate dfr = rec.get("DATAFR");
|
||||||
|
datafr.enable(dfr.year() == 1995);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
void TQuadroA::stampa_corpo(TPrinter& pr)
|
||||||
|
{
|
||||||
|
TPrint_section& body = section('B', odd_page);
|
||||||
|
body.reset();
|
||||||
|
body.update();
|
||||||
|
|
||||||
|
const int body_righe = body.height();
|
||||||
|
for (int i = 0; i < body_righe; i++)
|
||||||
|
{
|
||||||
|
pr.print(body.row(i));
|
||||||
|
_RigaCorr++;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (usa_progind())
|
||||||
|
progind()->addstatus(1);
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
void TQuadroA::stampa_totali(TPrinter& pr)
|
||||||
|
{
|
||||||
|
TPrint_section& totali = section('F', last_page);
|
||||||
|
totali.update();
|
||||||
|
for (int i = 0; i < totali.items(); i++)
|
||||||
|
{
|
||||||
|
pr.print(totali.row(i));
|
||||||
|
_RigaCorr++;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
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"
|
||||||
|
inc_curr_page();
|
||||||
|
}
|
||||||
|
|
||||||
|
int TQuadroA::elementi_pagina(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
const int n[4] = { 1, 3, 3, 2 };
|
||||||
|
return n[p - PRIMA];
|
||||||
|
}
|
||||||
|
|
||||||
|
int TQuadroA::prima_riga(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
return p == PRIMA ? 45 : 5;
|
||||||
|
}
|
||||||
|
|
||||||
|
int TQuadroA::riga_totali(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
const int h = ((TQuadroA*)this)->section('B', odd_page).height();
|
||||||
|
return prima_riga(p) + elementi_pagina(p) * h;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TQuadroA::init(long codditta)
|
||||||
|
{
|
||||||
|
azzera_totali();
|
||||||
|
return InitPrint(codditta);
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TQuadroA::print(const long codditta, const long NumFis, const long NumNoFis)
|
||||||
|
{
|
||||||
|
TCursor& cur = *cursor();
|
||||||
|
TPrinter& pr = printer();
|
||||||
|
|
||||||
|
if (!init(codditta))
|
||||||
|
return FALSE;
|
||||||
|
|
||||||
|
pr.formlen(QA_FORMLEN);
|
||||||
|
|
||||||
|
int elementi = 0; // Numero di elementi stampati in questa pagina
|
||||||
|
bool stampato_ultimo = FALSE;
|
||||||
|
bool stampati_totali = FALSE;
|
||||||
|
|
||||||
|
int pos = 0;
|
||||||
|
TDipendenti indice;
|
||||||
|
if (quadro() == "A" || quadro() == "B")
|
||||||
|
{
|
||||||
|
const int i = indice.fill(cur);
|
||||||
|
if (i > 0)
|
||||||
|
{
|
||||||
|
if (usa_progind())
|
||||||
|
progind()->addstatus(cur.items()-i); // Segna come elaborati tutti gli ignorati
|
||||||
|
|
||||||
|
cur = indice[0].pos();
|
||||||
|
}
|
||||||
|
else
|
||||||
|
return FALSE;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
cur = 0;
|
||||||
|
|
||||||
|
while (!stampati_totali)
|
||||||
|
{
|
||||||
|
bool stampero_ultimo = (stampato_ultimo == FALSE);
|
||||||
|
if (stampero_ultimo)
|
||||||
|
{
|
||||||
|
if (indice.items() > 0) // Usa indice alternativo
|
||||||
|
stampero_ultimo &= pos == indice.items()-1;
|
||||||
|
else // Usa indice del cursore
|
||||||
|
stampero_ultimo &= cur.pos() == cur.items()-1;
|
||||||
|
}
|
||||||
|
|
||||||
|
// Usato per stampare la VK_ENDDOC in fill_page()
|
||||||
|
_EndPrintDitta=stampato_ultimo;
|
||||||
|
if (!stampato_ultimo)
|
||||||
|
preprocess_corpo(cur.curr());
|
||||||
|
|
||||||
|
switch(_PaginaCorrente)
|
||||||
|
{
|
||||||
|
case PRIMA:
|
||||||
|
if (_modulaser)
|
||||||
|
ClearFlagModulaser();
|
||||||
|
|
||||||
|
if (elementi == 0)
|
||||||
|
{
|
||||||
|
stampa_testata(pr);
|
||||||
|
jump_to_line(pr, prima_riga(PRIMA));
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!stampato_ultimo)
|
||||||
|
{
|
||||||
|
stampa_corpo(pr);
|
||||||
|
stampato_ultimo = stampero_ultimo;
|
||||||
|
}
|
||||||
|
|
||||||
|
elementi++;
|
||||||
|
if (elementi >= elementi_pagina(PRIMA))
|
||||||
|
{
|
||||||
|
next_page(pr);
|
||||||
|
elementi = 0;
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
case SECONDA:
|
||||||
|
case TERZA:
|
||||||
|
if (!stampato_ultimo)
|
||||||
|
{
|
||||||
|
if (elementi == 0)
|
||||||
|
jump_to_line(pr, prima_riga(_PaginaCorrente));
|
||||||
|
stampa_corpo(pr);
|
||||||
|
stampato_ultimo = stampero_ultimo;
|
||||||
|
}
|
||||||
|
elementi++;
|
||||||
|
if (elementi >= elementi_pagina(_PaginaCorrente))
|
||||||
|
{
|
||||||
|
next_page(pr);
|
||||||
|
elementi = 0;
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
case QUARTA:
|
||||||
|
if (!stampato_ultimo)
|
||||||
|
{
|
||||||
|
if (elementi == 0)
|
||||||
|
jump_to_line(pr, prima_riga(QUARTA));
|
||||||
|
|
||||||
|
stampa_corpo(pr);
|
||||||
|
stampato_ultimo = stampero_ultimo;
|
||||||
|
}
|
||||||
|
|
||||||
|
elementi++;
|
||||||
|
|
||||||
|
if (elementi >= elementi_pagina(QUARTA))
|
||||||
|
{
|
||||||
|
jump_to_line(pr, riga_totali(QUARTA));
|
||||||
|
if (stampato_ultimo)
|
||||||
|
{
|
||||||
|
stampa_totali(pr);
|
||||||
|
stampati_totali = TRUE;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
stampa_firma(pr);
|
||||||
|
|
||||||
|
next_page(pr);
|
||||||
|
elementi = 0;
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
default:
|
||||||
|
CHECK(0, "Invalid Quadro A page");
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!stampato_ultimo)
|
||||||
|
{
|
||||||
|
if (indice.items() > 0)
|
||||||
|
cur = indice[++pos].pos();
|
||||||
|
else
|
||||||
|
++cur;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
close_print();
|
||||||
|
|
||||||
|
return TRUE;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TStampaQuadroA::user_create()
|
||||||
|
{
|
||||||
|
_form = new TQuadroA("77QA", quadro());
|
||||||
|
|
||||||
|
TString sortkey(80);
|
||||||
|
sortkey.format("CODDITTA|%d->COGNOME|%d->NOME|CODDIP", LF_DIPEND, LF_DIPEND);
|
||||||
|
_cur = new TSorted_cursor(_form->TForm::relation(), sortkey);
|
||||||
|
|
||||||
|
return TRUE;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TStampaQuadroA::user_destroy()
|
||||||
|
{
|
||||||
|
if (_cur)
|
||||||
|
delete _cur;
|
||||||
|
|
||||||
|
if (_form)
|
||||||
|
delete _form;
|
||||||
|
|
||||||
|
return TRUE;
|
||||||
|
}
|
||||||
|
|
||||||
|
/////////////////////////////////////////////////////////////////////////////////
|
||||||
|
// Quadro A1
|
||||||
|
/////////////////////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
int TQuadroA1::elementi_pagina(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
const int n[4] = { 3, 6, 6, 5 };
|
||||||
|
return n[p-PRIMA];
|
||||||
|
}
|
||||||
|
|
||||||
|
int TQuadroA1::prima_riga(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
return p == PRIMA ? 32 : 4;
|
||||||
|
}
|
||||||
|
|
||||||
|
long TQuadroA1::filtra(const long codditta)
|
||||||
|
{
|
||||||
|
TString filtr(32);
|
||||||
|
filtr.format("CODDITTA=%ld|ANNORIF=1995", codditta);
|
||||||
|
|
||||||
|
cursor()->setfilter(filtr, TRUE);
|
||||||
|
const long items = cursor()->items();
|
||||||
|
|
||||||
|
return items;
|
||||||
|
}
|
||||||
|
|
||||||
|
void TQuadroA1::preprocess_corpo(const TRectype& rec)
|
||||||
|
{
|
||||||
|
if (rec.num() == LF_QUAA1)
|
||||||
|
{
|
||||||
|
// Stampa solo le date di ricezione del 95
|
||||||
|
const TDate dr = rec.get("DATARIC26");
|
||||||
|
TForm_item& dataric = find_field('B', odd_page, 26);
|
||||||
|
dataric.enable(dr.year() == 1995);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TStampaQuadroA1::user_create()
|
||||||
|
{
|
||||||
|
_form = new TQuadroA1("77QA1", quadro());
|
||||||
|
|
||||||
|
TString sortkey(80);
|
||||||
|
sortkey.format("CODDITTA|%d->COGNOME|%d->NOME|CODDIP|MESERIF|NPROG", LF_DIPEND, LF_DIPEND);
|
||||||
|
_cur = new TSorted_cursor(_form->TForm::relation(), sortkey);
|
||||||
|
|
||||||
|
return TRUE;
|
||||||
|
}
|
||||||
|
|
||||||
|
/////////////////////////////////////////////////////////////////////////////////
|
||||||
|
// Quadro A2
|
||||||
|
/////////////////////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
int TQuadroA2::elementi_pagina(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
const int n[4] = { 3, 6, 6, 5 };
|
||||||
|
return n[p-PRIMA];
|
||||||
|
}
|
||||||
|
|
||||||
|
int TQuadroA2::prima_riga(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
return p == PRIMA ? 32 : 4;
|
||||||
|
}
|
||||||
|
|
||||||
|
void TQuadroA2::preprocess_corpo(const TRectype& rec)
|
||||||
|
{
|
||||||
|
if (rec.num() == LF_QUAA2)
|
||||||
|
{
|
||||||
|
const char ret_con = toupper(rec.get_char("RETCON"));
|
||||||
|
const bool add = ret_con != 'B';
|
||||||
|
enable_message_add(add);
|
||||||
|
|
||||||
|
// Nasconde i dati anagrafici quando rett_con = B
|
||||||
|
TPrint_section& body = section('B', odd_page);
|
||||||
|
for (int i = 2; i <= 7; i++)
|
||||||
|
{
|
||||||
|
TForm_item& f = body.field(i);
|
||||||
|
f.enable(add);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TStampaQuadroA2::user_create()
|
||||||
|
{
|
||||||
|
_form = new TQuadroA2("77QA2", quadro());
|
||||||
|
|
||||||
|
TString sortkey(80);
|
||||||
|
sortkey.format("CODDITTA|%d->COGNOME|%d->NOME|CODDIP|RETCON|NPROG", LF_DIPEND, LF_DIPEND);
|
||||||
|
_cur = new TSorted_cursor(_form->TForm::relation(), sortkey);
|
||||||
|
|
||||||
|
return TRUE;
|
||||||
|
}
|
||||||
|
|
||||||
|
/////////////////////////////////////////////////////////////////////////////////
|
||||||
|
// Quadro A3
|
||||||
|
/////////////////////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
int TQuadroA3::elementi_pagina(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
const int n[4] = { 6, 10, 10, 9 };
|
||||||
|
return n[p-PRIMA];
|
||||||
|
}
|
||||||
|
|
||||||
|
int TQuadroA3::prima_riga(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
return p == PRIMA ? 32 : 4;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TStampaQuadroA3::user_create()
|
||||||
|
{
|
||||||
|
_form = new TQuadroA3("77QA3", quadro());
|
||||||
|
|
||||||
|
TString sortkey(80);
|
||||||
|
sortkey.format("CODDITTA|NPROG|%d->COGNOME|%d->NOME|CODDIP", LF_DIPEND, LF_DIPEND);
|
||||||
|
_cur = new TSorted_cursor(_form->TForm::relation(), sortkey);
|
||||||
|
|
||||||
|
return TRUE;
|
||||||
|
}
|
||||||
|
|
||||||
|
/////////////////////////////////////////////////////////////////
|
||||||
|
// QUADRO B
|
||||||
|
/////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
int TQuadroB::elementi_pagina(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
const int n[4] = { 3, 5, 5, 3 };
|
||||||
|
return n[p-PRIMA];
|
||||||
|
}
|
||||||
|
|
||||||
|
int TQuadroB::prima_riga(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
return p == PRIMA ? 32 : 6;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TStampaQuadroB::user_create()
|
||||||
|
{
|
||||||
|
_form = new TQuadroB("77QB", quadro());
|
||||||
|
|
||||||
|
TString sortkey(80);
|
||||||
|
sortkey.format("CODDITTA|%d->COGNOME|%d->NOME|CODDIP|DATAINI|NPROG", LF_DIPEND, LF_DIPEND);
|
||||||
|
_cur = new TSorted_cursor(_form->TForm::relation(), sortkey);
|
||||||
|
|
||||||
|
return TRUE;
|
||||||
|
}
|
||||||
|
|
||||||
|
//////////////////////////////////////////////////////////////
|
||||||
|
// QUADRO H
|
||||||
|
//////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
void TQuadroH::inc_curr_page()
|
||||||
|
{
|
||||||
|
if (_PaginaCorrente == PRIMA)
|
||||||
|
_PaginaCorrente = SECONDA;
|
||||||
|
else
|
||||||
|
if (_PaginaCorrente == SECONDA)
|
||||||
|
_PaginaCorrente = PRIMA;
|
||||||
|
}
|
||||||
|
|
||||||
|
int TQuadroH::elementi_pagina(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
const int n[2] = { 21, 27 };
|
||||||
|
return n[p-PRIMA];
|
||||||
|
}
|
||||||
|
|
||||||
|
int TQuadroH::prima_riga(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
return p == PRIMA ? 24 : 9;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TQuadroH::print(const long codditta, const long NumFis, const long NumNoFis)
|
||||||
|
{
|
||||||
|
TCursor& cur = *cursor();
|
||||||
|
TPrinter& pr = printer();
|
||||||
|
|
||||||
|
if (!InitPrint(codditta))
|
||||||
|
return FALSE;
|
||||||
|
|
||||||
|
pr.formlen(QH_FORMLEN);
|
||||||
|
|
||||||
|
int elementi = 0; // Numero di elementi stampati in questa pagina
|
||||||
|
bool stampato_ultimo = FALSE;
|
||||||
|
bool stampati_totali = FALSE;
|
||||||
|
|
||||||
|
cur = 0;
|
||||||
|
|
||||||
|
while (!stampati_totali)
|
||||||
|
{
|
||||||
|
bool stampero_ultimo = stampato_ultimo == FALSE;
|
||||||
|
if (stampero_ultimo)
|
||||||
|
stampero_ultimo &= cur.pos() == cur.items()-1;
|
||||||
|
|
||||||
|
switch(_PaginaCorrente)
|
||||||
|
{
|
||||||
|
case PRIMA:
|
||||||
|
if (_modulaser)
|
||||||
|
ClearFlagModulaser();
|
||||||
|
|
||||||
|
if (elementi == 0)
|
||||||
|
{
|
||||||
|
stampa_testata(pr);
|
||||||
|
jump_to_line(pr, prima_riga(PRIMA));
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!stampato_ultimo)
|
||||||
|
{
|
||||||
|
stampa_corpo(pr);
|
||||||
|
stampato_ultimo = stampero_ultimo;
|
||||||
|
}
|
||||||
|
|
||||||
|
_EndPrintDitta=stampato_ultimo;
|
||||||
|
|
||||||
|
elementi++;
|
||||||
|
if (elementi >= elementi_pagina(PRIMA))
|
||||||
|
{
|
||||||
|
next_page(pr);
|
||||||
|
elementi = 0;
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
case SECONDA:
|
||||||
|
if (!stampato_ultimo)
|
||||||
|
{
|
||||||
|
if (elementi == 0)
|
||||||
|
jump_to_line(pr, prima_riga(SECONDA));
|
||||||
|
|
||||||
|
stampa_corpo(pr);
|
||||||
|
stampato_ultimo = stampero_ultimo;
|
||||||
|
}
|
||||||
|
_EndPrintDitta=stampato_ultimo;
|
||||||
|
|
||||||
|
elementi++;
|
||||||
|
|
||||||
|
if (elementi >= elementi_pagina(SECONDA))
|
||||||
|
{
|
||||||
|
if (stampato_ultimo)
|
||||||
|
{
|
||||||
|
jump_to_line(pr, riga_totali(SECONDA));
|
||||||
|
stampa_totali(pr);
|
||||||
|
stampati_totali = TRUE;
|
||||||
|
}
|
||||||
|
next_page(pr);
|
||||||
|
elementi = 0;
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
default:
|
||||||
|
CHECK(0, "Invalid Quadro A page");
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!stampato_ultimo)
|
||||||
|
++cur;
|
||||||
|
}
|
||||||
|
|
||||||
|
close_print();
|
||||||
|
|
||||||
|
return TRUE;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TStampaQuadroH::user_create()
|
||||||
|
{
|
||||||
|
_form = new TQuadroH("77QH", quadro());
|
||||||
|
|
||||||
|
TString sortkey(80);
|
||||||
|
sortkey.format("CODDITTA|H1ANNO|H1ENTE", LF_QUAH, LF_QUAH);
|
||||||
|
_cur = new TSorted_cursor(_form->TForm::relation(), sortkey);
|
||||||
|
|
||||||
|
return TRUE;
|
||||||
|
}
|
||||||
242
m770/77stqab.h
Executable file
242
m770/77stqab.h
Executable file
@ -0,0 +1,242 @@
|
|||||||
|
#ifndef __77STQAB_H
|
||||||
|
#define __77STQAB_H
|
||||||
|
|
||||||
|
#include "77stq.h"
|
||||||
|
|
||||||
|
//////////////////////////////////////
|
||||||
|
// QUADRO A
|
||||||
|
//////////////////////////////////////
|
||||||
|
|
||||||
|
class TDipendente : public TSortable
|
||||||
|
{
|
||||||
|
TRecnotype _pos;
|
||||||
|
|
||||||
|
long _codice_ditta;
|
||||||
|
TString _ragsoc;
|
||||||
|
long _codice_dipendente;
|
||||||
|
long _codice_deceduto;
|
||||||
|
TDate _fine_rapporto;
|
||||||
|
bool _lavoro_precedente;
|
||||||
|
char _causa;
|
||||||
|
char _rettifica_conguaglio;
|
||||||
|
int _numero_progressivo;
|
||||||
|
|
||||||
|
public:
|
||||||
|
virtual int compare(const TSortable& s) const;
|
||||||
|
|
||||||
|
TRecnotype pos() const { return _pos; }
|
||||||
|
long codice_deceduto() const { return _codice_deceduto; }
|
||||||
|
void reset_deceduto() { _codice_deceduto = -_codice_deceduto; }
|
||||||
|
long codice() const { return _codice_dipendente; }
|
||||||
|
|
||||||
|
int anno_fine_rapporto() const { return _fine_rapporto.year(); }
|
||||||
|
bool lavoro_precedente() const { return _lavoro_precedente; }
|
||||||
|
char rettifica_conguaglio() const { return _rettifica_conguaglio; }
|
||||||
|
|
||||||
|
TDipendente(const TCursor& cur);
|
||||||
|
virtual ~TDipendente() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
class TDipendenti : public TObject
|
||||||
|
{
|
||||||
|
TArray _data;
|
||||||
|
|
||||||
|
protected:
|
||||||
|
const TDipendente& dip(int i) const { return (const TDipendente&)_data[i]; }
|
||||||
|
|
||||||
|
public:
|
||||||
|
const TDipendente& operator[](int i) const { return dip(i); }
|
||||||
|
|
||||||
|
int fill(TCursor& cur);
|
||||||
|
int items() const { return _data.items(); }
|
||||||
|
|
||||||
|
int find(long d) const;
|
||||||
|
|
||||||
|
TDipendenti() { }
|
||||||
|
virtual ~TDipendenti() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
class TQuadroA : public TDicForm
|
||||||
|
{
|
||||||
|
enum { QA_FORMLEN = 72 };
|
||||||
|
|
||||||
|
protected:
|
||||||
|
virtual void next_page(TPrinter& pr);
|
||||||
|
virtual bool print(const long codditta, const long NumFis, const long NumNoFis);
|
||||||
|
|
||||||
|
virtual void azzera_totali();
|
||||||
|
virtual void aggiorna_totali(const char) { }
|
||||||
|
|
||||||
|
virtual int elementi_pagina(PaginaQuadro p) const;
|
||||||
|
virtual int prima_riga(PaginaQuadro p) const;
|
||||||
|
virtual int riga_totali(PaginaQuadro p) const;
|
||||||
|
|
||||||
|
bool init(long codditta);
|
||||||
|
|
||||||
|
virtual void preprocess_corpo(const TRectype& rec);
|
||||||
|
|
||||||
|
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) {}
|
||||||
|
virtual ~TQuadroA() {}
|
||||||
|
};
|
||||||
|
|
||||||
|
class TStampaQuadroA : public TStampaQuadro
|
||||||
|
{
|
||||||
|
protected:
|
||||||
|
TDicForm* _form;
|
||||||
|
TCursor* _cur;
|
||||||
|
|
||||||
|
protected:
|
||||||
|
virtual bool user_create();
|
||||||
|
virtual bool user_destroy();
|
||||||
|
|
||||||
|
virtual bool conta_tipi_per() const { return FALSE; }
|
||||||
|
virtual TDicForm* get_form() const { return _form; }
|
||||||
|
virtual TCursor* get_cursor() const { return _cur; }
|
||||||
|
|
||||||
|
public:
|
||||||
|
TStampaQuadroA(const char* quadro, char livel) : TStampaQuadro(quadro, livel) { }
|
||||||
|
virtual ~TStampaQuadroA() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
///////////////////////////////////////////////
|
||||||
|
// QUADRO A1
|
||||||
|
///////////////////////////////////////////////
|
||||||
|
|
||||||
|
class TQuadroA1 : public TQuadroA
|
||||||
|
{
|
||||||
|
protected:
|
||||||
|
virtual int elementi_pagina(PaginaQuadro p) const;
|
||||||
|
virtual int prima_riga(PaginaQuadro p) const;
|
||||||
|
virtual long filtra(const long codditta);
|
||||||
|
virtual void preprocess_corpo(const TRectype& rec);
|
||||||
|
|
||||||
|
public:
|
||||||
|
TQuadroA1(const char* form, const char* quadro) : TQuadroA(form, quadro) { }
|
||||||
|
virtual ~TQuadroA1() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
class TStampaQuadroA1 : public TStampaQuadroA
|
||||||
|
{
|
||||||
|
protected:
|
||||||
|
virtual bool user_create();
|
||||||
|
|
||||||
|
public:
|
||||||
|
TStampaQuadroA1(const char* quadro, char livel) : TStampaQuadroA(quadro, livel) { }
|
||||||
|
virtual ~TStampaQuadroA1() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
///////////////////////////////////////////////
|
||||||
|
// QUADRO A2
|
||||||
|
///////////////////////////////////////////////
|
||||||
|
|
||||||
|
class TQuadroA2 : public TQuadroA
|
||||||
|
{
|
||||||
|
protected:
|
||||||
|
virtual int elementi_pagina(PaginaQuadro p) const;
|
||||||
|
virtual int prima_riga(PaginaQuadro p) const;
|
||||||
|
virtual void preprocess_corpo(const TRectype& rec);
|
||||||
|
|
||||||
|
public:
|
||||||
|
TQuadroA2(const char* form, const char* quadro) : TQuadroA(form, quadro) { }
|
||||||
|
virtual ~TQuadroA2() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
class TStampaQuadroA2 : public TStampaQuadroA
|
||||||
|
{
|
||||||
|
protected:
|
||||||
|
virtual bool user_create();
|
||||||
|
|
||||||
|
public:
|
||||||
|
TStampaQuadroA2(const char* quadro, char livel) : TStampaQuadroA(quadro, livel) { }
|
||||||
|
virtual ~TStampaQuadroA2() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
/////////////////////////////////////////////////
|
||||||
|
// QUADRO A3
|
||||||
|
/////////////////////////////////////////////////
|
||||||
|
|
||||||
|
class TQuadroA3 : public TQuadroA
|
||||||
|
{
|
||||||
|
protected:
|
||||||
|
virtual int elementi_pagina(PaginaQuadro p) const;
|
||||||
|
virtual int prima_riga(PaginaQuadro p) const;
|
||||||
|
|
||||||
|
public:
|
||||||
|
TQuadroA3(const char* form, const char* quadro) : TQuadroA(form, quadro) { }
|
||||||
|
virtual ~TQuadroA3() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
class TStampaQuadroA3 : public TStampaQuadroA
|
||||||
|
{
|
||||||
|
protected:
|
||||||
|
virtual bool user_create();
|
||||||
|
|
||||||
|
public:
|
||||||
|
TStampaQuadroA3(const char* quadro, char livel) : TStampaQuadroA(quadro, livel) { }
|
||||||
|
virtual ~TStampaQuadroA3() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
///////////////////////////////////////////////////////
|
||||||
|
// QUADRO B
|
||||||
|
///////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
class TQuadroB : public TQuadroA
|
||||||
|
{
|
||||||
|
protected:
|
||||||
|
virtual int elementi_pagina(PaginaQuadro p) const;
|
||||||
|
virtual int prima_riga(PaginaQuadro p) const;
|
||||||
|
|
||||||
|
public:
|
||||||
|
TQuadroB(const char* form, const char* quadro) : TQuadroA(form, quadro) { }
|
||||||
|
virtual ~TQuadroB() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
class TStampaQuadroB : public TStampaQuadroA
|
||||||
|
{
|
||||||
|
protected:
|
||||||
|
virtual bool user_create();
|
||||||
|
|
||||||
|
public:
|
||||||
|
TStampaQuadroB(const char* quadro, char livel) : TStampaQuadroA(quadro, livel) { }
|
||||||
|
virtual ~TStampaQuadroB() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
///////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
//
|
||||||
|
// Quadro H
|
||||||
|
//
|
||||||
|
///////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
class TQuadroH : public TQuadroA
|
||||||
|
{
|
||||||
|
enum { QH_FORMLEN = 72 };
|
||||||
|
|
||||||
|
protected:
|
||||||
|
virtual bool ultima_pagina() const { return _PaginaCorrente==SECONDA; }
|
||||||
|
virtual int elementi_pagina(PaginaQuadro p) const;
|
||||||
|
virtual int prima_riga(PaginaQuadro p) const;
|
||||||
|
virtual bool print(const long codditta, const long NumFis, const long NumNoFis);
|
||||||
|
virtual void inc_curr_page();
|
||||||
|
|
||||||
|
public:
|
||||||
|
TQuadroH(const char* form, const char* quadro) : TQuadroA(form, quadro) { }
|
||||||
|
virtual ~TQuadroH() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
class TStampaQuadroH : public TStampaQuadroA
|
||||||
|
{
|
||||||
|
protected:
|
||||||
|
virtual bool user_create();
|
||||||
|
|
||||||
|
public:
|
||||||
|
TStampaQuadroH(const char* quadro, char livel) : TStampaQuadroA(quadro, livel) {}
|
||||||
|
virtual ~TStampaQuadroH() {}
|
||||||
|
};
|
||||||
|
|
||||||
|
#endif
|
||||||
|
|
||||||
286
m770/77stqc.cpp
Executable file
286
m770/77stqc.cpp
Executable file
@ -0,0 +1,286 @@
|
|||||||
|
///////////////////////////////////////////////////////////
|
||||||
|
// Quadro 770/C
|
||||||
|
///////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
#include "77stqc.h"
|
||||||
|
|
||||||
|
/////////////////////////////////////////////////////////////////////////////////
|
||||||
|
// Quadro C
|
||||||
|
/////////////////////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
bool TQuadroC::controlla_percentuale(TCursor& cur, const real& perc_p)
|
||||||
|
{
|
||||||
|
bool stampa = TRUE;
|
||||||
|
|
||||||
|
if (perc_p == ZERO)
|
||||||
|
{
|
||||||
|
long ditta_p = cur.curr().get_long(QUC_CODDITTA);
|
||||||
|
char tipo_p = cur.curr().get_char(QUC_TIPOA);
|
||||||
|
long codana_p = cur.curr().get_long(QUC_CODANAGR);
|
||||||
|
TString codcaus_p = cur.curr().get (QUC_CODCAUS);
|
||||||
|
|
||||||
|
++(cur);
|
||||||
|
long ditta = cur.curr().get_long(QUC_CODDITTA);
|
||||||
|
char tipo = cur.curr().get_char(QUC_TIPOA);
|
||||||
|
long codana = cur.curr().get_long(QUC_CODANAGR);
|
||||||
|
TString codcaus = cur.curr().get (QUC_CODCAUS);
|
||||||
|
real perc = cur.curr().get_real(QUC_PERC);
|
||||||
|
|
||||||
|
if (ditta == ditta_p && tipo == tipo_p &&
|
||||||
|
codana == codana_p && codcaus == codcaus_p)
|
||||||
|
{
|
||||||
|
if (perc != ZERO)
|
||||||
|
{
|
||||||
|
stampa = FALSE;
|
||||||
|
_devo_sommare = TRUE;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
--(cur);
|
||||||
|
}
|
||||||
|
return stampa;
|
||||||
|
}
|
||||||
|
|
||||||
|
void TQuadroC::leggi_importi()
|
||||||
|
{
|
||||||
|
TCursor* cur = cursor();
|
||||||
|
|
||||||
|
_totale = cur->curr().get_real(QUC_TOTALE);
|
||||||
|
_contssn = cur->curr().get_real(QUC_CONTSSN);
|
||||||
|
_somme = cur->curr().get_real(QUC_SOMME);
|
||||||
|
_imponibile = cur->curr().get_real(QUC_IMPONIBILE);
|
||||||
|
_ritenute = cur->curr().get_real(QUC_RITENUTE);
|
||||||
|
_netto = cur->curr().get_real(QUC_NETTO);
|
||||||
|
}
|
||||||
|
|
||||||
|
void TQuadroC::setta_importi(TPrint_section& body)
|
||||||
|
{
|
||||||
|
TCursor* cur = cursor();
|
||||||
|
|
||||||
|
real totale = cur->curr().get_real(QUC_TOTALE);
|
||||||
|
real contssn = cur->curr().get_real(QUC_CONTSSN);
|
||||||
|
real somme = cur->curr().get_real(QUC_SOMME);
|
||||||
|
real imponibile = cur->curr().get_real(QUC_IMPONIBILE);
|
||||||
|
real ritenute = cur->curr().get_real(QUC_RITENUTE);
|
||||||
|
real netto = cur->curr().get_real(QUC_NETTO);
|
||||||
|
|
||||||
|
if (_devo_sommare)
|
||||||
|
{
|
||||||
|
totale += _totale;
|
||||||
|
contssn += _contssn;
|
||||||
|
somme += _somme;
|
||||||
|
imponibile += _imponibile;
|
||||||
|
ritenute += _ritenute;
|
||||||
|
netto += _netto;
|
||||||
|
_devo_sommare = FALSE;
|
||||||
|
}
|
||||||
|
|
||||||
|
TForm_item& ftotale = body.find_field(C_TOTALE);
|
||||||
|
TForm_item& fcontssn = body.find_field(C_CONTSSN);
|
||||||
|
TForm_item& fsomme = body.find_field(C_SOMME);
|
||||||
|
TForm_item& fimponibile = body.find_field(C_IMPONIBILE);
|
||||||
|
TForm_item& fritenute = body.find_field(C_RITENUTE);
|
||||||
|
TForm_item& fnetto = body.find_field(C_NETTO);
|
||||||
|
|
||||||
|
TString stotale (totale.string());
|
||||||
|
TString scontssn (contssn.string());
|
||||||
|
TString ssomme (somme.string());
|
||||||
|
TString simponibile(imponibile.string());
|
||||||
|
TString sritenute (ritenute.string());
|
||||||
|
TString snetto (netto.string());
|
||||||
|
// Setta i campi
|
||||||
|
ftotale.set(stotale);
|
||||||
|
fcontssn.set(scontssn);
|
||||||
|
fsomme.set(ssomme);
|
||||||
|
fimponibile.set(simponibile);
|
||||||
|
fritenute.set(sritenute);
|
||||||
|
fnetto.set(snetto);
|
||||||
|
}
|
||||||
|
|
||||||
|
void TQuadroC::stampa_corpo(TPrinter& pr)
|
||||||
|
{
|
||||||
|
TPrint_section& body = section('B', odd_page);
|
||||||
|
body.reset();
|
||||||
|
// body.update();
|
||||||
|
setta_importi(body);
|
||||||
|
body.update();
|
||||||
|
const int body_righe = body.height();
|
||||||
|
for (int i=0; i < body_righe; i++)
|
||||||
|
{
|
||||||
|
pr.print(body.row(i));
|
||||||
|
_RigaCorr++;
|
||||||
|
}
|
||||||
|
body.reset();
|
||||||
|
if (usa_progind())
|
||||||
|
progind()->addstatus(1);
|
||||||
|
}
|
||||||
|
|
||||||
|
int TQuadroC::elementi_pagina(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
const int n[4] = { 6, 10, 10, 9 };
|
||||||
|
return n[p-PRIMA];
|
||||||
|
}
|
||||||
|
|
||||||
|
int TQuadroC::prima_riga(PaginaQuadro p) const
|
||||||
|
{
|
||||||
|
return p == PRIMA ? 27 : 8;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TQuadroC::print(const long codditta, const long NumFis, const long NumNoFis)
|
||||||
|
{
|
||||||
|
TCursor& cur = *cursor();
|
||||||
|
TPrinter& pr = printer();
|
||||||
|
bool stampa = TRUE;
|
||||||
|
|
||||||
|
if (!InitPrint(codditta))
|
||||||
|
return FALSE;
|
||||||
|
|
||||||
|
pr.formlen(QA_FORMLEN);
|
||||||
|
|
||||||
|
int elementi = 0; // Numero di elementi stampati in questa pagina
|
||||||
|
bool stampato_ultimo = FALSE;
|
||||||
|
bool stampati_totali = FALSE;
|
||||||
|
|
||||||
|
int pos = 0;
|
||||||
|
TDipendenti indice;
|
||||||
|
if (quadro() == "A" || quadro() == "B")
|
||||||
|
{
|
||||||
|
const int i = indice.fill(cur);
|
||||||
|
if (i > 0)
|
||||||
|
{
|
||||||
|
if (usa_progind())
|
||||||
|
progind()->addstatus(cur.items()-i); // Segna come elaborati tutti gli ignorati
|
||||||
|
|
||||||
|
cur = indice[0].pos();
|
||||||
|
}
|
||||||
|
else
|
||||||
|
return FALSE;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
cur = 0;
|
||||||
|
|
||||||
|
while (!stampati_totali)
|
||||||
|
{
|
||||||
|
bool stampa = TRUE;
|
||||||
|
bool stampero_ultimo = stampato_ultimo == FALSE;
|
||||||
|
if (stampero_ultimo)
|
||||||
|
{
|
||||||
|
if (indice.items() > 0) // Usa indice alternativo
|
||||||
|
stampero_ultimo &= pos == indice.items()-1;
|
||||||
|
else // Usa indice del cursore
|
||||||
|
stampero_ultimo &= cur.pos() == cur.items()-1;
|
||||||
|
}
|
||||||
|
|
||||||
|
_EndPrintDitta=stampato_ultimo;
|
||||||
|
switch(_PaginaCorrente)
|
||||||
|
{
|
||||||
|
case PRIMA:
|
||||||
|
if (_modulaser)
|
||||||
|
ClearFlagModulaser();
|
||||||
|
|
||||||
|
if (elementi == 0)
|
||||||
|
{
|
||||||
|
stampa_testata(pr);
|
||||||
|
jump_to_line(pr, prima_riga(PRIMA));
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!stampato_ultimo)
|
||||||
|
{
|
||||||
|
real perc_p = cur.curr().get_real(QUC_PERC);
|
||||||
|
stampa = controlla_percentuale(cur,perc_p);
|
||||||
|
if (stampa)
|
||||||
|
stampa_corpo(pr);
|
||||||
|
else
|
||||||
|
leggi_importi();
|
||||||
|
|
||||||
|
stampato_ultimo = stampero_ultimo;
|
||||||
|
}
|
||||||
|
|
||||||
|
elementi++;
|
||||||
|
if (elementi >= elementi_pagina(PRIMA))
|
||||||
|
{
|
||||||
|
next_page(pr);
|
||||||
|
elementi = 0;
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
case SECONDA:
|
||||||
|
case TERZA:
|
||||||
|
if (!stampato_ultimo)
|
||||||
|
{
|
||||||
|
if (elementi == 0)
|
||||||
|
jump_to_line(pr, prima_riga(_PaginaCorrente));
|
||||||
|
|
||||||
|
real perc_p = cur.curr().get_real(QUC_PERC);
|
||||||
|
stampa = controlla_percentuale(cur,perc_p);
|
||||||
|
if (stampa)
|
||||||
|
stampa_corpo(pr);
|
||||||
|
else
|
||||||
|
leggi_importi();
|
||||||
|
|
||||||
|
stampato_ultimo = stampero_ultimo;
|
||||||
|
}
|
||||||
|
elementi++;
|
||||||
|
if (elementi >= elementi_pagina(_PaginaCorrente))
|
||||||
|
{
|
||||||
|
next_page(pr);
|
||||||
|
elementi = 0;
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
case QUARTA:
|
||||||
|
if (!stampato_ultimo)
|
||||||
|
{
|
||||||
|
if (elementi == 0)
|
||||||
|
jump_to_line(pr, prima_riga(QUARTA));
|
||||||
|
|
||||||
|
real perc_p = cur.curr().get_real(QUC_PERC);
|
||||||
|
stampa = controlla_percentuale(cur,perc_p);
|
||||||
|
if (stampa)
|
||||||
|
stampa_corpo(pr);
|
||||||
|
else
|
||||||
|
leggi_importi();
|
||||||
|
|
||||||
|
stampato_ultimo = stampero_ultimo;
|
||||||
|
}
|
||||||
|
|
||||||
|
elementi++;
|
||||||
|
|
||||||
|
if (elementi >= elementi_pagina(QUARTA))
|
||||||
|
{
|
||||||
|
if (stampato_ultimo)
|
||||||
|
{
|
||||||
|
jump_to_line(pr, riga_totali(QUARTA));
|
||||||
|
stampa_totali(pr);
|
||||||
|
stampati_totali = TRUE;
|
||||||
|
}
|
||||||
|
next_page(pr);
|
||||||
|
elementi = 0;
|
||||||
|
}
|
||||||
|
break;
|
||||||
|
default:
|
||||||
|
CHECK(0, "Invalid Quadro A page");
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!stampato_ultimo)
|
||||||
|
{
|
||||||
|
if (indice.items() > 0)
|
||||||
|
cur = indice[++pos].pos();
|
||||||
|
else
|
||||||
|
++cur;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
close_print();
|
||||||
|
|
||||||
|
return TRUE;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool TStampaQuadroC::user_create()
|
||||||
|
{
|
||||||
|
_form = new TQuadroC("77QC", quadro());
|
||||||
|
|
||||||
|
TString sortkey(80);
|
||||||
|
sortkey.format("CODDITTA|TIPOA|216@->RAGSOC|CODANAGR|CODCAUS|PERC", LF_QUAC, LF_QUAC);
|
||||||
|
_cur = new TSorted_cursor(_form->TForm::relation(), sortkey);
|
||||||
|
|
||||||
|
return TRUE;
|
||||||
|
}
|
||||||
39
m770/77stqc.h
Executable file
39
m770/77stqc.h
Executable file
@ -0,0 +1,39 @@
|
|||||||
|
#ifndef __77STQC_H
|
||||||
|
#define __77STQC_H
|
||||||
|
|
||||||
|
#include "77stq.h"
|
||||||
|
#include "77stqab.h"
|
||||||
|
|
||||||
|
class TQuadroC : public TQuadroA
|
||||||
|
{
|
||||||
|
enum { QA_FORMLEN = 72 };
|
||||||
|
|
||||||
|
real _totale, _contssn, _somme, _imponibile, _ritenute, _netto;
|
||||||
|
bool _devo_sommare;
|
||||||
|
|
||||||
|
protected:
|
||||||
|
virtual int elementi_pagina(PaginaQuadro p) const;
|
||||||
|
virtual int prima_riga(PaginaQuadro p) const;
|
||||||
|
virtual bool print(const long codditta, const long NumFis, const long NumNoFis);
|
||||||
|
|
||||||
|
public:
|
||||||
|
bool controlla_percentuale(TCursor& cur, const real& perc_p);
|
||||||
|
void stampa_corpo(TPrinter& pr);
|
||||||
|
void setta_importi(TPrint_section& body);
|
||||||
|
void leggi_importi();
|
||||||
|
|
||||||
|
TQuadroC(const char* form, const char* quadro) : TQuadroA(form, quadro) { }
|
||||||
|
virtual ~TQuadroC() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
class TStampaQuadroC : public TStampaQuadroA
|
||||||
|
{
|
||||||
|
protected:
|
||||||
|
virtual bool user_create();
|
||||||
|
|
||||||
|
public:
|
||||||
|
TStampaQuadroC(const char* quadro, char livel) : TStampaQuadroA(quadro, livel) { }
|
||||||
|
virtual ~TStampaQuadroC() { }
|
||||||
|
};
|
||||||
|
|
||||||
|
#endif
|
||||||
Loading…
x
Reference in New Issue
Block a user