Global: ^SD(403.5

FileMan FileNo	FileMan Filename	Package
403.5	RECALL REMINDERS	Scheduling

Package	Total	Routines
Scheduling	55	SD53P566 SD686PST SDEC07 SDEC52 SDEC52A SDEC52C SDEC52CJSON SDEC54 SDEC781P SDECAR3 SDECAUD SDECCON SDECDTHCLNUP2 SDECIDX SDECINI2 SDECRRCLEANUP SDES2APPTUTIL SDES2GETRECALL SDES2GETREQS SDES2GREQSINST SDES2QRYAPREQS SDES2QRYAPREQSA SDES2RECLLREQ SDESAPPTREQ40984 SDESCONTACTS SDESCREATEAPPT SDESDISPRECALL SDESGETAREQINST2 SDESGETRECALL SDESGETREQWRAPPR SDESMISSIONELG SDESUPDRECREQ SDESUPDRECREQ2 SDRR1 SDRR5 SDRRCLR SDRRCLR2 SDRRCRR SDRRCRR1 SDRRDEL SDRRINQ SDRRINQ1 SDRRISRD SDRRISRL SDRRISRU SDRROR SDRRRECL SDRRRECP SDRRREP SDRRSEG3 SDRRTSK SDRRTSK1 SDRRUTL TEAM POSITIONS ^SD(403.5
Mobile Scheduling Applications Suite	1	MBAARPCL

Package	Total	Routines
Scheduling	37	SDEC07 SDEC52 SDEC52C SDEC52CJSON SDECAR1A SDECAR3 SDECINI2 SDECRRCLEANUP SDECUTL SDES2APPTUTIL SDES2CONTACTS SDES2DISPRECALL SDES2GETRECALL SDES2GETREQS SDES2GREQSINST SDES2QRYAPREQS SDES2QRYAPREQSA SDES2QRYAPREQSB SDES2RECLLREQ SDESCONTACTS SDESCREATEAPPT SDESCRTAPPTWRAP SDESDISPRECALL SDESGETAREQINST2 SDESGETRECALL SDESGETREQWRAPPR SDESMISSIONELG SDESRECCLINSRCH SDRR1 SDRR5 SDRRCLR SDRRCLR2 SDRRDEL SDRRISRU SDRRRECL SDRRRECP SDRRREP
Mobile Scheduling Applications Suite	1	MBAARPCL

Package	Total	FileMan Files
Scheduling	2	SDEC APPOINTMENT(#409.84)[.22] SDEC CONTACT(#409.86)[2.3]

Package	Total	FileMan Files
Scheduling	3	HOSPITAL LOCATION(#44)[4.5] RECALL REMINDERS APPT TYPE(#403.51)[3] RECALL REMINDERS PROVIDERS(#403.54)[4]
Kernel	1	NEW PERSON(#200)[7]
Registration	1	PATIENT(#2)[.01]

Fields, Total: 15

Field #	Name	Loc	Type	Details
.01	PATIENT NAME	0;1	POINTER TO PATIENT FILE (#2)	**********************REQUIRED FIELD********************** PATIENT(#2) LAST EDITED: `JUL 15, 2008` HELP-PROMPT: `Enter the name of the Patient you wish to enter a Recall for.` DESCRIPTION: `Recall Reminder patient name this is a pointer to the patient file #2.` CROSS-REFERENCE: `403.5^B` `1)= S ^SD(403.5,"B",$E(X,1,30),DA)=""` `2)= K ^SD(403.5,"B",$E(X,1,30),DA)` `Used for checking to see if the patient is in the Recall file and display recall information before a new entry is made.` FIELD INDEX: `A66201 (#823) MUMPS IR ACTION` `Short Descr: Save copy of record before deletion.` `Description: Before deleting a record from this file, save a copy of it in file 403.56. Deletion can be either because a clerk deletes a patient from the recall list, or because a patient has been given an appointment in a clinic` `requested by the recall list and therefore is deleted by the nightly job. We save this information so that we can look back at appointments given to patients and see how timely the appointments were.` `Set Logic: Q` `Kill Logic: D DELETE^SDRRISRU` `Kill Cond: S X=(X1'=""&(X2=""))` `X(1): PATIENT NAME (403.5,.01) (forwards)`
2	ACCESSION#	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>25!($L(X)<1) X` LAST EDITED: `JUL 15, 2008` HELP-PROMPT: `Answer must be 1-25 characters in length.` DESCRIPTION: `This is the lab order number or the lab accession number if known.`
2.5	COMMENT	0;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<1) X` LAST EDITED: `NOV 02, 2016` HELP-PROMPT: `Answer must be 1-80 characters in length.` DESCRIPTION: `Comments needed for this recall entry.` AUDIT: `YES, ALWAYS`
2.6	FAST/NON-FASTING	0;8	SET	'f' FOR FASTING; 'n' FOR NON-FASTING; LAST EDITED: `NOV 02, 2016` HELP-PROMPT: `Are the labs Fasting or Non-Fasting? leave blank if no labs have been ordered.` DESCRIPTION: `If the patient has had lab tests ordered for this recall visit, select either Fasting or Non-Fasting labs. If the patient has no labs orders leave blank.` AUDIT: `YES, ALWAYS`
3	TEST/APP.	0;4	POINTER TO RECALL REMINDERS APPT TYPE FILE (#403.51)	**********************REQUIRED FIELD********************** RECALL REMINDERS APPT TYPE(#403.51) LAST EDITED: `NOV 02, 2016` HELP-PROMPT: `Select the type of Recall visit` DESCRIPTION: `This is the type of Recall Visit that is assigned for this entry.` AUDIT: `YES, ALWAYS`
4	PROVIDER	0;5	POINTER TO RECALL REMINDERS PROVIDERS FILE (#403.54)	**********************REQUIRED FIELD********************** RECALL REMINDERS PROVIDERS(#403.54) LAST EDITED: `NOV 02, 2016` HELP-PROMPT: `Select the provider for this Recall entry.` DESCRIPTION: `The provider who is assigned for this Recall entry.` AUDIT: `YES, ALWAYS` CROSS-REFERENCE: `403.5^C` `1)= S ^SD(403.5,"C",$E(X,1,30),DA)=""` `2)= K ^SD(403.5,"C",$E(X,1,30),DA)` `Used for printing of the cards/letter and reports by Provider or Recall Team.`
4.5	CLINIC	0;2	POINTER TO HOSPITAL LOCATION FILE (#44)	**********************REQUIRED FIELD********************** HOSPITAL LOCATION(#44) LAST EDITED: `NOV 02, 2016` HELP-PROMPT: `Select the clinic that this Recall will be linked to.` DESCRIPTION: `This is the Hospital Location which this patient will have the Recall entry assigned.` AUDIT: `YES, ALWAYS` CROSS-REFERENCE: `403.5^E` `1)= S ^SD(403.5,"E",$E(X,1,30),DA)=""` `2)= K ^SD(403.5,"E",$E(X,1,30),DA)` `Used during the display of Recall information and for selecting the printing of cards/letters, Also, used in selecting reports printed by Recall clinic.`
4.7	LENGTH OF APPT.	0;9	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>120)!(X<10)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 02, 2016` HELP-PROMPT: `Type a Number between 10 and 120, 0 Decimal Digits` DESCRIPTION: `The length of appointment (in minutes) that will be required once scheduled.` AUDIT: `YES, ALWAYS`
5	RECALL DATE	0;6	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EFX",%DT(0)=$$FMADD^XLFDT(DT,1) D ^%DT K %DT(0) S X=Y K:Y<1 X` LAST EDITED: `JAN 14, 2016` HELP-PROMPT: `Enter the Recall Date that the provider has requested for this patient.` DESCRIPTION: `Recall Date is a date the provider has requested the patient to return. This must be a future exact date.` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `403.5^D` `1)= S ^SD(403.5,"D",$E(X,1,30),DA)=""` `2)= K ^SD(403.5,"D",$E(X,1,30),DA)` `Used in selecting a date range for printing Recall cards/letters and in all Recall reports.` CROSS-REFERENCE: `^^TRIGGER^403.5^7` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^SD(403.5,D0,0)):^(0),1:"") S X=$P(Y(1),U,11),X=X S DIU=X K Y S X=DIV S X=DUZ S DIH=$G(^SD(403.5,DIV(0),0)),DIV=X S $P(^(0),U,11)=DIV,DIH=403.5,DIG=7 D ^DICR` `2)= Q` `CREATE VALUE)= S X=DUZ` `DELETE VALUE)= NO EFFECT` `FIELD)= #7` `Used to update USER THAT ENTER RECALL field #7`
5.5	RECALL DATE (PER PATIENT)	0;12	DATE	INPUT TRANSFORM: `S %DT="EFX",%DT(0)=$$FMADD^XLFDT(DT,1) D ^%DT K %DT(0) S X=Y K:Y<1 X` LAST EDITED: `JAN 14, 2016` HELP-PROMPT: `Enter the Date that the patient is requesting for their Recall Visit.` DESCRIPTION: `This is the Recall Date that the patient is requesting. It can be different from the Recall Date, which is what the Provider has requested. This must be a future exact date.` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
6	DATE REMINDER SENT	0;10	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 15, 2008` HELP-PROMPT: `Date letter/card first printed.` DESCRIPTION: `This is the date that the first letter/card was printed and sent to the Veteran.`
7	USER WHO ENTERED RECALL	0;11	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `APR 03, 2015` HELP-PROMPT: `New person who entered or edited Recall entry` DESCRIPTION: `User who enter or edit a Recall entry.` NOTES: `TRIGGERED by the RECALL DATE field of the RECALL REMINDERS File` RECORD INDEXES: `AC (#1354)`
7.5	DATE/TIME RECALL ADDED	0;14	DATE	INPUT TRANSFORM: `S %DT="ET" D ^%DT S X=Y K:(Y<1)!(X>$E($$NOW^XLFDT,1,12)) X` LAST EDITED: `JAN 14, 2016` HELP-PROMPT: `Enter a date and time not in the future` DESCRIPTION: `Date and Time this recall reminder was added. Cannot be in the future.` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` RECORD INDEXES: `AC (#1354)`
8	SECOND PRINT	0;13	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 15, 2008` HELP-PROMPT: `Date for second printing of card or letter` DESCRIPTION: `This is the date that the second letter/card was printed and sent.`
100	EAS TRACKING NUMBER	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>40!($L(X)<1) X` `MAXIMUM LENGTH: 40` LAST EDITED: `DEC 23, 2021` HELP-PROMPT: `Answer must be 1-40 characters in length.` DESCRIPTION: `The EAS tracking number originates from the Enterprise Appointment Scheduling system. This number allows actions performed by a proxy user to be traceable back to the end user.` AUDIT: `YES, ALWAYS`

Name	Field # of Occurrence
^%DT	5+1, 5.5+1, 6+1, 7.5+1, 8+1
^DICR	5(XREF 1900001S)
Y^DIQ	ID4.5+1
DELETE^SDRRISRU	IXA66201KL+1
$$FMADD^XLFDT	5+1, 5.5+1
$$NOW^XLFDT	7.5+1

Name	Line Occurrences (* Changed, ! Killed)
^DD(44	ID4.5+1
^SC - [#44]	ID4.5+1
^SD(403.5 - [#403.5]	IXACSL+1*, IXACKL+1!, IXACKEIC+1!, .01(XREF 1S), .01(XREF 1K), 4(XREF 1S), 4(XREF 1K), 4.5(XREF 1S), 4.5(XREF 1K), 5(XREF 1S) , 5(XREF 1K), 5(XREF 1900001S)

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	5+1, 5.5+1, 6+1, 7.5+1, 8+1*
>> %DT(0	5+1!, 5.5+1!
%I	ID4.5+1*!
>> C	ID4.5+1*
>> D0	5(XREF 1900001S)
>> DA	IXACSL+1, IXACKL+1, .01(XREF 1S), .01(XREF 1K), 4(XREF 1S), 4(XREF 1K), 4.5(XREF 1S), 4.5(XREF 1K), 5(XREF 1S), 5(XREF 1K) , 5(XREF 1900001S)
>> DIC	ID4.5+1
>> DIG	5(XREF 1900001S)
>> DIH	5(XREF 1900001S)
>> DIU	5(XREF 1900001S)
DIV	5(XREF 1900001S)
DIV(0	5(XREF 1900001S)
DT	5+1, 5.5+1
DUZ	5(XREF 1900001S)
U	ID4.5+1, ID5+1, 5(XREF 1900001S)
X	IXA66201KCC+1, .01(XREF 1S), .01(XREF 1K), 2+1!, 2.5+1!, 4(XREF 1S), 4(XREF 1K), 4.5(XREF 1S), 4.5(XREF 1K), 4.7+1! , 5+1!, 5(XREF 1S), 5(XREF 1K), 5(XREF 1900001S), 5.5+1!, 6+1!, 7.5+1!, 8+1!, 100+1!
X(1	IXACSL+1, IXACKL+1
X(2	IXACSL+1, IXACKL+1
>> X1	IXA66201KCC+1
>> X2	IXA66201KCC+1
Y	ID4.5+1*, 5+1, 5(XREF 1900001S), 5.5+1, 6+1, 7.5+1, 8+1
Y(1	5(XREF 1900001S)

Customize PDF page

Package: Scheduling

Global: ^SD(403.5

Information

Description

Directly Accessed By Routines, Total: 58

Accessed By FileMan Db Calls, Total: 38

Pointed To By FileMan Files, Total: 2

Pointer To FileMan Files, Total: 5

Fields, Total: 15

ICR, Total: 1

External References

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend: