topic Use which lexical? in Operating System - OpenVMS

Use which lexical?

Davor_7 — Wed, 11 Jan 2006 06:18:02 GMT

now, i can assign a symbol as below:
$ sh sym syma
SYMA = " keyword: 57"

i want the number "57"(this length will be changed, sometimes 57(2-bits), or 102(3-bit))
but i can not think out a way to get it through f$element or f$extract...
do you have any idea ?

Re: Use which lexical?

Ian Miller. — Wed, 11 Jan 2006 06:30:25 GMT

This gets the value of the number
x=F$NUMBER(f$element(1,":",syma))

Re: Use which lexical?

John Abbott_2 — Wed, 11 Jan 2006 06:40:14 GMT

I think Ian means F$INTEGER & not F$NUMBER.

Re: Use which lexical?

Kris Clippeleyr — Wed, 11 Jan 2006 06:40:15 GMT

Hi,

Assuming the symbol definition only varies after the colon (:),
you have two (2) possibilities:
1. x = f$integer(f$element(1,":",syma))
2. x = f$integer(f$extract(10,f$length(syma),syma))

Regards,
Kris (aka Qkcl)

Re: Use which lexical?

Jan van den Ende — Wed, 11 Jan 2006 06:40:27 GMT

Davor,

well, use Ian's answer, but F$NUMBER should be replaced by F$INTEGER.

-- and most of the time, you do not need the explicit F$INTEGER at all.
If you need the number without leading zeroes, just use the symbol name. If used in numeric calculations, the value is automagically converted.

Proost.

Have one on me.

jpe

Re: Use which lexical?

Ian Miller. — Wed, 11 Jan 2006 06:55:17 GMT

yes

x=F$integer(f$element(1,":",syma))

It should be - this is what you get from not copying directly from the terminal window :-)

Re: Use which lexical?

Hein van den Heuvel — Wed, 11 Jan 2006 07:55:20 GMT

F$ELEM is the way to go normally.

There is one more technique that is often overlooked (unknown) which can give you the answer quickly: String subtraction!

If you know the exact string for " keyword", let's say "TEST", then the solution can be:

$ syma = " TEST:57"
$ number = syma - " TEST:"
$ show symb number
NUMBER = "57"
$ write sys$output f$type(number)
INTEGER
$ other_number = syma - "TEST" - ":"
$ show symb other_number
OTHER_NUMBER = " 57"
$ write sys$output f$type(other_number)
INTEGER
$

Note also how you do not need to strips spaces or do an explicit integer convert.

fwiw,

Hein.

Re: Use which lexical?

Davor_7 — Wed, 11 Jan 2006 19:15:00 GMT

thanks all
i think the lexical function is very great :)

Re: Use which lexical?

Davor_7 — Wed, 11 Jan 2006 19:15:13 GMT

close it :p