Routine: BCHMNRP

Package	Total	Call Graph
VA Fileman	5	^DIC ^DIE ^DIK EN^DIQ ^DIR
IHS VA Utilities	2	$$VAL^XBDIQ1 EN^XBVK

Package	Total	Caller Graph
IHS RPMS CHR System	1	BCH MERGE TWO NON REG PTS

Entry Points

Name	Comments	DBIA/ICR reference
CMM	;
CONT	;
CHK	;
MERGE	;
XIT	;
GETPAT1	;
GETPAT2	;

External References

Name	Field # of Occurrence
^DIC	GETPAT1+4, GETPAT2+3
^DIE	MERGE+10, MERGE+14
^DIK	MERGE+18
EN^DIQ	GETPAT2+8, GETPAT2+9
^DIR	CONT+1, CHK+10
$$VAL^XBDIQ1	CMM+7, CMM+8, CHK+1, CHK+2
EN^XBVK	XIT+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This option is used to merge two Non-Registered Patients who are" Line Location: BCHMNRP+4
Function Call: WRITE	Prompt: !,"in the file as duplicates. You will be asked to select the two" Line Location: BCHMNRP+5
Function Call: WRITE	Prompt: !,"patients who are duplicates. If one patient has a data value" Line Location: BCHMNRP+6
Function Call: WRITE	Prompt: !,"such as Tribe and the other doesn't the system will use the Tribe" Line Location: BCHMNRP+7
Function Call: WRITE	Prompt: !,"value from the patient with Tribe recorded. If both patients" Line Location: BCHMNRP+8
Function Call: WRITE	Prompt: !,"have a data value and they are different you will be asked to" Line Location: BCHMNRP+9
Function Call: WRITE	Prompt: !,"choose which value to use. Values looked at are: DOB, Sex," Line Location: BCHMNRP+10
Function Call: WRITE	Prompt: !,"SSN, Name, Tribe, Community of Residence.",!! Line Location: BCHMNRP+11
Function Call: WRITE	Prompt: !!,"Please select the first patient of the set of duplicates.",! Line Location: GETPAT1+3
Function Call: WRITE	Prompt: !,"BYE" Line Location: GETPAT1+5
Function Call: WRITE	Prompt: !!,"Please select the second patient of the set of duplicates.",! Line Location: GETPAT2+2
Function Call: WRITE	Prompt: !,"BYE" Line Location: GETPAT2+4
Function Call: WRITE	Prompt: !!,"YOU CAN'T SELECT THE SAME PATIENT AS THE FIRST PATIENT!" Line Location: GETPAT2+5
Function Call: WRITE	Prompt: !!,"You have selected the following 2 patients to merge together:" Line Location: GETPAT2+7
Function Call: WRITE	Prompt: ! Line Location: GETPAT2+8
Function Call: WRITE	Prompt: ! Line Location: GETPAT2+9
Function Call: WRITE	Prompt: !!,"I am going to merge the following two patients together using the" Line Location: CMM+5
Function Call: WRITE	Prompt: !,"following values for the demographic data:" Line Location: CMM+6
Function Call: WRITE	Prompt: !!?5,"Patient 1: ",$$VAL^XBDIQ1(90002.11,BCHPAT1,.01) Line Location: CMM+7
Function Call: WRITE	Prompt: !?5,"Patient 2: ",$$VAL^XBDIQ1(90002.11,BCHPAT2,.01) Line Location: CMM+8
Function Call: WRITE	Prompt: ! Line Location: CMM+9
Function Call: WRITE	Prompt: !?8,$P(^DD(90002.11,BCHX,0),U,1),": ",BCHMAST(BCHX) Line Location: CMM+10
Function Call: WRITE	Prompt: ! Line Location: CMM+11
Function Call: WRITE	Prompt: ! Line Location: CHK+8
Function Call: WRITE	Prompt: !,"Hold on...this may take a few minutes.." Line Location: MERGE+3
Function Call: WRITE	Prompt: "." Line Location: MERGE+16
Function Call: WRITE	Prompt: !!,"Patients have been merged. ",BCHVC," records were re-pointed.",! Line Location: MERGE+19
Routine Call	DIE Line Location: MERGE+10 MERGE+14
Routine Call	DIC Line Location: GETPAT1+4 GETPAT2+3
Routine Call	DIR Line Location: CONT+1 CHK+10

