SeeView Manual

SeeView Language Elements
HP NonStop SeeView Manual—526355-004
5-30
Invisible Fields
Invisible Fields
The BLANK field attribute defines invisible, or blank, input-output fields.
Example 5-14 shows a program that uses the BLANK field attribute to suppress the
display of data entered into the Password field of a logon screen.
When the program in Example 5-14 is invoked:
•
?MENU LogonScreen declares the definition of the logon screen. The logon
screen uses field attribute productions to declare the field attributes of each of the
fields that will appear in the logon screen.
You can use a field attribute production (::) and a script production (<==) on the
same cache line. For example, in the line defining the Group and User fields, the
Example 5-14. Example of Defining a Blank or Invisible Input Field
?MENU LogonScreen
{-----------------}
Group [ ] User[ ] :: (u) (u) <== CURSOR #fkeyline+1;
Password[ ] :: (r blank) <== CALL logon;
*
?MENU ValidUsers
{---------------}
Operator.Bob,passwd
Operator.Mike,smile
Operator.Carole,yosemite
?PROC Logon
{----------}
{ Accept group, user, password. NOTE script is modeless
{------------------------------------------------------}
VAR #group, { will contain group name
#user, { will contain user name
#password, { will contain password
ok; { true indicates logon ok
LINE #menuline,#menucol;
ACCEPT #Group, #User, #Password;
SEARCH validUsers -> ok { Search for group.user
CACHE #group &"."& #user &","& #password;
IF ok<0 THEN BEGIN
MSG(R) "Invalid logon. Please try again.";
RETURN;
END;
MSG #user &" logged on.";{ Logged on.
SECURE ENABLE *;
BELOW;
OPEN TACL; { Open tacl window.
?SECT Main
{---------}
SECURE F1 F2 SF1 SF2;
PAGE 1; CLEARW;
WINDOW LogonScreen MENU FIELDS
CACHE FIRST UNTIL "*" SIZE 40
HEAD "Please Logon";