HardStuckServiceDesk
Technical User
Hi all, long time listener first time caller. I'm in service desk and have an ACS script running that generates an html file and gif of our callboard. After the html file and gif are made, the ACS script calls and runs a python script that uploads the html and gif to an s3 bucket that's being used as a web based callboard. The problem I'm running into is my ACS script stops generating new html and gif files consistently at 3:20 every day requiring someone remote in, stop ACS with powershell, and delete the cache folder. Wanted to see if anyone else has seen anything similar or had any advice to offer for trying to resolve this. Will post the ACS script and logs below from when it fails.
Code:
'LANGUAGE=ENU
'SERVERNAME=removed
Public Sub Main()
'## cvs_cmd_begin
'## ID = 2001
'## Description = "Report: Real-Time: Split/Skill: Graphical Status: Save HTML"
'## Parameters.Add "Report: Real-Time: Split/Skill: Graphical Status: Save HTML","_Desc"
'## Parameters.Add "Reports","_Catalog"
'## Parameters.Add "1","_Action"
'## Parameters.Add "1","_Quit"
'## Parameters.Add "Real-Time\Split/Skill\Graphical Status","_Report"
'## Parameters.Add "1","_ACD"
'## Parameters.Add "3705","_Top"
'## Parameters.Add "17910","_Left"
'## Parameters.Add "10590","_Width"
'## Parameters.Add "7665","_Height"
'## Parameters.Add "default","_TimeZone"
'## Parameters.Add "The report Real-Time\Split/Skill\Graphical Status was not found on ACD 1.","_ReportNotFound"
'## Parameters.Add "*","_BeginProperties"
'## Parameters.Add "3","Split/Skill"
'## Parameters.Add "*","_EndProperties"
'## Parameters.Add "*","_BeginViews"
'## Parameters.Add "G-3,-4,0;-1,2,0","Grid1"
'## Parameters.Add "*","_EndViews"
'## Parameters.Add "C:\python\python\callboard\callboard.HTML","_Output"
'## Parameters.Add "","_Template"
'## Parameters.Add "False","_UseFonts"
Dim PauseTime, Start
PauseTime = 30 '
On Error Resume Next
cvsSrv.Reports.ACD = 1
Set Info = cvsSrv.Reports.Reports("Real-Time\Split/Skill\Graphical Status")
If Info Is Nothing Then
If cvsSrv.Interactive Then
MsgBox "The report Real-Time\Split/Skill\Graphical Status was not found on ACD 1.", vbCritical Or vbOKOnly, "Avaya CMS Supervisor"
Else
Set Log = CreateObject("ACSERR.cvsLog")
Log.AutoLogWrite "The report Real-Time\Split/Skill\Graphical Status was not found on ACD 1."
Set Log = Nothing
End If
Else
If hour(now) > 5 then
Do While hour(now) < 21
Start = Timer
b = cvsSrv.Reports.CreateReport(Info,Rep)
If b Then
Rep.Window.Top = 3705
Rep.Window.Left = 17910
Rep.Window.Width = 10590
Rep.Window.Height = 7665
Rep.SetProperty "Split/Skill","3"
Rep.ReportView.Add "G-3,-4,0;-1,2,0","Grid1"
b = Rep.SaveHTML("C:\python\python\callboard\callboard.HTML", True, "")
Set shell = CreateObject("WScript.Shell")
shell.CurrentDirecotry = "C:\python\python\callboard"
shell.run "modifyanduploadhtml.pyw"
Do While Timer<Start+PauseTime
Loop
Rep.Quit
If Not cvsSrv.Interactive Then cvsSrv.ActiveTasks.Remove Rep.TaskID
Set Rep = Nothing
End If
Loop
End If
End If
Set Info = Nothing
'## cvs_cmd_end
End Sub