Routine: SDRPA08

Information

SDRPA08 ;BP-OIFO/OWAIN,ESW - Patient Appointment Data Compilation ; 9/10/04 9:41am ; Compiled April 24, 2006 16:55:01 ; Compiled July 1, 2008 16:48:16

Source Information

Source file <SDRPA08.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
Registration	3	DEM^VADPT EN^VAFHLZCL $$SITE^VASITE
Kernel	1	$$HLNAME^XLFNAME
Scheduling	1	GETAPPT^SDAMA201
Uncategorized	1	$$GETICN^MPIF001
VA Fileman	1	($$GET1,GETS)^DIQ

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Scheduling	2	SDRPA00 SDRPA07

Entry Points

Name	Comments	DBIA/ICR reference
DTCONV(DT)	; Date conversion. ; CYYMMDD -> CCYYMMDD ; CYYMMDD.H{HMMSS} -> CCYYMMDDHHMM
GETNAME(NMID)	; Name in HL7 format.
NEWAT(DFN,SDADT,SDSTOP1,SDCSTOP1,SDFAC)	; New to facility/clinic flag.
GT24(DATE1,DATE2)	; Are two dates greater than 24 months apart? ; DATE1 should be before DATE2. ; If they are not in that order, they are swapped anyway.
DPT(DFN,SDCE)	; ; Extrinsic. Returns boolean, 0: ^TMP("SDDPT",$J,DFN) not created; 1: created.
APPT(DFN,SDADT,SDDM,SDCL,SDSTAT)	;

External References

