topic Re: Prefixing in Operating System - OpenVMS

Prefixing

Wim Van den Wyngaert — Wed, 22 Jun 2005 02:45:11 GMT

I now have in DCL :
$ say = "write sys$output"
$ say "hello"

I would like to have that before "hello" the time is written and this only by modifying the definition of say.

E.g.
say:== write sys$output """''f$cvt()' """ +

but here the time is put in the symbol at definition time and not at "execution of say time".

Wim

Re: Prefixing

Karl Rohwedder — Wed, 22 Jun 2005 02:50:38 GMT

You could define a symbol SAY with a CALL SUB
e.g.

$ say = "Call SAY "
$ say " test"
$ exit
$ say: subroutine
$ ws F$time()+P1
$ exit
$ endsubroutine

regards Kalle

Re: Prefixing

Wim Van den Wyngaert — Wed, 22 Jun 2005 03:02:46 GMT

Kalle,

I thought of that but
1) this is slower
2) then I'm limited to 1 parameter, or even 9
3) constructs with + and - and lexicals could no longer be used without modification

Wim

Re: Prefixing

Marc Van den Broeck — Wed, 22 Jun 2005 03:04:25 GMT

Wim,

try this:

a :== write sys$output f$time() + """ """ +

Rgds
Marc

Re: Prefixing

Wim Van den Wyngaert — Wed, 22 Jun 2005 03:25:38 GMT

Caught by my simplified use of DCL.
Thanks Marc.

Wim

Re: Prefixing

Willem Grooters — Wed, 22 Jun 2005 03:55:53 GMT

$ call a "whatever"
$ exit
$a: subroutine
$ write sys$output "''f$trnlnm("sys$node")'::''f$time ()' ''p1'"
$ return

Any text you can build up as a string. No "+" nor "-" ;)

Re: Prefixing

Ian Miller. — Wed, 22 Jun 2005 05:47:00 GMT

$ HELP SET PREFIX

$ SET PREFIX "(!5%T) "
?

Re: Prefixing

Karl Rohwedder — Wed, 22 Jun 2005 05:56:13 GMT

Pls. note that SET PREFIX needs verification turned ON.

regards Kalle

Re: Prefixing

Jeroen Hartgers_3 — Wed, 22 Jun 2005 08:37:15 GMT

try this one

say := write sys$output

say "''f$cvtime(,"absolute","hour")':''f$cvtime(,"absolute","minute")' hallo"

you get this
15:35 hallo

or

say "''f$cvtime(,"absolute","time")' hallo"

you get this

15:36:03.57 hallo

Re: Prefixing

Jeroen Hartgers_3 — Wed, 22 Jun 2005 08:42:41 GMT

this will work to

say = "write sys$output f$cvtime(,,"""time""")"

Re: Prefixing

Antoniov. — Wed, 22 Jun 2005 11:51:29 GMT

I simply use
say="write sys$output f$cvtime(),"" "","
You can truncate datetime like this
say="write sys$output -
f$extr(11,8,f$cvtime()),"" "","

e.g.
$ subject="It"
$ say subjetc," works!"
18:56:09 It works!

Antonio Vigliotti