Routine: BWPURP

Package	Total	Call Graph
Women's Health	4	(DDS,DIC,DIE)^BWFMAN ADDLET^BWPURP (SETVARS,TITLE)^BWUTL5 KILLALL^BWUTL8
VA Fileman	2	EN1^DIP ^DIR
IHS VA Utilities	1	^XBKVAR

Package	Total	Caller Graph
Women's Health	7	BW ADD/EDIT NOT PURPOSE&LETTER BW ADD/EDIT NOTIF OUTCOME BW EDIT NOTIF PURPOSE&LETTER BW EDIT NOTIF TYPE SYNONYM BW EDIT PROCEDURE TYPE DAYS DQ BW PRINT NOTIF PURPOSE&LETTER BWPURP

Entry Points

Name	Field # of Occurrence
DDS^BWFMAN	EDITPUR+14
DIC^BWFMAN	EDITPUR+6, TYPE+6, OUTCOME+5
DIE^BWFMAN	TYPE+8, OUTCOME+7
ADDLET^BWPURP	GENSTUFF+4
SETVARS^BWUTL5	EDITPUR+2, TYPE+2, OUTCOME+2
TITLE^BWUTL5	EDITPUR+5, TYPE+4, OUTCOME+4
KILLALL^BWUTL8	PRINTPUR+7, EDITPUR+15, TYPE+10, OUTCOME+9
EN1^DIP	PRINTPUR+6
^DIR	REPLACE+7
^XBKVAR	GENSTUFF+2

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?3,"Do you wish to delete the old letter for this Purpose of " Line Location: REPLACE+3
Function Call: WRITE	Prompt: "Notification",!?3,"and replace it with the generic sample letter?" Line Location: REPLACE+4
Function Call: WRITE	Prompt: ! Line Location: REPLACE+7
Function Call: WRITE	Prompt: @IOF Line Location: TYPE+9
Function Call: WRITE	Prompt: @IOF Line Location: OUTCOME+8
Function Call: WRITE	Prompt: !,T,$P(X,";;",2) Line Location: PRINTX+2
Function Call: WRITE	Prompt: !,DA Line Location: GENSTUFF+4
Routine Call	DIR Line Location: REPLACE+7

FileNo	Call Tags
^BWNOTP - [#9002086.404]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^BWLET(1	ADDLET+4, ADDLET+5, ADDLET+6
^BWNOTP - [#9002086.404]	ADDLET+2!, ADDLET+5, ADDLET+6, GENSTUFF+4

Name	Field # of Occurrence
A	TYPE+5~*, TYPE+6
>> BWLINL	HELP1+3, TEXT1+9
>> BWPOP	EDITPUR+11, EDITPUR+14, REPLACE+8*, TYPE+8, OUTCOME+7
>> BWTAB	HELP1+3, HELPTX+1, TEXT1+9, PRINTX+1
>> BY	PRINTPUR+4*
DA	EDITPUR+8, EDITPUR+14, ADDLET+2, ADDLET+5, ADDLET+6, GENSTUFF+2~, GENSTUFF+3, GENSTUFF+4*
>> DHD	PRINTPUR+4*
>> DIC	PRINTPUR+2*
>> DIOBEG	PRINTPUR+5*
DIR	REPLACE+2~
DIR("?"	HELPTX+2, HELPTX+3!
DIR("A"	REPLACE+6*
DIR("B"	REPLACE+5*
DIR(0	REPLACE+5*
DIRUT	REPLACE+2~, REPLACE+8
>> DR	EDITPUR+13*, EDITPUR+14
>> FLDS	PRINTPUR+3*
>> FR	PRINTPUR+4*
I	HELPTX+1~, HELPTX+2, HELPTX+3, PRINTX+1~, PRINTX+2
IOF	TYPE+9, OUTCOME+8
N	ADDLET+3~, ADDLET+4, ADDLET+5
T	HELPTX+1~, HELPTX+2, PRINTX+1~, PRINTX+2
>> TO	PRINTPUR+4*
U	EDITPUR+9, EDITPUR+10
X	HELPTX+1~, HELPTX+2, PRINTX+1~, PRINTX+2
Y	EDITPUR+4, EDITPUR+6, EDITPUR+7, EDITPUR+8, EDITPUR+9, EDITPUR+10, REPLACE+2~, REPLACE+9, TYPE+3, TYPE+6 , TYPE+7, TYPE+8, OUTCOME+3, OUTCOME+5, OUTCOME+6, OUTCOME+7

Name	Field # of Occurrence
$T(@BWLINL+I	HELPTX+2, PRINTX+2