Re[4]: LOCKWORD Phenom (long)
ersevilla@mail.hac.com
ersevilla@mail.hac.com
Tue, 07 Apr 1998 16:29 -0700 (PDT)
Bob Deskin wrote (after John Pickering from Leonard Berkowitz's original query):
>If you're talking about the QSHOW report, then DB would be the account and
>DB45 the group. The lockword would show up as John said if at all (I can't
>remember if you have to say SET SECURITY to see it). But even if DB is not
>an account, you can still open that name if there's a file equation pointing
>at the correct location, i.e.
>
>FILE MENR001B.DB45.DB=MENR001B.other.other
I have to disagree with Bob here - this "phenomenon" is one of the minor
irritations that exist in Powerhouse.
The original question from Leonard was:
> On the HP3000, PH 7.09
>
> A show file reports:
>
> File: MONTH-REGHIST
> Organization: DIRECT
> Type: MPEF (ASCII)
> Open: MENR001B.DB45.DB
> Capacity: 600000 Records
> Create Status: Create
>
> Note that "DB45" is the lockword specification (or is it?). The group is
> DB.
>
> If I run QUTIL to create this file, it is created with a different
> lockword.
>
> What is going on here that I do not see?
QShow is attempting to hide the lockword for a group-qualified "OPEN" file by
printing the group name over the lockword part of the "OPEN" - so in this case
the group name is DB...and there is a four-character lockword that ends with
"45". So QUtil will create MENR001B/??45.DB (with no account qualification).
If you want to file equate you would use
:FILE MENR001B.DB=whatever.whatever.whatever
(Of course, you can't use QUtil to create a group-qualified file if you aren't
in the particular group, no matter how you've file-equated...you'll get:
*W* Can't create or delete files on-line in other groups or accounts.)
For those of you still interested, here's a little test dictionary I put
together to provide evidence (we're on an HP3000 with PH 7.29C3):
;------------------------------------------------------
; Globals
;------------------------------------------------------
create dictionary phdtest &
preloaded
system options &
title "Lockword Example" &
century included &
character set english &
date separator "/" &
special name characters "-_'%#$/" &
sysmonths "JanFebMarAprMayJunJulAugSepOctNovDec" &
release 1 &
version 0 &
show &
default entry and find in consistency &
default select in concurrency &
default transaction model concurrency &
shift upshift
;------------------------------------------------------
; Usages
;------------------------------------------------------
usage filler &
character size 1 &
datatype character size 1
usage filler-numeric &
numeric size 1 &
significance 1 &
datatype integer signed size 2
;------------------------------------------------------
; Elements
;------------------------------------------------------
element flat-72 &
character size 72 &
heading 'Data' &
label 'Data:' &
datatype character size 72
;------------------------------------------------------
; Files|Records
;------------------------------------------------------
file file-one-a &
organization direct &
open fileonea
record file-one-a
item flat-72 datatype character size 72
file file-one-b &
organization direct &
open fileoneb.group
record file-one-b
item flat-72 datatype character size 72
file file-one-c &
organization direct &
open fileonec/lockword
record file-one-c
item flat-72 datatype character size 72
file file-one-d &
organization direct &
open fileoned/lockword.group
record file-one-d
item flat-72 datatype character size 72
;--------------------------------------------
load
And here's the compressed QShow results:
---------------------------------------------------------------------------
File: FILE-ONE-A
Organization: DIRECT
Type: MPEF (ASCII)
Open: FILEONEA
Create Status: Create
Records & Sizes: FILE-ONE-A 72 bytes
---------------------------------------------------------------------------
File: FILE-ONE-B
Organization: DIRECT
Type: MPEF (ASCII)
Open: FILEONEB.GROUP
Create Status: Create
Records & Sizes: FILE-ONE-B 72 bytes
---------------------------------------------------------------------------
File: FILE-ONE-C
Organization: DIRECT
Type: MPEF (ASCII)
Open: FILEONEC
Create Status: Create
Records & Sizes: FILE-ONE-C 72 bytes
---------------------------------------------------------------------------
File: FILE-ONE-D
Organization: DIRECT
Type: MPEF (ASCII)
Open: FILEONED.GROUPORD.GROUP
Create Status: Create
Records & Sizes: FILE-ONE-D 72 bytes
---------------------------------------------------------------------------
So for FILE-ONE-C, which has a lockword as part of the "OPEN", QShow happily
deletes the lockword when displaying the file. But for FILE-ONE-D, which has a
lockword and a group qualification, QShow attempts to be cover up the lockword
with the group name.....I guess the display process chokes on the dot (".")
between the lockword and the group name. (SET SECURITY isn't necessary to get
these results).
Peace.
Kelly
Exequiel R. Sevilla III (aka Kelly)
Raytheon Systems Company
8614 Westwood Center Drive, Suite 950
Vienna, VA 22182
-----------------------------------------
703/918-6916 (voice) 703/918-6945 (fax)
-----------------------------------------
e-mail: ersevilla@mail.hac.com
-----------------------------------------
"If we can not find a way, we will make a
way." --- Gary Barnett
-----------------------------------------
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
This list is closed, thus to post to the list, you must be a subscriber.