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

Patch level :10.0

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
iniziata stampa ore per commessa / cdc


git-svn-id: svn://10.65.10.50/branches/R_10_00@21672 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2011-02-17 11:24:08 +00:00
parent a26ba6aa7f
commit b90475c22c
9 changed files with 432 additions and 65 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ci/ci1.cpp
View File

@ -10,7 +10,10 @@ int main(int argc, char** argv)
ci1200(argc,argv); // stampa
break;
case 2:
ci1300(argc,argv); // rilevazione ore mensili
ci1300(argc,argv); // rilevazione ore mensili per risorsa - attrezzatura
break;
case 3:
ci1400(argc,argv); // rilevazione ore mensili per cms - cdc
break;
default:
break;

3
ci/ci1.h
View File

@ -2,7 +2,8 @@
#define __CI1_H
int ci1200(int argc, char* argv[]); // stampe
int ci1300(int argc, char* argv[]); // rilevazione ore mensili
int ci1300(int argc, char* argv[]); // rilevazione ore mensili per risorsa - attrezzatura
int ci1400(int argc, char* argv[]); // rilevazione ore mensili per cms - cdc
#endif // __CI1_H

90
ci/ci1300.cpp
View File

@ -11,19 +11,19 @@
#include "../ca/commesse.h"
#include "rilore.h"
#include "cilib.h"
#include "ci1300a.h"
#define _last_column 32;
///////////////////////////////////////////////////////////
// Recordset
///////////////////////////////////////////////////////////
class TRil_ore_recordset : public TCSV_recordset
class TRil_ore_ris_recordset : public TCSV_recordset
{
public:
TRil_ore_recordset();
TRil_ore_ris_recordset();
};
TRil_ore_recordset::TRil_ore_recordset()
TRil_ore_ris_recordset::TRil_ore_ris_recordset()
: TCSV_recordset("CSV(\"|\")")
{
}
@ -32,13 +32,13 @@ TRil_ore_recordset::TRil_ore_recordset()
// Report
///////////////////////////////////////////////////////////
class TRil_ore_report : public TReport
class TRil_ore_ris_report : public TReport
{
protected:
virtual bool use_mask() { return false; }
public:
TRil_ore_report() { load("ci1300a"); }
TRil_ore_ris_report() { load("ci1300a"); }
};
@ -46,14 +46,14 @@ public:
// Maschera
///////////////////////////////////////////////////////////
class TRil_ore_mask : public TAutomask
class TRil_ore_ris_mask : public TAutomask
{
protected:
virtual bool on_field_event(TOperable_field& o, TField_event e, long jolly);
void format_report(TReport& rep) const;
bool is_ferial_day(const TDate& data) const;
long calcola_giorni_lavorativi(const TDate& dataini, const TDate& datafine) const;
//bool is_ferial_day(const TDate& data) const;
//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;
@ -62,43 +62,20 @@ protected:
public:
void elabora() const;
TRil_ore_mask();
virtual ~TRil_ore_mask() {}
TRil_ore_ris_mask();
virtual ~TRil_ore_ris_mask() {}
};
TRil_ore_mask::TRil_ore_mask() : TAutomask("ci1300a")
TRil_ore_ris_mask::TRil_ore_ris_mask() : TAutomask("ci1300a")
{
}
bool TRil_ore_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
bool TRil_ore_ris_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
{
return true;
}
bool TRil_ore_mask::is_ferial_day(const TDate& data) const
{
return data.wday() < 6 && !data.is_holiday();
}
long TRil_ore_mask::calcola_giorni_lavorativi(const TDate& dataini, const TDate& datafine) const
{
long num_giorni_lav = datafine - dataini + 1;
//e qui si parrà l'ultima stilla di nobilitate! deve eliminare i giorni festivi dal mucchio!
if (num_giorni_lav > 1)
{
for (TDate data = dataini; data <= datafine; ++data)
{
if (!is_ferial_day(data))
num_giorni_lav--;
}
}
return num_giorni_lav;
}
long TRil_ore_mask::calcola_giorni_lavorativi_cms(const TDate& ini_cms, const TDate& fine_cms,
long TRil_ore_ris_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
{
@ -122,10 +99,10 @@ long TRil_ore_mask::calcola_giorni_lavorativi_cms(const TDate& ini_cms, const TD
fine_lav = fnc_min(fine_mese, fine_cms);
//e qui si parrà l'ultima stilla di nobilitate! deve eliminare i giorni festivi dal mucchio!
return calcola_giorni_lavorativi(inizio_lav, fine_lav);
return ci_calcola_giorni_lavorativi(inizio_lav, fine_lav);
}
void TRil_ore_mask::elabora_risorsa(const TString& curr_risorsa, TReport& rep) const
void TRil_ore_ris_mask::elabora_risorsa(const TString& curr_risorsa, TReport& rep) const
{
//memorizza la risorsa in esame perchè gli serve alla fine del metodo
const TString8 risorsa = curr_risorsa;
@ -179,7 +156,7 @@ void TRil_ore_mask::elabora_risorsa(const TString& curr_risorsa, TReport& rep) c
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);
const long giorni_lavorativi = ci_calcola_giorni_lavorativi(dataini, datafine);
if (giorni_lavorativi <= 0)
continue;
@ -230,7 +207,7 @@ void TRil_ore_mask::elabora_risorsa(const TString& curr_risorsa, TReport& rep) c
const real ore_al_giorno = tot_ore / giorni_lavorativi;
for (TDate data = ini_lav; data <= fine_lav; ++data)
{
if (giorni_lavorativi == 1 || is_ferial_day(data))
if (giorni_lavorativi == 1 || ci_is_ferial_day(data))
{
real prev = record->get(data.day());
prev += ore_al_giorno;
@ -248,7 +225,7 @@ void TRil_ore_mask::elabora_risorsa(const TString& curr_risorsa, TReport& rep) c
//finita l'elaborazione che ha riempito l'assoc_array, asegna il medesimo ad un..
//..csv_recordset e poi sbatte quest'ultimo (ordinato) nel report
TRil_ore_recordset* righe_da_stampare = new TRil_ore_recordset;
TRil_ore_ris_recordset* righe_da_stampare = new TRil_ore_ris_recordset;
FOR_EACH_ASSOC_OBJECT(righe, obj, key, itm)
{
@ -312,7 +289,7 @@ void TRil_ore_mask::elabora_risorsa(const TString& curr_risorsa, TReport& rep) c
}
void TRil_ore_mask::format_report(TReport& rep) const
void TRil_ore_ris_mask::format_report(TReport& rep) const
{
//maggico giro per formattare la testata del calendario di pagina nel report
const int anno = get_int(F_ANNO);
@ -330,7 +307,7 @@ void TRil_ore_mask::format_report(TReport& rep) const
if (rep_field != NULL)
{
if (!is_ferial_day(giorno))
if (!ci_is_ferial_day(giorno))
rep_field->set_back_color(COLOR_LTGRAY);
code = itow(giorno.wday());
@ -341,16 +318,17 @@ void TRil_ore_mask::format_report(TReport& rep) const
}
}
void TRil_ore_mask::elabora() const
void TRil_ore_ris_mask::elabora() const
{
TReport_book book;
TRil_ore_report rep;
TRil_ore_ris_report rep;
format_report(rep);
//query sulla tabella interessata (risorse o attrezzature)
TString16 da_ris_att, a_ris_att;
TString query_ris_att;
TString msg;
const char tiporisorsa = get(F_RISOATT)[0];
if (tiporisorsa == 'R')
@ -358,12 +336,14 @@ void TRil_ore_mask::elabora() const
da_ris_att = get(F_DA_CODRIS);
a_ris_att = get(F_A_CODRIS);
query_ris_att << "USE RSS";
msg << "Scansione risorse...";
}
else
{
da_ris_att = get(F_DA_CODATT);
a_ris_att = get(F_A_CODATT);
query_ris_att << "USE ATR";
"Scansione attrezzature...";
}
query_ris_att << "\nFROM CODTAB=#DACODICE";
@ -374,7 +354,7 @@ void TRil_ore_mask::elabora() const
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);
TProgind pi(recset_ris_att_items, msg, true, true);
//per ogni risorsa/attrezzatura dell'elenco genera un report singolo che viene riempito nella elabora_risorsa e..
//..aggiunto al book per la stampa finale
@ -399,19 +379,18 @@ void TRil_ore_mask::elabora() const
// Applicazione
///////////////////////////////////////////////////////////
class TRil_ore : public TSkeleton_application
class TRil_ore_ris : public TSkeleton_application
{
protected:
public:
virtual bool create();
virtual void main_loop();
};
void TRil_ore::main_loop()
void TRil_ore_ris::main_loop()
{
TRil_ore_mask mask;
TRil_ore_ris_mask mask;
while (mask.run() == K_ENTER)
{
@ -419,14 +398,9 @@ void TRil_ore::main_loop()
}
}
bool TRil_ore::create()
{
return TSkeleton_application::create();
}
int ci1300(int argc, char* argv[])
{
TRil_ore sd;
sd.run(argc, argv, "Rilevazione ore");
TRil_ore_ris sd;
sd.run(argc, argv, "Rilevazione ore per Risorsa - Attrezzatura");
return 0;
}

2
ci/ci1300a.uml
View File

@ -4,7 +4,7 @@ TOOLBAR "topbar" 0 0 0 2
#include <printbar.h>
ENDPAGE
PAGE "Rilevazione ore" -1 -1 0 0
PAGE "Rilevazione ore per Risorsa - Attrezzatura" -1 -1 0 0
GROUPBOX -1 78 5
BEGIN

192
ci/ci1400.cpp Executable file
View File

@ -0,0 +1,192 @@
#include <applicat.h>
#include <automask.h>
#include <progind.h>
#include <recarray.h>
#include <relation.h>
#include <reprint.h>
#include <textset.h>
#include "../ca/calib01.h"
#include "../ca/commesse.h"
#include "rilore.h"
#include "cilib.h"
#include "ci1400a.h"
///////////////////////////////////////////////////////////
// Recordset
///////////////////////////////////////////////////////////
class TRil_ore_cms_recordset : public TCSV_recordset
{
public:
TRil_ore_cms_recordset();
};
TRil_ore_cms_recordset::TRil_ore_cms_recordset()
: TCSV_recordset("CSV(\"|\")")
{
}
///////////////////////////////////////////////////////////
// Report
///////////////////////////////////////////////////////////
class TRil_ore_cms_report : public TReport
{
protected:
virtual bool use_mask() { return false; }
public:
TRil_ore_cms_report() { load("ci1400a"); }
};
///////////////////////////////////////////////////////////
// Maschera
///////////////////////////////////////////////////////////
class TRil_ore_cms_mask : public TAutomask
{
protected:
virtual bool on_field_event(TOperable_field& o, TField_event e, long jolly);
void format_report(TReport& rep) 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;*/
public:
void elabora() const;
TRil_ore_cms_mask();
virtual ~TRil_ore_cms_mask() {}
};
TRil_ore_cms_mask::TRil_ore_cms_mask() : TAutomask("ci1400a")
{
}
bool TRil_ore_cms_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
{
return true;
}
void TRil_ore_cms_mask::format_report(TReport& rep) const
{
//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 (!ci_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);
}
}
}
void TRil_ore_cms_mask::elabora() const
{
TReport_book book;
TRil_ore_cms_report rep;
format_report(rep);
//query sul file interessato (commessa o centro di costo)
TString16 da_cms_cdc, a_cms_cdc;
TString query_cms_cdc;
TString msg, code_name;
const char tipo_cms_cdc = get(F_CMSOCDC)[0];
if (tipo_cms_cdc == 'C')
{
da_cms_cdc = get(F_DA_CODCMS);
a_cms_cdc = get(F_A_CODCMS);
query_cms_cdc << "USE COMMESSE";
query_cms_cdc << "\nFROM CODCMS=#DACODICE";
query_cms_cdc << "\nTO CODCMS=#ACODICE";
msg << "Scansione commesse...";
code_name = "CODCMS";
}
else
{
da_cms_cdc = get(F_DA_CODCDC);
a_cms_cdc = get(F_A_CODCDC);
query_cms_cdc << "USE CDC";
query_cms_cdc << "\nFROM CODCOSTO=#DACODICE";
query_cms_cdc << "\nTO CODCOSTO=#ACODICE";
msg << "Scansione centri di costo...";
code_name = "CODCOSTO";
}
TISAM_recordset recset_cms_cdc(query_cms_cdc);
recset_cms_cdc.set_var("#DACODICE", da_cms_cdc);
recset_cms_cdc.set_var("#ACODICE", a_cms_cdc);
const long recset_cms_cdc_items = recset_cms_cdc.items();
TProgind pi(recset_cms_cdc_items, msg, true, true);
//per ogni cms/cdc dell'elenco genera un report singolo che viene riempito nella elabora_commessa e..
//..aggiunto al book per la stampa finale
for (bool ok = recset_cms_cdc.move_first(); ok; ok = recset_cms_cdc.move_next())
{
if (!pi.addstatus(1))
break;
const TString& curr_commessa = recset_cms_cdc.cursor()->curr().get(code_name);
//elabora_commessa(curr_commessa, rep);
book.add(rep);
}
//e alla fine stampa il book
book.preview();
}
///////////////////////////////////////////////////////////
// Applicazione
///////////////////////////////////////////////////////////
class TRil_ore_cms : public TSkeleton_application
{
protected:
public:
virtual void main_loop();
};
void TRil_ore_cms::main_loop()
{
TRil_ore_cms_mask mask;
while (mask.run() == K_ENTER)
{
mask.elabora();
}
}
int ci1400(int argc, char* argv[])
{
TRil_ore_cms sd;
sd.run(argc, argv, "Rilevazione ore per Commessa - CdC");
return 0;
}

15
ci/ci1400a.h Executable file
View File

@ -0,0 +1,15 @@
#define F_CMSOCDC 201
#define F_DA_CODCMS 202
#define F_DA_DESCMS 203
#define F_A_CODCMS 204
#define F_A_DESCMS 205
#define F_DA_CODCDC 206
#define F_DA_DESCDC 207
#define F_A_CODCDC 208
#define F_A_DESCDC 209
#define F_ANNO 211
#define F_MESE 212
#define F_ORDINAMENTO 213
#define F_SHOW_FASI 214

153
ci/ci1400a.uml Executable file
View File

@ -0,0 +1,153 @@
#include "ci1400a.h"
TOOLBAR "topbar" 0 0 0 2
#include <printbar.h>
ENDPAGE
PAGE "Rilevazione ore per Commessa - CdC" -1 -1 0 0
GROUPBOX -1 78 5
BEGIN
PROMPT 1 1 "@bFiltri su Commesse / CdC"
END
LISTBOX F_CMSOCDC 1 16
BEGIN
PROMPT 2 2 "@bTipo "
ITEM "C|Commessa"
MESSAGE HIDE,2@|SHOW,1@
ITEM "S|Centro di Costo"
MESSAGE HIDE,1@|SHOW,2@
FLAGS "Z"
FIELD #CMSOCDC
END
STRING F_DA_CODCMS 20
BEGIN
PROMPT 2 3 "Da commessa "
USE LF_COMMESSE
INPUT CODCMS F_DA_CODCMS
DISPLAY "Codice@20" CODCMS
DISPLAY "Descrizione@50" DESCRIZ
OUTPUT F_DA_CODCMS CODCMS
OUTPUT F_DA_DESCMS DESCRIZ
CHECKTYPE NORMAL
GROUP 1
END
STRING F_DA_DESCMS 50 37
BEGIN
PROMPT 38 3 ""
USE LF_COMMESSE KEY 2
INPUT DESCRIZ F_DA_DESCMS
DISPLAY "Descrizione@50" DESCRIZ
DISPLAY "Codice@20" CODCMS
COPY OUTPUT F_DA_CODCMS
CHECKTYPE NORMAL
GROUP 1
END
STRING F_A_CODCMS 20
BEGIN
PROMPT 2 4 "A commessa "
COPY USE F_DA_CODCMS
INPUT CODCMS F_A_CODCMS
DISPLAY "Codice@20" CODCMS
DISPLAY "Descrizione@50" DESCRIZ
OUTPUT F_A_CODCMS CODCMS
OUTPUT F_A_DESCMS DESCRIZ
CHECKTYPE NORMAL
GROUP 1
END
STRING F_A_DESCMS 50 37
BEGIN
PROMPT 38 4 ""
COPY USE F_DA_DESCMS
INPUT DESCRIZ F_A_DESCMS
DISPLAY "Descrizione@50" DESCRIZ
DISPLAY "Codice@20" CODCMS
COPY OUTPUT F_A_CODCMS
CHECKTYPE NORMAL
GROUP 1
END
STRING F_DA_CODCDC 20
BEGIN
PROMPT 2 3 "Da CdC "
USE LF_CDC
INPUT CODCOSTO F_DA_CODCDC
DISPLAY "Codice@20" CODCOSTO
DISPLAY "Descrizione@50" DESCRIZ
OUTPUT F_DA_CODCDC CODCOSTO
OUTPUT F_DA_DESCDC DESCRIZ
CHECKTYPE NORMAL
GROUP 2
END
STRING F_DA_DESCDC 50 42
BEGIN
PROMPT 32 3 ""
USE LF_CDC KEY 2
INPUT DESCRIZ F_DA_DESCDC
DISPLAY "Descrizione@50" DESCRIZ
DISPLAY "Codice@20" CODCOSTO
COPY OUTPUT F_DA_CODCDC
CHECKTYPE NORMAL
GROUP 2
END
STRING F_A_CODCDC 20
BEGIN
PROMPT 2 4 "A CdC "
COPY USE F_DA_CODCDC
INPUT CODCOSTO F_A_CODCDC
DISPLAY "Codice@20" CODCOSTO
DISPLAY "Descrizione@50" DESCRIZ
OUTPUT F_A_CODCDC CODCOSTO
OUTPUT F_A_DESCDC DESCRIZ
CHECKTYPE NORMAL
GROUP 2
END
STRING F_A_DESCDC 50 42
BEGIN
PROMPT 32 4 ""
COPY USE F_DA_DESCDC
INPUT DESCRIZ F_A_DESCDC
DISPLAY "Descrizione@50" DESCRIZ
DISPLAY "Codice@20" CODCOSTO
COPY OUTPUT F_A_CODCDC
CHECKTYPE NORMAL
GROUP 2
END
GROUPBOX -1 78 3
BEGIN
PROMPT 1 6 "@bFiltri su anno / mese"
END
NUMBER F_ANNO 4
BEGIN
PROMPT 2 7 "Anno "
CHECKTYPE REQUIRED
FLAGS "A"
FIELD #ANNO
END
LISTBOX F_MESE 10
BEGIN
PROMPT 24 7 "Mese "
FLAGS "M"
FIELD #MESE
END
BOOLEAN F_SHOW_FASI
BEGIN
PROMPT 2 9 "Dettaglio per fase"
FIELD #SHOW_FASI
END
ENDPAGE
ENDMASK

25
ci/cilib.cpp
View File

@ -910,3 +910,28 @@ void TDoc_cache::discarding(const THash_object* obj)
}
///////////////////////////////////////////////////////////////////////////////////////
// Metodi liberi per determinare giorni lavorativi e feriali (nati per ci1300 ci1400)
///////////////////////////////////////////////////////////////////////////////////////
bool ci_is_ferial_day(const TDate& data)
{
return data.wday() < 6 && !data.is_holiday();
}
long ci_calcola_giorni_lavorativi(const TDate& dataini, const TDate& datafine)
{
long num_giorni_lav = datafine - dataini + 1;
//e qui si parrà l'ultima stilla di nobilitate! deve eliminare i giorni festivi dal mucchio!
if (num_giorni_lav > 1)
{
for (TDate data = dataini; data <= datafine; ++data)
{
if (!ci_is_ferial_day(data))
num_giorni_lav--;
}
}
return num_giorni_lav;
}

12
ci/cilib.h
View File

@ -5,10 +5,6 @@
#include <automask.h>
#endif
//#ifndef __RECARRAY_H
//#include <recarray.h>
//#endif
#ifndef __VELIB_H
#include <../ve/velib.h>
#endif
@ -270,4 +266,12 @@ public:
TDoc_cache() : TCache(1883) {}
};
///////////////////////////////////////////////////////////////////////////////////////
// Metodi liberi per determinare giorni lavorativi e feriali (nati per ci1300 ci1400)
///////////////////////////////////////////////////////////////////////////////////////
bool ci_is_ferial_day(const TDate& data);
long ci_calcola_giorni_lavorativi(const TDate& dataini, const TDate& datafine);
#endif