Routine: BMCAPI

Package	Total	Call Graph
Referred Care Information System	8	PARMSET^BMC (ASK,GETDATE,REFDISP)^BMCADD (ADD,CALLIN,MEDHX)^BMCADDS ^BMCKILL PATLKUP^BMCLKID2 TYPE^BMCMOD (EDIT,MEDHX)^BMCMODS START2^BMCRDSP
IHS VA Utilities	1	EN^XBVK
VA Fileman	1	DD^%DT

Name	Comments	DBIA/ICR reference
VIEW(BMCDFN)	;ENTRY POINT TO VIEW A REFERRAL FOR A PATIENT
SECCHK	;TEST FOR USER ASSIGNED BMCZEDIT KEY AND PARAMETERS
ADD2	;
VIEW2	;
ADDSEC(BMCDFN)	; ENTRY POINT TO ADD A SECONDARY REFERRAL
EDIT(BMCDFN)	;ENTRY POINT TO EDIT A REFERRAL
ADDSEC2	;
EDIT2	;
EOJ	;
ADD(BMCDFN)	;ENTRY POINT TO ADD A REFERRAL FOR A PATIENT

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"PATIENT DOES NOT HAVE ANY REFERRALS." Line Location: ADDSEC+2
Function Call: WRITE	Prompt: !,"Patient does not have any Active Referrals." Line Location: ADDSEC2+6
Function Call: WRITE	Prompt: !!,"This is a CLOSED referral, Please select another referral" Line Location: ADDSEC2+9
Function Call: WRITE	Prompt: !!,"Please select a PRIMARY referral" Line Location: ADDSEC2+10
Function Call: WRITE	Prompt: !,"PATIENT DOES NOT HAVE ANY REFERRALS." Line Location: EDIT2+2
Function Call: WRITE	Prompt: !,"Patient does not have any Active Referrals." Line Location: EDIT2+6
Function Call: WRITE	Prompt: !!,"This is a CLOSED referral, Please select another referral" Line Location: EDIT2+10
Function Call: WRITE	Prompt: !,"PATIENT DOES NOT HAVE ANY REFERRALS." Line Location: VIEW2+2
Function Call: WRITE	Prompt: !,"RCIS parameters are not set up for this Facility" Line Location: SECCHK+1
Function Call: WRITE	Prompt: !,"Person does not have Keys to use this option" Line Location: SECCHK+10

Name	Line Occurrences (* Changed, ! Killed)
^BMCPARM - [#90001.31]	SECCHK+1
^BMCREF - [#90001]	ADDSEC2+11, EDIT2+8, EDIT2+12, EDIT2+13, EDIT2+14
^BMCREF("AA"	ADDSEC+2, EDIT2+2, VIEW2+2
^DIC(19.1 - [#19.1]	SECCHK+4, SECCHK+8
^DPT - [#2]	ADDSEC2+1, EDIT2+1, VIEW2+1
^VA(200 - [#200]	SECCHK+9

Name	Line Occurrences
ADD2	ADD+2
ADDSEC2	ADDSEC+3
EDIT2	EDIT+2, EDIT2+17
EOJ	ADD+3, ADDSEC+2, ADDSEC+4, EDIT+3, VIEW+1, VIEW+3
SECCHK	ADD+1, ADDSEC+1, EDIT+1, VIEW+1
VIEW2	VIEW+2

Name	Field # of Occurrence
^(0	EDIT2+8

Name	Field # of Occurrence
>> APCDOVRR	ADD2+2*
>> BMCAPI	ADDSEC2+2, EDIT2+3
>> BMCAPIS	ADDSEC2+3*
BMCDFN	ADD~, ADDSEC~, ADDSEC2+1, EDIT~, EDIT2+1, EDIT2+2, VIEW~, VIEW2+1, VIEW2+2
>> BMCDTYPE	EDIT2+17
>> BMCKEY	SECCHK+7, SECCHK+8, SECCHK+9
>> BMCLOOK	ADD2+1*
>> BMCMODE	ADD2+1, ADDSEC2+7, EDIT2+7*
>> BMCPARM	SECCHK+2
>> BMCQ	ADD+2, ADD2+1, ADD2+5, ADDSEC+3, ADDSEC2+12, ADDSEC2+13, EDIT+2, EDIT2+16, VIEW+1, SECCHK+1 , SECCHK+3, SECCHK+5, SECCHK+10*
>> BMCRDATE	EDIT2+8*
>> BMCREC	ADDSEC2+11, EDIT2+13
>> BMCREC("REF D	ATE" , EDIT2+11*
>> BMCRIEN	ADDSEC2+6, ADDSEC2+7, ADDSEC2+11, EDIT2+6, EDIT2+8, EDIT2+12, EDIT2+13, EDIT2+14
>> BMCRIENT	ADDSEC2+7, VIEW2+4
>> BMCRNUMB	ADDSEC2+11, EDIT2+8
>> BMCRTYPE	ADDSEC2+11*
>> BMCSRIEN	EDIT2+13*, EDIT2+14
>> DFN	ADDSEC+2
DUZ	SECCHK+9
DUZ(2	SECCHK+1
U	ADDSEC2+1, ADDSEC2+11, EDIT2+1, EDIT2+8, EDIT2+12, EDIT2+14, VIEW2+1
>> Y	ADDSEC2+1, ADDSEC2+5, EDIT2+1, EDIT2+5, EDIT2+8, EDIT2+11, VIEW2+1

Information