Cisco Support Community
cancel
Showing results for 
Search instead for 
Did you mean: 
Announcements

Welcome to Cisco Support Community. We would love to have your feedback.

For an introduction to the new site, click here. And see here for current known issues.

New Member

UCCX 8.5 Wallboard help

Hey everybody, I'm having a heck of a time getting a wallboard to work correctly ever since we upgraded our UCCX server to 8.5.  As you can see from the code below the asp page is just a simple page to display agent statistics, nothing special with it but I always get an error when I try to run it that reads

"Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Informix][Informix ODBC Driver][Informix]Routine (equal) can not be resolved"

Referring to this line

Set objRS = objCN.Execute(strsql)

I cannot for the life of me figure out why it's doing that.  Below is all the code I have.  Any help would be greatly appreciated.

<% @LANGUAGE = VBScript %>

<%

Option Explicit

Response.Expires = 0

Dim objCN, objRS, strsql, strAgentStatus, lastupdate, strArray, Agent

Const queuelimit = 2

Const RefreshTime = 60

Response.AddHeader "Refresh", RefreshTime

%>

<HTML>

<BODY BGCOLOR="#FFFFFF">

<HEAD>

<TITLE>CSQ Statistics</TITLE>

<STYLE>

  h1 { color: green;  font-family: arial; font-size: 28px; }

  body { text-align: center;  color: black;  font-family: arial; }

  strong { text-align: center; color: blue; font-weight: bold; }

</STYLE>

</HEAD>

<H1>CSQ Statistics</H1><BR>

<TABLE ALIGN="CENTER" BORDER="1" CELLSPACING="0" CELLPADDING="1" width="94%">

<TR><TD ALIGN="CENTER"><STRONG>Agent Name</STRONG></TD>

    <TD ALIGN="CENTER"><STRONG>Current Status</STRONG></TD>

    <TD ALIGN="CENTER"><STRONG>Status Duration</STRONG></TD>

</TR>

<%

Dim Team, TeamNum

Dim Skillset(20)

Dim N,SS, T

Dim SearchString

Set objCN = Server.CreateObject("ADODB.Connection")

objCN.Open "UCCX"

'resourceName, resource.assignedTeamID, eventType, eventDateTime

'strsql = "SELECT resourceName, resource.resourceSkillMapID, eventType, eventDateTime FROM Resource, AgentStateDetail WHERE Resource.resourceID = agentStateDetail.agentID AND eventDatetime IN (SELECT MAX(eventDateTime) FROM AgentStateDetail WHERE agentID IN    (SELECT resourceID FROM Resource WHERE active = 1) GROUP BY agentID) ORDER BY resourceName"

strsql = "SELECT resourceName, resource.assignedTeamID, eventType, eventDateTime FROM Resource, AgentStateDetail WHERE Resource.resourceID = agentStateDetail.agentID AND eventDatetime IN (SELECT MAX(eventDateTime) FROM AgentStateDetail WHERE agentID IN    (SELECT resourceID FROM Resource WHERE active = 1) GROUP BY agentID) ORDER BY resourceName"

'Teams

'Team="Supervisor"

'Team="Dartmouth"

Team="Customer Service":TeamNum=13

Set objRS = objCN.Execute(strsql)

While Not objRS.EOF

Agent=ucase(objRS("resourceName"))

' if instr(Skillset(SS),Agent) then

if objRS("assignedTeamID")=TeamNum then

     ' Response.Write "<TR><TD>" & objRS("resourceName") & " : " & objRS("resourceSkillMapID") & "</TD>"

      Response.Write "<TR><TD>" & objRS("resourceName") & " : " & "</TD>"

Select Case objRS("eventType")

    Case 7

        strAgentStatus = "Logged Out"

        Response.Write "<TD ALIGN='CENTER' BGCOLOR='red'><FONT COLOR='#FFFFFF'>" & strAgentStatus & "</FONT></TD>"

    Case 6

        strAgentStatus = "Working"

        Response.Write "<TD ALIGN='CENTER' BGCOLOR='orange'><FONT COLOR='#FFFFFF'>" & strAgentStatus & "</FONT></TD>"

    Case 5

        strAgentStatus = "Talking"

        Response.Write "<TD ALIGN='CENTER' BGCOLOR='orange'><FONT COLOR='#FFFFFF'>" & strAgentStatus & "</FONT></TD>"

    Case 4

        strAgentStatus = "Reserved"

          Response.Write "<TD ALIGN='CENTER' BGCOLOR='orange'><FONT COLOR='#FFFFFF'>" & strAgentStatus & "</FONT></TD>"

    Case 3

        strAgentStatus = "Ready"

        Response.Write "<TD ALIGN='CENTER' BGCOLOR='green'><FONT COLOR='#FFFFFF'>" & strAgentStatus & "</FONT></TD>"

    Case 2

      strAgentStatus = "Not Ready"

      Response.Write "<TD ALIGN='CENTER' BGCOLOR='red'><FONT COLOR='#FFFFFF'>" & strAgentStatus & "</FONT></TD>"

    Case 1

        strAgentStatus = "Logged In"

        Response.Write "<TD ALIGN='CENTER' BGCOLOR='red'><FONT COLOR='#FFFFFF'>" & strAgentStatus & "</FONT></TD>"

end select

    Response.Write "<TD ALIGN='CENTER'>" & objRS("eventDateTime") & "</TD>" & "</TR>" & VbCrLf

else

    ' Response.Write "<TR><TD>" & objRS("resourceName") & "</TD>"

end if

objRS.MoveNext

Wend

objRS.Close

objCN.Close

Set objCN = Nothing

Set objRS = Nothing

' The string returned in endDateTime is of the form "MM/DD/YYYY HH:MM:SS [AM/PM]"

' Extract just the time and the AM/PM indicator

' strArray = split(lastupdate," ")

' lastupdate = strArray(1) & " " & strArray(2)

%>

</TABLE>

<P ALIGN="RIGHT">

<EM><FONT SIZE="-1">

This page will update every <%= RefreshTime %> seconds<BR>

(Last updated: <%= lastupdate %>)

</FONT></EM>

</P>

</BODY>

</HTML>


1 REPLY
Silver

UCCX 8.5 Wallboard help

The SQL in Informix is not the same as Microsoft.

In Microsoft: SELECT resourceID FROM Resource WHERE active = 1

In Informix: SELECT resourceID FROM Resource WHERE active = 't'

There is still another error in your SQL but I don't have time to work it out at the moment.

Graham

1187
Views
0
Helpful
1
Replies