Dim g_objTimerfrmWORK

Sub SetCalcWorkHeight()
  On Error Resume Next
    
  If (StrComp("complete", LCase(document.all("frmCALC").readyState), vbTextCompare) = 0) Then 
	    divCALC.style.pixelHeight=window.frames("frmCALC").document.body.scrollHeight + 4
  End If
End Sub

Function DefaultOnLoadHandler()
  On Error Resume Next
  
  'If (StrComp("complete", LCase(document.all("frmWORK").readyState), vbTextCompare) <> 0) Then 
  '    TurnONIMGWait()
  'End If

  CheckCookies()  
End Function