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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BDGSECL

Package: IHS Changes To ADT

Routine: BDGSECL


Information

BDGSECL ; IHS/ANMC/LJF - LIST SENSITIVE PATIENTS ;

Source Information

Source file <BDGSECL.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Registration 5 IHS^DGSEC1  (ASKUSR,DTRNG,Q)^DGSEC2  EN^VALM  TERM^VALM0  (CLEAR,FULL)^VALM1  
Kernel 3 $$FMTE^XLFDT  $$REPEAT^XLFSTR  DISP^XQORM1  
IHS Changes To ADT 2 PAUSE^BDGF  $$GETITEM^BDGFL  
VA Fileman 1 $$GET1^DIQ  

Entry Points

Name Comments DBIA/ICR reference
RESET ; -- update partition for return to list manager
EN ; -- main entry point for BDG SECURITY LIST
HDR ; -- header code
PAD(D,L) ;EP -- SUBRTN to pad length of data
; -- D=data L=length
EDIT ;EP; -- called by protocol to edit sensitivity level
SP(N) ; -- SUBRTN to pad N number of spaces
EXPND ; -- expand code
SET(DATA,IEN,LINE,NUM) ; -- create ^tmp global for list template
INIT ; -- init variables and list array
EXIT ; -- exit code
RESET2 ; -- return to list manager; don't update list
DISPLAY ;EP; -- called by protocol to display access records for patient
HELP ; -- help code

External References

Name Field # of Occurrence
PAUSE^BDGF DISPLAY+2, EDIT+2
$$GETITEM^BDGFL DISPLAY+4, EDIT+4
IHS^DGSEC1 EDIT+7
ASKUSR^DGSEC2 DISPLAY+8
DTRNG^DGSEC2 DISPLAY+7
Q^DGSEC2 DISPLAY+7
$$GET1^DIQ INIT+8, INIT+11, INIT+13, DISPLAY+6
EN^VALM EN+3
TERM^VALM0 EN+2, RESET+2, RESET2+2
CLEAR^VALM1 EN+4
FULL^VALM1 DISPLAY+1, EDIT+1
$$FMTE^XLFDT HDR+2, INIT+13
$$REPEAT^XLFSTR PAD+2
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !!?3,*7,"You do not have the appropriate access privileges to display user access."
  • Line Location: DISPLAY+2
Function Call: WRITE
  • Prompt: !!?3,$C(7),"You do not have the appropriate access privileges to assign security."
  • Line Location: EDIT+2
Routine Call
  • VALM
  • Line Location:
    • EN+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^DGSL(38.1 - [#38.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGSL(38.1 - [#38.1] INIT+7
^TMP("BDGSECL" INIT+2!, EXIT+1!, SET+2*, SET+3*
^TMP("BDGSECL1" INIT+2!, INIT+14*, INIT+17, INIT+20, INIT+21, INIT+22, INIT+30!
^XUSEC("DG SECURITY OFFICER" DISPLAY+2
^XUSEC("DG SENSITIVITY" EDIT+2

Label References

Name Line Occurrences
$$PAD INIT+26, INIT+27, SP+1
$$SP HDR+3
HDR RESET+3
INIT RESET+3
RESET EDIT+7
RESET2 DISPLAY+2, DISPLAY+5, DISPLAY+7, DISPLAY+8, EDIT+2, EDIT+5
SET INIT+17, INIT+28

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BDGI DISPLAY+3~, DISPLAY+4*, DISPLAY+5, DISPLAY+6, EDIT+3~, EDIT+4*, EDIT+5, EDIT+6
>> BDGSECL EDIT+6*
D PAD~, PAD+2
>> DA EDIT+6*
DATA INIT+1~, INIT+22*, INIT+26, INIT+27, SET~, SET+2
>> DFN DISPLAY+6*
DGN INIT+1~, INIT+6*, INIT+7*, INIT+8, INIT+11, INIT+13, INIT+14, INIT+21*, INIT+22, INIT+28
DGNUM INIT+1~, INIT+6*, INIT+24*, INIT+25, INIT+28
>> DGPOP DISPLAY+7
DT HDR+2
DUZ DISPLAY+2, EDIT+2
IEN SET~, SET+3
L PAD~, PAD+2
LINE INIT+1~, INIT+25*, INIT+26*, INIT+27*, INIT+28, SET~, SET+1*, SET+2, SET+3
N SP~, SP+1
NAME INIT+1~, INIT+8*, INIT+14, INIT+20*, INIT+21, INIT+22, INIT+25
NUM SET~, SET+3
STATUS INIT+1~, INIT+8*, INIT+9
U INIT+14, INIT+26, INIT+27
>> VALMBCK RESET+1*, RESET+2*, RESET2+1*, RESET2+2*
VALMCNT EN+1~, INIT+3*, INIT+17, INIT+28, EXIT+1!
>> VALMHDR(1 HDR+3*
>> VALMQUIT RESET+1, RESET2+1
X HDR+1~, HDR+2*, HDR+3, INIT+11*, INIT+14, HELP+1*
>> Y INIT+13*, INIT+14
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All