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 | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | ICR | Found Entries | Global Variables Directly Accessed | Naked Globals | Local Variables | All

Print Page as PDF

Global: ^LAB(65.4

Package: Lab Service

Global: ^LAB(65.4

Information

FileMan FileNo	FileMan Filename	Package
65.4	BLOOD BANK UTILITY	Lab Service

Description

This file contains donor affiliation groups, collection sites, items related to donor history, and transfusion reaction types.

Directly Accessed By Routines, Total: 27

Package	Total	Routines
Lab Service	24	GROUP AFFILIATION LR7OSBR1 LRBL DEFERRAL REPORT LRBL GROUP AFFILIATION REPORT LRBL GROUP DONATION REPORT LRBL MOBILE REPORT LRBLA1 LRBLA2 LRBLDA LRBLDAL LRBLDEX1 LRBLDEX2 LRBLDL LRBLDPA1 LRBLDPL LRBLDR LRBLPR1 LRBLPTR LRBLS LRBLTA LRBLTA1 LRDPA2 RELATED NAME ^LAB(65.4
DSS Extracts	1	ECXLBB
VBECS	1	VBECDCM2

Accessed By FileMan Db Calls, Total: 4

Package	Total	Routines
Lab Service	4	LRBLDR LRBLDR1 LRBLPT1 LRBLS

Pointed To By FileMan Files, Total: 3

Package	Total	FileMan Files
Lab Service	3	LAB DATA(#63)[#63.017(.11), #63.0171(.02)] BLOOD INVENTORY(#65)[6.8] BLOOD DONOR(#65.5)[#65.51(.01), #65.54(.02), #65.54(.03), #65.54(3), #65.55(.01)]

Pointer To FileMan Files, Total: 1

Package	Total	FileMan Files
Kernel	1	STATE(#5)[1.5]

Fields, Total: 14

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<2)!'(X'?1P.E)!(X'?.ANP) X` LAST EDITED: `APR 03, 1985` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: `Enter the name of the collection site, group affiliation, or coded item related to donor history.` CROSS-REFERENCE: `65.4^B` `1)= S ^LAB(65.4,"B",$E(X,1,30),DA)=""` `2)= K ^LAB(65.4,"B",$E(X,1,30),DA)`
.02	SCREEN	0;2	SET	'G' FOR GROUP AFFILIATION; 'D' FOR DEFERRAL CODE; 'C' FOR COLLECTION SITE; 'GC' FOR GROUP AFFILIATION & COLLECTION SITE; 'R' FOR DONOR REACTION; 'T' FOR TRANSFUSION REACTION; LAST EDITED: `DEC 11, 1992` DESCRIPTION: `This designates the type of donor utility.`
.03	FULL NAME	0;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>80!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-80 CHARACTERS IN LENGTH` DESCRIPTION: `This is the name of the donor.` CROSS-REFERENCE: `65.4^C` `1)= S ^LAB(65.4,"C",$E(X,1,30),DA)=""` `2)= K ^LAB(65.4,"C",$E(X,1,30),DA)`
1.1	ADDRESS LINE 1	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: `This is the first line of the donor address.`
1.2	ADDRESS LINE 2	1;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: `This is the second line of the donor address.`
1.3	ADDRESS LINE 3	1;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: `This is the third line of the donor address.`
1.4	CITY	1;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: `This is the city part of the donor address.`
1.5	STATE	1;5	POINTER TO STATE FILE (#5)	STATE(#5) DESCRIPTION: `This is the state part of the donor address.`
1.6	ZIP CODE	1;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>9!($L(X)<5) X` HELP-PROMPT: `ANSWER MUST BE 5-9 CHARACTERS IN LENGTH` DESCRIPTION: `This is the zip code part of the donor address.`
1.7	PHONE 1	1;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<3) X` HELP-PROMPT: `ANSWER MUST BE 3-15 CHARACTERS IN LENGTH` DESCRIPTION: `This is the phone number of the donor.`
1.8	PHONE 2	1;8	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<3) X` HELP-PROMPT: `ANSWER MUST BE 3-15 CHARACTERS IN LENGTH` DESCRIPTION: `This is the other phone number of the donor.`
1.9	GROUP LEADER	1;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3) X` HELP-PROMPT: `ANSWER MUST BE 3-30 CHARACTERS IN LENGTH` DESCRIPTION: `This is the person coordinating the collection site or group affiliation.`
2	DONOR HISTORY	2;0	WORD-PROCESSING #65.41	DESCRIPTION: `These are the comments on donor history.`
3	COMMENT	3;0	WORD-PROCESSING #65.42	DESCRIPTION: `This is the comment on donor history.` LAST EDITED: `FEB 21, 1986`

Found Entries, Total: 42

NAME: DRUG	NAME: TEMP	NAME: PULSE	NAME: BP	NAME: DONATION	NAME: MHX	NAME: AGE	NAME: IMMUNIZ
NAME: ALCOHOL	NAME: NS	NAME: OT	NAME: LIVER	NAME: HEART	NAME: OP	NAME: KIDNEY	NAME: LUNG
NAME: CANCER	NAME: BLOOD	NAME: CNS	NAME: PHERESIS	NAME: HGB	NAME: HCT	NAME: PREG	NAME: WEIGHT
NAME: SKIN	NAME: RECEIPT	NAME: INFECTIOUS	NAME: HEPATITIS	NAME: MALARIA	NAME: TB	NAME: NARCOTIC	NAME: DNRHX
NAME: AIDS	NAME: GENERAL APPEARANCE	NAME: NONE	NAME: MILD	NAME: MODERATE	NAME: SEVERE	NAME: SURG	NAME: VAH
NAME: DNRCX	NAME: VFW

ICR, Total: 2

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #2550
ICR #2674		NAME (.01). Access: Direct Global Read & w/Fileman

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(65.4 - [#65.4]	.01(XREF 1S), .01(XREF 1K), .03(XREF 1S), .03(XREF 1K)

Naked Globals

Name	Field # of Occurrence
^("0"	ID.03+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	.01(XREF 1S), .01(XREF 1K), .03(XREF 1S), .03(XREF 1K)
U	ID.03+1
X	.01+1!, .01(XREF 1S), .01(XREF 1K), .03+1!, .03(XREF 1S), .03(XREF 1K), 1.1+1!, 1.2+1!, 1.3+1!, 1.4+1! , 1.6+1!, 1.7+1!, 1.8+1!, 1.9+1!

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | ICR | Found Entries | Global Variables Directly Accessed | Naked Globals | Local Variables | All