Vernon,

remember that in old days SQL was a paid feature of the OS many small entry
boxes didn't have,
they may even not have compilers and PDM and absolutly not SWMA.

On Fri, Dec 22, 2017 at 2:02 PM, Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx>
wrote:

Henrik

Another way to get more precision with timestamps in RPG is to use SQL
functions. I find this approach to be quite easy, as well as the QC2LE
functions.

Cheers
Vern


On 12/22/2017 2:45 AM, Henrik Rützou wrote:

Barbara,

you are of course right and therefore some of us has been packed the QC2LE
time and system API's into a general procedure to
make a more precise timestamp with all the 6 decimals.

On Fri, Dec 22, 2017 at 12:31 AM, Barbara Morris <bmorris@xxxxxxxxxx>
wrote:

On 2017-12-21 10:14 AM, Vernon Hamberg wrote:

In 7.3 it is possible to specify the number of fractional seconds, as IBM
calls it, in a TIMESTAMP data type in RPG. It can go out to 12 decimal
positions. Default is 6.

I'm not on 7.3 yet, so I haven't tested it. But this down to
picoseconds.


But be aware that RPG's %TIMESTAMP and INZ(*SYS) still only set the
timestamp to millisecond accuracy as they always have. With the default
of
6 fractional seconds, you get '000' at the end of a timestamp set by RPG.
With 12 fractional seconds, you get '000000000' at the end.

There's an RFE for RPG to give microsecond accuracy.
http://www.ibm.com/developerworks/rfe/execute?use_case=
viewRfe&CR_ID=99252

--
Barbara


--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD




--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD





As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.