Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ORQPTQ1

Package: Order Entry Results Reporting

Routine: ORQPTQ1


Information

ORQPTQ1 ; SLC/CLA - Functs which return OR patient lists and sources pt 1 ;Mar 13, 2018@12:21

Source Information

Source file <ORQPTQ1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Order Entry Results Reporting 3 EN^ORQ1  $$DG^ORQOR1  $$UNSIGNOR^ORQOR2  
Scheduling 2 ($$PRPT,$$PTTM,$$TMPR,$$TMPT)^SCAPMC  ($$OUTPTAP,$$OUTPTPR)^SDUTL3  
VA FileMan 2 NOW^%DTC  $$EXTERNAL^DILFD  
Kernel 1 ($$FMTE,$$NOW)^XLFDT  
Toolkit 1 $$GET^XPAR  

Caller Graph

Caller Graph Total: 32

Package Total Caller Graph
Order Entry Results Reporting 19 OCXOZ0Z  ORB3  ORB3FUP1  ORB3REG  ORB3SPEC  ORBPRCHK  OREV3  ORLP3U1  
ORQPT  ORQPT PATIENT TEAM PROVIDERS  ORQPT PTEAM PATIENTS  ORQPT PTEAMPR  ORQPT TEAM PATIENTS  ORQPT TEAMS  ORQPTQ11  ORQPTQ6  
ORRHCQ  ORWORB  ORWTPT  
Consult Request Tracking 2 GMRCAU  GMRCT  
Enterprise Health Management Platform 2 HMPCAC  HMPPDL  
General Medical Record - Vitals 2 GMVRPCM  GMVUTL3  
My HealtheVet 2 MHVXPAT  MHVXTM  
Shift Handoff Tool 2 CRHD7  CRHDPL  
Clinical Procedures 1 MDRPCU  
Clinical Reminders 1 PXRMXSL1  
Text Integration Utility 1 TIUTIUS  

Entry Points

Name Comments DBIA/ICR reference
VAMCPTS(Y) ; RETURN LIST OF PATIENTS IN VAMC: DFN^NAME
VAMCLONG(Y,DIR,FROM) ; return a bolus of patients in VAMC: DFN^NAME
DEFTM(ORY) ; return current user's default team list
TEAMS(ORY) ; return list of teams for a system
; Also called under DBIA # 2692.
TEAMPTS(ORY,TEAM,TMPFLAG) ; RETURN LIST OF PATIENTS IN A TEAM
; Also called under DBIA # 2692.
; If TMPFLAG passed and = TRUE, code expects a "^TMP(xxx"
; global root string passed in ORY, and builds the returned
; list in that global instead of to a memory array.
PTEAMPTS(ORY,TEAM,TMPFLAG) ; RETURN LIST OF PATIENTS ASSIGNED TO A PCMM TEAM
; This tag section added by TDP on 5/21/2014
; If TMPFLAG passed and = TRUE, code expects a "^TMP(xxx"
; global root string passed in ORY, and builds the returned
; list in that global instead of to a memory array.
TEAMPR(ORY,PROV) ; return list of teams linked to a provider
PTEAMPR(ORY,PROV) ; return list of PCMM teams for a provider
; This tag section added by TDP on 5/21/2014
TEAMPR2(ORY,PROV) ; return list of teams linked to a provider
; This tag added by PKS/slc - 8/1999.
TEAMPROV(ORY,TEAM) ; return list of providers linked to a team
TPROVPT(PROV) ;return list of patients linked to a provider via teams
; Modified by PKS: 8/1999.
TMSPT(ORY,PT) ;return list of teams linked to a patient (patient is active)
TPTPR(ORY,PT) ;return list of providers linked to a patient via teams
PERSPR(ORY) ; return list of personal lists linked to current user
PRIMPT(ORY,ORPT) ; return patient's PCMM primary care team
PROVPT(ORY,ORPT) ; return PCMM primary provider for a patient
PPLINK(ORPROV,ORPT) ; returns '1' if patient is linked to provider
PDLINK(ORDEV,ORPT) ; returns '1' if patient is linked to device via team
PCMMLINK(ORPROV,ORPT) ;returns '1' if patient is linked to provider via PCMM
PUNSIGN(ORY,ORBDFN) ;rtns array of providers with unsigned orders for pt

