- Thank you received: 0
Welcome to the fracta.net forum!
Share your coding ideas or ask questions.
Share your coding ideas or ask questions.
Question AVAYA CMS Supervisor Automation
1 month 3 weeks ago - 1 month 3 weeks ago #753
by fsx4362
AVAYA CMS Supervisor Automation was created by fsx4362
Hi Sir / Roller,
I have read threads of your following topic which is providing quite a great help to me but i am unable to remove the xterm input after running the .acsauto file. The file contents are mentioned below please help me with this so that i can automate all my reports. I need to schedule these reports at my VM via Windows Schedule Task
'LANGUAGE=ENU
'SERVERNAME=10.10.10.10
Public Sub Main()
' Get the current date in "YYYY-MM-DD" format
sDate = Year(Now) & "-" & Month(Now) & "-" & Day(Now) ' For format "YYYY-MM-DD"
' Define the export path and file name parameters
' These should be passed when calling the script
' You can define a default export path or pass it as a parameter as shown below
exportPath = "\\(computer_ID)\Users\abc\OneDrive - xyz\AutoFiles\"
exportName = "AG_" & sDate & ".csv" ' Example: "AG_"
' Combine them to form the full export file path
fullExportPath = exportPath & exportName
'## cvs_cmd_begin
'## ID = 2001
'## Description = "Report: Historical: Designer: ---Contact Center Performance Detail (Agentsum)_Vendor A: Export Data"
'## "Report: Historical: Designer: ---Contact Center Performance Detail (Agentsum)_Vendor A: Export Data","_Desc"
'## "Reports","_Catalog"
'## "2","_Action"
'## "1","_Quit"
'## "Historical\Designer\---Contact Center Performance Detail (Agentsum)_Vendor A","_Report"
'## "1","_ACD"
'## "-120","_Top"
'## "-120","_Left"
'## "730","_Width"
'## "160","_Height"
'## "default","_TimeZone"
'## "The report Historical\Designer\---Contact Center Performance Detail (Agentsum)_Vendor A was not found on ACD 1.","_ReportNotFound"
'## "*","_BeginProperties"
'## "Abacus_Billing","Agent Group"
'## "-1","Dates"
'## "00:00-23:59","Times"
'## "*","_EndProperties"
'## "*","_BeginViews"
'## "*","_EndViews"
'## , "_Output" ' Pass the export path and name as a parameter
'## "9","_FldSep"
'## "0","_TextDelim"
'## "False","_NullToZero"
'## "False","_Labels"
'## "True","_DurSecs"
'## , "_Date" ' Add the sDate as a parameter
On Error Resume Next
Set Info = ("Historical\Designer\---Contact Center Performance Detail (Agentsum)_Vendor A")
If Info Is Nothing Then
If
MsgBox "The report Historical\Designer\---Contact Center Performance Detail (Agentsum)_Vendor A was not found on ACD 1.", vbCritical Or vbOKOnly, "Avaya CMS Supervisor"
Else
Set Log = CreateObject("")
"The report Historical\Designer\---Contact Center Performance Detail (Agentsum)_Vendor A was not found on ACD 1."
Set Log = Nothing
End If
Else
b = (Info,Rep)
If b Then
"default"
"Agent Group","AG_Billing"
"Dates","-1"
"Times","00:00-23:59"
"Date", "_Date" ' Use the passed parameter for Date
b = (fullExportPath, 9, 0, False, False, True) ' Use the full export path from the parameter
If Not
Set Rep = Nothing
End If
End If
Set Info = Nothing
'## cvs_cmd_end
End Sub
I have read threads of your following topic which is providing quite a great help to me but i am unable to remove the xterm input after running the .acsauto file. The file contents are mentioned below please help me with this so that i can automate all my reports. I need to schedule these reports at my VM via Windows Schedule Task
'LANGUAGE=ENU
'SERVERNAME=10.10.10.10
Public Sub Main()
' Get the current date in "YYYY-MM-DD" format
sDate = Year(Now) & "-" & Month(Now) & "-" & Day(Now) ' For format "YYYY-MM-DD"
' Define the export path and file name parameters
' These should be passed when calling the script
' You can define a default export path or pass it as a parameter as shown below
exportPath = "\\(computer_ID)\Users\abc\OneDrive - xyz\AutoFiles\"
exportName = "AG_" & sDate & ".csv" ' Example: "AG_"
' Combine them to form the full export file path
fullExportPath = exportPath & exportName
'## cvs_cmd_begin
'## ID = 2001
'## Description = "Report: Historical: Designer: ---Contact Center Performance Detail (Agentsum)_Vendor A: Export Data"
'## "Report: Historical: Designer: ---Contact Center Performance Detail (Agentsum)_Vendor A: Export Data","_Desc"
'## "Reports","_Catalog"
'## "2","_Action"
'## "1","_Quit"
'## "Historical\Designer\---Contact Center Performance Detail (Agentsum)_Vendor A","_Report"
'## "1","_ACD"
'## "-120","_Top"
'## "-120","_Left"
'## "730","_Width"
'## "160","_Height"
'## "default","_TimeZone"
'## "The report Historical\Designer\---Contact Center Performance Detail (Agentsum)_Vendor A was not found on ACD 1.","_ReportNotFound"
'## "*","_BeginProperties"
'## "Abacus_Billing","Agent Group"
'## "-1","Dates"
'## "00:00-23:59","Times"
'## "*","_EndProperties"
'## "*","_BeginViews"
'## "*","_EndViews"
'## , "_Output" ' Pass the export path and name as a parameter
'## "9","_FldSep"
'## "0","_TextDelim"
'## "False","_NullToZero"
'## "False","_Labels"
'## "True","_DurSecs"
'## , "_Date" ' Add the sDate as a parameter
On Error Resume Next
Set Info = ("Historical\Designer\---Contact Center Performance Detail (Agentsum)_Vendor A")
If Info Is Nothing Then
If
MsgBox "The report Historical\Designer\---Contact Center Performance Detail (Agentsum)_Vendor A was not found on ACD 1.", vbCritical Or vbOKOnly, "Avaya CMS Supervisor"
Else
Set Log = CreateObject("")
"The report Historical\Designer\---Contact Center Performance Detail (Agentsum)_Vendor A was not found on ACD 1."
Set Log = Nothing
End If
Else
b = (Info,Rep)
If b Then
"default"
"Agent Group","AG_Billing"
"Dates","-1"
"Times","00:00-23:59"
"Date", "_Date" ' Use the passed parameter for Date
b = (fullExportPath, 9, 0, False, False, True) ' Use the full export path from the parameter
If Not
Set Rep = Nothing
End If
End If
Set Info = Nothing
'## cvs_cmd_end
End Sub
Last edit: 1 month 3 weeks ago by fsx4362.
Please Log in or Create an account to join the conversation.
Time to create page: 0.326 seconds