<%@ LANGUAGE = "VBScript" %> <%Response.Buffer = False%> <% on error resume next %> <% Session.Timeout = 120 Server.ScriptTimeout = 5000 busca=request.QueryString("busca") doc=request.QueryString("doc") origen=request.QueryString("origen") Date_ini=Request.Form("Date_ini") Date_end=Request.Form("Date_end") lvende=Request.Form("cvende") criterio22=Request.Form("criterio22") if criterio22="" then xcriterio22=" Todos " end if xday = Right("00" & Day(Date), 2) xmonth = Right("00" & Month(Date), 2) xyear = Right("00" & Year(Date), 4) xdate=xyear&xmonth&xday Dim Rsfore0 Dim Sqlfore0 set Rsfore0=dbsql3.execute("SELECT * FROM forecast WHERE id=49") '************** Transfer xday2 = Right("00" & Rsfore0("month"), 2) xmonth2 = Right("00" & Rsfore0("forecast"), 2) xyear2 = Right("00" & Rsfore0("year"), 4) xdate2=xyear2&xmonth2&xday2 '''''''''''''''''''''''''''''''''''''' If xdate>xdate2 Then response.write (ErrorNo1) mensaje1=ErrorNo1 else if Date_ini="" or Date_ini=null then Date_ini=date() Date_end=date() lhora=right("00"&hour(time),2) lmin=right("00"&minute(time),2) ltime=lhora&lmin if ltime<"0659" then Date_ini=date()-1 Date_end=date()-1 end if end if layer=weekday(date()-1) hractual=hour(Now) minactual=minute(now) '''''''''''''''''''''''''''''''''''''' %> Report Corrugator I datepicker demo
       
Period:  
         
<% header %>

<% if minactual>49 and minactual<55 then '''''''''''calcula strday = Right("00" & Day(Date_ini), 2) strmonth = Right("00" & Month(Date_ini), 2) stryear = Right("00" & Year(Date_ini), 4) strday2 = Right("00" & Day(Date_end), 2) strmonth2 = Right("00" & Month(Date_end), 2) stryear2 = Right("00" & Year(Date_end), 4) fechainicial = CStr(stryear + strmonth + strday) fechafinal = CStr(stryear2 + strmonth2 + strday2) 'response.write(fechainicial)&" FI " ' response.write(fechafinal)&" Ff " ReDim Corr1(24,12) %>

Production Corrugator Machine
Date: <%=Date_ini%> To: <%=Date_end%> Generated: <%=time%>
<% '************** Inventory 'lturno=0 Dim Rsinven1, Rsinven2, rswip, Rsmachine Dim Sqlinven1, sqlinven2, sqlwip ''''''''''''''''''''''''''''''''''''''' set Rscorr=dbsqlcorr.execute("select GOL,JIJG,JANG,WPOK,QTY,PQTY,SUJUNO,JOBYMD,CUST,BOX_NM,eqty,jtime,dtime,JOBJO,STIME,Etime from SHPSOUT(nolock) where jobymd between '" & fechainicial & "' and '" & fechafinal & "' order by JOBYMD,JOBJO") lturno1="1" lturno2="1" ldaytrans2=mid(fechainicial,5,2)&"/"&mid(fechainicial,7,2)&"/"&mid(fechainicial,3,2) mensaje2=mensaje2&"HOURLY CORRUGATOR PERFORMANCE " mensaje2=mensaje2&"" mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " mensaje2=mensaje2&" " If Rscorr.EOF And Rscorr.BOF Then response.Write("No records exist for corr. this date.") Else ' mensaje2=" TRANSFER (Samsung OB)

