Re: [Tiny-cobol-users] Functions

[David E. <de...@us...>]

John Culleton wrote:

 > David Essex wrote:
 >
 >> John Culleton wrote:
 >>> In recent versions of COBOL the functions INTEGER-OF-DATE,
 >>> INTEGER-OF-DAY, DATE-OF-INTEGER and DAY-OF INTEGER
 >>> have apparently been added.
 >>> ...
 >>> Are they in Tiny?
 >> ...
 >> Yes, these functions are available for TC.
 >> See example in 'test.code/t35' directory.
 >
 > Very good. However someone on the internet has suggested
 > code the includes the line:
 >
 > move function current-date (1:8) to today
 >
 > which line blows up on the colon.
 > I assume that the purpose is to edit the string to the first
 > 8 digits, e.g,  ccyymmdd.

Yes, it's called 'reference modification'.

 > Both Tiny and Open blow up on the colon.

TC does not currently support 'reference modification' when used in
conjuction with 'intrinsic functions'.

 > I can work around it, but is there any similar editing of
 > function current-date in either?

A simple work around would be as follows.

move function current-date to today-1
move today-1 (1:8) to today

Cheers.