Thanks Ray,

That did the trick!

Actually I combined your idea with one from Francois (adding a default
to the prompt) and this works well.

Thank everyone!

Larry 

-----Original Message-----
From: Ray Shahan [mailto:[log in to unmask]] 
Sent: Thursday, March 01, 2007 11:17 AM
To: Larry Barnes; [log in to unmask]
Subject: RE: [HP3000-L] MPEX prompt question

I usually preload the string with a value:  SETVAR My_String "ENTERKEY".

Than after the prompt, I just check if My_String is still "ENTERKEY",
and if TRUE, then I know the user didn't enter any data.  




Life is not a journey to the grave with the intention of arriving safely
in a pretty and well preserved body, but rather to skid in broadside,
thoroughly used up, totally worn out, and loudly proclaiming: 
-- WOW!!! What a Ride

Raymond Shahan
Computer Programmer
 REPUBLIC TITLE OF TEXAS, INC.
  2701 W Plano Parkway
Plano, TX 75075
 

direct 214.556.0202
main 972.578.8611
fax 972.424.5621
 www.republictitle.com
[log in to unmask]
 

-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On
Behalf Of Larry Barnes
Sent: Thursday, March 01, 2007 12:39 PM
To: [log in to unmask]
Subject: [HP3000-L] MPEX prompt question

Below is a standard prompt which also does some checking on the value
input.  I'm trying to figure out a way to use this command and also have
it check if the user just presses the enter-key (which is a valid
option).  I can't figure out how to do this.  Anyone out there have a
suggestion?  It works for any of the 4 values in the POS statement with
the exception of a blank (pressing the enter-key) with nothing else
entered.

I would greatly appreciate any help; and thanks in advance.

Larry B.


 %prompt string _tapec = "Enter Cycle type: (PART, FULL, MEND, or AVAL):
" ;&
   check = pos(ups(_tapec),'PART FULL MEND AVAL ') > 0 ;&
   checkerror = Invalid tape cycle name; try again or <ctrl-y> to exit "

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *