Routine: ORQPTQ2

Information

ORQPTQ2 ; slc/CLA - Functions which return patient lists and list sources pt 2 ;3/14/05 10:50

Package	Total	Call Graph
Kernel	3	$$FMTE^XLFDT $$UP^XLFSTR $$ACTIVE^XUSER
Order Entry Results Reporting	2	SDA^ORQRY01 $$ACTLOC^ORWU
Registration	2	$$ACTIVE^DGACT WIN^DGPMDDCF
Scheduling	1	$$SDAPI^SDAMA301
Toolkit	1	($$GET,GETLST)^XPAR
VA FileMan	1	DT^DILF

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 19

Package	Total	Caller Graph
Order Entry Results Reporting	15	ORQ NULL LIST ORQPT ORQPT CLINIC PATIENTS ORQPT CLINICS ORQPT DEFAULT CLINIC DATE RANG ORQPT PROVIDER PATIENTS ORQPT PROVIDERS ORQPT SPECIALTIES ORQPT SPECIALTY PATIENTS ORQPT WARD PATIENTS ORQPT WARDS ORQPTQ11 ORQPTQ6 ORQQVS ORRHCQ
Enterprise Health Management Platform	3	HMPCAC HMPPDL HMPROS8
Shift Handoff Tool	1	CRHDPL

Entry Points

Name	Comments	DBIA/ICR reference
CLIN(Y)	; RETURN LIST OF CLINICS
CLINPTS2(Y,CLIN,ORBDATE,OREDATE)	; WRAPPER FUNCTION FOR USE BY RPC CALL ORQPT CLINIC PATIENTS
CLINPTS(Y,CLIN,ORBDATE,OREDATE,MAXAPPTS,APPTBGN,APPTEND)	; RETURN LIST OF PTS W/CLINIC APPT W/IN BEGINNING AND END DATES ; PKS-8/2003: Modified for new scheduling pkg APIs.
CDATRANG(ORY)	; return default start and stop dates for clinics in form start^stop
PTAPPTS(Y,DFN,ORBDATE,OREDATE,CLIN)	; return appts for a patient between beginning and end dates for a clinic, if no clinic return all appointments
PROV(Y)	; RETURN LIST OF PROVIDERS
PROVPTS(Y,PROV)	; RETURN LIST OF PATIENTS LINKED TO A PRIMARY PROVIDER
SPEC(Y)	; RETURN LIST OF TREATING SPECIALTIES
SPECPTS(Y,SPEC)	; RETURN LIST OF PATIENTS LINKED TO A TREATING SPECIALTY
WARD(Y)	; RETURN LIST OF ACTIVE WARDS
WARDPTS(Y,WARD)	; RETURN LIST OF PATIENTS IN A WARD ; SLC/PKS - Modifications for Room/Bed data on 1/19/2001.
NLIST(ORQY)	; return a null list

External References

Name	Field # of Occurrence
$$ACTIVE^DGACT	SPEC+4
WIN^DGPMDDCF	WARD+5
DT^DILF	CLINPTS+11, CLINPTS+12, PTAPPTS+13, PTAPPTS+14
SDA^ORQRY01	PTAPPTS+19
$$ACTLOC^ORWU	CLIN+4, CLINPTS+3, PTAPPTS+2
$$SDAPI^SDAMA301	CLINPTS+55
$$FMTE^XLFDT	CLINPTS2+11, CLINPTS2+12
$$UP^XLFSTR	CLINPTS+7, CLINPTS+8, CDATRANG+3, CDATRANG+4, CDATRANG+6, PTAPPTS+7, PTAPPTS+10
$$GET^XPAR	CLINPTS+7, CLINPTS+8, CDATRANG+3, CDATRANG+4, PTAPPTS+7, PTAPPTS+10
GETLST^XPAR	CLIN+2
$$ACTIVE^XUSER	PROV+5

