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 | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | External References | Global Variables Directly Accessed | Local Variables | All

Print Page as PDF

Global: ^VBEC(6005

Package: VBECS

Global: ^VBEC(6005

Information

FileMan FileNo	FileMan Filename	Package
6005	VBECS MATCHING TABLE	VBECS

Description

The purpose of this file is to store different VistA data elements for the purpose of linking them to standard VBEC data elements.

Directly Accessed By Routines, Total: 11

Package	Total	Routines
VBECS	11	DATA DICTIONARY VBECDCHX VBECDCM VBECDCM0 VBECDCM1 VBECDCM2 VBECDCMP VBECDCNM VBECDCU VBECDCU2 ^VBEC(6005

Accessed By FileMan Db Calls, Total: 5

Package	Total	Routines
VBECS	5	VBECDCM VBECDCM1 VBECDCM2 VBECDCMP VBECDCNM

Pointer To FileMan Files, Total: 1

Package	Total	FileMan Files
VBECS	1	STANDARD VBECS DATA(#6007)[.05]

Fields, Total: 7

Field #	Name	Loc	Type	Details
.01	FILE-IEN	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>18!($L(X)<3)!(X'?2N0.1"."0.2N0.1"-"0.12N) X` LAST EDITED: `JUL 17, 2002` HELP-PROMPT: `Please answer with a 'file-ien' combination between 3-18 characters in length with a '-' separating the file number and ien. The file number may have a decimal imbedded.` DESCRIPTION: `This field identifies the file and record number (ien) of the data.` DELETE TEST: `1,0)= I 1 D EN^DDIOL("VistA Blood Bank data cannot be deleted.")` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `6005^B` `1)= S ^VBEC(6005,"B",$E(X,1,30),DA)=""` `2)= K ^VBEC(6005,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `6005^AA1^MUMPS` `1)= N VBEC S VBEC(0)=$G(^VBEC(6005,DA,0)) S:$P(VBEC(0),"^",2)]"" ^VBEC(6005,"AA",X,$P(VBEC(0),"^",2),DA)=""` `2)= N VBEC S VBEC(0)=$G(^VBEC(6005,DA,0)) K:$P(VBEC(0),"^",2)]"" ^VBEC(6005,"AA",X,$P(VBEC(0),"^",2),DA)` `3)= do not delete` `Links the names of VistA Blood bank attributes with their unique file number-internal entry number pair.` CROSS-REFERENCE: `6005^AB1^MUMPS` `1)= N VBEC S VBEC=$G(^VBEC(6005,DA,0)) S:$P(VBEC,"^",5)]"" ^VBEC(6005,"AB",+X,$P(VBEC,"^",5),DA)=""` `2)= N VBEC S VBEC=$G(^VBEC(6005,DA,0)) K:$P(VBEC,"^",5)]"" ^VBEC(6005,"AB",+X,$P(VBEC,"^",5),DA)` `3)= Do not delete.` `Used to help purge and print mapping table data. Cross-reference is also used to check if more than one VistA record is mapped to a standardized data element.`
.02	NAME ATTRIBUTE	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>40!($L(X)<1) X` LAST EDITED: `JUL 23, 2003` HELP-PROMPT: `Answer must be 1-40 characters in length.` DESCRIPTION: `The intention is to keep track of any edits to the name attribute. If the name attribute changes through edits on the VistA side, the mapping process will need to be performed.` CROSS-REFERENCE: `6005^AA2^MUMPS` `1)= N VBEC S VBEC(0)=$G(^VBEC(6005,DA,0)) S:$P(VBEC(0),"^") ^VBEC(6005,"AA",$P(VBEC(0),"^"),X,DA)=""` `2)= N VBEC S VBEC(0)=$G(^VBEC(6005,DA,0)) K:$P(VBEC(0),"^") ^VBEC(6005,"AA",$P(VBEC(0),"^"),X,DA)` `3)= do not delete` `Links the names of VistA Blood bank attributes with their unique file number-internal entry number pair.` CROSS-REFERENCE: `6005^N^MUMPS` `1)= S ^VBEC(6005,"N",$E(X,1,40),DA)=""` `2)= K ^VBEC(6005,"N",$E(X,1,40),DA)` `3)= Do not delete, allows the user to select data by name.` `This cross-reference will allow the user greater flexibility when selecting VistA Blood Bank data elements. The FILE-IEN (.01) field is confusing to the Blood Bank ADPAC. The name of the data element, not the IEN, will` `be the way that the user goes about selecting data elements.`
.03	IDENTIFIER ATTRIBUTE	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<1) X` LAST EDITED: `AUG 20, 2003` HELP-PROMPT: `Answer must be 1-80 characters in length.` DESCRIPTION: `The intention is to keep track of any edits to the identifier attribute. If the identifier attribute changes on the VistA side, the mapping process will need to be performed.` CROSS-REFERENCE: `6005^VA` `1)= S ^VBEC(6005,"VA",$E(X,1,30),DA)=""` `2)= K ^VBEC(6005,"VA",$E(X,1,30),DA)` `3)= Do not delete.` `Cross-references by attribute to aid in standard VistA data record selection.`
.04	ANTIGEN/ANTIBODY IDENTFIER	0;4	SET	'AB' FOR Antibody; 'AN' FOR Antigen; LAST EDITED: `JUN 20, 2002` HELP-PROMPT: `This is not intended to be a user interactive field.` DESCRIPTION: `This field is used to identify the entity to a greater granularity. When mapping Function Field (#61.3) data only, it will need to be known whether the entity is an antigen or an antibody.`
.05	STANDARD VBECS DATA	0;5	POINTER TO STANDARD VBECS DATA FILE (#6007)	STANDARD VBECS DATA(#6007) LAST EDITED: `JUL 17, 2002` HELP-PROMPT: `This is the standard VBECS attribute our VistA record maps to.` DESCRIPTION: `This field will store the pointer to the STANDARD VBECS DATA (#6007) file. From this, we can derive the globally unique identifier (GUID) of the standard data value.` CROSS-REFERENCE: `6005^AB2^MUMPS` `1)= S VBEC=$G(^VBEC(6005,DA,0)) S:$P(VBEC,"^")]"" ^VBEC(6005,"AB",+$P(VBEC,"^"),X,DA)=""` `2)= S VBEC=$G(^VBEC(6005,DA,0)) K:$P(VBEC,"^")]"" ^VBEC(6005,"AB",+$P(VBEC,"^"),X,DA)` `3)= Do not delete...` `Used to help purge and print mapping table data. Cross-reference is also used to check if more than one VistA record is mapped to a standardized data element.` CROSS-REFERENCE: `6005^D` `1)= S ^VBEC(6005,"D",$E(X,1,30),DA)=""` `2)= K ^VBEC(6005,"D",$E(X,1,30),DA)` `3)= Do not delete...` `Used to select a single mapped record for deletion.`
.06	CHECKSUM	0;6	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999999999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 26, 2002` HELP-PROMPT: `Enter the checksum value of the name attribute and identifier attribute (optional).` DESCRIPTION: `Indicates the total checksum values of the name attribute and identifier attribute (optional).` TECHNICAL DESCR: `Strings are passed into the CHECKSUM^VBECDCU2 module and their nummeric checksum value is returned.`
.07	TIMESTAMP	0;7	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 26, 2002` HELP-PROMPT: `Enter the date/time the record was added, edited, or deleted.` DESCRIPTION: `Indicates the date/time the record was added, edited, or deleted.`

External References

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^VBEC(6005 - [#6005]	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K) , .03(XREF 1S), .03(XREF 1K), .05(XREF 1S), .05(XREF 1K), .05(XREF 2S), .05(XREF 2K)

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	.07+1*
>> DA	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K) , .03(XREF 1S), .03(XREF 1K), .05(XREF 1S), .05(XREF 1K), .05(XREF 2S), .05(XREF 2K)
VBEC	.01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02(XREF 1S), .02(XREF 1K), .05(XREF 1S), .05(XREF 1K)
VBEC(0	.01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K)
X	.01+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .02+1!, .02(XREF 1S), .02(XREF 1K) , .02(XREF 2S), .02(XREF 2K), .03+1!, .03(XREF 1S), .03(XREF 1K), .05(XREF 1S), .05(XREF 1K), .05(XREF 2S), .05(XREF 2K), .06+1! , .07+1*!
>> Y	.07+1

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | External References | Global Variables Directly Accessed | Local Variables | All