Name	Field # of Occurrence
$$GET1^DIQ	APPT+8, APPT+9, APPT+12, APPT+14, APPT+16, APPT+17, APPT+26, APPT+27, APPT+28, APPT+29 , APPT+30, APPT+43, APPT+49, APPT+50, APPT+58, APPT+59, NEWAT+5, NEWAT+6, NEWAT+7, NEWAT+8 , NEWAT+10, NEWAT+11, NEWAT+21, NEWAT+22, NEWAT+23, NEWAT+25, NEWAT+26, DPT+4, DPT+5
GETS^DIQ	APPT+5, DPT+7
$$GETICN^MPIF001	DPT+10
GETAPPT^SDAMA201	APPT+46
DEM^VADPT	DPT+12
EN^VAFHLZCL	APPT+44
$$SITE^VASITE	APPT+19, APPT+20, NEWAT+13, NEWAT+14, NEWAT+28, NEWAT+29
$$HLNAME^XLFNAME	GETNAME+3

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ, GETS^DIQ
2.98	GET1^DIQ
^VA(200 - [#200]	GET1^DIQ
^DGEN(27.11 - [#27.11]	GET1^DIQ
^DIC(4 - [#4]	GET1^DIQ
^DIC(40.7 - [#40.7]	GET1^DIQ
^DG(40.8 - [#40.8]	GET1^DIQ
^SCE - [#409.68]	GET1^DIQ
^SC - [#44]	GET1^DIQ, GETS^DIQ
44.1	GET1^DIQ
^AUPNVSIT - [#9000010]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	NEWAT+3, NEWAT+19
^SC - [#44]	APPT+57
^TMP("SDDPT"	APPT+38, APPT+39, APPT+40, APPT+41, APPT+53, APPT+59, DPT+6, DPT+19*
^TMP($J	APPT+46!, APPT+47

Name	Line Occurrences
$$DTCONV	APPT+23, APPT+25, APPT+26, APPT+29, APPT+38, DPT+15
$$GETNAME	DPT+14
$$GT24	NEWAT+3, NEWAT+19
$$NEWAT	APPT+35

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARRAY	APPT+3~, NEWAT+4~, NEWAT+20~, DPT+3~
ARRAY(2	DPT+8, DPT+9
ARRAY(44	APPT+6, APPT+7, APPT+10
DATE1	GT24~, GT24+4*, GT24+5
DATE2	GT24~, GT24+4*, GT24+5
DFN	APPT~, APPT+26, APPT+27, APPT+28, APPT+29, APPT+30, APPT+35, APPT+38, APPT+39, APPT+40 , APPT+41, APPT+43, APPT+44, APPT+46, APPT+53, APPT+59, NEWAT~, NEWAT+3, NEWAT+5, NEWAT+19 , NEWAT+21, DPT~, DPT+4, DPT+6, DPT+7, DPT+8, DPT+9, DPT+10, DPT+14, DPT+19
DOB	DPT+3~, DPT+15*, DPT+19
DT	DTCONV~, DTCONV+3, DTCONV+4
ICN	DPT+3~, DPT+10, DPT+11, DPT+19
MONTHS	GT24+3~, GT24+5*, GT24+6
NAME	DPT+3~, DPT+14*, DPT+19, GETNAME+1~
NAME(1	DPT+13, GETNAME+3, GETNAME+4
NMID	GETNAME~, GETNAME+2
OK	NEWAT+1~, NEWAT+2, NEWAT+3, NEWAT+15, NEWAT+17, NEWAT+19, NEWAT+30, NEWAT+32, NEWAT+33
PROVID	APPT+56~, APPT+58*, APPT+59
SD6A	APPT+3~, APPT+37*
SD8A	APPT+3~, APPT+37*
SD8RD	APPT+3~, APPT+24, APPT+25, APPT+40
SDADT	APPT~, APPT+26, APPT+27, APPT+28, APPT+29, APPT+30, APPT+35, APPT+38, APPT+39, APPT+40 , APPT+41, APPT+43, APPT+46, APPT+53, APPT+59, NEWAT~, NEWAT+2, NEWAT+3, NEWAT+5, NEWAT+18 , NEWAT+19*, NEWAT+21, DPT+3~
SDADT0	NEWAT+1~, NEWAT+2*, NEWAT+3, NEWAT+18, NEWAT+19
SDARDT	APPT+3~, APPT+29*, APPT+38
SDARF	APPT+3~, APPT+28*, APPT+32
SDCDT	APPT+3~, APPT+27*, APPT+38
SDCE	DPT~, DPT+5*, DPT+19
SDCHKOUT	APPT+4~, APPT+22, APPT+23, APPT+38
SDCL	APPT~, APPT+5, APPT+6, APPT+7, APPT+10, APPT+14, APPT+39, APPT+57, APPT+58, NEWAT+4~ , NEWAT+5, NEWAT+6, NEWAT+7, NEWAT+8, NEWAT+20~, NEWAT+21, NEWAT+22, NEWAT+23
SDCLNM	APPT+3~, APPT+6*, APPT+39
SDCNT	APPT+4~, APPT+55, APPT+57, APPT+58, APPT+59
SDCSTOP	APPT+3~, APPT+11, APPT+12, APPT+39
SDCSTOP1	APPT+3~, APPT+10*, APPT+12, APPT+35, NEWAT~, NEWAT+7
SDCSTOPD	APPT+4~, APPT+11, APPT+12, APPT+41
SDDCE	DPT+3~, DPT+4*, DPT+5
SDDIV	APPT+14, APPT+16, APPT+19, NEWAT+1~, NEWAT+4~, NEWAT+8, NEWAT+10, NEWAT+13, NEWAT+20~, NEWAT+23* , NEWAT+25, NEWAT+28
SDDM	APPT~, APPT+38
SDENRO	APPT+3~
SDFAC	APPT+3~, APPT+15, APPT+17, APPT+18, APPT+20*, APPT+35, APPT+39, NEWAT~, NEWAT+15, NEWAT+30
SDFAC1	APPT+19, NEWAT+1~, NEWAT+9, NEWAT+11, NEWAT+12, NEWAT+13, NEWAT+14, NEWAT+15, NEWAT+24, NEWAT+26* , NEWAT+27, NEWAT+28, NEWAT+29, NEWAT+30
SDINST	APPT+3~, APPT+16, APPT+17, NEWAT+10, NEWAT+11, NEWAT+25*, NEWAT+26
SDNAME	DPT+3~, DPT+13*, GETNAME+1~, GETNAME+3
SDNAME("FIELD"	GETNAME+2*
SDNAME("FILE"	GETNAME+2*
SDNAME("IENS"	GETNAME+2*
SDNAMEF	DPT+3~, DPT+13, GETNAME+1~, GETNAME+4, GETNAME+5
SDNAMEL	DPT+3~, DPT+13, GETNAME+1~, GETNAME+4, GETNAME+5
SDNAMEM	DPT+3~, DPT+13, GETNAME+1~, GETNAME+4, GETNAME+5
SDNAMES	DPT+3~, DPT+13, GETNAME+1~, GETNAME+4, GETNAME+5
SDNAMF	GETNAME+1~
SDNAVA	APPT+3~, APPT+30, APPT+31, APPT+32, APPT+33, APPT+34, APPT+38
SDNEW	APPT+4~, APPT+35*, APPT+39
SDPATCL	APPT+46~, APPT+47, APPT+48, APPT+50, APPT+51, APPT+52, APPT+53
SDPROV	APPT+55~*
SDPRVSEQ	APPT+4~, APPT+55, APPT+57, APPT+58
SDSC	DPT+3~, DPT+8*, DPT+19
SDSCE	APPT+4~, APPT+43*, APPT+44, APPT+49, APPT+52
SDSCHED	APPT+4~
SDSCP	DPT+3~, DPT+9*, DPT+19
SDSDDT	APPT+3~, APPT+26*, APPT+38
SDSTAT	APPT~, APPT+23, APPT+25, APPT+37, APPT+40
SDSTOP	APPT+3~, APPT+8*, APPT+39
SDSTOP1	APPT+3~, APPT+7*, APPT+8, APPT+9, APPT+35, NEWAT~, NEWAT+6, NEWAT+22
SDSTOPD	APPT+4~, APPT+9*, APPT+41
SDVST	APPT+49~*, APPT+50
SSN	DPT+3~, DPT+16*, DPT+17, DPT+19
SSNP	DPT+3~, DPT+16*, DPT+19
TEMP	GT24+3~, GT24+4*
U	APPT+40
>> VADM(2	DPT+16
>> VADM(3	DPT+15

Customize PDF page

Package: Scheduling

Routine: SDRPA08

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: