Routine: BCHADRS

Package	Total	Call Graph
VA Fileman	3	EN^DDIOL ^DIE ^DIR
IHS VA Utilities	2	($$VAL,$$VALI)^XBDIQ1 EN^XBNEW
Kernel	1	$$REPEAT^XLFSTR

Entry Points

Name	Comments	DBIA/ICR reference
POVS1	;
CANNEDN(BCHRDA)	;EP - return canned narrative
CN	;
CN1	;
GETNARR1	;
GETNARR(BCHRDA)	;
WTD1	;
FM12	;
FM13	;
POV1
GETNARRS(PC,SC)	;
DEFNS(R)	;EP - called from screenman screen
POVS(BCHR)	;
GN	;K DIR S DIR(0)="90002.01,.06O",DIR("A")="NARRATIVE" KILL DA D ^DIR KILL DIR
FMD	;
FME	;
DEFAL(R)	;EP - called from screenman screen
WTD	;
FMA	;

External References

Name	Field # of Occurrence
EN^DDIOL	POV1+2, FM12+1, FME+1, FMD+1, CANNEDN+3, CN+5
^DIE	FME+7, FMD+6, FMA+3, GN+2, GN+4, GN+5, CN1+18
^DIR	FM12+4, FME+3, FMD+3, CN+1, CN1+15, WTD1+2
$$VAL^XBDIQ1	POV1+6, GETNARRS+12, CN1+12
$$VALI^XBDIQ1	CANNEDN+4
EN^XBNEW	POVS+1, GETNARR+1, WTD+1
$$REPEAT^XLFSTR	POV1+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?3,"Assessments/Purpose of Visits" Line Location: POV1+0
Function Call: WRITE	Prompt: ": None currently recorded" Line Location: POV1+1
Function Call: WRITE	Prompt: !?1,"#",?5,"PROBLEM",?27,"SERVICE",?48,"MINUTES" Line Location: POV1+3
Function Call: WRITE	Prompt: ! Line Location: CN+1
Function Call: WRITE	Prompt: !,"Response is Required." Line Location: CN+2
Function Call: WRITE	Prompt: !,"Please select the narrative you wish to use.",! Line Location: CN1+2
Function Call: WRITE	Prompt: !?5,X,") ",$P(BCHCANNN(X),U,2) Line Location: CN1+14
Routine Call	DIE Line Location: FME+7 FMD+6 FMA+3 GN+2 GN+4 GN+5 CN1+18
Routine Call	DIR Line Location: FM12+4 FME+3 FMD+3 CN+1 CN1+15 WTD1+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BCHR - [#90002]	Classic Fileman Calls
^BCHRPROB - [#90002.01]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BCHR - [#90002]	POVS1+2
^BCHRPROB - [#90002.01]	GETNARRS+2!, GETNARRS+15, GETNARRS+16, GETNARRS+17*, CANNEDN+3, CN+5, GN+3, CN1+5, CN1+7, DEFNS+5 , DEFNS+10, DEFAL+5, DEFAL+10
^BCHRPROB("AD"	POV1+1, POV1+4, DEFNS+4, DEFAL+4
^BCHTACTL("B"	DEFAL+17
^BCHTCNAR - [#90002.59]	GETNARRS+10, GETNARRS+11, CN1+10, CN1+11
^BCHTPROB - [#90002.53]	GETNARRS+8, CANNEDN+4, CN1+8, DEFNS+6, DEFAL+6
^BCHTSERV - [#90002.54]	GETNARRS+6, GETNARRS+11, CANNEDN+3, CANNEDN+4, CN+5, CN1+6, CN1+11, DEFNS+11, DEFAL+11

Label References

Name	Line Occurrences
$$CANNEDN	GN+3
@(	FM12+8
CN	CN+2
CN1	CN+4
FM12	POV1+1
FM13	FM12+5, FM12+6
GN	GN+3, CN1+16, CN1+17
POV1	FM12+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APCDOVRR	GETNARR1+1~, CN+3*
BCHC	POVS1+1~, POV1+1, POV1+4, POV1+5*, POV1+6, FM12+3, FME+3, FMD+3, GETNARR1+1~
BCHCANNN	GETNARRS+1!
BCHCANNN(	GETNARRS+12, GETNARRS+15, CN1+12, CN1+14, CN1+18
BCHCM	POVS1+1~, POV1+4!, GETNARR1+1~
BCHCM(	POV1+5*, FME+6, FMD+5
BCHCOUNT	GETNARRS+1!, GETNARRS+18, CN1+13, CN1+15
>> BCHDEL	WTD1+3, WTD1+4, WTD1+5*
>> BCHDONE	FM12+6*
BCHNARR	GETNARR1+1~, GN+3, GN+4, GN+5, CN1+18
BCHPAT	POVS1+1~, POVS1+2*, GETNARR1+1~
BCHR	POVS~, POVS1+2, POV1+1, POV1+4, FMA+2
BCHRDA	GETNARR~, CANNEDN~, CANNEDN+3, CANNEDN+4, CN+5, GN+2, GN+3, GN+4, GN+5, CN1+5 , CN1+7, CN1+18
>> BCHTP	FME+7, FMD+6
BCHX	CANNEDN+1~, CANNEDN+3, GETNARR1+1~, CN+5
C	GETNARRS+3~, GETNARRS+4, GETNARRS+12, GETNARRS+15, GETNARRS+16, GETNARRS+17, GETNARRS+18, CN1+3~, CN1+4, CN1+12 , CN1+13
DA	FM12+4!, FME+3!, FME+5!, FME+6, FME+7!, FMD+3!, FMD+5, FMD+6!, FMD+7!, FMA+2* , FMA+4!, GETNARRS+2, GETNARRS+15, GETNARRS+16, GETNARRS+17, CN+1!, GN+2!, GN+4!, GN+5!, CN1+15! , CN1+18!, WTD1+2!
DA(1	FME+7, FMD+6
DIC	FME+5!, FMD+7!
DIE	FME+7!, FMD+6!, FMA+2, FMA+4!, GN+2!, GN+4!, GN+5!, CN1+18*!
DIR	FM12+2!, FM12+4!, FME+2!, FME+3!, FMD+2!, FMD+3!, CN+1!, CN1+15!, WTD1+1!, WTD1+2!
DIR("A"	FM12+4, FME+3, FMD+3, CN+1, CN1+15, WTD1+2
DIR("B"	FM12+4, WTD1+2
DIR(0	FM12+3, FME+3, FMD+3, CN+1, CN1+15, WTD1+2
>> DIRUT	FM12+5, FME+4, FMD+4, CN1+16, WTD1+3
DR	FME+5!, FME+7!, FMD+6!, FMD+7!, FMA+2, FMA+4!, GN+2!, GN+4!, GN+5!, CN1+18*!
G	DEFNS+2~, DEFNS+3, DEFNS+7, DEFNS+8, DEFNS+9, DEFNS+12, DEFNS+13, DEFNS+14, DEFNS+15, DEFNS+17 , DEFAL+2~, DEFAL+3, DEFAL+8, DEFAL+12, DEFAL+15, DEFAL+17
PC	GETNARRS~, GETNARRS+7, GETNARRS+8, GETNARRS+9, CN1+3~, CN1+7, CN1+8, CN1+9
PCSC	GETNARRS+3~, GETNARRS+9, GETNARRS+11, CN1+3~, CN1+9, CN1+11
R	DEFNS~, DEFNS+1, DEFNS+4, DEFAL~, DEFAL+1, DEFAL+4
SC	GETNARRS~, GETNARRS+5, GETNARRS+6, GETNARRS+11, CN1+3~, CN1+5, CN1+6, CN1+11
SCE	GETNARRS+3~, GETNARRS+6, GETNARRS+9, CN1+3~, CN1+6, CN1+9
U	POVS1+2, GETNARRS+6, GETNARRS+8, GETNARRS+12, GETNARRS+15, CANNEDN+3, CANNEDN+4, CN+5, GN+3, CN1+5 , CN1+6, CN1+7, CN1+8, CN1+12, CN1+14, CN1+18, DEFNS+5, DEFNS+6, DEFNS+10, DEFNS+11 , DEFAL+5, DEFAL+6, DEFAL+10, DEFAL+11
X	POV1+4, POV1+5, POV1+6, GETNARRS+3~, GETNARRS+10, GETNARRS+11, GETNARRS+12, CN+2, CN1+3~, CN1+10* , CN1+11, CN1+12, CN1+14, DEFNS+2~, DEFNS+4, DEFNS+5, DEFNS+10, DEFAL+2~, DEFAL+4*, DEFAL+5 , DEFAL+10
Y	POVS+2!, FM12+6, FM12+7, FM12+8, FM13+1!, FME+6, FMD+5, GETNARR+2!, CN+4, CN1+17 , CN1+18, WTD+2!, WTD1+4, DEFNS+2~, DEFNS+5, DEFNS+6, DEFNS+7, DEFNS+8, DEFNS+9, DEFNS+11 , DEFNS+12, DEFNS+13, DEFNS+14, DEFNS+15, DEFAL+2~, DEFAL+5, DEFAL+6, DEFAL+8, DEFAL+11*, DEFAL+12 , DEFAL+15
Z	DEFNS+2~, DEFNS+10, DEFNS+11, DEFAL+2~, DEFAL+10, DEFAL+11

Customize PDF page

Package: IHS RPMS CHR System

Routine: BCHADRS

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: