(go to: table of contents, index, list of vms_sys, prev: CRELNM, next: CREPRC)
Format:
CRELNT - Create Logical Name Table
Creates a process-private or shareable logical name table.
17-OCT-1998 ZE.
status, resnam = vms_sys.crelnt ([attr] ,[quota] \
,[promsk] ,[tabnam] ,partab ,[acmode])
Returns:
Arguments:
All other condition codes result in a Python exception.
Examples:
>>> import vms_sys
>>> import vms_lnmdef
-- need to create non-shared logical name tables in supervisor mode
because a user mode table is deleted after image rundown
$ set PROCESS /PRIVILEGE= SYSNAM
>>> PSL_C_SUPER = 2
>>> status, resnam = vms_sys.crelnt (vms_lnmdef.LNM_M_CONFINE, \
... 123, None, 'NEW_TABLE', 'LNM$PROCESS_DIRECTORY', \
... PSL_C_SUPER)
>>> status, resnam
(1713, 'NEW_TABLE')
>>>
>>> vms_sys.getmsg (status)[0]
'%SYSTEM-S-LNMCREATED, logical name table did not exist; has been created'
>>>
>>> import sys
>>> sys.exit(1) # image rundown
$ write sys$output f$message(65537)
%RMS-S-NORMAL, normal successful completion
$ show logical N* /table=LNM$PROCESS_DIRECTORY /full
(LNM$PROCESS_DIRECTORY) [kernel] [directory]
[no protection information]
"NEW_TABLE" [super,confine,table] = "" [terminal]
$ show logical /table=NEW_TABLE /full
(NEW_TABLE) [super] [Quota=(123,123)]
[no protection information]
%SHOW-S-NOTRAN, no translation for logical name *
$
----------------------------------------
-- create a shareable logical name table
$ set PROCESS /PRIVILEGE= SYSNAM
>>> PSL_C_EXEC = 1
>>> status, resnam = vms_sys.crelnt (vms_lnmdef.LNM_M_NO_ALIAS, \
... 123, None, 'NEW_TABLE_S', 'LNM$SYSTEM_DIRECTORY', \
... PSL_C_EXEC)
>>> status, resnam
(1713, 'NEW_TABLE_S')
>>>
>>> vms_sys.getmsg (status)[0]
'%SYSTEM-S-LNMCREATED, logical name table did not exist; has been created'
>>>
>>> import sys
>>> sys.exit(1) # image rundown
$ write sys$output f$message(65537)
%RMS-S-NORMAL, normal successful completion
$ show logical N* /table=LNM$SYSTEM_DIRECTORY /full
(LNM$SYSTEM_DIRECTORY) [kernel] [shareable,directory]
[Protection=(RWC,RWC,R,R)] [Owner=[G1,SYSTEM]]
"NEW_TABLE_S" [exec,no_alias,table] = "" [terminal]
$ show logical /table=NEW_TABLE_S /full
(NEW_TABLE_S) [exec] [shareable] [Quota=(123,123)]
[Protection=(RW,RW,R,R)] [Owner=[HOME,ZESSIN]]
%SHOW-S-NOTRAN, no translation for logical name *
$
----------------------------------------
@@ more examples for CRELNT
(go to: table of contents,
index,
list of vms_sys,
prev: CRELNM,
next: CREPRC)