How to SELECT for Value Mark Characters in TCL?

Question

I am doing a SELECT in TCL for UniVerse. I want to see if there are any value marks in a given field. Is there way to represent a value mark character in my TCL SELECT?

I know there are reserved variables in PICK, such as value mark @VM, representing the ASCII 253 character.

I have something like this already:

SELECT SOMEFILE WITH DICT7 = "[SUBSTRING]"

I want something like this using the appropriate reserved word for value marks:

SELECT SOMEFILE WITH DICT7 = "[@VM]"

Answer 1

If you just want to test a Field to see if contains any Value Marks, you can do this.

SELECT SOMEFILE WITH EVAL "COUNT(DICT7,@VM)" GT 0