Welcome to the fracta.net forum!

Share your coding ideas or ask questions.

Question AVAYA CMS Supervisor Automation

More
1 month 3 weeks ago - 1 month 3 weeks ago #753 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

 
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
Powered by Kunena Forum