//----------------------------------------------------------------- 
//Copyrigth Global Laboratory s.r.l. - Bari
// E' vietata qualsiasi riproduzione non autorizzata per iscritto
// dall'azienda
//-----------------------------------------------------------------
// calcola  addizionale regionale IRE/Irpef
function calcola_addreg(pIdRegione,pAnno,pReddito){
var ScaglioniAddReg = new Array (
 2012,1,1,0,999999999999.99,1.23,0
,2012,2,1,0,999999999999.99,1.23,0
,2012,3,1,0,999999999999.99,1.23,0
,2012,4,1,0,15000,1.23,0
,2012,4,2,15000,28000,1.58,0
,2012,4,3,28000,55000,1.73,0
,2012,4,4,55000,75000,1.73,0
,2012,4,5,75000,999999999999,1.73,0
,2012,5,1,0,15000,1.23,0
,2012,5,2,15000,22000,1.53,0
,2012,5,3,22000,999999999999.99,1.73,0
,2012,6,1,0,999999999999.99,1.23,0
,2012,7,1,0,20000,1.23,0
,2012,7,2,20000,20101.42,1.73,0
,2012,7,3,20101.42,999999999999,1.73,0
,2012,8,1,0,15000,1.43,0
,2012,8,2,15000,20000,1.53,0
,2012,8,3,20000,25000,1.63,0
,2012,8,4,25000,999999999999.99,1.73,0
,2012,9,1,0,15500,1.23,0
,2012,9,2,15500,31000,1.53,0
,2012,9,3,31000,70000,1.73,0
,2012,9,4,70000,999999999999,1.73,0
,2012,10,1,0,999999999999.99,1.23,0
,2012,11,1,0,15000,1.23,0
,2012,11,2,15000,999999999999.99,1.43,0
,2012,12,1,0,999999999999.99,1.73,0
,2012,13,1,0,999999999999.99,1.73,0
,2012,14,1,0,999999999999.99,2.03,0
,2012,15,1,0,999999999999.99,2.03,0
,2012,16,1,0,15000,1.53,0
,2012,16,2,15000,28000,1.53,0
,2012,16,3,28000,55000,1.73,0
,2012,16,4,55000,75000,1.73,0
,2012,16,5,75000,999999999999,1.73,0
,2012,17,1,0,999999999999.99,1.23,0
,2012,18,1,0,999999999999.99,2.03,0
,2012,19,1,0,999999999999.99,1.73,0
,2012,20,1,0,999999999999.99,1.23,0
,2012,21,3,0,999999999999.99,1.23,0
,2011,1,1,0,999999999999.99,1.23,0
,2011,2,1,0,999999999999.99,1.23,0
,2011,3,1,0,999999999999.99,1.23,0
,2011,4,1,0,10329.14,1.23,0
,2011,4,2,10329.14,15493.71,1.23,0
,2011,4,3,15493.71,30987.41,1.63,0
,2011,4,4,30987.41,999999999999,1.73,0
,2011,5,1,0,15000,1.23,0
,2011,5,2,15000,22000,1.53,0
,2011,5,3,22000,999999999999.99,1.73,0
,2011,6,1,0,999999999999.99,1.23,0
,2011,7,1,0,20000,1.23,0
,2011,7,2,20000,20101.42,1.73,.986
,2011,7,3,20101.42,999999999999,1.73,0
,2011,8,1,0,15000,1.43,0
,2011,8,2,15000,20000,1.53,0
,2011,8,3,20000,25000,1.63,0
,2011,8,4,25000,999999999999.99,1.73,0
,2011,9,1,0,15500,1.23,0
,2011,9,2,15500,31000,1.53,0
,2011,9,3,31000,70000,1.73,0
,2011,9,4,70000,999999999999,1.73,0
,2011,10,1,0,999999999999.99,1.23,0
,2011,11,1,0,15000,1.23,0
,2011,11,2,15000,999999999999.99,1.43,0
,2011,12,1,0,999999999999.99,1.73,0
,2011,13,1,0,999999999999.99,1.73,0
,2011,14,1,0,999999999999.99,2.03,0
,2011,15,1,0,999999999999.99,2.03,0
,2011,16,1,0,15000,1.53,0
,2011,16,2,15000,28000,1.53,0
,2011,16,3,28000,55000,1.73,0
,2011,16,4,55000,75000,1.73,0
,2011,16,5,75000,999999999999,1.73,0
,2011,17,1,0,999999999999.99,1.23,0
,2011,18,1,0,999999999999.99,2.03,0
,2011,19,1,0,999999999999.99,1.73,0
,2011,20,1,0,999999999999.99,1.23,0
,2011,21,3,0,999999999999.99,1.23,0
,2010,1,1,0,999999999999.99,.9,0
,2010,2,1,0,999999999999.99,.9,0
,2010,3,1,0,999999999999.99,.9,0
,2010,4,1,0,10329.14,.9,0
,2010,4,2,10329.14,15493.71,.9,0
,2010,4,3,15493.71,30987.41,1.3,0
,2010,4,4,30987.41,999999999999,1.4,0
,2010,5,1,0,15000,.9,0
,2010,5,2,15000,22000,1.2,0
,2010,5,3,22000,999999999999.99,1.4,0
,2010,6,1,0,999999999999.99,.9,0
,2010,7,1,0,30000,.9,0
,2010,7,2,30000,30152.13,1.4,.986
,2010,7,3,30152.13,999999999999,1.4,0
,2010,8,1,0,15000,1.1,0
,2010,8,2,15000,20000,1.2,0
,2010,8,3,20000,25000,1.3,0
,2010,8,4,25000,999999999999.99,1.4,0
,2010,9,1,0,15500,.9,0
,2010,9,2,15500,31000,1.2,0
,2010,9,3,31000,70000,1.4,0
,2010,9,4,70000,999999999999,1.4,0
,2010,10,1,0,999999999999.99,.9,0
,2010,11,1,0,15000,.9,0
,2010,11,2,15000,999999999999.99,1.1,0
,2010,12,1,0,999999999999.99,1.7,0
,2010,13,1,0,999999999999.99,1.4,0
,2010,14,1,0,999999999999.99,1.7,0
,2010,15,1,0,999999999999.99,1.7,0
,2010,16,1,0,999999999999.99,.9,0
,2010,17,1,0,999999999999.99,.9,0
,2010,18,1,0,999999999999.99,1.7,0
,2010,19,1,0,999999999999.99,1.4,0
,2010,20,1,0,999999999999.99,.9,0
,2010,21,3,0,999999999999.99,.9,0
,2009,1,1,0,999999999999.99,.9,0
,2009,2,1,0,999999999999.99,.9,0
,2009,3,1,0,29500,.9,0
,2009,3,2,29500,29650,1.4,.9866
,2009,3,3,29650,999999999999.99,1.4,0
,2009,4,1,0,10329.14,.9,0
,2009,4,2,10329.14,15493.71,.9,0
,2009,4,3,15493.71,30987.41,1.3,0
,2009,4,4,30987.41,999999999999,1.4,0
,2009,5,1,0,15000,.9,0
,2009,5,2,15000,22000,1.2,0
,2009,5,3,22000,999999999999.99,1.4,0
,2009,6,1,0,999999999999.99,.9,0
,2009,7,1,0,30000,.9,0
,2009,7,2,30000,30152.13,1.4,.986
,2009,7,3,30152.13,999999999999,1.4,0
,2009,8,1,0,15000,1.1,0
,2009,8,2,15000,20000,1.2,0
,2009,8,3,20000,25000,1.3,0
,2009,8,4,25000,999999999999.99,1.4,0
,2009,9,1,0,15500,.9,0
,2009,9,2,15500,31000,1.2,0
,2009,9,3,31000,70000,1.4,0
,2009,9,4,70000,999999999999,1.4,0
,2009,10,1,0,999999999999.99,.9,0
,2009,11,1,0,15000,.9,0
,2009,11,2,15000,999999999999.99,1.1,0
,2009,12,1,0,999999999999.99,1.4,0
,2009,13,1,0,999999999999.99,1.4,0
,2009,14,1,0,999999999999.99,1.4,0
,2009,15,1,0,999999999999.99,1.4,0
,2009,16,1,0,28000,.9,0
,2009,16,2,28000,999999999999.99,1.4,0
,2009,17,1,0,999999999999.99,.9,0
,2009,18,1,0,999999999999.99,1.4,0
,2009,19,1,0,999999999999.99,1.4,0
,2009,20,1,0,999999999999.99,.9,0
,2009,21,3,0,999999999999.99,.9,0
,2008,1,1,0,999999999999.99,.9,0
,2008,2,1,0,999999999999.99,.9,0
,2008,3,1,0,29500,.9,0
,2008,3,2,29500,29650,1.4,.9866
,2008,3,3,29650,999999999999.99,1.4,0
,2008,4,1,0,10329.14,.9,0
,2008,4,2,10329.14,15493.71,.9,0
,2008,4,3,15493.71,30987.41,1.3,0
,2008,4,4,30987.41,999999999999,1.4,0
,2008,5,1,0,15000,.9,0
,2008,5,2,15000,22000,1.2,0
,2008,5,3,22000,999999999999.99,1.4,0
,2008,6,1,0,999999999999.99,.9,0
,2008,7,1,0,25000,.9,0
,2008,7,2,25000,25126.77,1.4,.986
,2008,7,3,25126.77,999999999999,1.4,0
,2008,8,1,0,15000,1.1,0
,2008,8,2,15000,20000,1.2,0
,2008,8,3,20000,25000,1.3,0
,2008,8,4,25000,999999999999.99,1.4,0
,2008,9,1,0,15500,.9,0
,2008,9,2,15500,31000,1.2,0
,2008,9,3,31000,70000,1.4,0
,2008,9,4,70000,999999999999,1.4,0
,2008,10,1,0,999999999999.99,.9,0
,2008,11,1,0,15000,.9,0
,2008,11,2,15000,999999999999.99,1.1,0
,2008,12,1,0,999999999999.99,1.4,0
,2008,13,1,0,999999999999.99,1.4,0
,2008,14,1,0,999999999999.99,1.4,0
,2008,15,1,0,999999999999.99,1.4,0
,2008,16,1,0,28000,.9,0
,2008,16,2,28000,999999999999.99,1.4,0
,2008,17,1,0,999999999999.99,.9,0
,2008,18,1,0,999999999999.99,1.4,0
,2008,19,1,0,999999999999.99,1.4,0
,2008,20,1,0,999999999999.99,.9,0
,2008,21,3,0,999999999999.99,.9,0
,2007,1,1,0,999999999999.99,.9,0
,2007,2,1,0,999999999999.99,.9,0
,2007,3,1,0,28000,.9,0
,2007,3,2,28000,28142,1.4,.9859
,2007,3,3,28142,999999999999.99,1.4,0
,2007,4,1,0,10329.14,1.2,0
,2007,4,2,10329.14,15493.71,1.2,0
,2007,4,3,15493.71,30987.41,1.3,0
,2007,4,4,30987.41,999999999999,1.4,0
,2007,5,1,0,11071.35,.9,0
,2007,5,2,11071.35,999999999999.99,1.4,0
,2007,6,1,0,999999999999.99,.9,0
,2007,7,1,0,20000,.9,0
,2007,7,2,20000,20101.42,1.4,.986
,2007,7,3,20101.42,999999999999,1.4,0
,2007,8,1,0,15000,1.1,0
,2007,8,2,15000,20000,1.2,0
,2007,8,3,20000,25000,1.3,0
,2007,8,4,25000,999999999999.99,1.4,0
,2007,9,1,0,15500,.9,0
,2007,9,2,15500,31000,1.2,0
,2007,9,3,31000,70000,1.4,0
,2007,9,4,70000,999999999999,1.4,0
,2007,10,1,0,999999999999.99,.9,0
,2007,11,1,0,15000,.9,0
,2007,11,2,15000,999999999999.99,1.1,0
,2007,12,1,0,999999999999.99,1.4,0
,2007,13,1,0,999999999999.99,1.4,0
,2007,14,1,0,999999999999.99,1.4,0
,2007,15,1,0,999999999999.99,1.4,0
,2007,16,1,0,999999999999.99,.9,0
,2007,17,1,0,999999999999.99,.9,0
,2007,18,1,0,999999999999.99,1.4,0
,2007,19,1,0,999999999999.99,1.4,0
,2007,20,1,0,999999999999.99,.9,0
,2007,21,3,0,999999999999.99,.9,0
,2006,1,1,0,999999999999.99,.9,0
,2006,2,1,0,999999999999.99,.9,0
,2006,3,1,0,29000,.9,0
,2006,3,2,29000,29147,1.4,.9864
,2006,3,3,29147,999999999999.99,1.4,0
,2006,4,1,0,10329.14,1.2,0
,2006,4,2,10329.14,15493.71,1.2,0
,2006,4,3,15493.71,30987.41,1.3,0
,2006,4,4,30987.41,999999999999,1.4,0
,2006,5,1,0,10672.82,.9,0
,2006,5,2,10672.82,999999999999.99,1.4,0
,2006,6,1,0,999999999999.99,.9,0
,2006,7,1,0,13000,.9,0
,2006,7,2,13000,20000,1.25,0
,2006,7,3,20000,999999999999,1.4,0
,2006,8,1,0,999999999999.99,.9,0
,2006,9,1,0,15500,.9,0
,2006,9,2,15500,31000,1.2,0
,2006,9,3,31000,70000,1.4,0
,2006,9,4,70000,999999999999,1.4,0
,2006,10,1,0,999999999999.99,.9,0
,2006,11,1,0,26000,.9,0
,2006,11,2,26000,999999999999.99,1.1,0
,2006,12,1,0,999999999999.99,1.4,0
,2006,13,1,0,999999999999.99,1.4,0
,2006,14,1,0,999999999999.99,1.4,0
,2006,15,1,0,999999999999.99,1.4,0
,2006,16,1,0,999999999999.99,.9,0
,2006,17,1,0,999999999999.99,.9,0
,2006,18,1,0,999999999999.99,1.4,0
,2006,19,1,0,999999999999.99,1.4,0
,2006,20,1,0,999999999999.99,.9,0
,2006,21,1,0,999999999999.99,.9,0
,2005,1,1,0,999999999999.99,.9,0
,2005,2,1,0,999999999999.99,.9,0
,2005,3,1,0,29000,.9,0
,2005,3,2,29000,29147,1.4,.986
,2005,3,3,29147,999999999999.99,1.4,0
,2005,4,1,0,10329.14,1.2,0
,2005,4,2,10329.14,15493.71,1.2,0
,2005,4,3,15493.71,30987.41,1.3,0
,2005,4,4,30987.41,999999999999,1.4,0
,2005,5,1,0,10672.82,.9,0
,2005,5,2,10672.82,999999999999.99,1.4,0
,2005,6,1,0,999999999999.99,.9,0
,2005,7,1,0,999999999999.99,.9,0
,2005,8,1,0,999999999999.99,.9,0
,2005,9,1,0,15500,.9,0
,2005,9,2,15500,31000,1.2,0
,2005,9,3,31000,70000,1.4,0
,2005,9,4,70000,999999999999,1.4,0
,2005,10,1,0,999999999999.99,.9,0
,2005,11,1,0,26000,.9,0
,2005,11,2,26000,999999999999.99,1.1,0
,2005,12,1,0,999999999999.99,.9,0
,2005,13,1,0,999999999999.99,.9,0
,2005,14,1,0,999999999999.99,1.2,0
,2005,15,1,0,999999999999.99,.9,0
,2005,16,1,0,999999999999.99,.9,0
,2005,17,1,0,999999999999.99,.9,0
,2005,18,1,0,999999999999.99,1.4,0
,2005,19,1,0,999999999999.99,.9,0
,2005,20,1,0,999999999999.99,.9,0
,2004,1,1,0,999999999999.99,.9,0
,2004,2,1,0,999999999999.99,.9,0
,2004,3,1,0,10400,1.2,0
,2004,3,2,10400,15000,1.2,0
,2004,3,3,15000,29000,1.3,0
,2004,3,4,29000,999999999999.99,1.4,0
,2004,4,1,0,10329.14,1.2,0
,2004,4,2,10329.14,15493.71,1.2,0
,2004,4,3,15493.71,30987.41,1.3,0
,2004,4,4,30987.41,999999999999,1.4,0
,2004,5,1,0,10504.74,.9,0
,2004,5,2,10504.74,999999999999.99,1.4,0
,2004,6,1,0,999999999999.99,.9,0
,2004,7,1,0,999999999999.99,.9,0
,2004,8,1,0,999999999999.99,.9,0
,2004,9,1,0,15493.71,.9,0
,2004,9,2,15493.71,30987.41,1.4,0
,2004,9,3,30987.41,69721.68,3.6,0
,2004,9,4,69721.68,999999999999,4,0
,2004,10,1,0,999999999999.99,.9,0
,2004,11,1,0,15000,.9,0
,2004,11,2,15000,999999999999.99,1.1,0
,2004,12,1,0,999999999999.99,.9,0
,2004,13,1,0,999999999999.99,.9,0
,2004,14,1,0,999999999999.99,.9,0
,2004,15,1,0,999999999999.99,.9,0
,2004,16,1,0,999999999999.99,1.1,0
,2004,17,1,0,999999999999.99,.9,0
,2004,18,1,0,999999999999.99,1.4,0
,2004,19,1,0,999999999999.99,.9,0
,2004,20,1,0,999999999999.99,.9,0
,2003,1,1,0,999999999999.99,.9,0
,2003,2,1,0,999999999999.99,.9,0
,2003,3,1,0,10400,1.2,0
,2003,3,2,10400,15000,1.2,0
,2003,3,3,15000,29000,1.3,0
,2003,3,4,29000,999999999999.99,1.4,0
,2003,4,1,0,10329.14,1.2,0
,2003,4,2,10329.14,15493.71,1.2,0
,2003,4,3,15493.71,30987.41,1.3,0
,2003,4,4,30987.41,999999999999,1.4,0
,2003,5,1,0,10329.14,.9,0
,2003,5,2,10329.14,999999999999.99,1.4,0
,2003,6,1,0,999999999999.99,.9,0
,2003,7,1,0,999999999999.99,.9,0
,2003,8,1,0,999999999999.99,.9,0
,2003,9,1,0,15493.71,.9,0
,2003,9,2,15493.71,30987.41,1.91,0
,2003,9,3,30987.41,69721.68,3.6,0
,2003,9,4,69721.68,999999999999,4,0
,2003,10,1,0,999999999999.99,.9,0
,2003,11,1,0,15000,.9,0
,2003,11,2,15000,999999999999.99,1.1,0
,2003,12,1,0,999999999999.99,.9,0
,2003,13,1,0,999999999999.99,.9,0
,2003,14,1,0,999999999999.99,.9,0
,2003,15,1,0,999999999999.99,.9,0
,2003,16,1,0,999999999999.99,1.2,0
,2003,17,1,0,999999999999.99,.9,0
,2003,18,1,0,999999999999.99,1.4,0
,2003,19,1,0,999999999999.99,.9,0
,2003,20,1,0,999999999999.99,.9,0
,2002,1,1,0,999999999999.99,.9,0
,2002,2,1,0,999999999999.99,.9,0
,2002,3,1,0,10329.14,1.2,0
,2002,3,2,10329.14,15493.71,1.3,0
,2002,3,3,15493.71,69761.68,1.4,0
,2002,3,4,69761.68,999999999999.99,1.9,0
,2002,4,1,0,10329.14,.9,0
,2002,4,2,10329.14,15493.71,1.2,0
,2002,4,3,15493.71,30987.41,1.3,0
,2002,4,4,30987.41,999999999999,1.4,0
,2002,5,1,0,10329.14,.9,0
,2002,5,2,10329.14,999999999999.99,1.4,0
,2002,6,1,0,999999999999.99,.9,0
,2002,7,1,0,999999999999.99,.9,0
,2002,8,1,0,999999999999.99,.9,0
,2002,9,1,0,15493.71,.9,0
,2002,9,2,15493.71,30987.41,1.9,0
,2002,9,3,30987.41,69721.68,3.6,0
,2002,9,4,69721.68,999999999999,4,0
,2002,10,1,0,999999999999.99,.9,0
,2002,11,1,0,10329.14,.9,0
,2002,11,2,10329.14,999999999999.99,1.1,0
,2002,12,1,0,999999999999.99,.9,0
,2002,13,1,0,999999999999.99,.9,0
,2002,14,1,0,999999999999.99,.9,0
,2002,15,1,0,999999999999.99,.9,0
,2002,16,1,0,999999999999.99,1.4,0
,2002,17,1,0,999999999999.99,.9,0
,2002,18,1,0,999999999999.99,.9,0
,2002,19,1,0,999999999999.99,.9,0
,2002,20,1,0,999999999999.99,.9,0
,2001,1,1,0,999999999999.99,.9,0
,2001,2,1,0,999999999999.99,.9,0
,2001,3,1,0,999999999999.99,.9,0
,2001,4,1,0,999999999999.99,.9,0
,2001,5,1,0,999999999999.99,.9,0
,2001,6,1,0,999999999999.99,.9,0
,2001,7,1,0,999999999999.99,.9,0
,2001,8,1,0,999999999999.99,.9,0
,2001,9,1,0,999999999999.99,.9,0
,2001,10,1,0,999999999999.99,.9,0
,2001,11,1,0,999999999999.99,.9,0
,2001,12,1,0,999999999999.99,.9,0
,2001,13,1,0,999999999999.99,.9,0
,2001,14,1,0,999999999999.99,.9,0
,2001,15,1,0,999999999999.99,.9,0
,2001,16,1,0,999999999999.99,.9,0
,2001,17,1,0,999999999999.99,.9,0
,2001,18,1,0,999999999999.99,.9,0
,2001,19,1,0,999999999999.99,.9,0
,2001,20,1,0,999999999999.99,.9,0
,2000,1,1,0,999999999999.99,.9,0
,2000,2,1,0,999999999999.99,.9,0
,2000,3,1,0,999999999999.99,.9,0
,2000,4,1,0,999999999999.99,.9,0
,2000,5,1,0,999999999999.99,.9,0
,2000,6,1,0,999999999999.99,.9,0
,2000,7,1,0,999999999999.99,.9,0
,2000,8,1,0,999999999999.99,.9,0
,2000,9,1,0,999999999999.99,.9,0
,2000,10,1,0,999999999999.99,.9,0
,2000,11,1,0,999999999999.99,.9,0
,2000,12,1,0,999999999999.99,.9,0
,2000,13,1,0,999999999999.99,.9,0
,2000,14,1,0,999999999999.99,.9,0
,2000,15,1,0,999999999999.99,.9,0
,2000,16,1,0,999999999999.99,.9,0
,2000,17,1,0,999999999999.99,.9,0
,2000,18,1,0,999999999999.99,.9,0
,2000,19,1,0,999999999999.99,.9,0
,2000,20,1,0,999999999999.99,.9,0
,1999,1,1,0,999999999999.99,.5,0
,1999,2,1,0,999999999999.99,.5,0
,1999,3,1,0,999999999999.99,.5,0
,1999,4,1,0,999999999999.99,.5,0
,1999,5,1,0,999999999999.99,.5,0
,1999,6,1,0,999999999999.99,.5,0
,1999,7,1,0,999999999999.99,.5,0
,1999,8,1,0,999999999999.99,.5,0
,1999,9,1,0,999999999999.99,.5,0
,1999,10,1,0,999999999999.99,.5,0
,1999,11,1,0,999999999999.99,.5,0
,1999,12,1,0,999999999999.99,.5,0
,1999,13,1,0,999999999999.99,.5,0
,1999,14,1,0,999999999999.99,.5,0
,1999,15,1,0,999999999999.99,.5,0
,1999,16,1,0,999999999999.99,.5,0
,1999,17,1,0,999999999999.99,.5,0
,1999,18,1,0,999999999999.99,.5,0
,1999,19,1,0,999999999999.99,.5,0
,1999,20,1,0,999999999999.99,.5,0
,1998,1,1,0,999999999999.99,.5,0
,1998,2,1,0,999999999999.99,.5,0
,1998,3,1,0,999999999999.99,.5,0
,1998,4,1,0,999999999999.99,.5,0
,1998,5,1,0,999999999999.99,.5,0
,1998,6,1,0,999999999999.99,.5,0
,1998,7,1,0,999999999999.99,.5,0
,1998,8,1,0,999999999999.99,.5,0
,1998,9,1,0,999999999999.99,.5,0
,1998,10,1,0,999999999999.99,.5,0
,1998,11,1,0,999999999999.99,.5,0
,1998,12,1,0,999999999999.99,.5,0
,1998,13,1,0,999999999999.99,.5,0
,1998,14,1,0,999999999999.99,.5,0
,1998,15,1,0,999999999999.99,.5,0
,1998,16,1,0,999999999999.99,.5,0
,1998,17,1,0,999999999999.99,.5,0
,1998,18,1,0,999999999999.99,.5,0
,1998,19,1,0,999999999999.99,.5,0
,1998,20,1,0,999999999999.99,.5,0
);
xr0 = pAnno*1;
xr1 = pReddito *1;
xr2 = 0;
xr3 = pIdRegione*1;

if (xr1<=0){
   xr2=0;
}else{
for (var i=0; i<ScaglioniAddReg.length; i+=7) {

// converte in numerico
 rx0 = ScaglioniAddReg[i+0]*1; // Anno
 rx1 = ScaglioniAddReg[i+1]*1; // Regione
 rx2 = ScaglioniAddReg[i+2]*1; // scaglione
 rx3 = ScaglioniAddReg[i+3]*1; // oltre
 rx4 = ScaglioniAddReg[i+4]*1; // sino a
 rx5 = ScaglioniAddReg[i+5]*1; // aliquota
 rx6 = ScaglioniAddReg[i+6]*1; // correttivo

 if ((rx0==xr0) & (rx1==xr3)){
	 // fine scaglioni
	 if ((rx4==0)|(xr1<=rx4)) {
	     xr2 = xr2 + ((xr1 - rx3)*rx5/100);
		 // se Umbria(11) se(?) 5 (Piemonte) se (Veneto(3) per gli anni dal 2005
		 // se Liguria dal 2006
		 // se Emilia Romagna dal 2007
		 // se Puglia dal 2008		
		 // calcola l'imposta nello scaglione in cui cade il reddito
		 if ((rx1==11)|(rx1==5)|((rx1==3)&(rx0>=2005))|((rx1==7)&(rx0>=2006))|((rx1==8)&(rx0>=2007))|((rx1==16)&(rx0>=2008)&(rx0<=2010))){
		 	xr2 = (xr1*rx5/100);
		 }
		 // se esiste un correttivo di imposta Regione Veneto
		 if ((rx6>0)&(rx1==3)){
		 if ((rx1==3)&(rx0==2005)){
		     xr2 = xr2 - ((rx4 -xr1)*rx6);
		 }else if ((rx1==3)&(rx0==2006)){
		   // 2006=ARROTONDA((1-(28739/reddito))*100;4)
            rx5 = (1-(28739/xr1))*100;
			xr2 = (xr1*rx5/100);
		 }else if ((rx1==3)&(rx0==2007)){
		   // 2007=ARROTONDA((1-(27748/A1))*100;4)
            rx5 = (1-(27748/xr1))*100;
			xr2 = (xr1*rx5/100);
		 }else if ((rx1==3)&(rx0>=2008)){
		   // 2008=ARROTONDA((1-(29235/A1))*100;4)
            rx5 = (1-(29235/xr1))*100;
            alert(rx5);
			xr2 = (xr1*rx5/100);

		 }
                 }
		 if ((rx6>0)&(rx1==7)){
		     xr2 = xr2 - ((rx4 -xr1)*rx6);	
                 }
		
		 break;
     }else{		  		 
	     xr2 = xr2 + ((rx4 - rx3)*rx5/100);
	 }	 	 
  }	 
 } // fine for 		
}// if per reddito negativo  o pari a zero 
return xr2;
}// fine funzione
