HP3000-L Archives

August 2005, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Larry Barnes <[log in to unmask]>
Reply To:
Larry Barnes <[log in to unmask]>
Date:
Mon, 15 Aug 2005 08:07:24 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (107 lines)
I would issue Streamx <filename> and then the cursor would hang.

Upon further investigation I remembered I had another menu that allowed
Streamx and it was working fine.  I discovered that I was mixing single
and double quotes within the menu and that was causing confusion.

Here's what works:

*setvar row !row + 1
*SETVAR Bad_Cmds "SUPR DBUT MPEX RUN XEQ "

*CAPTIONL {TERMPOS({row},3)}!MENUOPTION. MPE/ix Command
 echo
 echo MPE/ix Command
 echo
 echo
  setvar cmd_loop true
  while cmd_loop
  errclear
  prompt string cmd = "Enter Command or (// to exit) :";default="//"
  setvar cmd "!cmd"
  echo
  if '!cmd' <> '//'
   if pos(lft(ups('!cmd'),4),"!bad_cmds") > 4
    echo Invalid Command
    echo
    prompt string ex = "Press <enter> when finished "
   else
    errclear
    continue
    !cmd
    echo
    if bound(menu_cont) or cierror <> 0
     if cierror <> 0
       prompt string ex = "Press <enter> when finished "
       errclear
     elseif menu_cont
       prompt string ex = "Press <enter> when finished "
       setvar menu_cont false
     endif
    endif
   endif
   echo
   echo MPE/ix Command
   echo
   echo
  else
   setvar cmd_loop false
  endif
 endwhile
*ENDIF 

Thanks for the quick replies!

Larry B.







NNNN


> -----Original Message-----
> From: HP-3000 Systems Discussion
> [mailto:[log in to unmask]] On Behalf Of Larry Barnes
> Sent: Monday, August 15, 2005 10:37 AM
> To: [log in to unmask]
> Subject: [HP3000-L] Vesoft Menu & Streamx Issue
> 
> 
> I have created menus for different logon groups and one of these 
> groups needs to be able to use STREAMX.  When I attempt to issue the 
> Streamx command the cursor just hangs and I have to issue a <ctrl-y> 
> to continue.  This exits the streamx command and returns me to my 
> menus. Is anyone out there using streamx inside a menu?  If so, any 
> pointers on how you accomplished this would be appreciated.
> 
> 
> Thanks,
> 
> Larry A. Barnes 
> Systems Administrator - HP3000 
> 
> Coldwater Creek
> 751 W. Hanley Ave. 
> Coeur d'Alene, ID  83815-3213 
> 
> 
> Shop today at Coldwater Creek http://www.coldwatercreek.com
> 
> The information contained in this e-mail message may be 
> privileged, confidential and protected from disclosure. 
> If you are not the intended recipient, any dissemination, 
> distribution or copying is strictly prohibited. 
> If you think you received this e-mail message in error, 
> please reply to this email.
> 
> * 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 *

ATOM RSS1 RSS2