SeeView Manual

SeeView Statements and Script Symbols
HP NonStop SeeView Manual—526355-004
9-160
String Intrinsics
One way you can use this intrinsic is to reassert the same shift production when
repainting the current window. For example:
#MENUTASKID
returns the taskid number of the window that invoked this script. You invoke a
script with Return, Shift-Return, or any of the function keys in the WINDOW
statement KEYS fkey-list.
You can use this intrinsic to:
•
Determine other attributes of the task by using a WITH #MENUTASKID
statement.
•
Redraw the window with a WINDOW #MENUTASKID statement.
•
Search the cache associated with a window by using a SEARCH
#MENUTASKID statement. For example:
#MENUTEXT
returns a string containing the line of text referenced by the cursor in the window
that invoked this script. You invoke a script with Return, Shift-Return, or any of the
function keys in the WINDOW
statement KEYS fkey-list. #MENUTEXT returns
only the text to the left of the production symbol and does not include the
production script to be executed if one is present.
WINDOW #MENUTASKID MENU #MENUPRODUCTION, #MENUPRODUCTION2
SIZE #MENUWIDHT,#MENUHEIGHT;
?PROC FindNext (#target)
PARM #target; {Find next #target occurrence in menu
VAR NextTargetLine; {line in cache if found
SEARCH #MENUTASKID CACHE #target STARTING #MENUCACHELINE
-> NextTargetLine;
IF NextTargetLine>=0 THEN
WINDOW #MENUTASKID MENU CACHE INDEX NextTargetLine NOFRAME;
ELSE
MSG "No more occurrences of " & #target;