" TOTML=0 TOTM2=0 Rscorr.movefirst Do While Not Rscorr.EOF lstime=Rscorr("STIME") if left(Rscorr("JOBJO"),1)="A" then if Rscorr("jtime")>25000 then lstime="06:50:00" ehora1=int(mid(Rscorr("ETIME"),1,2))*3600 ehora2=int(mid(Rscorr("ETIME"),4,2))*60 ehora3=int(mid(Rscorr("ETIME"),7,2)) hend=ehora1+ehora2+ehora3 Tiempo2=hend-24600 else Tiempo2 = Rscorr("jtime") end if 'response.write(" 1 ") else lstime=Rscorr("STIME") Tiempo2 = Rscorr("jtime") 'response.write(" 2 ") end if 'lturno1=Rscorr("JOBJO") '"15:10:57" ''''''''''''''''''''' por hora hrfin=mid(Rscorr("ETIME"),1,2)&mid(Rscorr("ETIME"),4,2)&mid(Rscorr("ETIME"),7,2) if hrfin>"064959" and hrfin<"075000" then Corr1(1,3)=Corr1(1,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(1,4)=Corr1(1,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(1,7)=Corr1(1,7)+int(Rscorr("PQTY")) end if if hrfin>"074959" and hrfin<"085000" then Corr1(2,3)=Corr1(2,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(2,4)=Corr1(2,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(2,7)=Corr1(2,7)+int(Rscorr("PQTY")) end if if hrfin>"084959" and hrfin<"095000" then Corr1(3,3)=Corr1(3,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(3,4)=Corr1(3,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(3,7)=Corr1(3,7)+int(Rscorr("PQTY")) end if if hrfin>"094959" and hrfin<"105000" then Corr1(4,3)=Corr1(4,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(4,4)=Corr1(4,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(4,7)=Corr1(4,7)+int(Rscorr("PQTY")) end if if hrfin>"104959" and hrfin<"115000" then Corr1(5,3)=Corr1(5,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(5,4)=Corr1(5,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(5,7)=Corr1(5,7)+int(Rscorr("PQTY")) end if if hrfin>"114959" and hrfin<"125000" then Corr1(6,3)=Corr1(6,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(6,4)=Corr1(6,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(6,7)=Corr1(6,7)+int(Rscorr("PQTY")) end if if hrfin>"124959" and hrfin<"135000" then Corr1(7,3)=Corr1(7,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(7,4)=Corr1(7,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(7,7)=Corr1(7,7)+int(Rscorr("PQTY")) end if if hrfin>"134959" and hrfin<"145000" then Corr1(8,3)=Corr1(8,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(8,4)=Corr1(8,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(8,7)=Corr1(8,7)+int(Rscorr("PQTY")) end if if hrfin>"144959" and hrfin<"155000" then Corr1(9,3)=Corr1(9,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(9,4)=Corr1(9,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(9,7)=Corr1(9,7)+int(Rscorr("PQTY")) end if if hrfin>"154959" and hrfin<"165000" then Corr1(10,3)=Corr1(10,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(10,4)=Corr1(10,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(10,7)=Corr1(10,7)+int(Rscorr("PQTY")) end if if hrfin>"164959" and hrfin<"175000" then Corr1(11,3)=Corr1(11,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(11,4)=Corr1(11,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(11,7)=Corr1(11,7)+int(Rscorr("PQTY")) end if if hrfin>"174959" and hrfin<"185000" then Corr1(12,3)=Corr1(12,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(12,4)=Corr1(12,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(12,7)=Corr1(12,7)+int(Rscorr("PQTY")) end if if hrfin>"184959" and hrfin<"195000" then Corr1(13,3)=Corr1(13,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(13,4)=Corr1(13,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(13,7)=Corr1(13,7)+int(Rscorr("PQTY")) end if if hrfin>"194959" and hrfin<"205000" then Corr1(14,3)=Corr1(14,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(14,4)=Corr1(14,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(14,7)=Corr1(14,7)+int(Rscorr("PQTY")) end if if hrfin>"204959" and hrfin<"215000" then Corr1(15,3)=Corr1(15,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(15,4)=Corr1(15,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(15,7)=Corr1(15,7)+int(Rscorr("PQTY")) end if if hrfin>"214959" and hrfin<"225000" then Corr1(16,3)=Corr1(16,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(16,4)=Corr1(16,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(16,7)=Corr1(16,7)+int(Rscorr("PQTY")) end if if hrfin>"224959" and hrfin<"235000" then Corr1(17,3)=Corr1(17,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(17,4)=Corr1(17,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(17,7)=Corr1(17,7)+int(Rscorr("PQTY")) end if if hrfin>"234959" and hrfin<"005000" then Corr1(18,3)=Corr1(18,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(18,4)=Corr1(18,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(18,7)=Corr1(18,7)+int(Rscorr("PQTY")) end if if hrfin>"004959" and hrfin<"015000" then Corr1(19,3)=Corr1(19,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(19,4)=Corr1(19,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(19,7)=Corr1(19,7)+int(Rscorr("PQTY")) end if if hrfin>"014959" and hrfin<"025000" then Corr1(20,3)=Corr1(20,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(20,4)=Corr1(20,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(20,7)=Corr1(20,7)+int(Rscorr("PQTY")) end if if hrfin>"024959" and hrfin<"035000" then Corr1(21,3)=Corr1(21,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(21,4)=Corr1(21,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(21,7)=Corr1(21,7)+int(Rscorr("PQTY")) end if if hrfin>"034959" and hrfin<"045000" then Corr1(22,3)=Corr1(22,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(22,4)=Corr1(22,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(22,7)=Corr1(22,7)+int(Rscorr("PQTY")) end if if hrfin>"044959" and hrfin<"055000" then Corr1(23,3)=Corr1(23,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(23,4)=Corr1(23,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(23,7)=Corr1(23,7)+int(Rscorr("PQTY")) end if if hrfin>"054959" and hrfin<"065000" then Corr1(24,3)=Corr1(24,3)+int((Rscorr("JANG")*Rscorr("PQTY")/1000)) Corr1(24,4)=Corr1(24,4)+int((Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000)) Corr1(24,7)=Corr1(24,7)+int(Rscorr("PQTY")) end if 'TOTTARGET2=TOTTARGET2+cdbl(Rscorr("QTY")) 'TOTPROD2=TOTPROD2+cdbl(Rscorr("PQTY")) TOTML2=TOTML2+(Rscorr("JANG")*Rscorr("PQTY")/1000) TOTM22=TOTM22+(Rscorr("JANG")*Rscorr("WPOK")*Rscorr("PQTY")/1000000) 'TOTbad2=TOTbad2+cdbl(Rscorr("eQTY")) 'TOTjtime2=TOTjtime2+cdbl(Tiempo2) 'TOTdtime2=TOTdtime2+cdbl(Rscorr("dtime")) RsCORR.MoveNext LOOP END IF rscorr.close ''''''''''''''''''''''' Corr 2 Date_ini=Request.Form("Date_ini") Date_end=Request.Form("Date_end") if Date_ini="" or Date_ini=null then Date_ini=date() Date_end=date() end if Date_end2=cdate(Date_end)+1 strday = Right("00" & Day(Date_ini), 2) strmonth = Right("00" & Month(Date_ini), 2) stryear = Right("0000" & Year(Date_ini), 4) strday2 = Right("00" & Day(Date_end2), 2) strmonth2 = Right("00" & Month(Date_end2), 2) stryear2 = Right("0000" & Year(Date_end2), 4) fechainicial = CStr(stryear & strmonth & strday) fechafinal2 = CStr(stryear2 & strmonth2 & strday2) response.write(fechainicial&" ") response.write("FF "&fechafinal2) set strConexao = CreateObject("ADODB.Connection") ' setear la conexion strConexao.Open("DRIVER=Firebird/InterBase(r) driver;UID=SYSDBA;PWD=molra; DBNAME=192.168.0.201:C:\PAUL\data\CARDBOARD20.FDB") If Err.Number <> 0 then else 'abrir la base Set Corr2 = Server.CreateObject("ADODB.Recordset") ' seteas el recordset Set Corr2 = strConexao.Execute("SELECT * FROM PCSIN where (LEFT(STIME,8) between '" & fechainicial & "' and '" & fechafinal2 & "') and left(STAT,1)='T' order by STIME,etime") if Not corr2.EOF and Not corr2.BOF then TOTML=0 TOTM2=0 TOTTARGET=0 TOTPROD=0 TOTML=0 '(corr2("JANG")*corr2("PQTY")/1000) TOTM2=0 TOTTARGET2=0 TOTPROD2=0 TOTML2=0 TOTM22=0 TOTbad2=0 TOTjtime2=0 TOTdtime2=0 TOTITEMS=0 'corr2.movefirst 'lturno1=Corr2("JOBJO") lturno1="1" lturno2="1" Do While Not corr2.EOF 'response.write(mid(Corr2("STIME"),1,8)&" - ") if left(Corr2("stat"),1)="T" then 'response.write(" ESTATUS ") end if Echeck=left(Corr2("Extracheck"),1) 'if Corr2("CUST")<>" " THEN lestado=0 'if Echeck="A" THEN shora = mid(Corr2("STIME"),10,2)&mid(Corr2("STIME"),13,2)&mid(Corr2("STIME"),16,2) Ehora = mid(Corr2("ETIME"),10,2)&mid(Corr2("ETIME"),13,2)&mid(Corr2("ETIME"),16,2) fecha1= mid(Corr2("STIME"),1,8) if (mid(Corr2("STIME"),1,8)=fechainicial and (shora<"065000" and Ehora<"065001")) then 'CORR2.MoveNext lestado=0 'response.write(" if 1 ") end if Sec1=0 Sec2=0 if (shora<"065000") and (Ehora>"064959") then shora1=int(mid(Corr2("STIME"),10,2))*3600 shora2=int(mid(Corr2("STIME"),13,2))*60 shora3=int(mid(Corr2("STIME"),16,2)) hstart=shora1+shora2+shora3 ehora1=int(mid(Corr2("ETIME"),10,2))*3600 ehora2=int(mid(Corr2("ETIME"),13,2))*60 ehora3=int(mid(Corr2("ETIME"),16,2)) hend=ehora1+ehora2+ehora3 Shift1=24600 Sec1=int(Shift1-hstart) Sec2=int(hend-Shift1) 'response.write(" if 2 ") end if if (mid(Corr2("STIME"),1,8)=fechainicial) then 'response.write(" if 3 ") if Sec1>Sec2 then 'CORR2.MoveNext lestado=0 'response.write(" if 4 ") else if Sec1"064959" then 'response.write(" if 6 ") lestado=1 Sec12=0 Sec13=0 Sec22=0 Sec23=0 if shora<"152000" and Ehora>"151959" then shora1=int(mid(Corr2("STIME"),10,2))*3600 shora2=int(mid(Corr2("STIME"),13,2))*60 shora3=int(mid(Corr2("STIME"),16,2)) hstart2=shora1+shora2+shora3 ehora1=int(mid(Corr2("ETIME"),10,2))*3600 ehora2=int(mid(Corr2("ETIME"),13,2))*60 ehora3=int(mid(Corr2("ETIME"),16,2)) hend2=ehora1+ehora2+ehora3 Shift2=55200 Sec12=int(Shift2-hstart2) Sec22=int(hend2-Shift2) end if if shora<"232000" and Ehora>"231959" then shora1=int(mid(Corr2("STIME"),10,2))*3600 shora2=int(mid(Corr2("STIME"),13,2))*60 shora3=int(mid(Corr2("STIME"),16,2)) hstart3=shora1+shora2+shora3 ehora1=int(mid(Corr2("ETIME"),10,2))*3600 ehora2=int(mid(Corr2("ETIME"),13,2))*60 ehora3=int(mid(Corr2("ETIME"),16,2)) hend3=ehora1+ehora2+ehora3 Shift3=84000 Sec13=int(Shift3-hstart3) Sec23=int(hend3-Shift3) end if if shora>"064959" and shora<"151959" then xTurno="1" end if if (shora>"151959" and shora<"232000") or Sec22>Sec12 then xTurno="2" end if if Sec22>Sec12 then xTurno="2" end if if shora>"231959" or shora<"064959" or Sec23>Sec13 then xTurno="3" end if end if if (mid(Corr2("STIME"),1,8)=fechafinal2) then if (shora>"064959") then 'CORR2.MoveNext lestado=0 else if Sec1fechainicial and mid(Corr2("STIME"),1,8)"151959" then shora1=int(mid(Corr2("STIME"),10,2))*3600 shora2=int(mid(Corr2("STIME"),13,2))*60 shora3=int(mid(Corr2("STIME"),16,2)) hstart2=shora1+shora2+shora3 ehora1=int(mid(Corr2("ETIME"),10,2))*3600 ehora2=int(mid(Corr2("ETIME"),13,2))*60 ehora3=int(mid(Corr2("ETIME"),16,2)) hend2=ehora1+ehora2+ehora3 Shift2=55200 Sec12=int(Shift2-hstart2) Sec22=int(hend2-Shift2) end if if shora<"232000" and Ehora>"231959" then shora1=int(mid(Corr2("STIME"),10,2))*3600 shora2=int(mid(Corr2("STIME"),13,2))*60 shora3=int(mid(Corr2("STIME"),16,2)) hstart3=shora1+shora2+shora3 ehora1=int(mid(Corr2("ETIME"),10,2))*3600 ehora2=int(mid(Corr2("ETIME"),13,2))*60 ehora3=int(mid(Corr2("ETIME"),16,2)) hend3=ehora1+ehora2+ehora3 Shift3=84000 Sec13=int(Shift3-hstart3) Sec23=int(hend3-Shift3) end if if shora>"064959" and shora<"151959" then xTurno="1" end if if (shora>"151959" and shora<"232000") or Sec22>Sec12 then xTurno="2" end if if Sec22>Sec12 then xTurno="2" end if if shora>"231959" or shora<"064959" or Sec23>Sec13 then xTurno="3" end if end if if lestado=0 then CORR2.MoveNext end if if lestado=1 then lm=int(cdbl(Corr2("Jang"))*(cdbl(Corr2("PQTY"))-cdbl(Corr2("PREPQTY")))/1000) lm2=int((cdbl(Corr2("Jang"))*cdbl(Corr2("WPOK")))*(cdbl(Corr2("PQTY"))-cdbl(Corr2("PREPQTY")))/1000000) TOTPROD=TOTPROD+cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY")) TOTML=TOTML+lm '(corr2("JANG")*corr2("PQTY")/1000) TOTM2=TOTM2+lm2 '(corr2("JANG")*corr2("WPOK")*corr2("PQTY")/1000000) ''''''''''''''''''''' por hora 'hrfin=mid(Rscorr("ETIME"),1,2)&":"&mid(Rscorr("ETIME"),4,2)&":"&mid(Rscorr("ETIME"),7,2) Ehoraf = mid(Corr2("ETIME"),10,2)&mid(Corr2("ETIME"),13,2)&mid(Corr2("ETIME"),16,2) response.write(" HF "&Ehoraf) if Ehoraf>"064959" and Ehoraf<"075000" then Corr1(1,5)=Corr1(1,5)+lm Corr1(1,6)=Corr1(1,6)+lm2 Corr1(1,7)=Corr1(1,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"074959" and Ehoraf<"085000" then Corr1(2,5)=Corr1(2,5)+lm Corr1(2,6)=Corr1(2,6)+lm2 Corr1(2,7)=Corr1(2,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"084959" and Ehoraf<"095000" then Corr1(3,5)=Corr1(3,5)+lm Corr1(3,6)=Corr1(3,6)+lm2 Corr1(3,7)=Corr1(3,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"094959" and Ehoraf<"105000" then Corr1(4,5)=Corr1(4,5)+lm Corr1(4,6)=Corr1(4,6)+lm2 Corr1(4,7)=Corr1(4,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"104959" and Ehoraf<"115000" then Corr1(5,5)=Corr1(5,5)+lm Corr1(5,6)=Corr1(5,6)+lm2 Corr1(5,7)=Corr1(5,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"114959" and Ehoraf<"125000" then Corr1(6,5)=Corr1(6,5)+lm Corr1(6,6)=Corr1(6,6)+lm2 Corr1(6,7)=Corr1(6,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"124959" and Ehoraf<"135000" then Corr1(7,5)=Corr1(7,5)+lm Corr1(7,6)=Corr1(7,6)+lm2 Corr1(7,7)=Corr1(7,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"134959" and Ehoraf<"145000" then Corr1(8,5)=Corr1(8,5)+lm Corr1(8,6)=Corr1(8,6)+lm2 Corr1(8,7)=Corr1(8,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"144959" and Ehoraf<"155000" then Corr1(9,5)=Corr1(9,5)+lm Corr1(9,6)=Corr1(9,6)+lm2 Corr1(9,7)=Corr1(9,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"154959" and Ehoraf<"165000" then Corr1(10,5)=Corr1(10,5)+lm Corr1(10,6)=Corr1(10,6)+lm2 Corr1(10,7)=Corr1(10,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"164959" and Ehoraf<"175000" then Corr1(11,5)=Corr1(11,5)+lm Corr1(11,6)=Corr1(11,6)+lm2 Corr1(11,7)=Corr1(11,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"174959" and Ehoraf<"185000" then Corr1(12,5)=Corr1(12,5)+lm Corr1(12,6)=Corr1(12,6)+lm2 Corr1(12,7)=Corr1(12,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"184959" and Ehoraf<"195000" then Corr1(13,5)=Corr1(13,5)+lm Corr1(13,6)=Corr1(13,6)+lm2 Corr1(13,7)=Corr1(13,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"194959" and Ehoraf<"205000" then Corr1(14,5)=Corr1(14,5)+lm Corr1(14,6)=Corr1(14,6)+lm2 Corr1(14,7)=Corr1(14,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"204959" and Ehoraf<"215000" then Corr1(15,5)=Corr1(15,5)+lm Corr1(15,6)=Corr1(15,6)+lm2 Corr1(15,7)=Corr1(15,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"214959" and Ehoraf<"225000" then Corr1(16,5)=Corr1(16,5)+lm Corr1(16,6)=Corr1(16,6)+lm2 Corr1(16,7)=Corr1(16,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"224959" and Ehoraf<"235000" then Corr1(17,5)=Corr1(17,5)+lm Corr1(17,6)=Corr1(17,6)+lm2 Corr1(17,7)=Corr1(17,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"234959" and Ehoraf<"005000" then Corr1(18,5)=Corr1(18,5)+lm Corr1(18,6)=Corr1(18,6)+lm2 Corr1(18,7)=Corr1(18,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"004959" and Ehoraf<"015000" then Corr1(19,5)=Corr1(19,5)+lm Corr1(19,6)=Corr1(19,6)+lm2 Corr1(19,7)=Corr1(19,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"014959" and Ehoraf<"025000" then Corr1(20,5)=Corr1(20,5)+lm Corr1(20,6)=Corr1(20,6)+lm2 Corr1(20,7)=Corr1(20,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"024959" and Ehoraf<"035000" then Corr1(21,5)=Corr1(21,5)+lm Corr1(21,6)=Corr1(21,6)+lm2 Corr1(21,7)=Corr1(21,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"034959" and Ehoraf<"045000" then Corr1(22,5)=Corr1(22,5)+lm Corr1(22,6)=Corr1(22,6)+lm2 Corr1(22,7)=Corr1(22,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"044959" and Ehoraf<"055000" then Corr1(23,5)=Corr1(23,5)+lm Corr1(23,6)=Corr1(23,6)+lm2 Corr1(23,7)=Corr1(23,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if if Ehoraf>"054959" and Ehoraf<"065000" then Corr1(24,5)=Corr1(24,5)+lm Corr1(24,6)=Corr1(24,6)+lm2 Corr1(24,7)=Corr1(24,7)+int(cdbl(corr2("PQTY"))-cdbl(Corr2("PREPQTY"))) end if CORR2.MoveNext end if LOOP corr2.close end if 'Error end if '''''''''''''''''''''''' hractual=hour(Now) if hractual=7 then llines=1 end if if hractual=8 then llines=2 end if if hractual=9 then llines=3 end if if hractual=10 then llines=4 end if if hractual=11 then llines=5 end if if hractual=12 then llines=6 end if if hractual=13 then llines=7 end if if hractual=14 then llines=8 end if if hractual=15 then llines=9 end if if hractual=16 then llines=10 end if if hractual=17 then llines=11 end if if hractual=18 then llines=12 end if if hractual=19 then llines=13 end if if hractual=20 then llines=14 end if if hractual=21 then llines=15 end if if hractual=22 then llines=16 end if if hractual=23 then llines=17 end if if hractual=0 then llines=18 end if if hractual=1 then llines=19 end if if hractual=2 then llines=20 end if if hractual=3 then llines=21 end if if hractual=4 then llines=22 end if if hractual=5 then llines=23 end if if hractual=6 then llines=24 end if lweekday=Weekday(date) If lweekday = 1 then lhtc1=12 lhtc2=8 lhrwrk=12 else lhtc1=24 lhtc2=24 lhrwrk=24 end if ltarget1=5000*lhtc1 ltarget2=5000*lhtc2 response.write("
lwd "&lweekday) response.write("
lt1 "<arget1) response.write("
lt1 "<arget1) response.write("
lt2 "<arget2) response.write("
lhrwk "&lhrwrk) Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " h1m=Corr1(1,3)+Corr1(1,5) h1m2=Corr1(1,4)+Corr1(1,6) h2m=Corr1(2,3)+Corr1(2,5) h2m2=Corr1(2,4)+Corr1(2,6) h3m=Corr1(3,3)+Corr1(3,5) h3m2=Corr1(3,4)+Corr1(3,6) h4m=Corr1(4,3)+Corr1(4,5) h4m2=Corr1(4,4)+Corr1(4,6) h5m=Corr1(5,3)+Corr1(5,5) h5m2=Corr1(5,4)+Corr1(5,6) h6m=Corr1(6,3)+Corr1(6,5) h6m2=Corr1(6,4)+Corr1(6,6) h7m=Corr1(7,3)+Corr1(7,5) h7m2=Corr1(7,4)+Corr1(7,6) h8m=Corr1(8,3)+Corr1(8,5) h8m2=Corr1(8,4)+Corr1(8,6) h9m=Corr1(9,3)+Corr1(9,5) h9m2=Corr1(9,4)+Corr1(9,6) h10m=Corr1(10,3)+Corr1(10,5) h10m2=Corr1(10,4)+Corr1(10,6) h11m=Corr1(11,3)+Corr1(11,5) h11m2=Corr1(11,4)+Corr1(11,6) h12m=Corr1(12,3)+Corr1(12,5) h12m2=Corr1(12,4)+Corr1(12,6) h13m=Corr1(13,3)+Corr1(13,5) h13m2=Corr1(13,4)+Corr1(13,6) h14m=Corr1(14,3)+Corr1(14,5) h14m2=Corr1(14,4)+Corr1(14,6) h15m=Corr1(15,3)+Corr1(15,5) h15m2=Corr1(15,4)+Corr1(15,6) h16m=Corr1(16,3)+Corr1(16,5) h16m2=Corr1(16,4)+Corr1(16,6) h17m=Corr1(17,3)+Corr1(17,5) h17m2=Corr1(17,4)+Corr1(17,6) h18m=Corr1(18,3)+Corr1(18,5) h18m2=Corr1(18,4)+Corr1(18,6) h19m=Corr1(19,3)+Corr1(19,5) h19m2=Corr1(19,4)+Corr1(19,6) h20m=Corr1(20,3)+Corr1(20,5) h20m2=Corr1(20,4)+Corr1(20,6) h21m=Corr1(21,3)+Corr1(21,5) h21m2=Corr1(21,4)+Corr1(21,6) h22m=Corr1(22,3)+Corr1(22,5) h22m2=Corr1(22,4)+Corr1(22,6) h23m=Corr1(23,3)+Corr1(23,5) h23m2=Corr1(23,4)+Corr1(23,6) h24m=Corr1(24,3)+Corr1(24,5) h24m2=Corr1(24,4)+Corr1(24,6) if llines>1 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>2 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>3 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>4 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>5 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>6 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>7 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>8 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>9 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>10 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>11 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>12 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>13 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>14 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>15 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>16 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>17 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>18 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>19 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>20 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>21 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>22 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if if llines>23 then Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " Mensaje2=mensaje2&" " end if Mensaje2=mensaje2&"
"&ldaytrans2&"C1C2TotalProgress(%)
Time:MM2MM2QtyMM2C1C2Target
7:50"&Corr1(1,3)&""&Corr1(1,4)&""&Corr1(1,5)&""&Corr1(1,6)&""&Corr1(1,7)&""&(Corr1(1,3)+Corr1(1,5))&""&(Corr1(1,4)+Corr1(1,6))&""&formatnumber((Corr1(1,3)/ltarget1)*100,1)&"%"&formatnumber((Corr1(1,5)/ltarget2)*100,1)&"%"&formatnumber((1/lhrwrk)*100,1)&"%
8:50"&Corr1(2,3)+Corr1(1,3)&""&Corr1(2,4)+Corr1(1,4)&""&Corr1(2,5)+Corr1(1,5)&""&Corr1(2,6)+Corr1(1,6)&""&Corr1(2,7)+Corr1(1,7)&""&(h2m+h1m)&""&(h2m2+h1m2)&""&formatnumber(((Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((2/lhrwrk)*100,1)&"%
9:50"&Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h3m+h2m+h1m)&""&(h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((3/lhrwrk)*100,1)&"%
10:50"&Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h4m+h3m+h2m+h1m)&""&(h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((4/lhrwrk)*100,1)&"%
11:50"&Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h5m+h4m+h3m+h2m+h1m)&""&(h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((5/lhrwrk)*100,1)&"%
12:50"&Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h6m+h5m+h4m+h3m+h2m+h1m)&""&(h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((6/lhrwrk)*100,1)&"%
13:50"&Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((7/lhrwrk)*100,1)&"%
14:50"&Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((8/lhrwrk)*100,1)&"%
15:50"&Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((9/lhrwrk)*100,1)&"%
16:50"&Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((10/lhrwrk)*100,1)&"%
17:50"&Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((11/lhrwrk)*100,1)&"%
18:50"&Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((12/lhrwrk)*100,1)&"%
19:50"&Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(13,4)+Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(13,6)+Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(13,7)+Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h13m+h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h13m2+h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((13/lhrwrk)*100,1)&"%
20:50"&Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(14,4)+Corr1(13,4)+Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(14,6)+Corr1(13,6)+Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(14,7)+Corr1(13,7)+Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h14m+h13m+h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h14m2+h13m2+h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((14/lhrwrk)*100,1)&"%
21:50"&Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(15,4)+Corr1(14,4)+Corr1(13,4)+Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(15,6)+Corr1(14,6)+Corr1(13,6)+Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(15,7)+Corr1(14,7)+Corr1(13,7)+Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h15m+h14m+h13m+h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h15m2+h14m2+h13m2+h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((15/lhrwrk)*100,1)&"%
22:50"&Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(16,4)+Corr1(15,4)+Corr1(14,4)+Corr1(13,4)+Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(16,6)+Corr1(15,6)+Corr1(14,6)+Corr1(13,6)+Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(16,7)+Corr1(15,7)+Corr1(14,7)+Corr1(13,7)+Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h16m+h15m+h14m+h13m+h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h16m2+h15m2+h14m2+h13m2+h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((16/lhrwrk)*100,1)&"%
23:50"&Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(17,4)+Corr1(16,4)+Corr1(15,4)+Corr1(14,4)+Corr1(13,4)+Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(17,6)+Corr1(16,6)+Corr1(15,6)+Corr1(14,6)+Corr1(13,6)+Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(17,7)+Corr1(16,7)+Corr1(15,7)+Corr1(14,7)+Corr1(13,7)+Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h17m+h16m+h15m+h14m+h13m+h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h17m2+h16m2+h15m2+h14m2+h13m2+h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((17/lhrwrk)*100,1)&"%
00:50"&Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(18,4)+Corr1(17,4)+Corr1(16,4)+Corr1(15,4)+Corr1(14,4)+Corr1(13,4)+Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(18,6)+Corr1(17,6)+Corr1(16,6)+Corr1(15,6)+Corr1(14,6)+Corr1(13,6)+Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(18,7)+Corr1(17,7)+Corr1(16,7)+Corr1(15,7)+Corr1(14,7)+Corr1(13,7)+Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h18m+h17m+h16m+h15m+h14m+h13m+h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h18m2+h17m2+h16m2+h15m2+h14m2+h13m2+h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((18/lhrwrk)*100,1)&"%
01:50"&Corr1(19,3)+Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(19,4)+Corr1(18,4)+Corr1(17,4)+Corr1(16,4)+Corr1(15,4)+Corr1(14,4)+Corr1(13,4)+Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(19,5)+Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(19,6)+Corr1(18,6)+Corr1(17,6)+Corr1(16,6)+Corr1(15,6)+Corr1(14,6)+Corr1(13,6)+Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(19,7)+Corr1(18,7)+Corr1(17,7)+Corr1(16,7)+Corr1(15,7)+Corr1(14,7)+Corr1(13,7)+Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h19m+h18m+h17m+h16m+h15m+h14m+h13m+h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h19m2+h18m2+h17m2+h16m2+h15m2+h14m2+h13m2+h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(19,3)+Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(19,5)+Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((19/lhrwrk)*100,1)&"%
02:50"&Corr1(20,3)+Corr1(19,3)+Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(20,4)+Corr1(19,4)+Corr1(18,4)+Corr1(17,4)+Corr1(16,4)+Corr1(15,4)+Corr1(14,4)+Corr1(13,4)+Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(20,5)+Corr1(19,5)+Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(20,6)+Corr1(19,6)+Corr1(18,6)+Corr1(17,6)+Corr1(16,6)+Corr1(15,6)+Corr1(14,6)+Corr1(13,6)+Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(20,7)+Corr1(19,7)+Corr1(18,7)+Corr1(17,7)+Corr1(16,7)+Corr1(15,7)+Corr1(14,7)+Corr1(13,7)+Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h20m+h19m+h18m+h17m+h16m+h15m+h14m+h13m+h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h20m2+h19m2+h18m2+h17m2+h16m2+h15m2+h14m2+h13m2+h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(20,3)+Corr1(19,3)+Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(20,5)+Corr1(19,5)+Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((20/lhrwrk)*100,1)&"%
03:50"&Corr1(21,3)+Corr1(20,3)+Corr1(19,3)+Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(21,4)+Corr1(20,4)+Corr1(19,4)+Corr1(18,4)+Corr1(17,4)+Corr1(16,4)+Corr1(15,4)+Corr1(14,4)+Corr1(13,4)+Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(21,5)+Corr1(20,5)+Corr1(19,5)+Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(21,5)+Corr1(20,6)+Corr1(19,6)+Corr1(18,6)+Corr1(17,6)+Corr1(16,6)+Corr1(15,6)+Corr1(14,6)+Corr1(13,6)+Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(21,6)+Corr1(20,7)+Corr1(19,7)+Corr1(18,7)+Corr1(17,7)+Corr1(16,7)+Corr1(15,7)+Corr1(14,7)+Corr1(13,7)+Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h21m+h20m+h19m+h18m+h17m+h16m+h15m+h14m+h13m+h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h21m2+h20m2+h19m2+h18m2+h17m2+h16m2+h15m2+h14m2+h13m2+h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(21,3)+Corr1(20,3)+Corr1(19,3)+Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(21,5)+Corr1(20,5)+Corr1(19,5)+Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((21/lhrwrk)*100,1)&"%
04:50"&Corr1(22,3)+Corr1(21,3)+Corr1(20,3)+Corr1(19,3)+Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(22,4)+Corr1(21,4)+Corr1(20,4)+Corr1(19,4)+Corr1(18,4)+Corr1(17,4)+Corr1(16,4)+Corr1(15,4)+Corr1(14,4)+Corr1(13,4)+Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(22,5)+Corr1(21,5)+Corr1(20,5)+Corr1(19,5)+Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(22,6)+Corr1(21,5)+Corr1(20,6)+Corr1(19,6)+Corr1(18,6)+Corr1(17,6)+Corr1(16,6)+Corr1(15,6)+Corr1(14,6)+Corr1(13,6)+Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(22,7)+Corr1(21,6)+Corr1(20,7)+Corr1(19,7)+Corr1(18,7)+Corr1(17,7)+Corr1(16,7)+Corr1(15,7)+Corr1(14,7)+Corr1(13,7)+Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h22m+h21m+h20m+h19m+h18m+h17m+h16m+h15m+h14m+h13m+h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h22m2+h21m2+h20m2+h19m2+h18m2+h17m2+h16m2+h15m2+h14m2+h13m2+h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(22,3)+Corr1(21,3)+Corr1(20,3)+Corr1(19,3)+Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(22,5)+Corr1(21,5)+Corr1(20,5)+Corr1(19,5)+Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((22/lhrwrk)*100,1)&"%
05:50"&Corr1(23,3)+Corr1(22,3)+Corr1(21,3)+Corr1(20,3)+Corr1(19,3)+Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(23,4)+Corr1(22,4)+Corr1(21,4)+Corr1(20,4)+Corr1(19,4)+Corr1(18,4)+Corr1(17,4)+Corr1(16,4)+Corr1(15,4)+Corr1(14,4)+Corr1(13,4)+Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(23,5)+Corr1(22,5)+Corr1(21,5)+Corr1(20,5)+Corr1(19,5)+Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(23,6)+Corr1(22,6)+Corr1(21,5)+Corr1(20,6)+Corr1(19,6)+Corr1(18,6)+Corr1(17,6)+Corr1(16,6)+Corr1(15,6)+Corr1(14,6)+Corr1(13,6)+Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(23,7)+Corr1(22,7)+Corr1(21,6)+Corr1(20,7)+Corr1(19,7)+Corr1(18,7)+Corr1(17,7)+Corr1(16,7)+Corr1(15,7)+Corr1(14,7)+Corr1(13,7)+Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h23m+h22m+h21m+h20m+h19m+h18m+h17m+h16m+h15m+h14m+h13m+h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h23m2+h22m2+h21m2+h20m2+h19m2+h18m2+h17m2+h16m2+h15m2+h14m2+h13m2+h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(23,3)+Corr1(22,3)+Corr1(21,3)+Corr1(20,3)+Corr1(19,3)+Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(23,5)+Corr1(22,5)+Corr1(21,5)+Corr1(20,5)+Corr1(19,5)+Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((23/lhrwrk)*100,1)&"%
06:50"&Corr1(24,3)+Corr1(23,3)+Corr1(22,3)+Corr1(21,3)+Corr1(20,3)+Corr1(19,3)+Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3)&""&Corr1(24,4)+Corr1(23,4)+Corr1(22,4)+Corr1(21,4)+Corr1(20,4)+Corr1(19,4)+Corr1(18,4)+Corr1(17,4)+Corr1(16,4)+Corr1(15,4)+Corr1(14,4)+Corr1(13,4)+Corr1(12,4)+Corr1(11,4)+Corr1(10,4)+Corr1(9,4)+Corr1(8,4)+Corr1(7,4)+Corr1(6,4)+Corr1(5,4)+Corr1(4,4)+Corr1(3,4)+Corr1(2,4)+Corr1(1,4)&""&Corr1(24,5)+Corr1(23,5)+Corr1(22,5)+Corr1(21,5)+Corr1(20,5)+Corr1(19,5)+Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5)&""&Corr1(24,6)+Corr1(23,6)+Corr1(22,6)+Corr1(21,5)+Corr1(20,6)+Corr1(19,6)+Corr1(18,6)+Corr1(17,6)+Corr1(16,6)+Corr1(15,6)+Corr1(14,6)+Corr1(13,6)+Corr1(12,6)+Corr1(11,6)+Corr1(10,6)+Corr1(9,6)+Corr1(8,6)+Corr1(7,6)+Corr1(6,6)+Corr1(5,6)+Corr1(4,6)+Corr1(3,6)+Corr1(2,6)+Corr1(1,6)&""&Corr1(24,7)+Corr1(23,7)+Corr1(22,7)+Corr1(21,6)+Corr1(20,7)+Corr1(19,7)+Corr1(18,7)+Corr1(17,7)+Corr1(16,7)+Corr1(15,7)+Corr1(14,7)+Corr1(13,7)+Corr1(12,7)+Corr1(11,7)+Corr1(10,7)+Corr1(9,7)+Corr1(8,7)+Corr1(7,7)+Corr1(6,7)+Corr1(5,7)+Corr1(4,7)+Corr1(3,7)+Corr1(2,7)+Corr1(1,7)&""&(h24m+h23m+h22m+h21m+h20m+h19m+h18m+h17m+h16m+h15m+h14m+h13m+h12m+h11m+h10m+h9m+h8m+h7m+h6m+h5m+h4m+h3m+h2m+h1m)&""&(h24m2+h23m2+h22m2+h21m2+h20m2+h19m2+h18m2+h17m2+h16m2+h15m2+h14m2+h13m2+h12m2+h11m2+h10m2+h9m2+h8m2+h7m2+h6m2+h5m2+h4m2+h3m2+h2m2+h1m2)&""&formatnumber(((Corr1(24,3)+Corr1(23,3)+Corr1(22,3)+Corr1(21,3)+Corr1(20,3)+Corr1(19,3)+Corr1(18,3)+Corr1(17,3)+Corr1(16,3)+Corr1(15,3)+Corr1(14,3)+Corr1(13,3)+Corr1(12,3)+Corr1(11,3)+Corr1(10,3)+Corr1(9,3)+Corr1(8,3)+Corr1(7,3)+Corr1(6,3)+Corr1(5,3)+Corr1(4,3)+Corr1(3,3)+Corr1(2,3)+Corr1(1,3))/ltarget1)*100,1)&"%"&formatnumber(((Corr1(24,5)+Corr1(23,5)+Corr1(22,5)+Corr1(21,5)+Corr1(20,5)+Corr1(19,5)+Corr1(18,5)+Corr1(17,5)+Corr1(16,5)+Corr1(15,5)+Corr1(14,5)+Corr1(13,5)+Corr1(12,5)+Corr1(11,5)+Corr1(10,5)+Corr1(9,5)+Corr1(8,5)+Corr1(7,5)+Corr1(6,5)+Corr1(5,5)+Corr1(4,5)+Corr1(3,5)+Corr1(2,5)+Corr1(1,5))/ltarget2)*100,1)&"%"&formatnumber((24/lhrwrk)*100,1)&"%
" 'Se cierra y se destruye el objeto connection 'ConexionBD.Close 'Set ConexionBD = Nothing response.write(mensaje1) If Err.Number <> 0 then HandleError Err.Description End If Sub HandleError response.write("No DATE created") End Sub '********************* correo="ilkim@shinwoousa.com;inwans@shinwoousa.com" Dim objCDO Dim Conf Dim Fields ''''''''''' Set cdoConfig = CreateObject("CDO.Configuration") With cdoConfig.Fields .Item(cdoSendUsingMethod) = 2 .Item(cdoSMTPServer) = "mail.shinwoousa.com" '"64.87.26.218" .Item(cdoSMTPauthenticate)=1 .Item(cdoSendUsername)="sechevarria@shinwoousa.com" .Item(cdoSendPassword)="Sergio586*" .Item(cdoSMTPServerport)=587 .Update End With Set cdoMessage = CreateObject("CDO.Message") Set Fields = Nothing Set objCDO = Nothing Set Conf = Nothing With cdoMessage Set .Configuration = cdoConfig .From = "sechevarria@shinwoousa.com" '.To = correo .To = "ikejung@shinwoousa.com" '.cc = "avaldez@shinwoousa.com;jmontano@shinwoousa.com;yvizcarra@shinwoousa.com;jamesoh@shinwoousa.com;jmedina@shinwoousa.com; lramirez@shinwoousa.com; asaldana@shinwoousa.com; dvilchis@shinwoousa.com;jguzman@shinwoousa.com;mahernandez@shinwoousa.com;ehernandez@shinwoousa.com;ikejung@shinwoousa.com" .bcc = "sistemas@shinwoousa.com" .Subject = "sending Automatic - HOURLY CORRUGATOR PERFORMANCE(Test)" '.TextBody = "Esta es una Prueba de envio automatico ASECO-Sergio" .HTMLBody = mensaje2 '.AddAttachment (archivopdf) '.AddAttachment (archivoxml) .Send End With Set cdoMessage = Nothing Set cdoConfig = Nothing ''termina envio de correo 'end if 'response.Redirect("reportdailytransfer.asp?msg=enviado!") %> <% end if ' minutos End If ' licencia expirada Rsfore0.Close Set Rsfore0 = Nothing ''''''''''''' %>