Routine: BDPDPEE

Information

BDPDPEE ; IHS/CMI/TMJ - UPDATE USING LISTMAN ;

Call Graph

Call Graph Total: 17

Package	Total	Call Graph
IHS Designated Provider	4	PAUSE^BDP $$CREATE^BDPAMA $$DATE^BDPLMDSP DELETE^BDPPASS
IHS VA Utilities	4	$$VAL^XBDIQ1 ^XBFMK VIEWR^XBLM EN^XBVK
Registration	3	EN^VALM TERM^VALM0 (CLEAR,FULL)^VALM1
VA Fileman	3	^DIC $$GET1^DIQ ^DIR
IHS Patient	1	(,$$DOB,$$DOD,$$HRN,KILL)^AUPNPAT
Kernel	1	DISP^XQORM1
Patient Care Component Reports	1	$$LASTVD^APCLV1

Caller Graph

Caller Graph Total: 5

Package	Total	Caller Graph
IHS Designated Provider	5	BDPAPI BDPCHNG BDPCHNGD BDPCOMA BDPTRANS

Entry Points

Name	Comments	DBIA/ICR reference
HDR	; -- header code
HS	;EP called from protocol to generate hs
RMDP	;EP - called from protocol to remove multiple DP entries
EXPND	; -- expand code
EN	;EP -- main entry point for BDP UPDATE PATIENT DATA
HELP	;EP -- help code
ADDDP1
CTR(X,Y)	;EP - Center X in a field Y wide.
INIT	; -- init variables and list array
GATHER1	;EP Called from Protocol to Resort List Display
GATHER2	;Resort by Provider
EOJ	;
CHKPROV(PROV)	;
BDPASK	;Ask User Type of Sort
END	;
CHG	;EP - Called from Protocol to change from One Provider to Another
GETTYPE	;
PPEP(BDPPIEN)	;PEP - entry point to view/update one provider's panel
START	;
PAUSE	;EP
PROV	;
GATHER	;
ADDDP	;EP called from protocol to open a new case
EXIT	; -- exit code

External References