FileNo	Call Tags
^BCHR - [#90002]	Classic Fileman Calls
^BCHRPAT - [#90002.11]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^AUTTCOM("B"	MERGE+8
^AUTTTRI("B"	MERGE+6
^BCHR("ANRP"	MERGE+13
^DD(90002.11	CMM+10, CHK+10

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BCHC	MERGE+8*, MERGE+9
BCHDATA	CMM+1!
BCHDATA(	CHK+1, CHK+2, CHK+3, CHK+4, CHK+5, CHK+6, CHK+10, CHK+13, CHK+14
>> BCHF	CMM+3*, CHK+1, CHK+2, CHK+3, CHK+4, CHK+5, CHK+6, CHK+10, CHK+13, CHK+14
>> BCHGC	MERGE+5*
BCHMAST	CMM+1!
BCHMAST(	CMM+10, CHK+3, CHK+4, CHK+5, CHK+6, CHK+13, CHK+14
BCHMAST(".01"	MERGE+9
BCHMAST(".02"	MERGE+9
BCHMAST(".03"	MERGE+9
BCHMAST(".04"	MERGE+9
BCHMAST(".05"	MERGE+6
BCHMAST(".06"	MERGE+8
>> BCHPAT1	GETPAT1+2, GETPAT1+6, GETPAT2+5, GETPAT2+8, CMM+7, CHK+1, CHK+3, CHK+4, CHK+5, CHK+6 , CHK+10, CHK+13, MERGE+9, MERGE+13, MERGE+14
>> BCHPAT2	GETPAT1+2, GETPAT2+6, GETPAT2+9, CMM+8, CHK+2, CHK+3, CHK+4, CHK+5, CHK+6, CHK+10 , CHK+14, MERGE+18
>> BCHQUIT	CMM+2, CMM+3, CMM+4, CHK+11, CHK+12*
>> BCHT	MERGE+4, MERGE+6, MERGE+9
>> BCHTC	MERGE+7*
>> BCHV	MERGE+13*, MERGE+14
>> BCHVC	MERGE+5, MERGE+16, MERGE+19
>> BCHX	CMM+10*
DA	GETPAT2+8, GETPAT2+9, CONT+1!, CHK+10!, MERGE+9, MERGE+11!, MERGE+14, MERGE+15!, MERGE+18*
DIC	GETPAT1+1!, GETPAT1+4, GETPAT2+1!, GETPAT2+3, GETPAT2+8, GETPAT2+9
DIC(0	GETPAT1+4, GETPAT2+3
DIE	MERGE+9, MERGE+11!, MERGE+14, MERGE+15!
>> DIK	MERGE+18*
DIR	CONT+1!, CHK+9!, CHK+10!
DIR("A"	CONT+1, CHK+10
DIR(0	CONT+1, CHK+10
>> DIRUT	CONT+2, CHK+11
DR	MERGE+9, MERGE+11!, MERGE+14, MERGE+15!
U	CMM+10, CHK+10
>> Y	GETPAT1+5, GETPAT1+6, GETPAT2+4, GETPAT2+5, GETPAT2+6, CONT+3, CHK+12, CHK+13, CHK+14

Customize PDF page

Package: IHS RPMS CHR System

Routine: BCHMNRP

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Line Occurrences
CHK	CMM+3
GETPAT2	GETPAT2+5
MERGE	CONT+4
XIT	GETPAT1+5, GETPAT2+4, CMM+4, CONT+2, CONT+3