Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Pointed To By FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^ENG("LK"

Package: Engineering

Global: ^ENG("LK"


Information

FileMan FileNo FileMan Filename Package
6927 LOCKS Engineering

Description

Directly Accessed By Routines, Total: 3

Package Total Routines
Engineering 3 ENSP2    ^ENG("LK"    ^OFM(7336.9    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
Engineering 2 EMPLOYEE(KEYS)(#6926)[#6926.01(.01)]    ENG SPACE(#6928)[2]    

Fields, Total: 6

Field # Name Loc Type Details
.01 KEY 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1)!'(X?1AN.ANP) X
  • LAST EDITED:  JUL 07, 1999
  • HELP-PROMPT:  Answer must be 1-20 characters in length and not start with punctuation.
  • DESCRIPTION:  
    Unique identification symbol as it appears on key itself.
  • DELETE TEST:  1,0)= I $D(^ENG("KEY","K",DA)) D EN^DDIOL("This key can't be deleted since it is still issued to employee(s).") I 1
  • CROSS-REFERENCE:  6927^B
    1)= S ^ENG("LK","B",$E(X,1,30),DA)=""
    2)= K ^ENG("LK","B",$E(X,1,30),DA)
.5 CTRL KEY 4;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1)!'(X?.ANP) X
  • LAST EDITED:  AUG 16, 1999
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
  • DESCRIPTION:  
    Use this field for control key or keyway information.
1 GGM 0;2 SET
  • 'Y' FOR KEYED TO GGM;
  • 'N' FOR NOT KEYED TO GGM;

  • LAST EDITED:  SEP 14, 1985
  • DESCRIPTION:  
    Can the great grand master key be used in lieu of this key?
2 MASTER 1;0 Multiple #6927.01 6927.01

  • DESCRIPTION:  
    LIST OF MASTER KEYS FOR THIS LOCK
3 COMBINATION 2;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>7!($L(X)<6)!(X'?.ANP) X
  • LAST EDITED:  DEC 06, 1984
  • HELP-PROMPT:  ANSWER MUST BE 6-7 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Keying combination for this lock. Optional information.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
4 DATE CHANGED 2;2 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • DESCRIPTION:  
    Date lock was last reconfigured.

External References

Name Field # of Occurrence
^%DT 4+1
EN^DDIOL .01DEL1+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ENG("KEY" - [#6926] .01DEL1+1
^ENG("LK" - [#6927] .01(XREF 1S), .01(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 4+1*
>> DA .01DEL1+1, .01(XREF 1S), .01(XREF 1K)
X .01+1!, .01(XREF 1S), .01(XREF 1K), .5+1!, 3+1!, 4+1*!
>> Y 4+1
Info |  Desc |  Directly Accessed By Routines |  Pointed To By FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All