Re: OPNQRYF problem

["Jessie Supe" <jasupe@xxxxxxxxxxx>]

In the OVRDBF try using SECURE(*YES) OVRSCOPE(*JOB) and OPNSCOPE(*JOB)








----Original Message Follows----
From: Gerald.2.Lewis@gsk.com
Reply-To: bpcs-l@midrange.com
To: bpcs-l@midrange.com
Subject: OPNQRYF problem
Date: Thu, 14 Nov 2002 11:50:06 +0000
MIME-Version: 1.0
Received: from linux.midrange.com ([207.224.38.113]) by
mc7-f10.law1.hotmail.com with Microsoft SMTPSVC(5.0.2195.5600); Thu, 14 Nov
2002 04:24:44 -0800
Received: from linux.midrange.com (localhost [127.0.0.1])by
linux.midrange.com (8.11.6/8.11.6) with ESMTP id gAECNii27625;Thu, 14 Nov
2002 06:23:44 -0600
Received: from gate1.ggr.co.uk (gate1.ggr.co.uk [193.128.25.13])by
linux.midrange.com (8.11.6/8.11.6) with ESMTP id gAECLZV27248for
<bpcs-l@midrange.com>; Thu, 14 Nov 2002 06:21:36 -0600
Received: (uucp@localhost) by gate1.ggr.co.uk; Thu, 14 Nov 2002 12:21:07 GMT
Received: from uk-stv-mhub4.ggr.co.uk(147.184.2.4) by gb-stv-fw3.ggr.co.uk
via smap (V5.5)id xma027726; Thu, 14 Nov 02 12:20:01 GMT
Received: from gbgms02.sb.com ([166.71.155.102]) by mailhub2.ggr.co.uk; Thu,
14 Nov 2002 12:20:24 GMT
Received: from SBHSNSM1.sb.com (sbhsnsm1 [166.71.155.16])by sb.com (8.8.6
(PHNE_17135)/8.8.6) with ESMTP id MAA23617for <bpcs-l@midrange.com>; Thu, 14
Nov 2002 12:04:10 GMT
X-Mailer: Lotus Notes Release 5.0.6a  January 17, 2001
Message-ID: <OFA9E075A8.51EE6B55-ON80256C71.004020D9@sb.com>
X-MIMETrack: Serialize by Router on SBHSNSM1/SERVERS/SB_PLC(Release 5.0.6a
|January 17, 2001) at 14/11/2002 12:20:23
X-MailScanner: Found to be clean
Sender: bpcs-l-admin@midrange.com
Errors-To: bpcs-l-admin@midrange.com
X-BeenThere: bpcs-l@midrange.com
X-Mailman-Version: 2.0.13
Precedence: bulk
List-Unsubscribe:
<http://lists.midrange.com/cgi-bin/listinfo/bpcs-l>,<mailto:bpcs-l-request@midrange.com?subject=unsubscribe>
List-Id: SSA's BPCS ERP System <bpcs-l.midrange.com>
List-Post: <mailto:bpcs-l@midrange.com>
List-Help: <mailto:bpcs-l-request@midrange.com?subject=help>
List-Subscribe:
<http://lists.midrange.com/cgi-bin/listinfo/bpcs-l>,<mailto:bpcs-l-request@midrange.com?subject=subscribe>
List-Archive: <http://archive.midrange.com/bpcs-l/>
Return-Path: bpcs-l-admin@midrange.com
X-OriginalArrivalTime: 14 Nov 2002 12:24:44.0210 (UTC)
FILETIME=[D0349920:01C28BD8]

We have a requirement to restrict users to BPCS data by facility (even to
view the data). This level of security is available in a number of programs
(by using authorised Warehouse security, set up in SYS600) but not all of
them.

We are attempting to use OPNQRYF to override files before calling BPCS
programs, e.g. override FSO and FSO logicals with a selection on Facility,
before calling SFC500D1. In principle it sounds easy but after trying it
out, doing analysis and reading IBM Infocenter documentation I can not get
to the bottom of the problem, of why the file opened by OPNQRYF is not
shared for SQL selection, Query and DSPPFM.

Below a CL program to illustrate the problem. The program sets up an
OPNQRYF to only select records from file IIM where ICLAS = '61'. The
program then calls  2 programs to print the contents of IIM, before and
after the OPNQRYF command:

   CALL OPNQRYFR  (ILE RPG program which prints the IIM file)
   CALL OPNQRYFR2 (SQLPRGLE program which DECLARE a cursor for selection
   from IIM, and then prints all records found)

   OVRDBF     FILE(IIM) SHARE(*YES)
   OPNQRYF    FILE((IIM)) OPTION(*ALL) QRYSLT('ICLAS = "61"')

   CALL OPNQRYFR
   CALL OPNQRYFR2

   CLOF       OPNID(IIM)
   DLTOVR     FILE(IIM)


   Before the overwrite database file and open query file CL commands are
   executed , both OPNQRYFR and OPNQRYFR2 prints all the IIM records.

   After the overwrite database file and open query file CL commands are
   executed , OPNQRYFR only prints records with ICLAS = '61', while
   OPNQRYFR2 prints all the IIM records.


Also, when OPNQRYF is used from the command line (i.e. not within a CLP),
the query command 'RUNQRY *N IIM' and 'DSPPFM IIM' do not take the OPNQRYF
selection into consideration (does not use the ODP for the FSO file opened
by OPNQRYF?).

Please help!

Regards


Gerald Lewis

_______________________________________________
This is the SSA's BPCS ERP System (BPCS-L) mailing list
To post a message email: BPCS-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/bpcs-l
or email: BPCS-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/bpcs-l.


_________________________________________________________________
The new MSN 8: advanced junk mail protection and 2 months FREE*
http://join.msn.com/?page=features/junkmail