Routine: DGQPTQ2

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Naked Globals
Local Variables

Information

DGQPTQ2 ; slc/CLA - Functions which return patient lists and list sources pt 2 ;05/05/2004

Source Information

Source file <DGQPTQ2.m>

Call Graph

Call Graph Total: 11

Package	Total	Call Graph
Registration	4	$$ACTIVE^DGACT $$FAPCHK^DGENRPD2 WIN^DGPMDDCF SDA^VADPT
Kernel	3	$$NOW^XLFDT $$UP^XLFSTR $$ACTIVE^XUSER
Scheduling	2	$$SDAPI^SDAMA301 $$ACTLOC^SDWU
Toolkit	1	($$GET,GETLST)^XPAR
VA Fileman	1	DT^DILF

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
Registration	3	DGQPT DGQPTQ11 DGQPTQ6

Entry Points

Name	Comments	DBIA/ICR reference
WARD(Y)	; RETURN LIST OF ACTIVE WARDS
PROVPTS(Y,PROV)	; RETURN LIST OF PATIENTS LINKED TO A PRIMARY PROVIDER
CLIN(Y)	; RETURN LIST OF CLINICS
PTAPPTS(Y,DFN,DGBDATE,DGEDATE,CLIN)	; return appts for a patient between beginning and end dates for a clinic, if no clinic return all appointments
WARDPTS(Y,WARD)	; RETURN LIST OF PATIENTS IN A WARD ; SLC/PKS - Modifications for Room/Bed data on 1/19/2001.
PROV(Y)	; RETURN LIST OF PROVIDERS
NLIST(DGQY)	; return a null list
SPECPTS(Y,SPEC)	; RETURN LIST OF PATIENTS LINKED TO A TREATING SPECIALTY
CLINPTS(Y,CLIN,DGBDATE,DGEDATE)	; RETURN LIST OF PTS W/CLINIC APPT W/IN BEGINNING AND END DATES
CDATRANG(DGY)	; return default start and stop dates for clinics in form start^stop
SPEC(Y)	; RETURN LIST OF TREATING SPECIALTIES

External References

