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 |  Interaction Calls |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: ORWPT

Package: Order Entry Results Reporting

Routine: ORWPT


Information

ORWPT ; SLC/KCM/REV - Patient Lookup Functions ; 12/28/17 1:28pm

Source Information

Source file <ORWPT.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Order Entry Results Reporting 4 DGINQ^ORCXPND1  ($$CWAD,$$EN1)^ORQPT2  SDA^ORQRY01  SAVDFLT^ORWPT1  
Registration 3 $$TSDATA^DGACT  ($$DOB,$$SSN)^DPTLK1  (52,ELIG)^VADPT  
Kernel 1 $$HTFM^XLFDT  
Master Patient Index VistA 1 ($$GETICN,GETICN)^MPIF001  
NDBI 1 HXDATA^A7RDPAGU  
Text Integration Utility 1 $$HASDS^TIULX  
Toolkit 1 $$GET^XPAR  
VA FileMan 1 ^DIC  

Caller Graph

Caller Graph Total: 36

Package Total Caller Graph
Order Entry Results Reporting 27 ORQPTQ11  ORRHCQ  ORWGAPI6  ORWGAPI8  ORWPT ADMITLST  ORWPT APPTLST  ORWPT BYWARD  ORWPT CLINRNG  
ORWPT CWAD  ORWPT DFLTSRC  ORWPT DIEDON  ORWPT DISCHARGE  ORWPT ENCTITL  ORWPT FULLSSN  ORWPT FULLSSN RPL  ORWPT ID INFO  
ORWPT INPLOC  ORWPT LAST5  ORWPT LAST5 RPL  ORWPT LEGACY  ORWPT LIST ALL  ORWPT PTINQ  ORWPT SAVDFLT  ORWPT SELCHK  
ORWPT SELECT  ORWPT SHARE  ORWPT TOP  
Enterprise Health Management Platform 4 HMPCAC  HMPCRPC1  HMPPDL  HMPROS8  
Scheduling 2 SDEC02  SDECPT  
Text Integration Utility 2 TIUHL7U1  TIUMED1  
Shift Handoff Tool 1 CRHDPL  

Entry Points

Name Comments DBIA/ICR reference
IDINFO(REC,DFN) ; Return identifying information for a patient
; PID^DOB^SEX^VET^SC%^WARD^RM-BED^NAME
PTINQ(REF,DFN) ; Return formatted pt inquiry report
SCDIS(LST,DFN) ; Return service connected % and rated disabilities
SHOW ; temporary - show patient inquiry screen
SELCHK(REC,DFN) ; Check for sensitive pt
; SENSITIVE
DIEDON(VAL,DFN) ; Check for a date of death
SELECT(REC,DFN) ; Selects patient & returns key information
; 1 2 3 4 5 6 7 8 9 10 11 12
; NAME^SEX^DOB^SSN^LOCIEN^LOCNM^RMBD^CWAD^SENSITIVE^ADMITTED^CONV^SC^
; 13 14 15 16 17
; SC%^ICN^AGE^TS^TSSVC
SHARE(VAL,IP,HWND,DFN) ; Set global to share DFN with other applications
BYWARD(LST,WARD) ; Return a list of patients in a ward
LAST5(LST,ID) ; Return a list of patients matching A9999 identifiers
LAST5RPL(LST,ID) ; ; Return list matching A9999 id's, but from RPL only.
FULLSSN(LST,ID) ; Return a list of patients matching full SSN entered
FSSNRPL(LST,ID) ; Return list matching Full SSN, but from RPL only.
TOP(LST) ; Return top for all patients list (last selected for now)
ENCTITL(REC,DFN,LOC,PROV) ; Return external values for encounter
; LOCNAME^LOCABBR^ROOMBED^PROVNAME
LISTALL(Y,FROM,DIR) ; Return a bolus of patient names. From is either Name or IEN^Name.
APPTLST(LST,DFN) ; return a list of appointments
; APPTTIME^LOCIEN^LOCNAME^EXTSTATUS
ADMITLST(LST,DFN) ; return a list of admissions
; MOVETIME^LOCIEN^LOCNAME^TYPE
CLINRNG(LST) ; return date ranges for clinic appointments
DFLTSRC(VAL) ; return default patient list source (T, W, C, P, S)
SAVDFLT(OK,X) ; save new default patient list settings (X=type^ien^sdt;edt)
DISCHRG(Y,DFN,ADMITDT) ; Get discharge movement information
CWAD(Y,DFN) ; returns CWAD flags for a patient
LEGACY(ORLST,DFN) ; return message if data on the legacy system
; ORLST(0)=1 if data, ORLST(n)=display message if data
INPLOC(REC,DFN) ; Return a patient's current location
AGE(DFN,BEG) ; returns age based on date of birth and date of death (or DT)
ROK(X) ; Routine OK (in UCI) (NDBI)

