[Solved] Time seconds function - two decimals output

Creating a macro - Writing a Script - Using the API (OpenOffice Basic, Python, BeanShell, JavaScript)
Post Reply
User avatar
Ponny
Posts: 172
Joined: Sun Jun 21, 2009 7:34 pm
Location: Mystical Kingdom of Krakovo

[Solved] Time seconds function - two decimals output

Post by Ponny »

Meow

About time functions. I remember in Word Basic from MS Word 6, function Second returns seconds and 100 miliseconds and 10 miliseconds. Something about this example: "3,14". Seconds of corse. From input variable with serial date&time.

Now in OpenOffice Basic (OpenOffice 3.1.2) function Second returns only seconds without decimals. Is there any hope to get time - seconds with two decimals? Maybe 3?

Thankyou for any good news about this :)
But if this is not possible, then I apologize for stupid question :oops:


Ponny
Last edited by Ponny on Sat Apr 22, 2017 8:15 pm, edited 1 time in total.
MS Windows 10: OpenOffice 4.1.13; LibreOffice 7.3.5.2
User avatar
Zizi64
Volunteer
Posts: 11353
Joined: Wed May 26, 2010 7:55 am
Location: Budapest, Hungary

Re: Time seconds function - two decimals output

Post by Zizi64 »

The Cell Function NOW() supports the fractions of the seconds. You can calculate the seconds and the fraction part of the seconds by a macro or by some cell functions.

Note: The resolution of the StarBasic function NOW() is 1 second. There is no fraction.
SecFrac.ods
(12.06 KiB) Downloaded 168 times
Tibor Kovacs, Hungary; LO7.5.8 /Win7-10 x64Prof.
PortableApps/winPenPack: LO3.3.0-7.6.2;AOO4.1.14
Please, edit the initial post in the topic: add the word [Solved] at the beginning of the subject line - if your problem has been solved.
JeJe
Volunteer
Posts: 2764
Joined: Wed Mar 09, 2016 2:40 pm

Re: Time seconds function - two decimals output

Post by JeJe »

getSystemTicks
Windows 10, Openoffice 4.1.11, LibreOffice 7.4.0.3 (x64)
F3K Total
Volunteer
Posts: 1038
Joined: Fri Dec 16, 2011 8:20 pm

Re: Time seconds function - two decimals output

Post by F3K Total »

Code: Select all

Sub F_get_NOW as string
   oFunctionAccess = createUnoService("com.sun.star.sheet.FunctionAccess")
   dDateTime = oFunctionAccess.callFunction("NOW", Array())
   dTime = dDateTime - Int(dDateTime)	
   sTime = Format(dTime,"HH:MM:SS.00")
   msgbox ("Current Timestamp:" & CHR(13) & sTime,64,"Date Time -> seconds with two decimal places")
End Sub
  • MMove 1.0.6
  • Extension for easy, exact positioning of shapes, pictures, controls, frames ...
  • my current system
  • Windows 10 AOO, LOLinux Mint AOO, LO
User avatar
Ponny
Posts: 172
Joined: Sun Jun 21, 2009 7:34 pm
Location: Mystical Kingdom of Krakovo

Re: Time seconds function - two decimals output

Post by Ponny »

It works!

Thank you ;) :bravo:

Ponny
MS Windows 10: OpenOffice 4.1.13; LibreOffice 7.3.5.2
Post Reply