Name	Field # of Occurrence
$$ACTIVE^DGACT	SPEC+4
$$FAPCHK^DGENRPD2	CLINPTS+19
WIN^DGPMDDCF	WARD+5
DT^DILF	CLINPTS+11, CLINPTS+12, PTAPPTS+13, PTAPPTS+14
$$SDAPI^SDAMA301	CLINPTS+18
$$ACTLOC^SDWU	CLIN+4, CLINPTS+2, PTAPPTS+2
SDA^VADPT	PTAPPTS+19
$$NOW^XLFDT	CLINPTS+5
$$UP^XLFSTR	CLINPTS+8, CLINPTS+9, CDATRANG+3, CDATRANG+4, CDATRANG+6, PTAPPTS+7, PTAPPTS+10
$$GET^XPAR	CLINPTS+8, CLINPTS+9, CDATRANG+3, CDATRANG+4, PTAPPTS+7, PTAPPTS+10
GETLST^XPAR	CLIN+2
$$ACTIVE^XUSER	PROV+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	WARD+4, WARDPTS+6
^DIC(45.7 - [#45.7]	SPEC+4
^DPT - [#2]	CLINPTS+29, PROVPTS+4, SPECPTS+4, WARDPTS+10, WARDPTS+13
^DPT("APR"	PROVPTS+4
^DPT("ATR"	SPECPTS+4
^DPT("CN"	WARDPTS+9
^SC - [#44]	CLIN+5, CLINPTS+32
^TMP($J	CLINPTS+19!, CLINPTS+20, CLINPTS+21, CLINPTS+22*, CLINPTS+24, CLINPTS+25, CLINPTS+26, CLINPTS+35!
^UTILITY("VASD"	PTAPPTS+21, PTAPPTS+22, PTAPPTS+23
^VA(200 - [#200]	CLINPTS+6, CDATRANG+2, PTAPPTS+5, PROV+3
^XUSEC("PROVIDER"	PROV+5

Name	Field # of Occurrence
^(	PROV+3, SPEC+4, WARD+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ASTAT	CLINPTS+16~, CLINPTS+26*, CLINPTS+28, CLINPTS+35!
CHKIN	CLINPTS+3~
CHKX	CLINPTS+3~
CLIN	CLINPTS~, CLINPTS+1, CLINPTS+2, CLINPTS+17, CLINPTS+29, CLINPTS+32, PTAPPTS~, PTAPPTS+2, PTAPPTS+7, PTAPPTS+10 , PTAPPTS+18
CLNAM	CLINPTS+3~, CLINPTS+32*, CLINPTS+33
CNT	PTAPPTS+3~, PTAPPTS+24, PTAPPTS+25
D0	WARD+1~, WARD+5*
DFN	CLINPTS+3~, CLINPTS+7, CLINPTS+25, CLINPTS+26, CLINPTS+29, PTAPPTS~, PROVPTS+2~, PROVPTS+3, PROVPTS+4, SPECPTS+2~ , SPECPTS+3, SPECPTS+4, WARDPTS+3~, WARDPTS+4, WARDPTS+8, WARDPTS+9, WARDPTS+10, WARDPTS+13
DGARRAY	CLINPTS+16~, CLINPTS+18, CLINPTS+35!
DGARRAY("FLDS"	CLINPTS+17*
DGARRAY("SORT"	CLINPTS+18*
DGARRAY(1	CLINPTS+17*
DGARRAY(2	CLINPTS+17*
DGBDATE	CLINPTS~, CLINPTS+8, CLINPTS+11, CLINPTS+13, CLINPTS+17, CDATRANG+1~, CDATRANG+3, CDATRANG+5, CDATRANG+6, PTAPPTS~ , PTAPPTS+4, PTAPPTS+6, PTAPPTS+7, PTAPPTS+8*, PTAPPTS+13, PTAPPTS+15, PTAPPTS+16
DGC	CLINPTS+3~
DGEDATE	CLINPTS~, CLINPTS+9, CLINPTS+12, CLINPTS+13, CLINPTS+14, CLINPTS+17, CDATRANG+1~, CDATRANG+4, CDATRANG+5, CDATRANG+6 , PTAPPTS~, PTAPPTS+4, PTAPPTS+9, PTAPPTS+10, PTAPPTS+11, PTAPPTS+14, PTAPPTS+15, PTAPPTS+17
DGI	PROVPTS+2~, PROVPTS+3, PROVPTS+4, SPECPTS+2~, SPECPTS+3, SPECPTS+4, WARDPTS+3~, WARDPTS+4, WARDPTS+10, WARDPTS+19 , WARDPTS+20
DGJ	CLINPTS+3~, CLINPTS+24*, CLINPTS+25, CLINPTS+26, CLINPTS+29
DGLST	CLIN+1~, CLIN+2
DGLST(	CLIN+3, CLIN+4
DGNOWDT	CLINPTS+3~, CLINPTS+5*
DGQY	NLIST~
DGQY(1	NLIST+1*
DGSRV	CLINPTS+3~, CLINPTS+6, CLINPTS+8, CLINPTS+9, CDATRANG+1~, CDATRANG+2, CDATRANG+3, CDATRANG+4, PTAPPTS+3~, PTAPPTS+5* , PTAPPTS+7, PTAPPTS+10
DGY	CDATRANG~, CDATRANG+6*
DUZ	CLINPTS+6, CDATRANG+2, PTAPPTS+5
EXT	PTAPPTS+3~, PTAPPTS+23*, PTAPPTS+24
I	CLIN+1~, CLIN+3, CLIN+4, CLIN+5, CLINPTS+3~, CLINPTS+7, CLINPTS+29, CLINPTS+31, PROV+1~, PROV+2 , PROV+5, SPEC+1~, SPEC+2, SPEC+4, WARD+1~, WARD+2, WARD+6*
IEN	CLIN+1~, CLIN+4, CLIN+5, PROV+1~, PROV+3, PROV+5, SPEC+1~, SPEC+4, WARD+1~, WARD+4 , WARD+5, WARD+6
INT	PTAPPTS+3~, PTAPPTS+22*, PTAPPTS+24
INVDT	PTAPPTS+3~, PTAPPTS+22*, PTAPPTS+24
J	CLINPTS+3~
MAXAPPTS	CLINPTS+3~, CLINPTS+4*, CLINPTS+31
NAME	CLINPTS+3~, PROV+1~, PROV+2, PROV+3, PROV+4, PROV+5, SPEC+1~, SPEC+2, SPEC+4, WARD+1~ , WARD+2, WARD+4, WARD+6
NUM	PTAPPTS+3~, PTAPPTS+21, PTAPPTS+22, PTAPPTS+23
PROV	PROVPTS~, PROVPTS+1, PROVPTS+4
RBDAT	WARDPTS+3~, WARDPTS+11, WARDPTS+13, WARDPTS+15, WARDPTS+16, WARDPTS+17, WARDPTS+18, WARDPTS+19
SAPPT	CLINPTS+16~, CLINPTS+21*, CLINPTS+22, CLINPTS+35!
SDCNT	CLINPTS+16~, CLINPTS+18*, CLINPTS+19, CLINPTS+35!
SDFN	CLINPTS+16~, CLINPTS+20*, CLINPTS+21, CLINPTS+22, CLINPTS+35!
SPEC	SPECPTS~, SPECPTS+1, SPECPTS+4
TDATE	PROV+1~
U	CLIN+4, CLIN+5, CLINPTS+6, CLINPTS+32, CDATRANG+2, PTAPPTS+5, PTAPPTS+22, PTAPPTS+24, WARDPTS+13, WARDPTS+19
VAERR	PTAPPTS+20, PTAPPTS+27!
VASD	PTAPPTS+3~
VASD("C"	PTAPPTS+18*
VASD("F"	PTAPPTS+16*
VASD("T"	PTAPPTS+17*
WARD	WARDPTS~, WARDPTS+2, WARDPTS+6*, WARDPTS+9
X	CLINPTS+3~, CLINPTS+19*, WARD+6
Y	CLIN~, CLINPTS~, CLINPTS+33!, CLINPTS+34, PTAPPTS~, PROV~, PROVPTS~, SPEC~, SPECPTS~, WARD~ , WARDPTS~
Y(	CLIN+5, CLINPTS+29, PTAPPTS+24, PROV+5, PROVPTS+4, SPEC+4, SPECPTS+4, WARD+6, WARDPTS+10, WARDPTS+19
Y(1	CLINPTS+1, CLINPTS+2, CLINPTS+13, CLINPTS+19, CLINPTS+33, CLINPTS+34, PTAPPTS+2, PTAPPTS+15, PTAPPTS+26, PROVPTS+1 , PROVPTS+5, SPECPTS+1, SPECPTS+5, WARDPTS+2, WARDPTS+22*

Customize PDF page

Package: Registration

Routine: DGQPTQ2

Call Graph Total: 11

Caller Graph Total: 3