Routine: BLRBBDDC

Information

BLRBBDDC ; IHS/OIT/MKK - BLOOD BANK DATA DICTIONARY CORRECTION(S) [12/07/05 1:43 PM]

Package	Total	Call Graph
IHS VA Utilities	2	^XBCLS $$LOC^XBFUNC
Kernel	2	$$HTE^XLFDT ($$CJ,$$REPLACE,$$TRIM,$$UP)^XLFSTR
IHS Changes To Lab	1	EEP^BLRGMENU

Name	Field # of Occurrence
EEP^BLRGMENU	EEP+1
^XBCLS	PEP+4
$$LOC^XBFUNC	BLRHEADR+2
$$HTE^XLFDT	BLRHEADR+5, NOWTIME+2
$$CJ^XLFSTR	BLRHEADR+2, BLRHEADR+4, BLRHEADR+12, BLRHEADR+16
$$REPLACE^XLFSTR	FIXIT+20, FIXIT+27, FIXIT+33
$$TRIM^XLFSTR	BLRHEADR+7
$$UP^XLFSTR	NOWTIME+4

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Done.",!! Line Location: PEP+32
Function Call: WRITE	Prompt: "Number of records corrected:",CNT,!! Line Location: PEP+35
Function Call: WRITE	Prompt: "Number of records searched:",CNTREC,!! Line Location: PEP+38
Function Call: WRITE	Prompt: ?10,"No corrections necessary.",!! Line Location: PEP+39
Function Call: WRITE	Prompt: "." Line Location: WARMFZZY+2
Function Call: WRITE	Prompt: ! Line Location: WARMFZZY+3
Function Call: WRITE	Prompt: $J(CNT,3) Line Location: FIXIT+7
Function Call: WRITE	Prompt: ?5,"D0:",D0 Line Location: FIXIT+8
Function Call: WRITE	Prompt: ?15,"D1:",D1 Line Location: FIXIT+9
Function Call: WRITE	Prompt: ! Line Location: FIXIT+12
Function Call: WRITE	Prompt: ?5,$E($G(^DD(D0,D1,D2,D3)),1,73),! Line Location: FIXIT+13
Function Call: WRITE	Prompt: ?5,$E($G(^DD(D0,D1,D2)),1,73),! Line Location: FIXIT+14
Function Call: WRITE	Prompt: ?5,$E($G(^DD(D0,D1)),1,73),! Line Location: FIXIT+15
Function Call: WRITE	Prompt: ?5,$E(STR,1,73),!! Line Location: FIXIT+23
Function Call: WRITE	Prompt: ?5,$E(STR,1,73),!! Line Location: FIXIT+30
Function Call: WRITE	Prompt: ?5,$E(STR,1,73),!! Line Location: FIXIT+36
Function Call: WRITE	Prompt: $$CJ^XLFSTR($$LOC^XBFUNC,IOM) Line Location: BLRHEADR+2
Function Call: WRITE	Prompt: TMPLN,! Line Location: BLRHEADR+8
Function Call: WRITE	Prompt: $$CJ^XLFSTR(LINE2,IOM),! Line Location: BLRHEADR+12
Function Call: WRITE	Prompt: $$CJ^XLFSTR(LINE3,IOM),! Line Location: BLRHEADR+16

Name	Line Occurrences (* Changed, ! Killed)
^DD(	PEP+10, PEP+14, PEP+16, PEP+17, PEP+20, PEP+22, PEP+23, PEP+26, PEP+28, PEP+29 , FIXIT+13, FIXIT+14, FIXIT+15, FIXIT+19, FIXIT+26, FIXIT+32

Name	Field # of Occurrence
CNT	PEP+6~, PEP+8, PEP+34, PEP+35, PEP+37, FIXIT+6, FIXIT+7
CNTREC	PEP+6~, PEP+8, PEP+12, PEP+38, WARMFZZY+1
D0	PEP+7~, PEP+9, PEP+10, PEP+11, PEP+14, PEP+16, PEP+17, PEP+18, PEP+20, PEP+22 , PEP+23, PEP+24, PEP+26, PEP+28, PEP+29, PEP+30, FIXIT~, FIXIT+8, FIXIT+13, FIXIT+14 , FIXIT+15, FIXIT+19, FIXIT+26, FIXIT+32
D1	PEP+7~, PEP+9, PEP+14, PEP+16, PEP+17, PEP+18, PEP+20, PEP+22, PEP+23, PEP+24 , PEP+26, PEP+28, PEP+29, PEP+30, FIXIT~, FIXIT+9, FIXIT+13, FIXIT+14, FIXIT+15, FIXIT+19 , FIXIT+26, FIXIT+32
D2	PEP+7~, PEP+9, PEP+20, PEP+22, PEP+23, PEP+24, PEP+26, PEP+28, PEP+29, PEP+30 , FIXIT~, FIXIT+10, FIXIT+13, FIXIT+14, FIXIT+15, FIXIT+19, FIXIT+25, FIXIT+26
D3	PEP+7~, PEP+9, PEP+26, PEP+28, PEP+29, PEP+30, FIXIT~, FIXIT+11, FIXIT+13, FIXIT+14 , FIXIT+15, FIXIT+18, FIXIT+19
DICN	PEP+6~, PEP+11*
FUZZY	PEP+6~, PEP+8*
IOM	BLRHEADR+2, BLRHEADR+4, BLRHEADR+6, BLRHEADR+12, BLRHEADR+16
LINE1	BLRHEADR~, BLRHEADR+4
LINE2	BLRHEADR~, BLRHEADR+10, BLRHEADR+12
LINE3	BLRHEADR~, BLRHEADR+14, BLRHEADR+16
SPEC	FIXIT+2~, FIXIT+20, FIXIT+27, FIXIT+33
SPEC("$$SITE^VASITE"	FIXIT+3*
STR	FIXIT+1~, FIXIT+19, FIXIT+20, FIXIT+22, FIXIT+23, FIXIT+26, FIXIT+27, FIXIT+29, FIXIT+30, FIXIT+32* , FIXIT+33*, FIXIT+35, FIXIT+36
SUBSTR	FIXIT+1~, FIXIT+21, FIXIT+22, FIXIT+28, FIXIT+29, FIXIT+34*, FIXIT+35
TAB	PEP+6~
TMPLN	BLRHEADR+1~, BLRHEADR+4, BLRHEADR+5, BLRHEADR+6, BLRHEADR+7, BLRHEADR+8
X	NOWTIME+1~, NOWTIME+2, NOWTIME+3, NOWTIME+4*, NOWTIME+5