Path: utzoo!attcan!uunet!husc6!mailrus!purdue!decwrl!ucbvax!CMS1.UCS.LEEDS.AC.UK!ORG5NMC From: ORG5NMC@CMS1.UCS.LEEDS.AC.UK Newsgroups: comp.os.vms Subject: (none) Message-ID: <8807051441.AA07288@ucbvax.Berkeley.EDU> Date: 3 Jul 88 14:36:11 GMT Sender: daemon@ucbvax.BERKELEY.EDU Organization: The Internet Lines: 47 Hello all, Can sombody tell me why the following little test program (and its cld) seems to behave for DEC but not for me? Compile the fortran prog below and set command test1.exe then try the following: $ tst1 $ tst1/date=today 3-JUL-1988 00:00:00.00 $ tst1/date=yesterday 2-JUL-1988 00:00:00.00 $ tst1/date TODAY ! Why is it being so nasty to me? $ write sys$output f$getsyi("version") V4.7 ! Our version Can sombody explain this to me? Has it got anything to do with TODAY being some kind of internal datetime keyword? When I looked at the cld to purge, accounting etc (with verb) they define the /since qualifier in just the same way that I did?!?! How do they get round the problem? Do they do the conversion from these keywords and combination times all over again? Does anybody know how to make it work the way I would like it to (always returns the converted time in a format that I can feed to SYS$BINTIM)? I can get round this problem in a few minutes in the program I am writing but I want the default in the cld. If I have missed the obvious feel free to call me nasty names. Thanks for listening to me and I hope you haven't all seen this loads of times before. Neill. P.S. I tried things like removing/adding quotes/spaces all over the place =================================test1.for=============================== program test1 c implicit none integer*4 datelen logical*4 cli$present character*30 date c if (cli$present ('date')) then call cli$get_value ('date', date, datelen) write (*,*) date (1:datelen) endif end =================================test1.cld=============================== define verb tst1 image sys$disk:[]test1.exe qualifier date value (default="TODAY",type=$datetime) =============================The End=====================================