| Line 2558... |
Line 2558... |
| 2558 |
' Work in progress - Still being constructed. Cannot be added to a Release yet
|
2558 |
' Work in progress - Still being constructed. Cannot be added to a Release yet
|
| 2559 |
SdkIcon = LIMG_OPEN_MODE
|
2559 |
SdkIcon = LIMG_OPEN_MODE
|
| 2560 |
End If
|
2560 |
End If
|
| 2561 |
End Function
|
2561 |
End Function
|
| 2562 |
'-----------------------------------------------------------------------------------------------------------------
|
2562 |
'-----------------------------------------------------------------------------------------------------------------
|
| - |
|
2563 |
'
|
| - |
|
2564 |
' Helper rountien to create a button that will be wired into JavaScript
|
| - |
|
2565 |
'
|
| - |
|
2566 |
Sub BuildJsButton (bState, sClass, sTitle, sImage)%>
|
| - |
|
2567 |
<%If bState Then%>
|
| - |
|
2568 |
<span class="<%=sClass%>" title="<%=sTitle%>"><img <%=sImage%>></span>
|
| - |
|
2569 |
<%Else%>
|
| - |
|
2570 |
<span class="abtnItemDis" title="<%=sTitle%>"><img <%=sImage%> class="lessOpacity"></span>
|
| - |
|
2571 |
<%End If%>
|
| - |
|
2572 |
<%End Sub
|
| 2563 |
'------------------------------------------------------------------------------
|
2573 |
'------------------------------------------------------------------------------
|
| 2564 |
' Helper routine to create buttons and disabled buttons
|
2574 |
' Helper routine to create buttons and disabled buttons
|
| 2565 |
' Treat the action an href - link the user can see and potentially open in another tab
|
2575 |
' Treat the action an href - link the user can see and potentially open in another tab
|
| 2566 |
'
|
2576 |
'
|
| 2567 |
Sub BuildActionButtonLink(bState, sText, sTitle, sImage, sRef)
|
2577 |
Sub BuildActionButtonLink(bState, sText, sTitle, sImage, sRef)
|
| Line 2618... |
Line 2628... |
| 2618 |
Dim sStyle : sStyle = "font-weight:bold;"
|
2628 |
Dim sStyle : sStyle = "font-weight:bold;"
|
| 2619 |
Dim sClass : sClass = ""
|
2629 |
Dim sClass : sClass = ""
|
| 2620 |
If Left(sImage,4) = "<img" Then sImage = Mid(sImage, 5, Len(sImage)-5)
|
2630 |
If Left(sImage,4) = "<img" Then sImage = Mid(sImage, 5, Len(sImage)-5)
|
| 2621 |
If bState Then
|
2631 |
If bState Then
|
| 2622 |
If isBlue Then sClass = "txt_linked" : sStyle = ""%>
|
2632 |
If isBlue Then sClass = "txt_linked" : sStyle = ""%>
|
| 2623 |
<span onClick="<%=sClick%>" class="<%=sClass%> pointer" style="<%=sStyle%>"><%=sText%> <img <%=sImage%>></span>
|
2633 |
<span onClick="<%=sClick%>" class="<%=sClass%> pointer" style="<%=sStyle%>" title="<%=sTitle%>"><%=sText%> <img <%=sImage%>></span>
|
| 2624 |
<%Else%>
|
2634 |
<%Else%>
|
| 2625 |
<%If isBlue Then sClass = "txt_linked_dis" : sStyle = ""%>
|
2635 |
<%If isBlue Then sClass = "txt_linked_dis" : sStyle = ""%>
|
| 2626 |
<span style="<%=sStyle%>" class="<%=sClass%>" ><%=sText%> <img <%=sImage%> class="lessOpacity"></span>
|
2636 |
<span style="<%=sStyle%>" class="<%=sClass%>" title="<%=sTitle%>"><%=sText%> <img <%=sImage%> class="lessOpacity"></span>
|
| 2627 |
<%End If
|
2637 |
<%End If
|
| 2628 |
End Sub%>
|
2638 |
End Sub%>
|
| 2629 |
|
2639 |
|