HP3000-L Archives

February 1995, Week 4

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:
Richard Gambrell <[log in to unmask]>
Reply To:
Richard Gambrell <[log in to unmask]>
Date:
Mon, 27 Feb 1995 11:26:07 -0600
Content-Type:
text/plain
Parts/Attachments:
text/plain (94 lines)
I'm forwarding this from the powerhouse list. I'm sure someone
from this list could help Malcolm.
 
According to Malcolm Wolski:
> From <@UNBVM1.CSD.UNB.CA:[log in to unmask]> Mon Feb 27 07:01 CST 1995
> X-Ph: V4.2.1@hermes
> Encoding: 70 TEXT
> X-Mailer: Microsoft Mail V3.0
> Message-Id:  <2F525B2D@pcnet>
> Date:         Mon, 27 Feb 1995 15:09:00 PST
> Reply-To: Discussion list for the PowerHouse Software <[log in to unmask]>
> Sender: Discussion list for the PowerHouse Software <[log in to unmask]>
> From: Malcolm Wolski <[log in to unmask]>
> Subject:      Re: disabling ctrl-Y
> To: Multiple recipients of list POWERH-L <[log in to unmask]>
>
> We are having problems with disabling ctrl y.  We put a query out earlier
> (see below):
>
> The current problem is:
> Running a Cobol program from the menu system.  The user enters ctrl y, but
> the user break is not armed for that cobol program so it ignores it.  When
> the Cobol program returns to the Quick screen, it still has the ctrl y and
> so picks up a user break.  We want to totally disable the ctrl y in the
> Quick screen, as it loses all data on the screen which uses fieldmarking &
> actionbar ( no action field to return to, so the users have to exit).  Our
> systems manager tells me that on MPE, the default is no user break, ie ctrl
> y disabled.  Quick must enable it.  How can we stop this?????  The
> noosaccess on the Quick command does not stop it.
>
> We note Nigel's response (see below) but still don't know how to do it.  Our
> Systems manager tells us this is one way to go but we don't know how to code
> it (eg do external fopen and fcontrol).  Any suggestions welcome.
>
>
> >] PH 7.29 MPE xl/ix v4.0
> >]
> >] We are trying to set up a standard menu structure for users to control
> >] access to programs.  In which case we want to do away with numerous
> >] dictionary classifications and control all program access via the menu
> >] rather than from within the program code.  Note that we intend to keep
> basic
> >] database security classifications.
> >]
> >] Unfortunately we have not worked out a way to disable the ctrl-Y
> capability
> >] in quiz (we run off quiz source not compiled) which would allow users to
> >] execute commands from within Quiz.
> >]
> >] Does anyone know of  a method to disable ctrl-Y in Quiz?  Does PowerHouse
> >] support the calling of MPE intrinsics?  If so, how?  Any other methods of
> >] achieving this?
> >]
> >
> >My MPE programming is getting rusty but you can 'intercept' routines
> >either by a) writing your own fopen etc instrinsic which is referenced
> >in an sl that Quiz picks up and it in turn does some fiddling with
> >whatever it wants before calling the real fwhatever b) use the
> >features of the AIF which I believe allows you to define routines
> >called before and after a procedure exit.
> >
> >If I get a chance I'll dig up a manual and show you how. Tools like
> >MPEX, QEDIT etc come with examples on how you can extend a program.
> >Rather than stopping control-y, you might want to intercept the
> >terminal reads and limit what commands they (i.e. by user etc
> >) are then allowed to do.
> >
> >
> >--
> >Nigel Campbell             Voice: (613) 738-1338 ext 3016    P.O. Box 9707
> >Client/Server Product Mgr    FAX: (613) 738-0002             3755 Riverside
> >Dr.
> >Cognos Incorporated          MCI: nigel campbell || 3074729  Ottawa,
> Ontario
> >UUnet: [log in to unmask]                                     CANADA  K1G
> 3Z4
> >
>  ----------------------------------------------------
> 'Opinions expressed are my own'
>
> Malcolm Wolski                [log in to unmask]
> Information Technology Services
> University of Southern Queensland
> Toowoomba                     Phone: +61 76 312482
> Queensland  4350 Australia    Fax:   +61 76 312798
>
 
 
--
-- - - - Speaking for myself and not necessarily anybody else - - - - - -
Richard Gambrell        | Internet: [log in to unmask]
Mgr. Tech. Services     | POT:      504-483-7454     FAX: 504-482-1561
Xavier University of LA | Smail:    7325 Palmetto, New Orleans, LA 70125

ATOM RSS1 RSS2