mooSeconds()


Returns the value of Seconds from the Oracle OLAP environment.


Syntax

       

               mooseconds()


Return Value


               LONG


Example


Public Sub mooSeconds()


'Return the current value of seconds within Oracle OLAP

Dim boo As Boolean


If Not oregistered Then:   boo = regQ:


'Check Im connected if not connect

If Not o.connected Then

   boo = o.connect

   boo = o.connected

   Else

   boo = True

End If


'Get the value of seconds

If boo = True Then

  Debug.Print (o.mooSeconds)

Else

   'Something went wrong print any error information

   Debug.Print "Unable to Connect"

   Debug.Print o.getlastmooerr

End If


End Sub