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

Nuovo spesometro

Browse Source 
git-svn-id: svn://10.65.10.50/branches/R_10_00@23053 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2015-03-31 06:06:33 +00:00
parent 28af4b3a34
commit 8425102391
5 changed files with 21 additions and 48 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

47
fe/fe0100.cpp
View File

@ -2,6 +2,7 @@
#include <automask.h>
#include <colors.h>
#include <defmask.h>
#include <golem.h>
#include <modaut.h>
#include <progind.h>
#include <recarray.h>
@ -231,9 +232,6 @@ TExclusion_mode TSpesometro_msk::validate_mov(const TRectype& mov)
if (anno < 2012)
return segnala_movimento(mov, em_data_limite);
if (mov.get_long(MOV_NUMREG) == 57503)
int cazzone = 1;
TExclusion_mode em = validate_clifo(mov);
if (em != em_normale)
return em;
@ -916,17 +914,25 @@ bool TSpesometro_msk::send_alleg()
_log = NULL;
}
const char* const jar = "spesometro.jar";
if (xvt_fsys_file_exists(jar))
xvt_sys_goto_url(jar, "run"); // open doesn't work right now
TFilename tmp = "spesometro/ModuliSirio.jar";
tmp.make_absolute_path();
DIRECTORY old_dir; xvt_fsys_get_dir(&old_dir);
DIRECTORY new_dir; xvt_fsys_convert_str_to_dir(tmp.path(), &new_dir);
xvt_fsys_set_dir(&new_dir);
const bool good = goto_url(tmp);
xvt_sys_sleep(3000);
xvt_fsys_set_dir(&old_dir);
if (!good)
error_box(FR("Impossibile eseguire Java -jar %s"), (const char*)tmp);
if (done && get_bool(F_DEFINITIVO) && yesno_box(TR("Si conferma l'invio definitivo della comunicazione?")))
{
TFast_isamfile mov(LF_MOV);
TProgind pi(tot_alleg, TR("Aggiornamento movimenti di prima nota"), false);
TProgress_monitor pi(tot_alleg, TR("Aggiornamento movimenti di prima nota"), false);
for (bool ok = alleg.move_first(); ok; ok = alleg.move_next())
{
if (!pi.addstatus(1))
if (!pi.add_status())
break;
const int ignora = rec.get_int(ALL_IGNORA);
if (ignora)
@ -1173,32 +1179,15 @@ bool TSpesometro_msk::save_if_dirty()
int TSpesometro_msk::get_date_range(TDate& dal, TDate& al) const
{
const TDate oggi(TODAY);
int anno = get_int(F_ANNO);
if (anno < 2012)
{
const TDate oggi(TODAY);
anno = oggi.year();
}
dal = TDate( 1, 1, anno);
al = TDate(31, 12, anno);
if (get(F_TIPO) == "BL")
{
const TString& m = get(F_PERIODO);
if (m[0] == 'T')
{
const int t = m[1]-'1';
dal = TDate( 1, 3*t+1, anno);
al = TDate(28, 3*t+3, anno);
}
else
{
const int mese = atoi(m);
if (mese > 0)
dal = al = TDate(1, mese, anno);
}
al.set_end_month();
}
return anno;
}
@ -1456,7 +1445,7 @@ bool TSpesometro_app::create()
TString html;
html << "<html><body>"
<< "<h5>Attenzione: Il modulo FE deve essere attivato in congiunzione a F3.</h5>\n"
<< "<p align=justify>Al fine di poter attivare l'utilizzo della Comunicazione Polivalente 2013 "
<< "<p align=justify>Al fine di poter attivare l'utilizzo della Comunicazione Polivalente 2014 "
<< "La preghiamo di contattare <b>Sirio informatica e sistemi</b> al seguente riferimento:</p><br/>"
<< "<ul>"
<< "<li>Casella vocale Hotline Campo: <br /><a href=mailto:hotlinecampo@sirio-is.it>hotlinecampo@sirio-is.it</a> Tel. 02-36583540</li>"

2
fe/fe0100.rep
View File

@ -2,7 +2,7 @@
<report name="fe0100" lpi="6">
<font face="Courier New" size="8" />
<section type="Head" pattern="1">
<field x="8" type="Testo" valign="center" align="center" width="112" height="3" pattern="1" text="Spesometro 2013">
<field x="8" type="Testo" valign="center" align="center" width="112" height="3" pattern="1" text="Comunicazione Polivalente">
<font face="Courier New" bold="1" size="24" />
</field>
<field border="3" y="3" type="Linea" width="120" height="0" pattern="1" />

2
fe/fe0100a.h
View File

@ -1,6 +1,6 @@
#define F_TIPO 301
#define F_ANNO 302
#define F_PERIODO 303
#define F_OUTFOLDER 305
#define F_DEFINITIVO 307
#define F_OUTFILE 308

16
fe/fe0100a.uml
View File

@ -86,26 +86,10 @@ LIST F_TIPO 2 10
BEGIN
PROMPT 21 1 "Tipo "
ITEM "FE|Spesometro"
MESSAGE HIDE,F_PERIODO
ITEM "BL|Black List"
MESSAGE SHOW,F_PERIODO
ITEM "XX|Ignorati"
MESSAGE HIDE,F_PERIODO
ITEM "IN|Inviati"
MESSAGE HIDE,F_PERIODO
ITEM "**|Tutti"
MESSAGE HIDE,F_PERIODO
END
LIST F_PERIODO 2 16
BEGIN
PROMPT 51 1 "Periodo "
ITEM "|Annuale"
ITEM "T1|I Trimestre"
ITEM "T2|II Trimestre"
ITEM "T3|III Trimestre"
ITEM "T4|IV Trimestre"
FLAGS "M"
END
LIST F_TIPOCF 1 10

2
fe/felib.cpp
View File

@ -667,7 +667,7 @@ bool TSpesometro_set::add_header(const TMask& msk)
}
add_header_data(14, msk.get(F_ANNO));
add_header_data(15, msk.get(F_TIPO)=="BL" ? msk.get(F_PERIODO) : EMPTY_STRING);
add_header_data(15, EMPTY_STRING);
add_header_data(16, TFixed_string("04879210963"));
if (ateco.blank())