RPC Name	Call Tags
ORQPT PROVIDERS	PROV
ORQPT PROVIDER PATIENTS	PROVPTS
ORQPT CLINIC PATIENTS	CLINPTS
ORQPT SPECIALTIES	SPEC
ORQPT SPECIALTY PATIENTS	SPECPTS
ORQPT WARD PATIENTS	WARDPTS
ORQPT CLINICS	CLIN
ORQPT WARDS	WARD
ORQ NULL LIST	NLIST
ORQPT DEFAULT CLINIC DATE RANG	CDATRANG

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]	PROVPTS+4, SPECPTS+4, WARDPTS+10, WARDPTS+13
^DPT("APR"	PROVPTS+4
^DPT("ATR"	SPECPTS+4
^DPT("CN"	WARDPTS+9
^SC - [#44]	CLIN+5
^TMP($J	CLINPTS+45!, CLINPTS+60, CLINPTS+61, CLINPTS+66, CLINPTS+68, CLINPTS+70, CLINPTS+80!
^UTILITY("VASD"	PTAPPTS+3!, PTAPPTS+20!, PTAPPTS+21, PTAPPTS+22, PTAPPTS+23, PTAPPTS+27!
^VA(200 - [#200]	CLINPTS+6, CDATRANG+2, PTAPPTS+5, PROV+3
^XUSEC("PROVIDER"	PROV+5

Label References

Name	Line Occurrences
CLINPTS	CLINPTS2+3

Naked Globals

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APPTBGN	CLINPTS2+1~, CLINPTS2+3, CLINPTS2+11, CLINPTS~, CLINPTS+74, CLINPTS+76
APPTEND	CLINPTS2+1~, CLINPTS2+3, CLINPTS2+7, CLINPTS2+9, CLINPTS2+11, CLINPTS2+12, CLINPTS~, CLINPTS+74, CLINPTS+75*
CLIN	CLINPTS2~, CLINPTS2+3, CLINPTS~, CLINPTS+2, CLINPTS+3, CLINPTS+47, CLINPTS+49, PTAPPTS~, PTAPPTS+2, PTAPPTS+7 , PTAPPTS+10, PTAPPTS+18
CNT	PTAPPTS+3~, PTAPPTS+24, PTAPPTS+25
D0	WARD+1~, WARD+5*
DFN	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
DUZ	CLINPTS+6, CDATRANG+2, PTAPPTS+5
ERR	PTAPPTS+3~, PTAPPTS+19, PTAPPTS+20
ERRMSG	PTAPPTS+3~, PTAPPTS+19, PTAPPTS+20
EXT	PTAPPTS+3~, PTAPPTS+23*, PTAPPTS+24
I	CLIN+1~, CLIN+3, CLIN+4, CLIN+5, PROV+1~, PROV+2, PROV+5, SPEC+1~, SPEC+2, SPEC+4* , WARD+1~, WARD+2, WARD+6
IDXERR	CLINPTS+60~*, CLINPTS+61
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
MAXAPPTS	CLINPTS2+1~, CLINPTS2+2, CLINPTS2+3, CLINPTS2+5, CLINPTS2+10, CLINPTS2+11, CLINPTS2+12, CLINPTS2+13, CLINPTS~, CLINPTS+5 , CLINPTS+53
NAME	PROV+1~, PROV+2, PROV+3, PROV+4, PROV+5, SPEC+1~, SPEC+2, SPEC+4, WARD+1~, WARD+2* , WARD+4*, WARD+6
NODE	CLINPTS+4~, CLINPTS+70*, CLINPTS+71, CLINPTS+77
NUM	PTAPPTS+3~, PTAPPTS+21, PTAPPTS+22, PTAPPTS+23
NUMAPPTS	CLINPTS2+1~, CLINPTS2+4, CLINPTS2+5, CLINPTS2+9, CLINPTS2+11
ORAPPT	CLINPTS+4~, CLINPTS+67, CLINPTS+68, CLINPTS+70, CLINPTS+73, CLINPTS+74, CLINPTS+75, CLINPTS+76
ORBDATE	CLINPTS2~, CLINPTS2+2, CLINPTS2+3, CLINPTS~, CLINPTS+7, CLINPTS+11, CLINPTS+13, CLINPTS+48, CDATRANG+1~, CDATRANG+3 , CDATRANG+5, CDATRANG+6, PTAPPTS~, PTAPPTS+4, PTAPPTS+6, PTAPPTS+7, PTAPPTS+8*, PTAPPTS+13, PTAPPTS+15, PTAPPTS+16
ORCLIN	CLINPTS+4~, CLINPTS+47*, CLINPTS+72
OREDATE	CLINPTS2~, CLINPTS2+2, CLINPTS2+3, CLINPTS~, CLINPTS+8, CLINPTS+12, CLINPTS+13, CLINPTS+14, CLINPTS+48, CDATRANG+1~ , CDATRANG+4, CDATRANG+5, CDATRANG+6, PTAPPTS~, PTAPPTS+4, PTAPPTS+9, PTAPPTS+10, PTAPPTS+11, PTAPPTS+14, PTAPPTS+15 , PTAPPTS+17
ORERR	CLINPTS+4~, CLINPTS+58, CLINPTS+59, CLINPTS+61
ORI	CLINPTS2+6~, CLINPTS2+7, CLINPTS2+8, CLINPTS2+9, CLINPTS+4~, CLINPTS+64, CLINPTS+69, CLINPTS+71, CLINPTS+72, CLINPTS+73 , CLINPTS+79, PROVPTS+2~, PROVPTS+3, PROVPTS+4, SPECPTS+2~, SPECPTS+3, SPECPTS+4, WARDPTS+3~, WARDPTS+4, WARDPTS+10 , WARDPTS+17, WARDPTS+18
ORLST	CLIN+1~, CLIN+2
ORLST(	CLIN+3, CLIN+4
ORPT	CLINPTS+4~, CLINPTS+64, CLINPTS+66, CLINPTS+68, CLINPTS+70
ORPTSTAT	CLINPTS+4~, CLINPTS+77, CLINPTS+78, CLINPTS+79
ORQY	NLIST~
ORQY(1	NLIST+1*
ORRESULT	CLINPTS+4~, CLINPTS+46, CLINPTS+55, CLINPTS+58, CLINPTS+65
ORSRV	CLINPTS+4~, CLINPTS+6, CLINPTS+7, CLINPTS+8, CDATRANG+1~, CDATRANG+2, CDATRANG+3, CDATRANG+4, PTAPPTS+3~, PTAPPTS+5* , PTAPPTS+7, PTAPPTS+10
ORY	CDATRANG~, CDATRANG+6*
PROV	PROVPTS~, PROVPTS+1, PROVPTS+4
RBDAT	WARDPTS+3~, WARDPTS+11, WARDPTS+13, WARDPTS+14, WARDPTS+15, WARDPTS+16, WARDPTS+17
SDARRAY	CLINPTS+4~, CLINPTS+55
SDARRAY("FLDS"	CLINPTS+52*
SDARRAY("MAX"	CLINPTS+53*
SDARRAY("SORT"	CLINPTS+51*
SDARRAY(1	CLINPTS+48*
SDARRAY(2	CLINPTS+49*
SDARRAY(3	CLINPTS+50*
SPEC	SPECPTS~, SPECPTS+1, SPECPTS+4
TDATE	PROV+1~
U	CLIN+4, CLIN+5, CLINPTS2+9, CLINPTS+6, CLINPTS+58, CLINPTS+71, CLINPTS+72, CLINPTS+73, CLINPTS+77, CLINPTS+79 , CDATRANG+2, PTAPPTS+5, PTAPPTS+22, PTAPPTS+24, WARDPTS+13, WARDPTS+17
VAERR	PTAPPTS+3~
VASD	PTAPPTS+3~
VASD("C"	PTAPPTS+18*
VASD("F"	PTAPPTS+16*
VASD("T"	PTAPPTS+17*
WARD	WARDPTS~, WARDPTS+2, WARDPTS+6*, WARDPTS+9
>> X	WARD+6
Y	CLIN~, CLINPTS2~, CLINPTS2+3, CLINPTS~, PTAPPTS~, PROV~, PROVPTS~, SPEC~, SPECPTS~, WARD~ , WARDPTS~
Y(	CLIN+5, CLINPTS2+8, CLINPTS2+9!, CLINPTS2+10, CLINPTS2+11, CLINPTS2+12, CLINPTS2+13, CLINPTS+71, CLINPTS+72, CLINPTS+73 , CLINPTS+79, PTAPPTS+24, PROV+5, PROVPTS+4, SPEC+4, SPECPTS+4, WARD+6, WARDPTS+10, WARDPTS+17*
Y(""	CLINPTS2+4
Y(1	CLINPTS+2, CLINPTS+3, CLINPTS+13, CLINPTS+58, CLINPTS+65, PTAPPTS+2, PTAPPTS+15, PTAPPTS+20, PTAPPTS+26, PROVPTS+1 , PROVPTS+5, SPECPTS+1, SPECPTS+5, WARDPTS+2, WARDPTS+20*

Customize PDF page

Package: Order Entry Results Reporting