Ron Burnett wrote:
>
> A relatively simple question that even I can answer at this hour of the
> morning!
>
> Try
>
>                 define new-bodatex char * 6 = ascii(new-bodate)

For today's date, this would result in '926   '. It needs to be
ASCII(new-bodate,6)

>
> and then output the new-bodatex variable to your subfile.
>
> The reason you're getting the separating /'s is because your dictionary
> specifies that character as the date separator and it gets used for
> all occurrences of variables of the type 'date'.
>
> If you need to preserve the variables 'date' type, maybe you can
> use something like
>
> > DEF NEW-BODATE DATE FORMAT YYMMDD noseparator = &
> >   DATE(DAYS(BODATE) + 6) IF BODATE <> 0 ELSE 0
>
> Now, shouldn't you have a century included at this late date in the
> 21st century?
>
> Cheers,
> Ron Burnett
> [log in to unmask]