2011-02-10 13:30:55 +00:00
|
|
|
|
|
|
|
|
|
#include <applicat.h>
|
|
|
|
|
#include <automask.h>
|
|
|
|
|
#include <progind.h>
|
2011-02-14 16:58:57 +00:00
|
|
|
|
#include <recarray.h>
|
2011-02-10 13:30:55 +00:00
|
|
|
|
#include <relation.h>
|
|
|
|
|
#include <reprint.h>
|
|
|
|
|
#include <textset.h>
|
|
|
|
|
|
2011-02-14 16:58:57 +00:00
|
|
|
|
#include "../ca/calib01.h"
|
|
|
|
|
#include "../ca/commesse.h"
|
2011-02-10 13:30:55 +00:00
|
|
|
|
|
2011-02-14 16:58:57 +00:00
|
|
|
|
#include "rilore.h"
|
2011-02-10 13:30:55 +00:00
|
|
|
|
#include "ci1300a.h"
|
|
|
|
|
|
2011-02-15 16:43:31 +00:00
|
|
|
|
#define _last_column 32;
|
|
|
|
|
///////////////////////////////////////////////////////////
|
|
|
|
|
// Recordset
|
|
|
|
|
///////////////////////////////////////////////////////////
|
|
|
|
|
class TRil_ore_recordset : public TCSV_recordset
|
|
|
|
|
{
|
|
|
|
|
public:
|
|
|
|
|
TRil_ore_recordset();
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
TRil_ore_recordset::TRil_ore_recordset()
|
|
|
|
|
: TCSV_recordset("CSV(\"|\")")
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
///////////////////////////////////////////////////////////
|
|
|
|
|
// Report
|
|
|
|
|
///////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
class TRil_ore_report : public TReport
|
|
|
|
|
{
|
|
|
|
|
protected:
|
|
|
|
|
virtual bool use_mask() { return false; }
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
TRil_ore_report() { load("ci1300a"); }
|
|
|
|
|
};
|
|
|
|
|
|
2011-02-10 13:30:55 +00:00
|
|
|
|
|
|
|
|
|
///////////////////////////////////////////////////////////
|
|
|
|
|
// Maschera
|
|
|
|
|
///////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
class TRil_ore_mask : public TAutomask
|
|
|
|
|
{
|
|
|
|
|
protected:
|
2011-02-14 16:58:57 +00:00
|
|
|
|
virtual bool on_field_event(TOperable_field& o, TField_event e, long jolly);
|
2011-02-15 16:43:31 +00:00
|
|
|
|
|
|
|
|
|
bool is_ferial_day(const TDate& data) const;
|
2011-02-14 16:58:57 +00:00
|
|
|
|
long calcola_giorni_lavorativi(const TDate& dataini, const TDate& datafine) const;
|
|
|
|
|
long calcola_giorni_lavorativi_cms(const TDate& ini_cms, const TDate& fine_cms,
|
|
|
|
|
const TDate& dataini, const TDate& datafine,
|
|
|
|
|
TDate& inizio_lav, TDate& fine_lav) const;
|
|
|
|
|
void elabora_risorsa(const TString& curr_risorsa, TReport& rep) const;
|
2011-02-10 13:30:55 +00:00
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
void elabora() const;
|
|
|
|
|
|
|
|
|
|
TRil_ore_mask();
|
|
|
|
|
virtual ~TRil_ore_mask() {}
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
TRil_ore_mask::TRil_ore_mask() : TAutomask("ci1300a")
|
|
|
|
|
{
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
bool TRil_ore_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
|
|
|
|
|
{
|
|
|
|
|
return true;
|
|
|
|
|
}
|
|
|
|
|
|
2011-02-15 16:43:31 +00:00
|
|
|
|
|
|
|
|
|
bool TRil_ore_mask::is_ferial_day(const TDate& data) const
|
|
|
|
|
{
|
|
|
|
|
return data.wday() < 6 && !data.is_holiday();
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
2011-02-14 16:58:57 +00:00
|
|
|
|
long TRil_ore_mask::calcola_giorni_lavorativi(const TDate& dataini, const TDate& datafine) const
|
2011-02-10 13:30:55 +00:00
|
|
|
|
{
|
2011-02-14 16:58:57 +00:00
|
|
|
|
long num_giorni_lav = datafine - dataini + 1;
|
|
|
|
|
//e qui si parr<72> l'ultima stilla di nobilitate! deve eliminare i giorni festivi dal mucchio!
|
|
|
|
|
if (num_giorni_lav > 1)
|
|
|
|
|
{
|
|
|
|
|
for (TDate data = dataini; data <= datafine; ++data)
|
|
|
|
|
{
|
2011-02-15 16:43:31 +00:00
|
|
|
|
if (!is_ferial_day(data))
|
2011-02-14 16:58:57 +00:00
|
|
|
|
num_giorni_lav--;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
return num_giorni_lav;
|
|
|
|
|
}
|
|
|
|
|
|
2011-02-15 16:43:31 +00:00
|
|
|
|
|
2011-02-14 16:58:57 +00:00
|
|
|
|
long TRil_ore_mask::calcola_giorni_lavorativi_cms(const TDate& ini_cms, const TDate& fine_cms,
|
|
|
|
|
const TDate& dataini, const TDate& datafine,
|
|
|
|
|
TDate& inizio_lav, TDate& fine_lav) const
|
|
|
|
|
{
|
|
|
|
|
//date del mese
|
2011-02-10 13:30:55 +00:00
|
|
|
|
const int anno = get_int(F_ANNO);
|
|
|
|
|
const int mese = get_int(F_MESE);
|
2011-02-14 16:58:57 +00:00
|
|
|
|
TDate ini_mese(1, mese, anno);
|
|
|
|
|
TDate fine_mese = ini_mese;
|
|
|
|
|
fine_mese.set_end_month();
|
|
|
|
|
|
|
|
|
|
//se la commessa non "interseca" il mese selezionato -> finisce qui
|
|
|
|
|
if (fine_cms < ini_mese || ini_cms > fine_mese)
|
|
|
|
|
return 0;
|
|
|
|
|
//se le date limite lavorative non "intersecano" il mese selezionato -> finisce qui
|
|
|
|
|
if (datafine < ini_mese || dataini > fine_mese)
|
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
|
|
//se <20> arrivato fin qui -> c'<27> qualcosa da considerare
|
|
|
|
|
//vanno prese la massima data inizio e la minima data fine
|
|
|
|
|
inizio_lav = fnc_max(ini_mese, ini_cms);
|
|
|
|
|
fine_lav = fnc_min(fine_mese, fine_cms);
|
|
|
|
|
|
|
|
|
|
//e qui si parr<72> l'ultima stilla di nobilitate! deve eliminare i giorni festivi dal mucchio!
|
|
|
|
|
return calcola_giorni_lavorativi(inizio_lav, fine_lav);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void TRil_ore_mask::elabora_risorsa(const TString& curr_risorsa, TReport& rep) const
|
|
|
|
|
{
|
|
|
|
|
//creare un assoc_array con chiave TToken_string cms-sede-fase(1) o sede-cms-fase(2) in base ai parametri..
|
|
|
|
|
//..indicati sulla maschera
|
|
|
|
|
const int tipo_ordinamento = get_int(F_ORDINAMENTO);
|
|
|
|
|
const bool show_fasi = get_bool(F_SHOW_FASI);
|
|
|
|
|
//il contenuto dell'assoc_array sar<61>: tot_Prev - 31 valori giornalieri Consuntivi - tot_Consuntivo
|
|
|
|
|
TAssoc_array righe;
|
|
|
|
|
|
|
|
|
|
const TVariant tiporisorsa = get(F_RISOATT);
|
2011-02-10 13:30:55 +00:00
|
|
|
|
|
|
|
|
|
//query sul file delle ore in chiave 3: TIPO+TIPORA+CODICE+ANNO+MESE+...
|
|
|
|
|
TString query;
|
2011-02-14 16:58:57 +00:00
|
|
|
|
query << "USE RILORE KEY 5";
|
|
|
|
|
query << "\nFROM TIPO=#TIPO TIPORA=#TPRA CODICE=#CODICE";
|
|
|
|
|
query << "\nTO TIPO=#TIPO TIPORA=#TPRA CODICE=#CODICE";
|
2011-02-10 13:30:55 +00:00
|
|
|
|
|
|
|
|
|
TISAM_recordset rilore_recset(query);
|
2011-02-14 16:58:57 +00:00
|
|
|
|
rilore_recset.set_var("#TPRA", tiporisorsa);
|
|
|
|
|
rilore_recset.set_var("#CODICE", curr_risorsa);
|
2011-02-10 13:30:55 +00:00
|
|
|
|
|
2011-02-14 16:58:57 +00:00
|
|
|
|
//un giro con le ore a 'P'reventivo, uno con quelle a 'C'onsuntivo
|
2011-02-10 13:30:55 +00:00
|
|
|
|
for (int i = 0; i < 2; i++)
|
|
|
|
|
{
|
2011-02-14 16:58:57 +00:00
|
|
|
|
const TVariant tipo = i == 0 ? "P" : "C";
|
|
|
|
|
rilore_recset.set_var("#TIPO", tipo);
|
2011-02-10 13:30:55 +00:00
|
|
|
|
|
|
|
|
|
const long rilore_recset_items = rilore_recset.items();
|
|
|
|
|
|
|
|
|
|
for (bool ok = rilore_recset.move_first(); ok; ok = rilore_recset.move_next())
|
|
|
|
|
{
|
2011-02-15 16:43:31 +00:00
|
|
|
|
const TString80 codcosto = rilore_recset.get(RILORE_CODCOSTO).as_string();
|
|
|
|
|
const TString80 codcms = rilore_recset.get(RILORE_CODCMS).as_string();
|
|
|
|
|
const TString16 codfase = rilore_recset.get(RILORE_CODFASE).as_string();
|
|
|
|
|
|
|
|
|
|
//panegirico allucinante per riproporzionare le ore in base al mese, alla commessa, alle feste ecc. in modo da..
|
|
|
|
|
//..ottenere alla fine il numero di giorni lavorativi buoni per la commessa nel mese scelto
|
2011-02-14 16:58:57 +00:00
|
|
|
|
//date limite commessa
|
|
|
|
|
const TRectype& rec_cms = cache().get(LF_COMMESSE, codcms);
|
|
|
|
|
TDate ini_cms, fine_cms;
|
|
|
|
|
const int durata_cms = ca_durata_commessa(rec_cms, ini_cms, fine_cms);
|
2011-02-15 16:43:31 +00:00
|
|
|
|
//date limite qta ore sul record del file LF_RILORE
|
2011-02-14 16:58:57 +00:00
|
|
|
|
TDate dataini = rilore_recset.get(RILORE_DADATA).as_date();
|
|
|
|
|
TDate datafine = rilore_recset.get(RILORE_ADATA).as_date();
|
|
|
|
|
|
2011-02-15 16:43:31 +00:00
|
|
|
|
//adatta le date alla commessa se quest'ultima <20> contenuta nell'intervallo (pu<70> essere pi<70> breve..
|
|
|
|
|
//..dell'intervallo selezionato, oppure sovrapporsi solo parzialmente)
|
2011-02-14 16:58:57 +00:00
|
|
|
|
if (fine_cms < datafine)
|
|
|
|
|
datafine = fine_cms;
|
|
|
|
|
if (ini_cms > dataini)
|
|
|
|
|
dataini = ini_cms;
|
|
|
|
|
//se la commessa fosse tutta nel futuro o nel passato -> lascia perdere
|
|
|
|
|
const long giorni_lavorativi = calcola_giorni_lavorativi(dataini, datafine);
|
|
|
|
|
if (giorni_lavorativi <= 0)
|
|
|
|
|
continue;
|
|
|
|
|
|
|
|
|
|
//metodo semidivino per calcolare, dati l'anno ed il il mese selezionati, la commessa corrente, le date inizio e fine,..
|
|
|
|
|
//..quanti sono i giorni di lavoro lavorativi per suddividere la quantit<69> di ore
|
|
|
|
|
TDate ini_lav, fine_lav;
|
|
|
|
|
const long giorni_lavorativi_cms = calcola_giorni_lavorativi_cms(ini_cms, fine_cms, dataini, datafine, ini_lav, fine_lav);
|
|
|
|
|
|
2011-02-15 16:43:31 +00:00
|
|
|
|
//adesso deve riproporzionare il monte ore sul record sul mese selezionato (fa tutto il lavoro se ci sono giorni..
|
|
|
|
|
//..lavorativi sulla commessa in questione)
|
2011-02-14 16:58:57 +00:00
|
|
|
|
if (giorni_lavorativi_cms > 0)
|
|
|
|
|
{
|
|
|
|
|
const real tot_ore = rilore_recset.get(RILORE_QTAORE).as_real();
|
|
|
|
|
const real tot_ore_uso_risorsa_nel_mese_per_cms = tot_ore * giorni_lavorativi_cms / giorni_lavorativi;
|
|
|
|
|
|
|
|
|
|
//crea la chiave per l'assoc_array
|
|
|
|
|
TToken_string key;
|
|
|
|
|
switch(tipo_ordinamento)
|
|
|
|
|
{
|
|
|
|
|
case 1:
|
|
|
|
|
key.add(codcms);
|
|
|
|
|
key.add(codcosto);
|
|
|
|
|
break;
|
|
|
|
|
case 2:
|
|
|
|
|
key.add(codcosto);
|
|
|
|
|
key.add(codcms);
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
if (show_fasi)
|
|
|
|
|
key.add(codfase);
|
|
|
|
|
|
|
|
|
|
//se la chiave non esiste gi<67> nell'assoc_array allora crea l'elemento
|
|
|
|
|
TToken_string* record = (TToken_string*)righe.objptr(key);
|
|
|
|
|
if (record == NULL)
|
|
|
|
|
{
|
|
|
|
|
record = new TToken_string;
|
|
|
|
|
righe.add(key, record);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (i == 0) //'P'reventivo (aggiorna solo il totale)
|
|
|
|
|
{
|
|
|
|
|
real prev = record->get(0);
|
|
|
|
|
prev += tot_ore_uso_risorsa_nel_mese_per_cms;
|
2011-02-15 16:43:31 +00:00
|
|
|
|
record->add(prev.string(), 0);
|
2011-02-14 16:58:57 +00:00
|
|
|
|
}
|
|
|
|
|
else //'C'onsuntivo (aggiorna tutte le caselle dei giorni lavorativi)
|
|
|
|
|
{
|
|
|
|
|
const real ore_al_giorno = tot_ore / giorni_lavorativi;
|
2011-02-15 16:43:31 +00:00
|
|
|
|
for (TDate data = ini_lav; data <= fine_lav; ++data)
|
2011-02-14 16:58:57 +00:00
|
|
|
|
{
|
2011-02-15 16:43:31 +00:00
|
|
|
|
if (giorni_lavorativi == 1 || is_ferial_day(data))
|
2011-02-14 16:58:57 +00:00
|
|
|
|
{
|
|
|
|
|
real prev = record->get(data.day());
|
|
|
|
|
prev += ore_al_giorno;
|
2011-02-15 16:43:31 +00:00
|
|
|
|
record->add(prev.string(), data.day());
|
|
|
|
|
real tot = record->get(32);
|
|
|
|
|
tot += ore_al_giorno;
|
|
|
|
|
record->add(tot.string(), 32);
|
2011-02-14 16:58:57 +00:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
} //if (giorni_lavorativi_cms > 0)..
|
|
|
|
|
} //for (bool ok = rilore_recset.move_first();..
|
2011-02-10 13:30:55 +00:00
|
|
|
|
|
2011-02-15 16:43:31 +00:00
|
|
|
|
} //for (int i = 0; i < 2; i++)...
|
2011-02-14 16:58:57 +00:00
|
|
|
|
|
|
|
|
|
//finita l'elaborazione che ha riempito l'assoc_array, asegna il medesimo ad un..
|
|
|
|
|
//..csv_recordset e poi sbatte quest'ultimo (ordinato) nel report
|
2011-02-15 16:43:31 +00:00
|
|
|
|
TRil_ore_recordset* righe_da_stampare = new TRil_ore_recordset;
|
|
|
|
|
|
|
|
|
|
FOR_EACH_ASSOC_OBJECT(righe, obj, key, itm)
|
|
|
|
|
{
|
|
|
|
|
#ifdef DBG
|
|
|
|
|
TString cazzo_key = key;
|
|
|
|
|
if (cazzo_key.find("4.10.146.2/2010") >= 0)
|
|
|
|
|
int cazzone = 1;
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
TToken_string& record_ass = (TToken_string&)*itm;
|
|
|
|
|
real totale_c = record_ass.get(32);
|
|
|
|
|
totale_c.round(1);
|
|
|
|
|
TGeneric_distrib esso(totale_c, 1);
|
|
|
|
|
|
|
|
|
|
for (int j = 1; j <= 31; j++)
|
|
|
|
|
{
|
|
|
|
|
real ore = record_ass.get(j);
|
|
|
|
|
esso.add(ore);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
//chiave della riga (Cms-CdC-Fase o CdC-Cms-Fase)
|
|
|
|
|
TToken_string linea;
|
|
|
|
|
linea = key;
|
|
|
|
|
linea.replace('|', ' ');
|
|
|
|
|
|
|
|
|
|
// Totale preventivo
|
|
|
|
|
real totale_p = record_ass.get(0);
|
|
|
|
|
totale_p.round(1);
|
|
|
|
|
linea.add(totale_p.string());
|
|
|
|
|
|
|
|
|
|
// Totale consuntivo
|
|
|
|
|
for (int k = 1; k <= 31; k++)
|
|
|
|
|
{
|
|
|
|
|
const real ore_giorno = esso.get();
|
|
|
|
|
const char* str_ore = ore_giorno.string();
|
|
|
|
|
linea.add(str_ore, k+1);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
linea.add(totale_c.string());
|
|
|
|
|
|
|
|
|
|
//aggiunge la riga tokenstringata al csv_recordset
|
|
|
|
|
righe_da_stampare->new_rec(linea);
|
|
|
|
|
}
|
|
|
|
|
//ordina il recordset per chiave
|
|
|
|
|
righe_da_stampare->sort();
|
|
|
|
|
|
|
|
|
|
#ifdef DBG
|
|
|
|
|
righe_da_stampare->save_as_text("C:/temp/cazzone.txt");
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
//setta il recordset ordinato al report
|
|
|
|
|
rep.set_recordset(righe_da_stampare);
|
|
|
|
|
|
2011-02-10 13:30:55 +00:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void TRil_ore_mask::elabora() const
|
|
|
|
|
{
|
2011-02-14 16:58:57 +00:00
|
|
|
|
TReport_book book;
|
2011-02-15 16:43:31 +00:00
|
|
|
|
TRil_ore_report rep;
|
|
|
|
|
|
|
|
|
|
//maggico giro per formattare la testata del calendario di pagina nel report
|
|
|
|
|
const int anno = get_int(F_ANNO);
|
|
|
|
|
const int mese = get_int(F_MESE);
|
|
|
|
|
const TDate primo_del_mese(1, mese, anno);
|
|
|
|
|
TDate ultimo_del_mese = primo_del_mese;
|
|
|
|
|
ultimo_del_mese.set_end_month();
|
|
|
|
|
|
|
|
|
|
TString16 code;
|
|
|
|
|
|
|
|
|
|
for (TDate giorno = primo_del_mese; giorno <= ultimo_del_mese; ++giorno)
|
|
|
|
|
{
|
|
|
|
|
code.format("H0.%d", giorno.day() + 100);
|
|
|
|
|
TReport_field* rep_field = rep.field(code);
|
|
|
|
|
|
|
|
|
|
if (rep_field != NULL)
|
|
|
|
|
{
|
|
|
|
|
if (!is_ferial_day(giorno))
|
|
|
|
|
rep_field->set_back_color(COLOR_LTGRAY);
|
|
|
|
|
|
|
|
|
|
code = itow(giorno.wday());
|
|
|
|
|
code.cut(3);
|
|
|
|
|
code << '\n' << giorno.day();
|
|
|
|
|
rep_field->set(code);
|
|
|
|
|
}
|
|
|
|
|
}
|
2011-02-14 16:58:57 +00:00
|
|
|
|
|
2011-02-10 13:30:55 +00:00
|
|
|
|
//query sulla tabella interessata (risorse o attrezzature)
|
|
|
|
|
TString16 da_ris_att, a_ris_att;
|
|
|
|
|
TString query_ris_att;
|
|
|
|
|
const char tiporisorsa = get(F_RISOATT)[0];
|
|
|
|
|
|
|
|
|
|
if (tiporisorsa == 'R')
|
|
|
|
|
{
|
|
|
|
|
da_ris_att = get(F_DA_CODRIS);
|
|
|
|
|
a_ris_att = get(F_A_CODRIS);
|
|
|
|
|
query_ris_att << "USE RSS";
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
da_ris_att = get(F_DA_CODATT);
|
|
|
|
|
a_ris_att = get(F_A_CODATT);
|
|
|
|
|
query_ris_att << "USE ATR";
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
query_ris_att << "\nFROM CODTAB=#DACODICE";
|
|
|
|
|
query_ris_att << "\nTO CODTAB=#ACODICE";
|
|
|
|
|
|
|
|
|
|
TISAM_recordset recset_ris_att(query_ris_att);
|
|
|
|
|
recset_ris_att.set_var("#DACODICE", da_ris_att);
|
|
|
|
|
recset_ris_att.set_var("#ACODICE", a_ris_att);
|
|
|
|
|
const long recset_ris_att_items = recset_ris_att.items();
|
|
|
|
|
|
|
|
|
|
TProgind pi(recset_ris_att_items, TR("Scansione risorse/attrezzature.."), true, true);
|
|
|
|
|
|
2011-02-14 16:58:57 +00:00
|
|
|
|
//per ogni risorsa/attrezzatura dell'elenco genera un report singolo che viene riempito nella elabora_risorsa e..
|
|
|
|
|
//..aggiunto al book per la stampa finale
|
2011-02-10 13:30:55 +00:00
|
|
|
|
for (bool ok = recset_ris_att.move_first(); ok; ok = recset_ris_att.move_next())
|
|
|
|
|
{
|
|
|
|
|
if (!pi.addstatus(1))
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
const TString& curr_risorsa = recset_ris_att.cursor()->curr().get("CODTAB");
|
|
|
|
|
|
2011-02-14 16:58:57 +00:00
|
|
|
|
elabora_risorsa(curr_risorsa, rep);
|
2011-02-10 13:30:55 +00:00
|
|
|
|
|
2011-02-14 16:58:57 +00:00
|
|
|
|
book.add(rep);
|
2011-02-10 13:30:55 +00:00
|
|
|
|
}
|
|
|
|
|
|
2011-02-15 16:43:31 +00:00
|
|
|
|
//e alla fine stampa il book
|
|
|
|
|
book.preview();
|
2011-02-10 13:30:55 +00:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
///////////////////////////////////////////////////////////
|
|
|
|
|
// Applicazione
|
|
|
|
|
///////////////////////////////////////////////////////////
|
|
|
|
|
|
|
|
|
|
class TRil_ore : public TSkeleton_application
|
|
|
|
|
{
|
|
|
|
|
protected:
|
|
|
|
|
|
|
|
|
|
public:
|
|
|
|
|
virtual bool create();
|
|
|
|
|
virtual void main_loop();
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
void TRil_ore::main_loop()
|
|
|
|
|
{
|
|
|
|
|
TRil_ore_mask mask;
|
|
|
|
|
|
|
|
|
|
while (mask.run() == K_ENTER)
|
|
|
|
|
{
|
|
|
|
|
mask.elabora();
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
bool TRil_ore::create()
|
|
|
|
|
{
|
|
|
|
|
return TSkeleton_application::create();
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
int ci1300(int argc, char* argv[])
|
|
|
|
|
{
|
|
|
|
|
TRil_ore sd;
|
|
|
|
|
sd.run(argc, argv, "Rilevazione ore");
|
|
|
|
|
return 0;
|
|
|
|
|
}
|