% on error resume next function decimali(numero) Dim tmNmb tmNmb=numero * 100 tmbNmb=Int(tmNmb) tmnNmb=tmbNmb / 100 tmnNmb=Round(tmnNmb,1) if Instr(1,tmnNmb,",")=0 then tmnNmb=tmnNmb & ",0" decimali=tmnNmb end function function timeStamp(txtDateRiferimento) Dim dateRif if IsDate(txtDateRiferimento) then select case Month(txtDateRiferimento) case "1" dateRif="Gennaio " case "2" dateRif="Febbraio " case "3" dateRif="Marzo " case "4" dateRif="Aprile " case "5" dateRif="Maggio " case "6" dateRif="Giugno " case "7" dateRif="Luglio " case "8" dateRif="Agosto " case "9" dateRif="Settembre " case "10" dateRif="Ottobre " case "11" dateRif="Novembre " case "12" dateRif="Dicembre " end select dateRif= dateRif & Year(txtDateRiferimento) timeStamp=dateRif else timeStamp=txtDateRiferimento end if end function Dim dbConn Dim rsSO,sqlSO set dbConn=server.CreateObject("ADODB.connection") dbConn.Open DB_ASL9_READ,"","" set rsSO=Server.CreateObject("ADODB.recordset") if Trim(Request.QueryString("strPR"))="" then sqlSO="SELECT * FROM T_OT_StruttureOperative WHERE SO_Active=1" else sqlSO="SELECT * FROM T_OT_StruttureOperative WHERE SO_Riferimento='" & Request.QueryString("strPR") & "' AND SO_Active=0" end if rsSO.Open sqlSO,dbConn,3,3 %>
L'articolo 16, comma 3, del Decreto Legislativo numero 33 del 2013 stabilisce che le pubbliche amministrazioni debbano rendere note, attraverso i propri siti internet, le informazioni relative ai tassi di assenza e di presenza del personale, distinti per uffici di livello dirigenziale.
Sono rilevate le assenze a qualunque titolo:
Nuova ricerca: ">cambia mese - cambia anno
| Struttura operativa / Settore | N° dipendenti | Giorni lavorativi totali | Giorni di presenza totali | Presenza | Giorni di assenza totali | Assenza | Media pro capite di assenza (giorni) |
|---|---|---|---|---|---|---|---|
| <%=rsSO("SO_Nome")%> | <%=rsSO("SO_NDipendenti")%> | <%=rsSO("SO_GLavoroTotali")%> | <%=rsSO("SO_GLavoroPresenza")%> | <%'=decimali(rsSO("SO_PercPresenza"))%>% | <%=rsSO("SO_GAssenza")%> | <%'=decimali(rsSO("SO_PercAssenza"))%>% | <%'=decimali(rsSO("SO_MediaAssenza"))%> |