Routine: SDRR5

Information

SDRR5 ;10N20/MAH; RECALL REMINDER Remove and Replace Providers and Clinics; 01/22/2008

Source file <SDRR5.m>

Package	Total	Call Graph
VA Fileman	5	^%DT ^DIC YN^DICN ^DIE $$GET1^DIQ
Kernel	1	$$NAME^XUSER

Package	Total	Caller Graph
Scheduling	1	SDRR CONVERT ENTRIES

Name	Comments	DBIA/ICR reference
QUIT
CLINC
SELDT
CLEAN	;CLINIC NOT SELECTED BUT CHECK
STRT

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?1,"Do you want to change Clinic names that the recall is pointed to: " Line Location: STRT+3
Function Call: WRITE	Prompt: !,?1,"You have selected not to move clinic recall applications to a different clinic is this correct: " Line Location: CLEAN+1
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: SELDT+0
Function Call: WRITE	Prompt: !!,?5,"**You will be converting all Clinic Recalls for**" Line Location: SELDT+2
Function Call: WRITE	Prompt: !!,?3,SDRROLD_" -They will be converted to- "_SDRRNEW Line Location: SELDT+3
Function Call: WRITE	Prompt: !,?3,OLDC_" Clinic will be converted to "_NEWC_" Clinic" Line Location: SELDT+4
Routine Call	DIE Line Location: SELDT+6 SELDT+8
Routine Call	DIC Line Location: STRT+1 STRT+2 CLINC CLINC+1

FileNo	Call Tags
^SC - [#44]	Classic Fileman Calls, GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^SD(403.5	SELDT+5, SELDT+6, SELDT+7, SELDT+8
^SD(403.54	STRT+1, STRT+2

Name	Field # of Occurrence
%	STRT+3, STRT+4!, CLEAN+1
%DT	SELDT*, QUIT!
%DT("A"	SELDT*
D0	SELDT+5, SELDT+6, SELDT+7, SELDT+8, QUIT!
DA	SELDT+6!, SELDT+8!
DIC	STRT+1, STRT+2, CLINC, CLINC+1, QUIT!
DIC("A"	STRT+1, STRT+2, CLINC, CLINC+1
DIC(0	STRT+1, STRT+2, CLINC, CLINC+1
DIE	SELDT+6!, SELDT+8!
DR	SELDT+6!, SELDT+8!
EDT	STRT, SELDT+1, SELDT+6, SELDT+8, QUIT!
FLAG	STRT, CLINC+1, CLEAN+1, SELDT+5, SELDT+7, QUIT!
NEWC	STRT, CLINC+1, SELDT+4, QUIT!
NHIEN	STRT, CLINC+1, QUIT!
NIEN	STRT, STRT+2, QUIT!
OHIEN	STRT, CLINC, QUIT!
OIEN	STRT, STRT+1, SELDT+5, SELDT+7, QUIT!
OLDC	STRT, CLINC, SELDT+4, QUIT!
OPROV	STRT+1, STRT+2, QUIT!
RD	SELDT+6, SELDT+8, QUIT!
SDRRNEW	STRT+2*, SELDT+3, QUIT!
SDRROLD	STRT+1*, SELDT+3, QUIT!
SDT	STRT, SELDT, SELDT+6, SELDT+8, QUIT!
X	QUIT!
Y	STRT+1, STRT+2, CLINC, CLINC+1, SELDT, SELDT+1, QUIT!