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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: DGQPT2

Package: Registration

Routine: DGQPT2


Information

DGQPT2 ; HIRMFO/DAD-Patient Look-Up Security Check and Notification ;1/31/97 07:57

Source Information

Source file <DGQPT2.m>

Call Graph

Call Graph Total: 8

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  
Uncategorized 1 EN^MPRCHK  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGWPT  

Entry Points

Name Comments DBIA/ICR reference
EN1(DGDFN) ;
; Sensitive Patient record check
; Input
; DGDFN = Pointer to the Patient file (#2)
; Output
; 0 - Patient record IS NOT sensitive
; 1 - Patient record IS sensitive
EN2(DGDFN) ;
; 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
; DGDFN = 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-4 nonrepeating characters consisting
; of the letters C,W,A,D. The string will be returned
; with the letters in the order shown.

External References

Name Field # of Occurrence
EN^DGPMSTAT EN2+18
UPDATE^DIE EN2+42, EN2+51
$$GET1^DIQ EN1+8, EN2+19, EN2+30, EN2+31
EN^MPRCHK EN2+55
ENCOVER^TIUPP3 CWAD+11
$$NOW^XLFDT EN2+17
^XMD EN2+33
OP^XQCHK EN2+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^DGSL(38.1 - [#38.1] GET1^DIQ
^DG(43 - [#43] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" EN2+55
^DGSL(38.1 - [#38.1] EN2+36, EN2+38, EN2+44, EN2+53
^TMP("TIUPPCV" CWAD+18, CWAD+19, CWAD+23!
^XUSEC("DG SENSITIVITY" EN2+21

Label References

Name Line Occurrences
$$EN1 EN2+10

Local Variables

Legend:

>> 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+18*, CWAD~, CWAD+9, CWAD+11
DG1 EN2+12~, EN2+18
DGA1 EN2+12~
DGDFN EN1~, EN1+8, EN2~, EN2+10, EN2+18, EN2+30, EN2+31, EN2+36, EN2+38, EN2+40
, EN2+41, EN2+44, EN2+46, EN2+47, EN2+48, EN2+49, EN2+53, EN2+55
DGFDA EN2+39~, EN2+45~
DGFDA( EN2+40*, EN2+46*, EN2+47*, EN2+48*, EN2+49*
DGIEN EN2+39~, EN2+45~
DGIEN(1 EN2+41*, EN2+50*
DGINPT EN2+12~, EN2+18*, EN2+21, EN2+49
DGINVNOW EN2+12~, EN2+44*, EN2+50
>> DGLST CWAD+16*, CWAD+18, CWAD+21*, CWAD+25*, CWAD+26
DGMAILGR EN2+12~, EN2+19*, EN2+21, EN2+24
DGMSG EN2+39~, EN2+45~
DGNOW EN2+12~, EN2+17*, EN2+18, EN2+44*, EN2+46
DGOPT EN2+12~, EN2+16*, EN2+32, EN2+48
DGT EN2+12~, EN2+18*
DGTEXT EN2+22~
DGTEXT(1 EN2+28*
DGTEXT(2 EN2+29*
DGTEXT(3 EN2+30*
DGTEXT(4 EN2+31*
DGTEXT(5 EN2+32*
DGXFR0 EN2+12~
DUZ EN2+10, EN2+21, EN2+26, EN2+47
MSG CWAD+10~
ORLST CWAD+10~
U EN2+16, EN2+32, EN2+48, CWAD+19, CWAD+21
X EN2+13~, EN2+55*
XMCHAN EN2+22~, EN2+27*
XMDUZ EN2+22~, EN2+26*
XMSUB EN2+22~, EN2+23*
XMTEXT EN2+22~, EN2+25*
XMY EN2+22~
XMY("G." EN2+24*
XMZ EN2+22~
XQOPT EN2+13~, EN2+16
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All