STANDARD DATA DICTIONARY #6916.3 -- IT ASSIGNMENT FILE 3/24/25 PAGE 1
STORED IN ^ENG(6916.3, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 7.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains assignments of responsibility for IT equipment. The data is only intended to be updated via package options.
Key data values are protected by encryption once the owner has accepted responsibility via electronic signature.
DD ACCESS: @
RD ACCESS:
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
IDENTIFIED BY: OWNER (#1)[R]
"WRITE": N ENX S ENX=$$GET1^DIQ(6916.3,+Y,20) D EN^DDIOL(" "_ENX,"","?0") Q
CROSS
REFERENCED BY: EQUIPMENT(B), OWNER(C)
INDEXED BY: EQUIPMENT & ENDED DATE/TIME (AEA), OWNER & EQUIPMENT & ENDED DATE/TIME (AOA), OWNER & ENDED DATE/TIME (AOA2), OWNER
& ENDED DATE/TIME & SIGNED DATE/TIME (AOU)
6916.3,.01 EQUIPMENT 0;1 POINTER TO EQUIPMENT INV. FILE (#6914) (Required)
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Select the IT equipment item.
DESCRIPTION:
IT equipment item for which responsibility has been assigned.
UNEDITABLE
CROSS-REFERENCE: 6916.3^B
1)= S ^ENG(6916.3,"B",$E(X,1,30),DA)=""
2)= K ^ENG(6916.3,"B",$E(X,1,30),DA)
RECORD INDEXES: AEA (#788), AOA (#789)
6916.3,1 OWNER 0;2 POINTER TO NEW PERSON FILE (#200) (Required)
LAST EDITED: JAN 09, 2009
HELP-PROMPT: Select a person assigned responsibility for the equipment.
DESCRIPTION:
The person assigned responsibility for the IT equipment item.
UNEDITABLE
CROSS-REFERENCE: 6916.3^C
1)= S ^ENG(6916.3,"C",$E(X,1,30),DA)=""
2)= K ^ENG(6916.3,"C",$E(X,1,30),DA)
Regular cross-reference by owner.
RECORD INDEXES: AOA (#789), AOA2 (#819), AOU (#790)
6916.3,2 ASSIGNED DATE/TIME 0;3 DATE (Required)
INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Enter the date and time the assignment was made.
DESCRIPTION: The date/time that the assignment of responsibility was created in the file. This value is
automatically populated by the system.
UNEDITABLE
6916.3,3 ASSIGNED BY 0;4 POINTER TO NEW PERSON FILE (#200) (Required)
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Select the person that created the assignment.
DESCRIPTION: The person that created the assignment of responsibility. This value is automatically populated by
the system.
UNEDITABLE
6916.3,4 SIGNED DATE/TIME 0;5 DATE
INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Enter the date when the assignment was signed by the owner.
DESCRIPTION: The date and time that the OWNER electronically signed the hand receipt or the date a hard copy
hand receipt was signed. This field is automatically populated by the system if the OWNER
electronically signs the hand receipt. This field is populated by the person in the CERTIFIED BY
field in the event a hard copy hand receipt was instead signed by the OWNER.
UNEDITABLE
RECORD INDEXES: AOU (#790)
6916.3,5 HAND RECEIPT TEXT 0;6 POINTER TO HAND RECEIPT TEXT FILE (#6916.2)
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Select hand receipt text that was signed.
DESCRIPTION:
The version of the hand receipt text that was signed.
UNEDITABLE
6916.3,5.9 CERTIFIED DATE/TIME 0;10 DATE
INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Enter the date and time when a user certified a hard copy signature.
DESCRIPTION: The date and time when a user certified there is a signed paper hand receipt on file for the
equipment item. This field should only be populated when the owner can not electronically sign the
hand receipt for some reason.
UNEDITABLE
6916.3,6 CERTIFIED BY 0;7 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Select the person that certified there is a signed paper hand receipt.
DESCRIPTION: The person that certified there is a signed paper hand receipt on file for the equipment item.
This field should only be populated when the owner can not electronically sign the hand receipt for
some reason.
UNEDITABLE
6916.3,7 ENDED DATE/TIME 0;8 DATE
INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Enter the date and time that the responsibility ended.
DESCRIPTION: The date/time that the assignment of responsibility ended. This field is automatically populated
when an assignment is terminated or transferred.
UNEDITABLE
RECORD INDEXES: AEA (#788), AOA (#789), AOA2 (#819), AOU (#790)
6916.3,8 ENDED BY 0;9 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Select the person that ended the assignment.
DESCRIPTION: The person that ended the assignment of responsibility. This field is automatically populated when
the assignment is terminated or transferred.
UNEDITABLE
6916.3,9 ENCRYPTED STRING 1;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>240!($L(X)<1) X
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Answer must be 1-240 characters in length
DESCRIPTION: If the assignment was electronically signed by the owner, the signature block and key data values
are encrypted and stored in this field.
UNEDITABLE
6916.3,20 STATUS ; COMPUTED
MUMPS CODE: X ^DD(6916.3,20,9.4) S X=$S(Y(6916.3,20,2):Y(6916.3,20,3),Y(6916.3,20,4):Y(6916.3,20,5),Y(6916.3,20
,6):Y(6916.3,20,7),Y(6916.3,20,8):X)
9.2 = S Y(6916.3,20,1)=$S($D(^ENG(6916.3,D0,0)):^(0),1:"") S X=$P(Y(6916.3,20,1),U,8)]"",Y(6916.3,2
0,2)=$G(X) S X="ENDED",Y(6916.3,20,3)=$G(X)
9.3 = X ^DD(6916.3,20,9.2) S X=$P($G(^VA(200,+$P(Y(6916.3,20,1),U,7),0)),U)]"",Y(6916.3,20,4)=$G(X)
S X="CERTIFIED",Y(6916.3,20,5)=$G(X) S X=$P(Y(6916.3,20,1),U,5)
9.4 = X ^DD(6916.3,20,9.3) S X=X]"",Y(6916.3,20,6)=$G(X) S X="SIGNED",Y(6916.3,20,7)=$G(X) S X=1,Y(
6916.3,20,8)=$G(X) S X="ASSIGNED"
ALGORITHM: $S(#7]"":"ENDED",#6]"":"CERTIFIED",#4]"":"SIGNED",1:"ASSIGNED")
LAST EDITED: NOV 21, 2007
DESCRIPTION: Computed field that contains the current status of the assignment. The status may be ENDED,
CERTIFIED, SIGNED, or ASSIGNED.
6916.3,21 STATUS DATE ; COMPUTED
MUMPS CODE: X ^DD(6916.3,21,9.4) S:X X=$E(X,4,5)_"/"_$E(X,6,7)_"/"_$E(X,2,3)
9.2 = S Y(6916.3,21,1)=$S($D(^ENG(6916.3,D0,0)):^(0),1:"") S X=$P(Y(6916.3,21,1),U,8)]"",Y(6916.3,2
1,2)=$G(X) S X=$P(Y(6916.3,21,1),U,8),Y(6916.3,21,3)=$G(X)
9.3 = X ^DD(6916.3,21,9.2) S X=$P(Y(6916.3,21,1),U,5)]"",Y(6916.3,21,4)=$G(X) S X=$P(Y(6916.3,21,1)
,U,5),Y(6916.3,21,5)=$G(X) S X=1,Y(6916.3,21,6)=$G(X)
9.4 = X ^DD(6916.3,21,9.3) S X=$P(Y(6916.3,21,1),U,3),X=$S(Y(6916.3,21,2):Y(6916.3,21,3),Y(6916.3,2
1,4):Y(6916.3,21,5),Y(6916.3,21,6):X)
ALGORITHM: NUMDATE($S(#7]"":#7,#4]"":#4,1:#2))
LAST EDITED: NOV 21, 2007
DESCRIPTION:
Computed field that contains the date (MM/DD/YY) when the assignment reached the current status.
6916.3,30 PREVIOUS SIGNATURES 3;0 DATE Multiple #6916.31
LAST EDITED: DEC 04, 2007
6916.31,.01 PREVIOUS SIGNED DATE/TIME 0;1 DATE
INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Enter signed date for the previous signature.
DESCRIPTION: The SIGNED DATE/TIME value for a previous signature. If an assignment is re-signed, any existing
signature data is automatically moved to the corresponding fields in the PREVIOUS SIGNATURE
multiple so the history is retained.
UNEDITABLE
CROSS-REFERENCE: 6916.31^B
1)= S ^ENG(6916.3,DA(1),3,"B",$E(X,1,30),DA)=""
2)= K ^ENG(6916.3,DA(1),3,"B",$E(X,1,30),DA)
6916.31,1 HAND RECEIPT TEXT 0;2 POINTER TO HAND RECEIPT TEXT FILE (#6916.2)
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Select hand receipt text that was signed.
DESCRIPTION:
The HAND RECEIPT TEXT value for the previous signature.
UNEDITABLE
6916.31,2 CERTIFIED DATE/TIME 0;3 DATE
INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Enter the date and time when a user certified the hard copy signature.
DESCRIPTION:
The CERTIFIED DATE/TIME value for the previous hard copy signature.
UNEDITABLE
6916.31,3 CERTIFIED BY 0;4 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Select the person that certified there is a hard copy signature.
DESCRIPTION:
The CERTIFIED BY value for the previous signature.
UNEDITABLE
6916.31,4 ENCRYPTED STRING 1;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>240!($L(X)<1) X
LAST EDITED: DEC 18, 2007
HELP-PROMPT: Answer must be 1-240 characters in length
DESCRIPTION:
The ENCRYPTED STRING value for a previous electronic signature.
UNEDITABLE
FILES POINTED TO FIELDS
EQUIPMENT INV. (#6914) EQUIPMENT (#.01)
HAND RECEIPT TEXT (#6916.2) HAND RECEIPT TEXT (#5)
PREVIOUS SIGNATURES:HAND RECEIPT TEXT (#1)
NEW PERSON (#200) OWNER (#1)
ASSIGNED BY (#3)
CERTIFIED BY (#6)
ENDED BY (#8)
PREVIOUS SIGNATURES:CERTIFIED BY (#3)
File #6916.3
Record Indexes:
AEA (#788) RECORD REGULAR IR SORTING ONLY
Short Descr: Equipment with active assignment.
Description: Cross-reference by equipment of active assignments. An assignment is considered active if it does not have a
value in the ENDED DATE/TIME field.
Set Logic: S ^ENG(6916.3,"AEA",X(1),DA)=""
Set Cond: S X=$S(X(2)="":1,1:0)
Kill Logic: K ^ENG(6916.3,"AEA",X(1),DA)
Whole Kill: K ^ENG(6916.3,"AEA")
X(1): EQUIPMENT (6916.3,.01) (Subscr 1) (forwards)
X(2): ENDED DATE/TIME (6916.3,7) (forwards)
AOA (#789) RECORD REGULAR IR SORTING ONLY
Short Descr: Owner's IT equipment with active assignment.
Description: Cross-reference by owner and equipment of active assignments. An assignment is considered active if it does
not have a value in the ENDED DATE/TIME field.
Set Logic: S ^ENG(6916.3,"AOA",X(1),X(2),DA)=""
Set Cond: S X=$S(X(3)="":1,1:0)
Kill Logic: K ^ENG(6916.3,"AOA",X(1),X(2),DA)
Whole Kill: K ^ENG(6916.3,"AOA")
X(1): OWNER (6916.3,1) (Subscr 1) (forwards)
X(2): EQUIPMENT (6916.3,.01) (Subscr 2) (forwards)
X(3): ENDED DATE/TIME (6916.3,7) (forwards)
AOA2 (#819) RECORD REGULAR IR SORTING ONLY
Short Descr: Owner's IT equipment with active assignment.
Description: Cross-reference by owner of active assignments. An assignment is considered active if it does not have a value
in the ENDED DATE/TIME field.
Set Logic: S ^ENG(6916.3,"AOA2",X(1),DA)=""
Set Cond: S X=$S(X(2)="":1,1:0)
Kill Logic: K ^ENG(6916.3,"AOA2",X(1),DA)
Whole Kill: K ^ENG(6916.3,"AOA2")
X(1): OWNER (6916.3,1) (Subscr 1) (forwards)
X(2): ENDED DATE/TIME (6916.3,7) (forwards)
AOU (#790) RECORD REGULAR IR SORTING ONLY
Short Descr: Owner with unsigned active assignment.
Description: Cross-reference by owner of active assignments that have not been certified or electronically signed. An
assignment is considered active if it does not have a value in the ENDED DATE/TIME field. An assignment is
considered as not signed or certified if it does not have a value in the SIGNED DATE/TIME field.
Set Logic: S ^ENG(6916.3,"AOU",X(1),DA)=""
Set Cond: S X=$S(X(2)=""&(X(3)=""):1,1:0)
Kill Logic: K ^ENG(6916.3,"AOU",X(1),DA)
Whole Kill: K ^ENG(6916.3,"AOU")
X(1): OWNER (6916.3,1) (Subscr 1) (forwards)
X(2): ENDED DATE/TIME (6916.3,7) (forwards)
X(3): SIGNED DATE/TIME (6916.3,4) (forwards)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
ENIT ASSIGNMENT INQ JAN 07, 2008@11:43 USER #0 IT ASSIGNMENT
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):