Description: When convertiong a date literal, such as #25-12-1995#, CInt() function throws an exception. This applies to Basic and VBA modes Steps to Reproduce: 1. Run the sample codes from the attached document Actual Results: Basic Error # is raised Expected Results: Date literals should be converted/truncated to Integers without problem. Reproducible: Always User Profile Reset: No Additional Info: Exception is circumvented when removing the trailing dash '#' in date literals.
Hi Alain, I think you forgot to attach a sample document 😊
Ignore above comments and consider the following Basic routine: Sub Date2Integer() Const DAY_ONE = #1899-12-30# ' = 1 MAX_DATE = DateAdd("d", DAY_ONE, 2^15-2) ' #1989-09-16# Print CInt(#1989-09-16) , CInt(#09/16/1989) , MAX_DATE ' 1964 , 0 , #1989-09-16# Print CInt(#1989-09-16#), CInt(#09/16/1989#) ' 32767 , 32767 Print CLng(#1989-09-16) , CLng(#09/16/1989) , MAX_DATE ' 1964 , 0 , #1989-09-16# End Sub - Erroneous date literals should raise Error #5 at runtime OR BETTER - Be trapped at compile time When provided with valid date literals CInt() returns a valid 1-32667 number, otherwise raises an overflow when dates are above MAX_DATE. Note: DateAdd() intercepts such invalid date syntax with Error #5
I get a warning dialog with 1964 0 15.09.1989 Setting to NEW. Arch Linux 64-bit Version: 7.5.0.0.alpha1+ (X86_64) / LibreOffice Community Build ID: 705b2924a14841883b4a8cac549f7af326d7a185 CPU threads: 8; OS: Linux 6.0; UI render: default; VCL: kf5 (cairo+xcb) Locale: fi-FI (fi_FI.UTF-8); UI: en-US Calc: threaded Jumbo Built on 8 December 2022
Dear Alain Romedenne, To make sure we're focusing on the bugs that affect our users today, LibreOffice QA is asking bug reporters and confirmers to retest open, confirmed bugs which have not been touched for over a year. There have been thousands of bug fixes and commits since anyone checked on this bug report. During that time, it's possible that the bug has been fixed, or the details of the problem have changed. We'd really appreciate your help in getting confirmation that the bug is still present. If you have time, please do the following: Test to see if the bug is still present with the latest version of LibreOffice from https://www.libreoffice.org/download/ If the bug is present, please leave a comment that includes the information from Help - About LibreOffice. If the bug is NOT present, please set the bug's Status field to RESOLVED-WORKSFORME and leave a comment that includes the information from Help - About LibreOffice. Please DO NOT Update the version field Reply via email (please reply directly on the bug tracker) Set the bug's Status field to RESOLVED - FIXED (this status has a particular meaning that is not appropriate in this case) If you want to do more to help you can test to see if your issue is a REGRESSION. To do so: 1. Download and install oldest version of LibreOffice (usually 3.3 unless your bug pertains to a feature added after 3.3) from https://downloadarchive.documentfoundation.org/libreoffice/old/ 2. Test your bug 3. Leave a comment with your results. 4a. If the bug was present with 3.3 - set version to 'inherited from OOo'; 4b. If the bug was not present in 3.3 - add 'regression' to keyword Feel free to come ask questions or to say hello in our QA chat: https://web.libera.chat/?settings=#libreoffice-qa Thank you for helping us make LibreOffice even better for everyone! Warm Regards, QA Team MassPing-UntouchedBug