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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: ORPRF

Package: Order Entry Results Reporting

Routine: ORPRF


Information

ORPRF ;SLC/JLI/JMC -Patient record flag ;6/14/06

Source Information

Source file <ORPRF.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Registration 2 ($$GETACT,GETACT)^DGPFAPI  ($$GETDBRS,GETDBRS)^DGPFDBRS  
Kernel 1 $$LJ^XLFSTR  
Order Entry Results Reporting 1 ACTPRFHS^ORPRFHST  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Order Entry Results Reporting 6 ORPRF CLEAR  ORPRF GETFLG  ORPRF HASCAT1  ORPRF HASFLG  ORPRF TRIGGER POPUP  ORVCODATA01  

Entry Points

Name Comments DBIA/ICR reference
FMT(ROOT,DBRSDATA,DGHIST) ; Format - Convert record flag data to displayable data
; Sets ^TMP("ORPRF",$J,NN) with flag data for multiple flags
; DBRSDATA - local array with DBRS data
; DGHIST - local array with PRF history records
HASFLG(ORY,PTDFN) ;Does patient PTDFN has flags
; DBIA 3860: $$GETACT^DGPFAPI(PTDFN,.FLGDATA)
; Returns array ORY listing active assigned flags
; Array ORY has form:
; ORY(flagID) = flagID^flagname,CAT1
; where CAT1 is 1 if flag is cat 1, 0 if cat 2
; ORY = Num of items returned in array ORY = num of flags
HASFLG1(ORY,PTDFN) ; Does patient PTDFN have **Cat I** flags
; Returns array ORY listing active assigned Cat I flags
; Array ORY has form:
; ORY(flagID) = flagID^flagname
; ORY = Num of Cat I flags
; If pt has no Cat I flags ORY = 0 and no flags are returned.
; Also calls FMT^ORPRF, which sets ^TMP("ORPRF" for Cat I flags
;
HASCAT1(HASCAT1,PTDFN) ;Does patient have Category I flags (no arrays)
; Returns boolean HASCAT1 = 0 or 1
; Does NOT set arrays or TMP globals
HASCAT1X ;
TRIGRPOP(POPUP,PTDFN) ;Should the flag display pop up upon patient selection
; for patient PTDFN?
GETFLG(ORY,PTDFN,FLAGID) ;Return detailed flag info for flag FLAGID
CLEAR(ORY) ;Clear up the temp global

External References

Name Field # of Occurrence
$$GETACT^DGPFAPI HASFLG+10, HASFLG1+11, HASCAT1+5, TRIGRPOP+6
GETACT^DGPFAPI HASFLG+7, HASFLG1+8
$$GETDBRS^DGPFDBRS HASFLG+15
GETDBRS^DGPFDBRS HASFLG+15
ACTPRFHS^ORPRFHST HASFLG+17
$$LJ^XLFSTR FMT+48

Used in RPC

RPC Name Call Tags
ORPRF HASFLG HASFLG
ORPRF GETFLG GETFLG
ORPRF CLEAR CLEAR
ORPRF HASCAT1 HASCAT1
ORPRF TRIGGER POPUP TRIGRPOP

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("ORPRF" FMT+7*, FMT+8*, FMT+9*, FMT+11*, FMT+12*, FMT+14*, FMT+15*, FMT+17*, FMT+18*, FMT+19*
, FMT+20*, FMT+21*, FMT+22*, FMT+23*, FMT+24*, FMT+31*, FMT+32*, FMT+41*, FMT+42*, FMT+43*
, FMT+44*, FMT+45*, FMT+48*, HASFLG+9!, HASFLG+20, HASFLG+21, HASFLG+23, HASFLG1+10!, HASFLG1+19, HASFLG1+20
, GETFLG+1, GETFLG+4, GETFLG+5, CLEAR+1!

Label References

Name Line Occurrences
FMT HASFLG+19, HASFLG1+18
HASCAT1X HASCAT1+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTFLGS HASFLG1+9~, HASFLG1+11*, HASFLG1+12, HASCAT1+3~, HASCAT1+5*
CAT1 HASFLG+8~, HASFLG+22*, HASFLG+23*, HASFLG+24
CAT1CNT HASFLG1+9~, HASFLG1+13*, HASFLG1+15*, HASFLG1+17, HASFLG1+21
CNT FMT+4~, FMT+5*, FMT+9*, FMT+11*, FMT+12*, FMT+14*, FMT+15*, FMT+17*, FMT+18*, FMT+19*
, FMT+20*, FMT+21*, FMT+22*, FMT+23*, FMT+24*, FMT+31*, FMT+32*, FMT+41*, FMT+42*, FMT+43*
, FMT+44*, FMT+45*, FMT+48*, GETFLG+2~, GETFLG+3*, GETFLG+5*
CURFLAG FMT+4~, FMT+34*, FMT+35, FMT+38, FMT+39, FMT+46
DBRSARR HASFLG+13~, HASFLG+15, HASFLG+19
DBRSDATA FMT~
DBRSDATA("BEHAVIORAL" FMT+26, FMT+28, FMT+29
DGHIST FMT~
DGHIST( FMT+35, FMT+38, FMT+39, FMT+46
FLAGID HASFLG1+9~, HASFLG1+13*, HASFLG1+14*, HASFLG1+15, HASFLG1+16, HASCAT1+3~, HASCAT1+4*, HASCAT1+6*, HASCAT1+7, GETFLG~
, GETFLG+1, GETFLG+4, GETFLG+5
HASCAT1 HASCAT1~, HASCAT1+4*, HASCAT1+6, HASCAT1+7*
IDX FMT+4~, FMT+5*, FMT+6*, FMT+7, FMT+8, FMT+9, FMT+10, FMT+11, FMT+12, FMT+13
, FMT+14, FMT+15, FMT+17, FMT+18, FMT+19, FMT+20, FMT+21, FMT+22, FMT+23, FMT+24
, FMT+26, FMT+31, FMT+32, FMT+34, FMT+41, FMT+42, FMT+43, FMT+44, FMT+45, FMT+48
IDY HASFLG+8~, HASFLG+20*, HASFLG+21, HASFLG+23, HASFLG+24, HASFLG1+19*, HASFLG1+20
IX FMT+4~, FMT+13*, FMT+14, GETFLG+2~, GETFLG+3*, GETFLG+4*, GETFLG+5
ORDBRSC FMT+27~, FMT+28*, FMT+29
ORPRFHCN FMT+36~, FMT+38*, FMT+39, FMT+42, FMT+43, FMT+44, FMT+45, FMT+46
ORPRFHDA FMT+36~, FMT+46*, FMT+48
ORPRFSIT FMT+36~, FMT+37*
ORQUIT FMT+36~, FMT+37*, FMT+38, FMT+39, FMT+40*
ORY HASFLG~, HASFLG+7*, HASFLG+10*, HASFLG+11, HASFLG1~, HASFLG1+8*, HASFLG1+12*, HASFLG1+17*, HASFLG1+21*, GETFLG~
, CLEAR~
ORY( HASFLG+21*, HASFLG+24*, HASFLG1+20*, GETFLG+5*
ORZDBRSD FMT+27~, FMT+29*, FMT+30, FMT+31, FMT+32
POPUP TRIGRPOP~, TRIGRPOP+6*
PRFARR HASFLG+8~, HASFLG1+9~, HASCAT1+3~, TRIGRPOP+5~
PRFARR( HASFLG1+14, HASFLG1+15, HASFLG1+16!, HASCAT1+6, HASCAT1+7
PRFHIST HASFLG+13~, HASFLG+17, HASFLG+19
PTDFN HASFLG~, HASFLG+10, HASFLG+15, HASFLG+17, HASFLG1~, HASFLG1+11, HASCAT1~, HASCAT1+5, TRIGRPOP~, TRIGRPOP+6
, GETFLG~
ROOT FMT~, FMT+49!
ROOT( FMT+6, FMT+7, FMT+8, FMT+9, FMT+10, FMT+13, FMT+14, FMT+17, FMT+18, FMT+20
, FMT+21, FMT+22, FMT+23, FMT+24, FMT+26, FMT+34
U FMT+7, FMT+8, FMT+9, FMT+17, FMT+18, FMT+20, FMT+21, FMT+22, FMT+23, FMT+24
, FMT+26, FMT+30, FMT+31, FMT+32, FMT+34, FMT+48, HASFLG+21, HASFLG+24, HASFLG1+20

Marked Items

Name Field # of Occurrence
$T(GETACT^DGPFAPI HASFLG+7, HASFLG1+8
$T(GETDBRS^DGPFDBRS HASFLG+15
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All