External References

Name Field # of Occurrence
HXDATA^A7RDPAGU LEGACY+3, LEGACY+4
$$TSDATA^DGACT SELECT+26, SELECT+27
^DIC SHOW+1
$$DOB^DPTLK1 IDINFO+4, LAST5+4, LAST5RPL+12, FULLSSN+4, FSSNRPL+15
$$SSN^DPTLK1 IDINFO+4, LAST5+4, LAST5RPL+12, FULLSSN+4, FSSNRPL+15
$$GETICN^MPIF001 SELECT+20
GETICN^MPIF001 SELECT+20
DGINQ^ORCXPND1 PTINQ+2, SHOW+3
$$CWAD^ORQPT2 SELECT+14, CWAD+1
$$EN1^ORQPT2 SELCHK+2, SELECT+14
SDA^ORQRY01 APPTLST+6
SAVDFLT^ORWPT1 SAVDFLT+1
$$HASDS^TIULX ADMITLST+10
52^VADPT DISCHRG+3
ELIG^VADPT SCDIS+2, SELECT+19
$$HTFM^XLFDT APPTLST+3, APPTLST+4, CLINRNG+10, CLINRNG+13, CLINRNG+14
$$GET^XPAR DFLTSRC+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,^(I)
  • Line Location: SHOW+4
Routine Call
  • DIC
  • Line Location:
    • SHOW+1

Used in RPC

