Routine: BCHUEDT

Package	Total	Call Graph
IHS RPMS CHR System	5	RECCHECK^BCHUADD1 (GETDATE,GETPROV,HDR)^BCHUAR GATHER^BCHUARL EN^BCHUDSP PAUSE^BCHUTIL1
VA Fileman	4	^DDS ^DIE ^DIK ^DIR
Registration	3	TERM^VALM0 FULL^VALM1 EN^VALM2

Package	Total	Caller Graph
IHS RPMS CHR System	2	BCHUADD1 BCHUEDT1

Entry Points

Name	Comments	DBIA/ICR reference
DISP	;EP
APOV	;add a new pov
EN	;EP
EPOV	;edit an existing pov
CF1
REF	;
CF	;EP - CHANGE FORM
DISPPOVS	;
CD	;EP - CHANGE DATE
1	;PATIENT demographic
2	;EP - OTHER record data
XIT	;eof
EOJ
CP	;EP - CHANGE PROVIDER
TYPE	; get type of data to edit
DPOV	;delete pov

External References

Name	Field # of Occurrence
RECCHECK^BCHUADD1	DISP+6
GETDATE^BCHUAR	CD+3
GETPROV^BCHUAR	CP+3
HDR^BCHUAR	REF+6, CP+9, CD+9, CF1+5
GATHER^BCHUARL	REF+4, CP+7, CD+7, CF1+3
EN^BCHUDSP	DISP+1
PAUSE^BCHUTIL1	EN+4, EN+5, CP+4, CD+4, CF1
^DDS	2+3
^DIE	1+4, 1+10, 1+17, 1+25, 1+26, 1+27, 1+28, 1+29, 2+2, 2+11 , 2+18, EPOV+6, APOV+2
^DIK	DPOV+10
^DIR	TYPE+3, EPOV+2, DPOV+2, DPOV+7
TERM^VALM0	REF+3, CP+6, CD+6, CF1+2
FULL^VALM1	EN+6, CP+1, CD+1, CF+1
EN^VALM2	EN+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No records selected." Line Location: EN+2
Function Call: WRITE	Prompt: !,"No record selected." Line Location: EN+3
Function Call: WRITE	Prompt: !,"Not a valid CHR RECORD." Line Location: EN+5
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"PLEASE RE-EDIT THE RECORD AND CORRECT THIS ERROR!!!",! Line Location: DISP+7
Function Call: WRITE	Prompt: !! Line Location: TYPE+2
Function Call: WRITE	Prompt: !,"error updating pov's with patient, NOTIFY PROGRAMMER" Line Location: 1+12
Function Call: WRITE	Prompt: !,"error updating educ's with patient, NOTIFY PROGRAMMER" Line Location: 1+19
Function Call: WRITE	Prompt: !!,"If this is a registered patient, enter their name or chart number",!,"otherwise type an ""^"" to update a non-registered patient's data.",!! Line Location: 1+24
Function Call: WRITE	Prompt: ! Line Location: 2+1
Function Call: WRITE	Prompt: !!,"ERROR IN SCREENMAN FORM!! *NOTIFY PROGRAMMER*" Line Location: 2+5
Function Call: WRITE	Prompt: !,"error updating pov's with patient, NOTIFY PROGRAMMER" Line Location: 2+13
Function Call: WRITE	Prompt: !,"error updating educ's with patient, NOTIFY PROGRAMMER" Line Location: 2+20
Function Call: WRITE	Prompt: ! Line Location: DISPPOVS+1
Function Call: WRITE	Prompt: ! Line Location: EPOV+2
Function Call: WRITE	Prompt: !!,"Invalid choice." Line Location: EPOV+5
Function Call: WRITE	Prompt: !!,"ERROR ENCOUNTERED IN EDITING A POV" Line Location: EPOV+7
Function Call: WRITE	Prompt: !!,"Adding a NEW POV...",! Line Location: APOV+1
Function Call: WRITE	Prompt: !!,"NO POV ADDED!" Line Location: APOV+3
Function Call: WRITE	Prompt: !!,"Invalid choice." Line Location: DPOV+5
Function Call: WRITE	Prompt: !,"Okay, not deleted." Line Location: DPOV+9
Function Call: WRITE	Prompt: !,"POV DELETED" Line Location: DPOV+10
Function Call: WRITE	Prompt: !!,"No provider selected." Line Location: CP+4
Function Call: WRITE	Prompt: !!,"No new date selected." Line Location: CD+4
Function Call: WRITE	Prompt: !,"Form changed to 535 Comprehensive." Line Location: CF+2
Function Call: WRITE	Prompt: !,"Form changed to 535-1 Abbreviated." Line Location: CF+3
Routine Call	DIE Line Location: 1+4 1+10 1+17 1+25 1+26 1+27 1+28 1+29 2+2 2+11 2+18 EPOV+6 APOV+2
Routine Call	DDS Line Location: 2+3
Routine Call	DIR Line Location: TYPE+3 EPOV+2 DPOV+2 DPOV+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BCHR - [#90002]	Classic Fileman Calls
^BCHRPROB - [#90002.01]	Classic Fileman Calls
^BCHRPED - [#90002.02]	Classic Fileman Calls
^BCHRPAT - [#90002.11]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTNPOV - [#9999999.27]	DISPPOVS+3
^BCHR - [#90002]	EN+5, DISP+3, 1+2, 1+3, 1+5, 1+26, 1+28, 2+6
^BCHRPED("AD"	1+15, 2+16
^BCHRPROB - [#90002.01]	DISPPOVS+3, DISPPOVS+4
^BCHRPROB("AD"	1+8, 2+9, DISPPOVS+2
^BCHTPROB - [#90002.53]	DISPPOVS+4
^BCHTSERV - [#90002.54]	DISPPOVS+4
^DPT - [#2]	1+3

Label References

Name	Line Occurrences
@(	TYPE+7
CF1	CF+2
DISPPOVS	EPOV+1, DPOV+1
EOJ	REF+1
TYPE	DISP+5
XIT	EN+2, EN+3, EN+4, EN+5, DISP+5, DISP+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BCHC	EOJ!, DISPPOVS+2*, DISPPOVS+4, EPOV+2, EPOV+5, DPOV+2, DPOV+5
>> BCHDATE	CD+2, CD+4*
>> BCHEN1	REF+1
BCHERROR	DISP+7, EOJ!
>> BCHODATE	CD+2*, CD+4
>> BCHODFN	1+4*, 1+6
>> BCHOPROV	CP+2*, CP+4
>> BCHPROV	CP+2, CP+4*
>> BCHQUIT	2+5*
BCHR	EN+3!, EN+4!, EN+5!, DISP+3, EOJ!, 1+2, 1+3, 1+4, 1+5, 1+8 , 1+15, 1+25, 1+26, 1+27, 1+28, 1+29, 2+2, 2+3, 2+6, 2+9 , 2+16, DISPPOVS+2, APOV+2
BCHR0	DISP+3*, DISP+4, EOJ!
>> BCHRCNT	REF+5, CP+8, CD+8, CF1+4
BCHRDEL	EN+4!, EN+5!
BCHRPOV	EOJ!
BCHRPOV(	DISPPOVS+2*, EPOV+5, EPOV+6, DPOV+5, DPOV+10
BCHRWDEL	DISP+2*, DISP+7, EOJ!
BCHTYPE	DISP+5, TYPE+1, TYPE+6*, TYPE+7, EOJ!, EOJ+1!
BCHUABFO	2+3, CF+2!, CF+3*
BCHUEDT	DISP+2*, EOJ!
>> BCHVRECS("IDX"	EN+4
BCHX	EOJ!, 1+8, 1+9, 1+15, 1+16, 2+9, 2+10, 2+16, 2+17
>> BCHXX	1+26, 1+28, 1+29
DA	1+4!, 1+9, 1+11!, 1+16, 1+18!, 1+25!, 1+26!, 1+27!, 1+28!, 1+29! , 1+30!, 2+2!, 2+3, 2+4!, 2+10, 2+12!, 2+17, 2+19!, EPOV+6!, APOV+2! , DPOV+10*!
DDSFILE	1+30!, 2+3*, 2+4!
DFN	DISP+4, EOJ!, 1+4, 1+5, 1+6, 1+9, 1+16, 2+6*, 2+7, 2+10 , 2+17
DIC	1+30!, 2+4!
DIE	1+4!, 1+9, 1+11!, 1+16, 1+18!, 1+25!, 1+26!, 1+27!, 1+28!, 1+29! , 1+30!, 2+2!, 2+4!, 2+10, 2+12!, 2+17, 2+19!, EPOV+6!, APOV+2*!
DIK	DPOV+10*!
DIMSG	2+5!
DIR	TYPE+3!, EPOV+2!, DPOV+2!, DPOV+7!
DIR("A"	TYPE+3, EPOV+2, DPOV+2, DPOV+7
DIR("B"	DPOV+7*
DIR(0	TYPE+3, EPOV+2, DPOV+2, DPOV+7
>> DIRUT	TYPE+3, TYPE+4, EPOV+2, EPOV+3, DPOV+2, DPOV+3, DPOV+7, DPOV+8
DITC	1+9, 1+11!, 1+16, 1+18!, 2+10, 2+12!, 2+17, 2+19!
DIU	1+11!, 1+18!, 1+27!, 2+12!, 2+19!, EPOV+6!, APOV+2!
DIV	1+11!, 1+18!, 1+27!, 2+12!, 2+19!, EPOV+6!, APOV+2!
DIW	1+11!, 1+18!, 2+12!, 2+19!, EPOV+6!, APOV+2!
DIY	1+11!, 1+18!, 2+12!, 2+19!, EPOV+6!, APOV+2!
DR	1+4!, 1+9, 1+11!, 1+16, 1+18!, 1+25!, 1+26!, 1+27!, 1+28!, 1+29! , 1+30!, 2+2, 2+3, 2+4!, 2+10, 2+12!, 2+17, 2+19!, EPOV+6!, APOV+2!
DT	2+2
>> DUOUT	TYPE+3, EPOV+2, DPOV+2, DPOV+7
>> N	DISPPOVS+3*, DISPPOVS+4
U	DISP+4, 1+2, 1+3, 1+5, 1+26, 1+28, 2+6, DISPPOVS+3, DISPPOVS+4
>> VALMBCK	REF+2, CP+5, CD+5, CF1+1
>> VALMCNT	REF+5, CP+8, CD+8, CF1+4
VALMY	EN+2, EN+3!
VALMY(0	EN+3
>> X	DISPPOVS+2*, DISPPOVS+3, DISPPOVS+4
XQORNOD	EN+3!
XQORNOD(0	EN+1
>> Y	TYPE+5, TYPE+6, 1+12, 1+19, 2+13, 2+20, EPOV+4, EPOV+6, EPOV+7, APOV+3 , DPOV+4, DPOV+9, DPOV+10

Customize PDF page

Package: IHS RPMS CHR System

Routine: BCHUEDT

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: