Routine: BMCLKID

Package	Total	Call Graph
Referred Care Information System	2	DT^BMCOSUT ($$AVDOS,$$FACREF)^BMCRLU
IHS VA Utilities	1	$$VAL^XBDIQ1

Package

Total

Call Graph

DT^BMCOSUT ($$AVDOS,$$FACREF)^BMCRLU

$$VAL^XBDIQ1

Package	Total	Caller Graph
Referred Care Information System	2	BMCLKID1 ^BMCREF

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
START	; EXTERNAL ENTRY POINT - ; VALUE OF THE NAKED INDICATOR TO BE PROVIDED BY CALLING ROUTINE
XIT	;Kill off Variables no longer needed
SEC	;ENTRY POINT FR BMCLKID1; DISPLAY THE SECONDARY PROVIDER INFORMATION

Name	Line Occurrences
Function Call: WRITE	Prompt: ?5,$P(^(0),U,2),$P($G(^(1)),U) Line Location: START+3
Function Call: WRITE	Prompt: " " Line Location: START+4
Function Call: WRITE	Prompt: $E(BMCPAT,1,15)," " Line Location: START+8
Function Call: WRITE	Prompt: " " Line Location: START+9
Function Call: WRITE	Prompt: $E(BMCPAT,1,15)," " Line Location: START+11
Function Call: WRITE	Prompt: @("$E("_DIC_"Y,0),0)") Line Location: START+15
Function Call: WRITE	Prompt: !,?30,BMCSVDTP_" - "_BMCVSTP Line Location: START+17
Function Call: WRITE	Prompt: @("$E("_DIC_"Y,0),0)") Line Location: START+18
Function Call: WRITE	Prompt: ?55,$E(BMCPURPP,1,25) Line Location: START+20
Function Call: WRITE	Prompt: @("$E("_DIC_"Y,0),0)") Line Location: START+21
Function Call: WRITE	Prompt: ! Line Location: START+22

Name	Line Occurrences (* Changed, ! Killed)
^AUTTVNDR - [#9999999.11]	SEC+9
^BMCREF - [#90001]	START+14, START+20, START+23, START+24, SEC+6, SEC+7, SEC+9, SEC+10
^BMCREF("S"	SEC+2, SEC+3, SEC+5
^DD("VERSION"	START+7, START+10
^DIC(4 - [#4]	SEC+10
^DPT - [#2]	START+6

Name	Line Occurrences
SEC	START+24

Name	Field # of Occurrence
^(0	START+3, START+6
^(1	START+3

Name	Field # of Occurrence
BMCPAT	START+6*, START+8, START+11, XIT+1!
BMCPTDFN	START+6*, XIT+1!
BMCPURP	START+20*, XIT+1!
BMCPURPP	START+20*, XIT+1!
BMCRFAC	START+13*, XIT+1!
BMCRIEN	XIT+2!
>> BMCRNUMB	START+23*, SEC+1, SEC+2, SEC+3, SEC+5
BMCSCDT	SEC+6*, SEC+12, SEC+14!
BMCSEC	XIT+2!
BMCSPUR	SEC+11*, SEC+12, SEC+14!
BMCSRDT	SEC+7*, SEC+12, SEC+14!
BMCSRIEN	SEC+4, SEC+5, SEC+6, SEC+7, SEC+9, SEC+10, SEC+11, SEC+14!
BMCSUF	SEC+2, SEC+3, SEC+5, SEC+14!
BMCSVDT	START+17*, XIT+1!
BMCSVDTP	START+17*, XIT+1!
BMCSVND	SEC+8, SEC+9, SEC+10*, SEC+12, SEC+14!
>> BMCVST	START+14*
>> BMCVSTP	START+14*, START+17
>> DIC	START+15, START+18, START+21
>> DINDEX	START+8
>> DZ	START+8
U	START+3, START+6, START+14, START+20, START+23, START+24, SEC+6, SEC+7, SEC+9, SEC+10
>> X	START+8
>> Y	START+13, START+14, START+17, START+20, START+23, START+24, SEC+6, SEC+7, SEC+9, SEC+10

Information