Name	Field # of Occurrence
$$LASTVD^APCLV1	GATHER+10, GATHER2+9
^AUPNPAT	HS+5
$$DOB^AUPNPAT	GATHER+10, GATHER2+9
$$DOD^AUPNPAT	GATHER+8
$$HRN^AUPNPAT	GATHER+10, GATHER2+9
KILL^AUPNPAT	EOJ+8
PAUSE^BDP	CHG+16, CHG+17
$$CREATE^BDPAMA	CHG+18, ADDDP1+18
$$DATE^BDPLMDSP	GATHER+10, GATHER2+9
DELETE^BDPPASS	RMDP+8
^DIC	PROV+3, CHG+8, GETTYPE+2, HS+2, ADDDP+4
$$GET1^DIQ	CHG+16, CHG+17
^DIR	CHKPROV+11, CHG+3, RMDP+1, ADDDP1+1, ADDDP1+8, BDPASK+2, PAUSE+1
EN^VALM	EN+1
TERM^VALM0	EXIT+2
CLEAR^VALM1	EOJ+6
FULL^VALM1	CHG+2, ADDDP+1
$$VAL^XBDIQ1	CHKPROV+3, GATHER+11, GATHER2+10
^XBFMK	PROV+1
VIEWR^XBLM	HS+10
EN^XBVK	HS+7, HS+11, EOJ+1
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$CTR("View/Update Designated Provider List",80) Line Location: START+5
Function Call: WRITE	Prompt: !! Line Location: PROV+3
Function Call: WRITE	Prompt: !,"No Provider Selected." Line Location: PROV+4
Function Call: WRITE	Prompt: ! Line Location: CHKPROV+12
Function Call: WRITE	Prompt: !,"No items selected." Line Location: CHG+4
Function Call: WRITE	Prompt: !,"No Item selected." Line Location: CHG+5
Function Call: WRITE	Prompt: ! Line Location: CHG+7
Function Call: WRITE	Prompt: !,"No Provider Selected." Line Location: CHG+9
Function Call: WRITE	Prompt: !!,"Cannot assign as Message Agent (not in message agent file)-RECORD ",BDPC Line Location: CHG+16
Function Call: WRITE	Prompt: !!,"Cannot assign as Message Agent (inactive message agent)-RECORD ",BDPC Line Location: CHG+17
Function Call: WRITE	Prompt: !,"Changed the selected Providers",! Line Location: CHG+19
Function Call: WRITE	Prompt: !,"No items selected." Line Location: RMDP+2
Function Call: WRITE	Prompt: !,"No Item selected." Line Location: RMDP+3
Function Call: WRITE	Prompt: !,"Removed the selected Providers",! Line Location: RMDP+12
Function Call: WRITE	Prompt: !!,"NO TYPE SELECTED.",!! Line Location: GETTYPE+3
Function Call: WRITE	Prompt: !,"No Patient Selected." Line Location: HS+3
Function Call: WRITE	Prompt: !,"No Patient Selected." Line Location: ADDDP+5
Function Call: WRITE	Prompt: !!,"TYPE not entered." Line Location: ADDDP1+2
Function Call: WRITE	Prompt: !,"NO SORT SELECTED.",!! Line Location: BDPASK+3
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Routine Call	VALM Line Location: EN+1
Routine Call	DIC Line Location: PROV+3 CHG+8 GETTYPE+2 HS+2 ADDDP+4
Routine Call	DIR Line Location: CHKPROV+11 CHG+3 RMDP+1 ADDDP1+1 ADDDP1+8 BDPASK+2 PAUSE+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls
^AUPNPAT - [#9000001]	Classic Fileman Calls
^APCHSCTL - [#9001015]	Classic Fileman Calls
^BDPTCAT - [#90360.3]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	GATHER+9
^BDPMSGA - [#90360.5]	CHG+17, ADDDP1+14
^BDPMSGA("B"	CHG+16, ADDDP1+10
^BDPRECN - [#90360.1]	GATHER+2, GATHER+7, CHG+13, CHG+14, CHG+15, RMDP+5, RMDP+6, RMDP+7, ADDDP1+4, ADDDP1+5 , GATHER2+3, GATHER2+8
^BDPRECN("AA"	ADDDP1+4
^BDPRECN("AC"	GATHER+2, GATHER2+3
^BDPTCAT - [#90360.3]	ADDDP1+5, ADDDP1+10, ADDDP1+14
^DPT - [#2]	GATHER+2, GATHER+10, HS+9, GATHER2+9
^TMP("BDPDPEE"	GATHER+1!, GATHER+12, CHG+12, RMDP+4, GATHER2+2!, GATHER2+11
^TMP($J	GATHER+1!, GATHER+2, GATHER+4, GATHER+5, GATHER2+2!, GATHER2+3, GATHER2+5, GATHER2+6
^VA(200 - [#200]	CHKPROV+6, HDR+2, CHG+7, ADDDP1+5, ADDDP1+8

Label References

Name	Line Occurrences
$$CHKPROV	PROV+6, CHG+11
$$CTR	START+5
ADDDP1	ADDDP1+10, ADDDP1+14
EN	PROV+7, PPEP+2
EOJ	END+1
EXIT	CHG+4, CHG+5, CHG+9, CHG+11, CHG+20, RMDP+2, RMDP+3, RMDP+13, HS+7, HS+12 , ADDDP1+2, ADDDP1+4, ADDDP1+19, BDPASK+5
GATHER	INIT+2, EXIT+4, EXIT+5, EXIT+7
GATHER2	EXIT+6
GETTYPE	HS+6
HDR	EXIT+4, EXIT+5, EXIT+6, EXIT+7
PAUSE	CHG+9, HS+7, ADDDP1+2, ADDDP1+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	HS+9*, HS+10, HS+11!, EOJ+4!
AMCHDAYS	HS+11!
AMCHDOB	HS+11!
>> APCHSPAT	HS+8*, HS+9
>> APCHSTYP	GETTYPE+1, GETTYPE+4, HS+7
AUPNDAYS	START+1~
AUPNDOB	START+1~
AUPNDOD	START+1~
AUPNPAT	START+1~
AUPNSEX	START+1~
>> BDPANS	CHG+6, CHG+12, RMDP+4
BDPBD	START+1~
>> BDPC	CHG+12, CHG+16, CHG+17, RMDP+4
BDPCASE	EN+2!, EXIT+1!, EOJ+5!
BDPCDATE	EN+2!, EOJ+5!
BDPD	EN+2!, GATHER+2, GATHER+7, GATHER+8, GATHER+9, GATHER+10, GATHER2+3, GATHER2+8, GATHER2+9, EOJ+5!
>> BDPDP	PROV+2*
BDPED	START+1~
BDPG	CHKPROV+1~, CHKPROV+2, CHKPROV+5, CHKPROV+8*, CHKPROV+9
>> BDPI	CHG+12, RMDP+4
BDPLINE	EN+2!, INIT+3, GATHER+3, GATHER+6, GATHER+12, GATHER2+4, GATHER2+7, GATHER2+11, EXIT+4, EXIT+5 , EXIT+6, EXIT+7, EOJ+5!
>> BDPNAME	GATHER+4, GATHER+5, GATHER2+5, GATHER2+6
BDPP	END+2!
BDPPAT	CHG+14, CHG+18, RMDP+6, ADDDP+3, ADDDP+6, ADDDP1+4, ADDDP1+18, EXIT+1!
BDPPC	EXIT+1!
BDPPIEN	PROV+5*, PROV+6, PPEP~, PPEP+1, HDR+2, GATHER+2, ADDDP1+8, ADDDP1+10, ADDDP1+14, ADDDP1+18 , GATHER2+3
>> BDPPROV	CHG+10*, CHG+11, CHG+16, CHG+17, CHG+18
BDPQ	CHKPROV+1~, CHKPROV+2, ADDDP1+4, ADDDP1+7, ADDDP1+9*
BDPQUIT	END+2!
>> BDPR	CHG+12, CHG+13, CHG+14, CHG+15, RMDP+4, RMDP+5, RMDP+6, RMDP+7
BDPR0	START+1~
BDPR1	EXIT+1!
BDPRCNT	EN+2!, GATHER+3, GATHER+6, GATHER+12, GATHER2+4, GATHER2+7, GATHER2+11, EOJ+5!
>> BDPSANS	GATHER1+2, BDPASK+4, EXIT+4, EXIT+5, EXIT+6, EXIT+7
>> BDPTYPE	CHG+15, CHG+16, CHG+17, CHG+18, RMDP+7, ADDDP1, ADDDP1+3, ADDDP1+4, ADDDP1+5, ADDDP1+10 , ADDDP1+14, ADDDP1+18
BDPV	START+1~, START+3!
BDPW	END+2!
BDPX	START+1~, EN+2!, GATHER+5, GATHER+7, GATHER+11, GATHER+12, GATHER2+6, GATHER2+8, GATHER2+10, GATHER2+11 , EXIT+1!, EOJ+5!
BDPY	START+1~
D	START+2~
DA	PROV+3!, CHKPROV+11!, CHG+3!, CHG+8!, RMDP+1!, GETTYPE+2!, HS+2!, ADDDP+4!, ADDDP1+1!, ADDDP1+8! , BDPASK+2!, EOJ+4!
DDS	EOJ+4!
DDSFILE	EOJ+3!
DFN	START+1~, HS+1, HS+4, HS+5, HS+8, EXIT+1!, EOJ+2!
DIADD	PROV+3!, CHG+8!, HS+2!, ADDDP+4!
DIC	PROV+3!, CHG+7, CHG+8!, GETTYPE+2!, HS+2!, ADDDP+4*!, EOJ+4!
DIC("A"	PROV+3, CHG+7
DIC("B"	CHG+7*
DIC(0	PROV+3, CHG+7, GETTYPE+2, HS+2, ADDDP+4*
DIPGM	EOJ+3!
DIR	CHKPROV+10~, CHKPROV+11!, ADDDP1+1!, ADDDP1+6!, ADDDP1+8!, BDPASK+2!, PAUSE+1!
DIR("?"	BDPASK+2*
DIR("A"	CHKPROV+11, CHG+3, RMDP+1, ADDDP1+1, ADDDP1+8, BDPASK+2, PAUSE+1*
DIR("B"	CHKPROV+11, ADDDP1+8, BDPASK+2*
DIR(0	CHKPROV+11, CHG+3, RMDP+1, ADDDP1+1, ADDDP1+8, BDPASK+2, PAUSE+1*
>> DIRUT	CHG+3, CHG+5, RMDP+1, RMDP+3, ADDDP1+2, PAUSE+1*
DLAYGO	PROV+3!, CHG+8!, HS+2!, ADDDP+4!
DR	PROV+3!, CHG+8!, HS+2!, ADDDP+4!, EOJ+4!
>> DUOUT	CHG+3, RMDP+1, PAUSE+1
DUZ	CHG+7
DUZ(2	GATHER+9, GATHER+10, GATHER2+9
I	EXIT+4!, EXIT+5!, EXIT+6!, EXIT+7!
IOF	START+4, ADDDP+2
IOM	CTR+1
PROV	CHKPROV~, CHKPROV+3, CHKPROV+6
R	START+2~
U	CHKPROV+6, HDR+2, GATHER+2, GATHER+7, GATHER+9, GATHER+10, CHG+7, CHG+14, CHG+15, CHG+17 , RMDP+6, RMDP+7, HS+9, ADDDP1+4, ADDDP1+5, ADDDP1+8, ADDDP1+10, ADDDP1+14, GATHER2+3, GATHER2+8 , GATHER2+9
VALM	EOJ+7!
VALMAR	EOJ+7!
VALMBCK	EXIT+3*, EOJ+7!
VALMBG	EOJ+7!
VALMCAP	EOJ+7!
VALMCC	EOJ+7!
VALMCNT	INIT+3, EXIT+4, EXIT+5, EXIT+6, EXIT+7*, EOJ+7!
VALMCOFF	EOJ+7!
VALMCON	EOJ+7!
VALMEVL	EOJ+7!
VALMHDR	EOJ+7!
VALMHDR(1	HDR+1*
VALMHDR(2	HDR+2*
VALMHDR(3	HDR+3*
VALMHDR(4	HDR+4*
VALMHDR(5	HDR+5*
VALMIOXY	EOJ+7!
VALMKEY	EOJ+7!
VALMLFT	EOJ+7!
VALMLST	EOJ+7!
VALMMENU	EOJ+7!
VALMON	EOJ+7!
>> VALMSG	INIT+1*
VALMSGR	EOJ+7!
VALMUP	EOJ+7!
VALMVAR	EOJ+7!
VALMWD	EOJ+6, EOJ+7!
X	PROV+6, CHKPROV+1~, CHKPROV+3, CHKPROV+4, CTR~, CTR+1, CHG+11, CHG+18, GETTYPE+2, ADDDP1+4 , ADDDP1+5, ADDDP1+18, HELP+1, EXIT+4!, EXIT+5!, EXIT+6!, EXIT+7!, EOJ+4!
Y	PROV+4, PROV+5, CHKPROV+1~, CHKPROV+13, CTR~, CTR+1, GATHER+6, GATHER+8, GATHER+9, GATHER+10 , GATHER+11, GATHER+12, CHG+4, CHG+6, CHG+9, CHG+10, RMDP+2, RMDP+4, GETTYPE+3, GETTYPE+4 , HS+3, HS+4, HS+5, ADDDP+5, ADDDP+6, ADDDP1+3, ADDDP1+9, BDPASK+3, BDPASK+4, GATHER2+7* , GATHER2+9, GATHER2+10, GATHER2+11, EXIT+4!, EXIT+5!, EXIT+6!, EXIT+7!, EOJ+3!, EOJ+4!
Z	EXIT+4!, EXIT+5!, EXIT+6!, EXIT+7!

Customize PDF page

Package: IHS Designated Provider

Routine: BDPDPEE

Information

Source Information

Call Graph

Call Graph Total: 17

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: