Peter,
Program PSZIME0C initiates Mapics from browser (at R6, at least). We
have created a shell program around PSZIME0C that allows us to control
access to a Mapics environment from browser. The source looks something
like:
PGM PARM(&ENV &UNK &MSG &ID)
DCL VAR(&ENV) TYPE(*CHAR) LEN(2) /* Environment
DCL VAR(&UNK) TYPE(*CHAR) LEN(10) /* Unknown
DCL VAR(&MSG) TYPE(*CHAR) LEN(80) /* Message text
DCL VAR(&ID) TYPE(*CHAR) LEN(7) /* Message id
DCL VAR(&STS) TYPE(*CHAR) LEN(1) /* Environment available?
/* Get environment status */
CALL PGM(SOMEPGM) PARM(&ENV &STS)
/* If environment is unlocked then shell Mapics security
function */
IF COND(&STS *EQ 'Y') THEN(DO)
CALL PGM(PSZIME0C) PARM(&ENV &UNK &MSG &ID)
ENDDO
/* If environment is locked then send message to user and exit
*/
ELSE (DO)
CHGVAR VAR(&UNK) VALUE(' ')
CHGVAR VAR(&MSG) VALUE('Environment ' *CAT &ENV *CAT +
' is currently unavailable. Please try +
again later.')
CHGVAR VAR(&ID) VALUE('BIB0000')
ENDDO
ENDPGM
Phil
message: 2
date: Tue, 31 Jul 2007 14:15:36 -0400
from: Peter Vidal <Peter_Vidal@xxxxxxxx>
subject: [MAPICS-L] Locking the Browser
List:
How I "lock" the browser to be available for use? I want the user to
see that the environment is in dedicated mode and I do not want him to
have
any access at all. I know I found/read somewhere that there is a data
area that controls this for the browser. In other words, if there is a
value there (a program or something) the system is under a dedicated
mode.
Any ideas?
TIA
Peter Vidal
MAPICS IT Technical Support Team / SR System Analyst 10540 Ridge Rd.,
Ste 203, New Port Richey, FL 34654-5111
http://www.pall.com
"Learning is not compulsory... neither is survival."
W. Edwards Deming (1900-1993)
------------------------------------------------------------------------
--------
This email message and its content are confidential and may contain proprietary or privileged information. If you are not the intended recipient, please notify the sender immediately, and do not read, copy, disclose, distribute or use the information in any way. Any views expressed in this message are those of the individual sender, except where the message states otherwise. Barloworld Scientific Ltd. and its subsidiaries ("the company") does not accept responsibility for such views and opinions and this message should not be read as representing the views and opinions of the company. No liability shall attach to the company, except where the message states otherwise and the sender is authorised to make such a statement.
This e-mail has been swept for the presence of computer viruses, but no warranty is given that this e-mail and any attachments are virus free. You should undertake your own virus checking. The right to monitor e-mail communications through our networks is reserved by us.
Registered office: Barloworld Scientific Ltd., Statesman House, Stafferton Way, Maidenhead, Berkshire, SL6 1AD. Registered in England & Wales no. 1631004
midrange.com
