ORQPT2 ;HIRMFO/DAD - Patient Look-Up Security Check and Notification ;Jun 13, 2019@11:43
Source file <ORQPT2.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 2 | $$NOW^XLFDT OP^XQCHK |
VA FileMan | 2 | UPDATE^DIE $$GET1^DIQ |
MailMan | 1 | ^XMD |
Registration | 1 | EN^DGPMSTAT |
Text Integration Utility | 1 | ENCOVER^TIUPP3 |
Womens Health | 1 | $$POSTSHRT^WVRPCOR |
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 |
---|---|---|
Enterprise Health Management Platform | 3 | HMPCRPC1 HMPDJ00 HMPPTRPC |
Inpatient Medications | 3 | PSJALG PSJCLOR2 PSJLMHED |
Order Entry Results Reporting | 2 | ORCHART ORWPT |
Consult Request Tracking | 1 | GMRCSLM |
Registration | 1 | DGRRLU1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN1(ORDFN) | ;
; Sensitive Patient record check ; Input ; ORDFN = Pointer to the Patient file (#2) ; Output ; 0 - Patient record IS NOT sensitive ; 1 - Patient record IS sensitive |
|
EN2(ORDFN) | ;
; Update DG Security Log file (#38.1) and sends ; the 'Restricted Patient Accessed' bulletin to the ; mailgroup specified in the 'Sensitive Rec Accessed ; Group' field (43,509) ; Input ; ORDFN = Pointer to the Patient file (#2) ; Output ; None |
|
CWAD(DFN) | ;
; Crisis notes, clinical Warnings, Allergies, advance Directives ; Input: ; DFN = A Patient file (#2) IEN ; Output: ; A string of 0-6 nonrepeating characters consisting ; of the letters C,W,A,D,P,L. The string will be returned ; with the letters in the order shown. |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^DGSL(38.1 - [#38.1] | GET1^DIQ |
^DG(43 - [#43] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGSL(38.1 - [#38.1] | EN2+37, EN2+39, EN2+45, EN2+54 |
^TMP("TIUPPCV" | CWAD+18, CWAD+19, CWAD+23! |
^XUSEC("DG SENSITIVITY" | EN2+22 |
Name | Line Occurrences |
---|---|
$$EN1 | EN2+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACRN | CWAD+10~, CWAD+19*, CWAD+21 |
CTR | CWAD+10~, CWAD+17*, CWAD+18*, CWAD+19 |
DFN | EN2+12~, EN2+19*, CWAD~, CWAD+9, CWAD+11, CWAD+26 |
DG1 | EN2+12~, EN2+19 |
DGA1 | EN2+12~ |
DGT | EN2+12~, EN2+19* |
DGXFR0 | EN2+12~ |
DUZ | EN2+10, EN2+22, EN2+27, EN2+48 |
MSG | CWAD+10~ |
ORDFN | EN1~, EN1+8, EN2~, EN2+10, EN2+19, EN2+31, EN2+32, EN2+37, EN2+39, EN2+41 , EN2+42, EN2+45, EN2+47, EN2+48, EN2+49, EN2+50, EN2+54 |
ORFDA | EN2+40~, EN2+46~ |
ORFDA( | EN2+41*, EN2+47*, EN2+48*, EN2+49*, EN2+50* |
ORIEN | EN2+40~, EN2+46~ |
ORIEN(1 | EN2+42*, EN2+51* |
ORINPT | EN2+13~, EN2+19*, EN2+22, EN2+50 |
ORINVNOW | EN2+13~, EN2+45*, EN2+51 |
ORLST | CWAD+10~, CWAD+16*, CWAD+18, CWAD+21*, CWAD+25*, CWAD+26*, CWAD+27 |
ORMAILGR | EN2+13~, EN2+20*, EN2+22, EN2+25 |
ORMSG | EN2+40~, EN2+46~ |
ORNOW | EN2+13~, EN2+18*, EN2+19, EN2+45*, EN2+47 |
OROPT | EN2+13~, EN2+17*, EN2+33, EN2+49 |
ORTEXT | EN2+23~ |
ORTEXT(1 | EN2+29* |
ORTEXT(2 | EN2+30* |
ORTEXT(3 | EN2+31* |
ORTEXT(4 | EN2+32* |
ORTEXT(5 | EN2+33* |
U | EN2+17, EN2+33, EN2+49, CWAD+19, CWAD+21 |
X | EN2+14~ |
XMCHAN | EN2+23~, EN2+28* |
XMDUZ | EN2+23~, EN2+27* |
XMSUB | EN2+23~, EN2+24* |
XMTEXT | EN2+23~, EN2+26* |
XMY | EN2+23~ |
XMY("G." | EN2+25* |
XMZ | EN2+23~ |
XQOPT | EN2+14~, EN2+17 |