External References

Name Field # of Occurrence
NOW^%DTC PRIMPT+4
$$EXTERNAL^DILFD TMSPT+8
EN^ORQ1 PUNSIGN+5
$$DG^ORQOR1 PUNSIGN+2
$$UNSIGNOR^ORQOR2 PUNSIGN+11
$$PRPT^SCAPMC PCMMLINK+12
$$PTTM^SCAPMC PTEAMPTS+14
$$TMPR^SCAPMC PTEAMPR+5
$$TMPT^SCAPMC PRIMPT+5
$$OUTPTAP^SDUTL3 PCMMLINK+9
$$OUTPTPR^SDUTL3 PROVPT+2, PCMMLINK+6
$$FMTE^XLFDT TEAMS+7
$$NOW^XLFDT PROVPT+2, PCMMLINK+6, PCMMLINK+9
$$GET^XPAR DEFTM+3

Used in RPC

RPC Name Call Tags
ORQPT TEAMS TEAMS
ORQPT TEAM PATIENTS TEAMPTS
ORQPT PATIENT TEAM PROVIDERS TPTPR
ORQPT PTEAMPR PTEAMPR
ORQPT PTEAM PATIENTS PTEAMPTS

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^OR(100.21 - [#100.21] EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(1 - [#3.5] PDLINK+6, PDLINK+7
^DPT - [#2] TEAMPTS+18, TEAMPTS+19, TPROVPT+9, TPROVPT+11
^DPT("AAP" PPLINK+5
^DPT("APR" PPLINK+4
^DPT("B" VAMCPTS+3, VAMCLONG+3, VAMCLONG+4, VAMCLONG+7, VAMCLONG+8
^OR(100.21 - [#100.21] TEAMS+4, TEAMS+5, TEAMS+6, TEAMS+9, TEAMPTS+14, TEAMPTS+15, TEAMPR+4, TEAMPR+5, TEAMPR2+5, TEAMPR2+6
, TEAMPROV+4, TEAMPROV+5, TPROVPT+5, TPROVPT+6, TPROVPT+7, TPROVPT+8, TMSPT+4, TMSPT+5, TMSPT+6, TMSPT+7
, TPTPR+4, TPTPR+5, TPTPR+6, PERSPR+3, PERSPR+4, PERSPR+5, PDLINK+13
^TMP("ORLPUPT" TPROVPT+2*, TPROVPT+9*, TPROVPT+11*, TPROVPT+12*, PPLINK+8, PPLINK+10!
^TMP("ORPCMMLK" PCMMLINK+14, PCMMLINK+16!
^TMP("ORPCMMPT" PTEAMPTS+13!, PTEAMPTS+15, PTEAMPTS+18, PTEAMPTS+20, PTEAMPTS+25, PTEAMPTS+30!
^TMP("ORPCMMPTM" PTEAMPR+4!, PTEAMPR+6, PTEAMPR+10, PTEAMPR+12, PTEAMPR+15!
^TMP("ORR" PUNSIGN+3!, PUNSIGN+6, PUNSIGN+7, PUNSIGN+8, PUNSIGN+9, PUNSIGN+10, PUNSIGN+12!
^TMP("SCERR" PTEAMPTS+13!, PTEAMPTS+30!, PTEAMPR+4!, PTEAMPR+15!
^VA(200 - [#200] DEFTM+2, TEAMPROV+6, TPTPR+7

Label References

Name Line Occurrences
$$PCMMLINK PPLINK+13
TMSPT PDLINK+10
TPROVPT PPLINK+7

Naked Globals

Name Field # of Occurrence
^(0 PDLINK+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PRIMPT+4, PRIMPT+11!
CNT VAMCLONG+1~*, VAMCLONG+3, VAMCLONG+5, VAMCLONG+7
DIR VAMCLONG~, VAMCLONG+2, VAMCLONG+6
DOTMP TEAMPTS+5~, TEAMPTS+6*, TEAMPTS+8*, TEAMPTS+10, TEAMPTS+11, TEAMPTS+16, TEAMPTS+19, TEAMPTS+20, TEAMPTS+21, PTEAMPTS+5~
, PTEAMPTS+6*, PTEAMPTS+8*, PTEAMPTS+10, PTEAMPTS+11, PTEAMPTS+21, PTEAMPTS+24, PTEAMPTS+26, PTEAMPTS+29
DUZ DEFTM+1, DEFTM+2, TEAMS+9, PTEAMPR+3, PERSPR+3
FROM VAMCLONG~, VAMCLONG+3*, VAMCLONG+4, VAMCLONG+7*, VAMCLONG+8
I VAMCPTS+1~, VAMCPTS+2*, VAMCPTS+3*, VAMCLONG+1~, VAMCLONG+3*, VAMCLONG+4, VAMCLONG+5, VAMCLONG+7*, VAMCLONG+8, TEAMS+2~
, TEAMS+3*, TEAMS+9*, TEAMPTS+12~, TEAMPTS+13*, TEAMPTS+17*, TEAMPTS+19*, TEAMPTS+20, TEAMPTS+21, PTEAMPTS+12~, PTEAMPTS+16*
, PTEAMPTS+19*, PTEAMPTS+22, PTEAMPTS+24, TEAMPR+2~, TEAMPR+3*, TEAMPR+6*, PTEAMPR+2~, PTEAMPR+8*, PTEAMPR+11*, PTEAMPR+13
, TEAMPR2+3~, TEAMPR2+4*, TEAMPR2+9*, TEAMPROV+2~, TEAMPROV+3*, TEAMPROV+6*, TMSPT+2~, TMSPT+3*, TMSPT+9*, PERSPR+1~
, PERSPR+2*, PERSPR+6*
IEN VAMCLONG+1~
J VAMCPTS+1~, VAMCPTS+3*
LAST TEAMS+2~, TEAMS+7*, TEAMS+8*, TEAMS+9
N12 TEAMS+2~, TEAMS+6*, TEAMS+7, TEAMS+8
NEWTMP TEAMPTS+5~, TEAMPTS+10*, TEAMPTS+17*, TEAMPTS+18, TEAMPTS+20*, PTEAMPTS+5~, PTEAMPTS+10*, PTEAMPTS+22*, PTEAMPTS+23, PTEAMPTS+27*
, PTEAMPTS+28
ORADT PRIMPT+2~, PRIMPT+8*, PRIMPT+9
ORBDFN PUNSIGN~, PUNSIGN+5
ORDATA TEAMPR2+3~, TEAMPR2+6*, TEAMPR2+7, TEAMPR2+8
ORDEV PDLINK~, PDLINK+4, PDLINK+6, PDLINK+7, PDLINK+8*, PDLINK+9, PDLINK+13
ORDEVIEN PDLINK+2~, PDLINK+7*, PDLINK+8
ORDG PUNSIGN+1~, PUNSIGN+2*, PUNSIGN+5
ORDNUM PUNSIGN+1~, PUNSIGN+10*, PUNSIGN+11
ORDP PDLINK+2~, PDLINK+3*, PDLINK+13*, PDLINK+14
ORERR PTEAMPTS+12~
ORI TEAMPTS+12~, TEAMPTS+14*, TEAMPTS+15, PTEAMPTS+12~, PTEAMPTS+17*, PTEAMPTS+18*, PTEAMPTS+20, PTEAMPR+2~, PTEAMPR+9*, PTEAMPR+10*
, PTEAMPR+12, TPROVPT+3~, TPROVPT+7*, TPROVPT+8
ORIDT PRIMPT+2~, PRIMPT+8*, PRIMPT+9
ORLST PTEAMPTS+12~
ORPCMM PCMMLINK+1~, PCMMLINK+12*
ORPCP PCMMLINK+1~, PCMMLINK+13*, PCMMLINK+14*, PCMMLINK+15
ORPP PPLINK+1~, PPLINK+2*, PPLINK+9*, PPLINK+13*, PPLINK+15, PCMMLINK+1~, PCMMLINK+2*, PCMMLINK+14, PCMMLINK+15*, PCMMLINK+18
ORPROV PPLINK~, PPLINK+3, PPLINK+4, PPLINK+5, PPLINK+7, PPLINK+13, PCMMLINK~, PCMMLINK+3, PCMMLINK+6, PCMMLINK+9
, PCMMLINK+15
ORPT TEAMPTS+12~, TEAMPTS+15*, TEAMPTS+18, TEAMPTS+19, PTEAMPTS+12~, PTEAMPTS+20*, PTEAMPTS+23, PTEAMPTS+24, TPROVPT+3~, TPROVPT+8*
, TPROVPT+9, TPROVPT+11, PRIMPT~, PRIMPT+1, PRIMPT+5, PROVPT~, PROVPT+1, PROVPT+2, PPLINK~, PPLINK+3
, PPLINK+4, PPLINK+5, PPLINK+9, PPLINK+13, PDLINK~, PDLINK+4, PDLINK+10, PCMMLINK~, PCMMLINK+3, PCMMLINK+6
, PCMMLINK+9, PCMMLINK+12
ORQDT PRIMPT+2~
ORQDT("BEGIN" PRIMPT+4*
ORQDT("END" PRIMPT+4*
ORQDT("INCL" PRIMPT+4*
ORQERR PRIMPT+2~
ORQERROR PRIMPT+2~, PRIMPT+5*, PRIMPT+6
ORQLST PRIMPT+2~
ORQLST(1 PRIMPT+7, PRIMPT+8
ORQPUR PRIMPT+2~
ORQPUR(2 PRIMPT+3*
ORRSLT PTEAMPTS+12~, PTEAMPTS+14*, PTEAMPR+2~, PTEAMPR+5*
ORSRV DEFTM+2~*, DEFTM+3
ORTM TEAMS+2~, TEAMS+5*, TEAMS+6, TEAMS+9, TEAMPR+2~, TEAMPR+3*, TEAMPR+4*, TEAMPR+5, TEAMPR+6, PTEAMPR+2~
, PTEAMPR+7*, PTEAMPR+12*, PTEAMPR+13, TEAMPR2+3~, TEAMPR2+4*, TEAMPR2+5*, TEAMPR2+6, TEAMPR2+9, TPROVPT+3~, TPROVPT+4*
, TPROVPT+5*, TPROVPT+6, TPROVPT+7, TPROVPT+8, TMSPT+2~, TMSPT+3*, TMSPT+4*, TMSPT+5, TMSPT+6, TMSPT+7
, TMSPT+9, TPTPR+2~, TPTPR+3*, TPTPR+4*, TPTPR+5, TPTPR+6, PERSPR+1~, PERSPR+2*, PERSPR+3*, PERSPR+4
, PERSPR+5, PERSPR+6, PDLINK+2~, PDLINK+12*, PDLINK+13
ORTMDEV PDLINK+2~
ORTMN TEAMS+2~, TEAMS+3*, TEAMS+4*, TEAMS+5, TEAMS+9, TEAMPR+2~, TEAMPR+5*, TEAMPR+6, PTEAMPR+2~, TEAMPR2+3~
, TEAMPR2+7*, TEAMPR2+9, TPROVPT+3~, TPROVPT+6*, TPROVPT+11, TMSPT+2~, TMSPT+6*, TMSPT+9, PERSPR+1~, PERSPR+5*
, PERSPR+6
ORTMTYP TMSPT+2~, TMSPT+7*, TMSPT+8*, TMSPT+9
ORTYPE TEAMPR2+3~, TEAMPR2+8*, TEAMPR2+9
ORX PRIMPT+2~, PRIMPT+8*, PRIMPT+9, PPLINK+1~, PPLINK+2*, PPLINK+8*, PPLINK+9, PDLINK+2~, PDLINK+11*, PDLINK+12
, PUNSIGN+1~, PUNSIGN+6*, PUNSIGN+7, PUNSIGN+8*, PUNSIGN+9, PUNSIGN+10
ORY DEFTM~, DEFTM+3*, TEAMS~, TEAMPTS~, TEAMPTS+10, TEAMPTS+17, TEAMPTS+20, PTEAMPTS~, PTEAMPTS+10, PTEAMPTS+22
, PTEAMPTS+27, TEAMPR~, PTEAMPR~, TEAMPR2~, TEAMPROV~, TMSPT~, TPTPR~, TPTPR+8, PERSPR~, PRIMPT~
, PRIMPT+6*, PRIMPT+9*, PRIMPT+10*, PROVPT~, PDLINK+2~, PDLINK+10, PUNSIGN~
ORY( TEAMS+9*, TEAMPTS+19*, PTEAMPTS+24*, TEAMPR+6*, PTEAMPR+13*, TEAMPR2+9*, TEAMPROV+6*, TMSPT+9*, TPTPR+7*, PERSPR+6*
, PDLINK+11, PDLINK+12, PUNSIGN+11*
ORY(1 TEAMS+10*, TEAMPTS+11*, TEAMPTS+21*, PTEAMPTS+11*, PTEAMPTS+29*, TEAMPR+1*, TEAMPR+7*, PTEAMPR+14*, TEAMPR2+2*, TEAMPR2+10*
, TEAMPROV+1*, TEAMPROV+7*, TMSPT+1*, TMSPT+10*, TPTPR+1*, TPTPR+8*, PERSPR+7*, PRIMPT+1*, PROVPT+1*, PROVPT+2*
ORZ PUNSIGN+1~, PUNSIGN+9*, PUNSIGN+10
PROV TEAMPR~, TEAMPR+1, TEAMPR+4, PTEAMPR~, PTEAMPR+3*, PTEAMPR+5, TEAMPR2~, TEAMPR2+2, TEAMPR2+5, TEAMPROV+2~
, TEAMPROV+5*, TEAMPROV+6, TPROVPT~, TPROVPT+2, TPROVPT+5, TPTPR+2~, TPTPR+6*, TPTPR+7
PT TMSPT~, TMSPT+1, TMSPT+4, TPTPR~, TPTPR+1, TPTPR+4
SEQ TEAMPROV+2~, TEAMPROV+4*, TEAMPROV+5, TPTPR+2~, TPTPR+5*, TPTPR+6
TEAM TEAMPTS~, TEAMPTS+9, TEAMPTS+14, TEAMPTS+15, PTEAMPTS~, PTEAMPTS+9, PTEAMPTS+14, TEAMPROV~, TEAMPROV+1, TEAMPROV+4
, TEAMPROV+5
TMPFLAG TEAMPTS~, TEAMPTS+7, TEAMPTS+8, PTEAMPTS~, PTEAMPTS+7, PTEAMPTS+8
U DEFTM+2, TEAMS+7, TEAMS+8, TEAMS+9, TEAMPTS+18, TEAMPTS+19, PTEAMPTS+23, PTEAMPTS+24, TEAMPR+5, TEAMPR+6
, PTEAMPR+13, TEAMPR2+7, TEAMPR2+8, TEAMPR2+9, TEAMPROV+6, TPROVPT+6, TPROVPT+9, TPROVPT+11, TMSPT+6, TMSPT+7
, TMSPT+9, TPTPR+7, PERSPR+4, PERSPR+5, PERSPR+6, PRIMPT+8, PRIMPT+9, PDLINK+7, PDLINK+13
V VAMCPTS+1~, VAMCPTS+3*
Y VAMCPTS~, VAMCLONG~
Y( VAMCPTS+3*, VAMCLONG+4*, VAMCLONG+5*, VAMCLONG+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All