ORPRF ;SLC/JLI/JMC -Patient record flag ;6/14/06
Source file <ORPRF.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Order Entry Results Reporting | 6 | ORPRF CLEAR ORPRF GETFLG ORPRF HASCAT1 ORPRF HASFLG ORPRF TRIGGER POPUP ORVCODATA01 |
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
|
RPC Name | Call Tags |
---|---|
ORPRF HASFLG | HASFLG |
ORPRF GETFLG | GETFLG |
ORPRF CLEAR | CLEAR |
ORPRF HASCAT1 | HASCAT1 |
ORPRF TRIGGER POPUP | TRIGRPOP |
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! |
Name | Line Occurrences |
---|---|
FMT | HASFLG+19, HASFLG1+18 |
HASCAT1X | HASCAT1+5 |
>> | 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 |
Name | Field # of Occurrence |
---|---|
$T(GETACT^DGPFAPI | HASFLG+7, HASFLG1+8 |
$T(GETDBRS^DGPFDBRS | HASFLG+15 |