RPC Name Call Tags
ORWPT ID INFO IDINFO
ORWPT LIST ALL LISTALL
ORWPT APPTLST APPTLST
ORWPT ADMITLST ADMITLST
ORWPT LAST5 LAST5
ORWPT CLINRNG CLINRNG
ORWPT TOP TOP
ORWPT SELCHK SELCHK
ORWPT SELECT SELECT
ORWPT ENCTITL ENCTITL
ORWPT PTINQ PTINQ
ORWPT DFLTSRC DFLTSRC
ORWPT SHARE SHARE
ORWPT DISCHARGE DISCHRG
ORWPT SAVDFLT SAVDFLT
ORWPT DIEDON DIEDON
ORWPT CWAD CWAD
ORWPT FULLSSN FULLSSN
ORWPT BYWARD BYWARD
ORWPT LEGACY LEGACY
ORWPT INPLOC INPLOC
ORWPT LAST5 RPL LAST5RPL
ORWPT FULLSSN RPL FSSNRPL

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" ROK+1
^DG(391 - [#391] SCDIS+4
^DG(405.1 - [#405.1] ADMITLST+8
^DGPM - [#405] SELECT+16, ADMITLST+6, INPLOC+3
^DGPM("ATID1" ADMITLST+3, ADMITLST+4
^DIC(31 - [#31] SCDIS+6
^DIC(42 - [#42] SELECT+13, BYWARD+4, ADMITLST+9, INPLOC+4, INPLOC+5, INPLOC+6
^DISV( SELECT+30*, TOP+2
^DPT - [#2] IDINFO+3, SCDIS+5, DIEDON+1, SELECT+7, SELECT+12, SELECT+16, SELECT+22, BYWARD+6, LAST5+3, LAST5+4
, LAST5RPL+12, FULLSSN+4, FSSNRPL+15, TOP+3, ENCTITL+4, LISTALL+5, LISTALL+7, INPLOC+2, AGE+2
^DPT("B" LISTALL+2, LISTALL+3, LISTALL+4
^DPT("CN" BYWARD+5
^DPT("SSN" FULLSSN+3, FSSNRPL+8
^OR(100.21 - [#100.21] LAST5RPL+8, LAST5RPL+9, FSSNRPL+10, FSSNRPL+11
^SC - [#44] ENCTITL+3
^TMP("OR QUICK ORDER AUDIT" ENCTITL+2!, ENCTITL+6*
^TMP("ORDATA" PTINQ+1!, PTINQ+3, SHOW+2!, SHOW+4, SHOW+5!
^TMP("ORECALL" SHARE+1!
^TMP("ORWCHART" SHARE+1!, SHARE+3*
^TMP("ORWDXMQ" SHARE+2!
^TMP("ORWORD" SHARE+1!
^TMP("ORWPCE" SELECT+11!
^TMP($J SELECT+10!
^UTILITY("VASD" APPTLST+2!, APPTLST+7!, APPTLST+8, APPTLST+9, APPTLST+10!
^VA(200 - [#200] LAST5RPL+3, FSSNRPL+3, ENCTITL+5, DFLTSRC+1

Label References

Name Line Occurrences
$$AGE SELECT+21

Naked Globals

Name Field # of Occurrence
^( IDINFO+3, SCDIS+5, SHOW+4, SELECT+12
^("E" APPTLST+9
^("VET" IDINFO+3
^(44 ADMITLST+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% CLINRNG+9~
%H CLINRNG+9~
ADMITDT DISCHRG~, DISCHRG+2, DISCHRG+3
BEG AGE~, AGE+3
CNT LISTALL+1~*, LISTALL+3, LISTALL+4
DFN IDINFO~, IDINFO+3, IDINFO+4, PTINQ~, PTINQ+2, SCDIS~, SCDIS+5, SELCHK~, SELCHK+2, DIEDON~
, DIEDON+1, SELECT~, SELECT+7, SELECT+12, SELECT+14, SELECT+16, SELECT+20, SELECT+21, SELECT+22, SELECT+30
, SHARE~, SHARE+3, BYWARD+1~, BYWARD+3*, BYWARD+5*, BYWARD+6, ENCTITL~, ENCTITL+4, APPTLST~, ADMITLST~
, ADMITLST+3, ADMITLST+4, ADMITLST+10, DISCHRG~, CWAD~, CWAD+1, LEGACY~, LEGACY+4, INPLOC~, INPLOC+2
, AGE~, AGE+2
DIC SHOW+1~*
DIC(0 SHOW+1*
DIR LISTALL~, LISTALL+2, LISTALL+3
DIS SCDIS+1~, SCDIS+6*, SCDIS+8
DT CLINRNG+10, CLINRNG+15, CLINRNG+16, DISCHRG+2, DISCHRG+4, AGE+2
DUZ SELECT+30, LAST5RPL+3, FSSNRPL+3, TOP+2, DFLTSRC+1
END AGE+1~, AGE+2*, AGE+3
ERR APPTLST+2~, APPTLST+6, APPTLST+7
ERRMSG APPTLST+2~, APPTLST+6, APPTLST+7
FROM LISTALL~, LISTALL+2*, LISTALL+3*, LISTALL+4, LISTALL+9
FROMIEN LISTALL+1~*, LISTALL+2*, LISTALL+4*
HLOC ADMITLST+2~, ADMITLST+9*, ADMITLST+10, ADMITLST+11
HWND SHARE~, SHARE+3
I SCDIS+1~, SCDIS+5*, SHOW+1~, SHOW+4*, LAST5+1~, LAST5+2*, LAST5+4*, FULLSSN+1~, FULLSSN+2*, FULLSSN+4*
, LISTALL+1~*, LISTALL+3, LISTALL+4, LISTALL+9*, APPTLST+8*, APPTLST+9
ID LAST5~, LAST5+2, LAST5+3, LAST5RPL~, FULLSSN~, FULLSSN+3, FSSNRPL~, FSSNRPL+8
IEN LAST5+1~, LAST5+2*, LAST5+3*, LAST5+4, FULLSSN+1~, FULLSSN+2*, FULLSSN+3*, FULLSSN+4, TOP+1~, TOP+2*
, TOP+3, LISTALL+1~, LISTALL+4*, LISTALL+5, LISTALL+7, LISTALL+9
ILST SCDIS+1~, SCDIS+5*, SCDIS+8*, SCDIS+9, BYWARD+1~, BYWARD+3*, BYWARD+6*, BYWARD+7, ADMITLST+2~*, ADMITLST+11*
IOST SELECT+17*
IP SHARE~, SHARE+3
LOC ENCTITL~, ENCTITL+3
LST SCDIS~, BYWARD~, LAST5~, LAST5RPL~, FULLSSN~, FSSNRPL~, TOP~, APPTLST~, APPTLST+7!, ADMITLST~
, CLINRNG~
LST( SCDIS+8*, BYWARD+6*, LAST5+4*, LAST5RPL+12*, FULLSSN+4*, FSSNRPL+15*, APPTLST+9*, ADMITLST+11*
LST(0 LAST5RPL+5*, FSSNRPL+5*
LST(1 SCDIS+3*, BYWARD+2*, BYWARD+7*, TOP+3*, APPTLST+7*, CLINRNG+1*, CLINRNG+10*
LST(2 SCDIS+4*, SCDIS+9*, CLINRNG+2*, CLINRNG+11*
LST(3 CLINRNG+3*, CLINRNG+13*
LST(4 CLINRNG+4*, CLINRNG+14*
LST(5 CLINRNG+5*, CLINRNG+15*
LST(6 CLINRNG+6*, CLINRNG+17*
LST(7 CLINRNG+18*
MOV ADMITLST+2~, ADMITLST+4*, ADMITLST+6, ADMITLST+11
MTIM ADMITLST+2~, ADMITLST+7*, ADMITLST+10, ADMITLST+11
OK SAVDFLT~
ORCNT LAST5RPL+1~, LAST5RPL+7*, LAST5RPL+11*, LAST5RPL+12, FSSNRPL+1~, FSSNRPL+7*, FSSNRPL+14*, FSSNRPL+15
ORIDNAME LISTALL+1~, LISTALL+6*, LISTALL+7*, LISTALL+9
ORLPT FSSNRPL+1~, FSSNRPL+9*, FSSNRPL+10*, FSSNRPL+11
ORLST LEGACY~, LEGACY+4
ORLST(0 LEGACY+2*, LEGACY+5*
ORPIEN LAST5RPL+1~, LAST5RPL+9*, LAST5RPL+10, LAST5RPL+12, FSSNRPL+1~, FSSNRPL+11*, FSSNRPL+12, FSSNRPL+13, FSSNRPL+15
ORPT LAST5RPL+1~, LAST5RPL+7*, LAST5RPL+8*, LAST5RPL+9, FSSNRPL+1~, FSSNRPL+7*, FSSNRPL+8*, FSSNRPL+13
ORRPL LAST5RPL+1~, LAST5RPL+3*, LAST5RPL+4*, LAST5RPL+5, LAST5RPL+8, LAST5RPL+9, FSSNRPL+1~, FSSNRPL+3*, FSSNRPL+4*, FSSNRPL+5
, FSSNRPL+10, FSSNRPL+11
PROV ENCTITL~, ENCTITL+5
REC IDINFO~, IDINFO+4*, SELCHK~, SELCHK+2*, SELECT~, SELECT+7*, SELECT+12*, SELECT+13*, SELECT+14*, SELECT+16*
, SELECT+18*, SELECT+19*, SELECT+20*, SELECT+21*, SELECT+22*, SELECT+23, SELECT+26, SELECT+28*, ENCTITL~, ENCTITL+3*
, ENCTITL+4*, ENCTITL+5*, ENCTITL+6, INPLOC~, INPLOC+2*, INPLOC+4*, INPLOC+5*, INPLOC+7*
REF PTINQ~, PTINQ+3*
SC SCDIS+1~, SCDIS+7*, SCDIS+8
SRV DFLTSRC+1~*, DFLTSRC+2
START CLINRNG+9~
SUNDAY CLINRNG+9~
TIM ADMITLST+2~, ADMITLST+3*, ADMITLST+4
TIUDA ADMITLST+5~, ADMITLST+10*, ADMITLST+11
U IDINFO+4, SCDIS+3, SCDIS+4, SCDIS+6, SCDIS+7, SCDIS+8, SELECT+12, SELECT+13, SELECT+14, SELECT+16
, SELECT+18, SELECT+19, SELECT+20, SELECT+21, SELECT+22, SELECT+23, SELECT+26, SELECT+27, SELECT+28, BYWARD+6
, LAST5+4, LAST5RPL+4, LAST5RPL+12, FULLSSN+4, FSSNRPL+4, FSSNRPL+15, TOP+3, ENCTITL+3, ENCTITL+4, ENCTITL+5
, LISTALL+2, LISTALL+9, APPTLST+9, ADMITLST+7, ADMITLST+8, ADMITLST+9, ADMITLST+11, INPLOC+3, INPLOC+5, INPLOC+6
, INPLOC+7
VAEL SCDIS+1~, SELECT+29!
VAEL(3 SCDIS+3, SELECT+19
VAEL(4 SCDIS+4
VAEL(6 SCDIS+4
VAERR SCDIS+1~, SELECT+29!, APPTLST+2~
VAIP DISCHRG+1~
VAIP("D" DISCHRG+3*
VAIP(17 DISCHRG+4, DISCHRG+5
VAL DIEDON~, DIEDON+1*, SHARE~, DFLTSRC~, DFLTSRC+2*
VASD APPTLST+2~
VASD("F" APPTLST+3*
VASD("T" APPTLST+4*
VASD("W" APPTLST+5*
VSTR ADMITLST+5~, ADMITLST+10*
WARD BYWARD~, BYWARD+2, BYWARD+4*, BYWARD+5
X SCDIS+1~, SCDIS+5*, SCDIS+6, SCDIS+7, SCDIS+8, SELECT+9~, SELECT+12*, SELECT+13*, SELECT+16*, SELECT+20*
, SELECT+24~, SELECT+25*, SELECT+26*, SELECT+27*, SELECT+28, CLINRNG+9~, CLINRNG+10*, CLINRNG+11, CLINRNG+12*, CLINRNG+13
, CLINRNG+14, CLINRNG+16*, CLINRNG+17, SAVDFLT~, INPLOC+1~, INPLOC+2*, INPLOC+3*, INPLOC+4, INPLOC+5, INPLOC+6*
, INPLOC+7, AGE+1~, AGE+3*, AGE+4, ROK~, ROK+1*
X0 IDINFO+2~, IDINFO+3*, IDINFO+4, ADMITLST+2~, ADMITLST+6*, ADMITLST+7, ADMITLST+8, ADMITLST+9
X1 IDINFO+2~, IDINFO+3*, IDINFO+4
X101 IDINFO+2~, IDINFO+3*, IDINFO+4
X3 IDINFO+2~, IDINFO+3*, IDINFO+4
XLOC ADMITLST+2~, ADMITLST+9*, ADMITLST+11
XREF LAST5+1~, LAST5+2*, LAST5+3
XTYP ADMITLST+2~, ADMITLST+8*, ADMITLST+11
XV IDINFO+2~, IDINFO+3*, IDINFO+4
>> XWB("2" SELECT+10
Y SHOW+1~, SHOW+3, SELECT+24~, SELECT+25*, SELECT+26, LISTALL~, ADMITLST+2~, DISCHRG~, DISCHRG+2*, DISCHRG+4*
, DISCHRG+5*, CWAD~, CWAD+1*
Y( LISTALL+9*
Y(2 SELECT+27
Z SELECT+24~, SELECT+27*
Z(3 SELECT+28

Marked Items

Name Field # of Occurrence
$T(GETICN^MPIF001 SELECT+20
$T(HXDATA^A7RDPAGU LEGACY+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All