DGSEC1 ;ALB/RMO-MAS Security Options ; [ 01/04/2002 7:06 AM ]
Source file <DGSEC1.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 7 | ^%DT ^DIC YN^DICN ^DIE (,IXALL)^DIK DT^DIQ ^DIR |
Registration | 5 | SEND^DGSEC ^DGSEC2 ^DGSEC3 H^DGUTL (CLOSE,QUE,ZIS)^DGUTQ |
IHS Changes To ADT | 1 | $$HRCN^BDGF2 |
IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
Kernel | 1 | $$NOW^XLFDT |
Package | Total | Caller Graph |
---|---|---|
Registration | 4 | DG SECURITY DISPLAY LOG DG SECURITY ENTER/EDIT DG SECURITY PURGE LOG DG SECURITY PURGE PATIENTS |
IHS Changes To ADT | 1 | BDGSECL |
Name | Comments | DBIA/ICR reference |
---|---|---|
A | ||
BULTIN | ;This bulletin is sent if a patient's sensitivity is removed.
|
|
PURNON | ||
RUSURE() | ; Description: Asks user if they are sure they want to edit the DG SECURITY LOG record.
|
|
ASKPRT | ||
IHS | ;EP; -- entry point from IHS protocol;IHS/ANMC/LJF 9/6/2000
|
|
1 | ;
|
|
3 | ;
|
|
2 | ;
|
|
Q | ||
4 | ;
|
|
ASKPUR | ||
ED | ||
DTR | ;-- get date range
|
Name | Field # of Occurrence |
---|---|
^%DT | DTR+1, ED |
$$HRCN^BDGF2 | BULTIN+13, PURNON+5 |
SEND^DGSEC | BULTIN+21 |
^DGSEC2 | 2+2 |
^DGSEC3 | 3+2 |
H^DGUTL | PURNON+1, PURNON+6 |
CLOSE^DGUTQ | Q |
QUE^DGUTQ | ASKPRT+2 |
ZIS^DGUTQ | ASKPRT+1 |
^DIC | A+1, 1+5, BULTIN+9 |
YN^DICN | ASKPUR+1, ASKPRT |
^DIE | IHS+1, IHS+17 |
^DIK | PURNON+4 |
IXALL^DIK | DGSEC1+14 |
DT^DIQ | PURNON+1, PURNON+6 |
^DIR | RUSURE+6 |
$$VAL^XBDIQ1 | BULTIN+13 |
$$NOW^XLFDT | BULTIN+7 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | Classic Fileman Calls |
^DGSL(38.1 - [#38.1] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | BULTIN+7, DTR+3, ED+2 |
^DG(43 - [#43] | BULTIN+2, BULTIN+4 |
^DGSL(38.1 - [#38.1] | IHS+5, IHS+13, IHS+19, BULTIN+8, BULTIN+15, BULTIN+18, PURNON+4 |
^DOPT("DGSEC1" | DGSEC1+13* |
^DPT - [#2] | PURNON+5 |
^XMB(3.8 - [#3.8] | BULTIN+5 |
^XUSEC("DG SECURITY OFFICER" | 4+2 |
^XUSEC("DG SENSITIVITY" | 1+4 |
Name | Line Occurrences |
---|---|
$$RUSURE | IHS+10 |
1 | IHS+6, IHS+24 |
@( | A+1 |
A | DGSEC1+13, A+1 |
ASKPRT | ASKPRT |
ASKPUR | ASKPUR+2, DTR+2 |
DTR | ASKPUR+3, ED+1, ED+3 |
PURNON | ASKPRT+1 |
Q | 1+2, ASKPUR+1, ASKPUR+4, ASKPRT, ASKPRT+1, ASKPRT+2 |
Name | Field # of Occurrence |
---|---|
^("D" | BULTIN+18 |
^("NOT" | BULTIN+2 |
^(0 | PURNON+4, PURNON+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | ASKPUR~, ASKPUR+1*, ASKPUR+2, ASKPRT* |
%DT | DTR+1*, ED! |
%DT("A" | DTR+1*, ED* |
BDGED | PURNON+4, ED+1!, ED+2*, ED+3 |
>> BDGEDY | ED+2* |
BDGSD | ASKPUR+4, PURNON+4, DTR+2!, DTR+3*, ED+3 |
>> BDGSDY | DTR+3* |
BDGSECL | 1+2! |
DA | 1+3~, 1+6*, IHS+1!, IHS+5, IHS+13, IHS+19, BULTIN+8, BULTIN+13, BULTIN+15, BULTIN+18 , PURNON+4* |
DE | IHS+18! |
DFN | PURNON+4*, PURNON+5, Q! |
DGB | BULTIN+2!*, BULTIN+3, BULTIN+4*, BULTIN+5*, BULTIN+21 |
DGCNT | PURNON+1*, PURNON+5*, PURNON+6, Q! |
DGI | BULTIN+6~, BULTIN+14* |
DGPGM | ASKPRT+1*, Q! |
DGPRT | ASKPRT*, ASKPRT+1, ASKPRT+2, PURNON+1, PURNON+4, PURNON+6, Q! |
DGSENFLG | 1+5*! |
>> DGTIME | PURNON+1, PURNON+6 |
DGVAR | ASKPRT+1*, Q! |
DIC | A~, A+1*, 1+3~, 1+5*, BULTIN+1~, BULTIN+9*, PURNON~ |
DIC("A" | 1+5*! |
DIC(0 | A+1*, 1+5*, BULTIN+9* |
DIE | IHS+1*!, IHS+14*, IHS+18! |
DIK | DGSEC1+12~, DGSEC1+14*, PURNON+4* |
DIR | RUSURE+2~ |
DIR("A" | RUSURE+4* |
DIR("B" | RUSURE+5* |
DIR(0 | RUSURE+3* |
DIRUT | RUSURE+2~, RUSURE+7 |
DLAYGO | 1+3~, 1+5* |
DQ | IHS+18! |
DR | 1+3~, IHS+1*!, IHS+15*, IHS+16* |
DUZ | 1+4, IHS+15, 4+2 |
DUZ(2 | BULTIN+13, PURNON+5 |
I | DGSEC1+12~, DGSEC1+13* |
ION | ASKPRT+2* |
OK | IHS+4~, IHS+6, IHS+10*, IHS+16 |
POP | ASKPRT+1, Q! |
SECSRCE | IHS+4~, IHS+5*, IHS+6, IHS+8, IHS+16, BULTIN+1~, BULTIN+15*, BULTIN+17 |
SENSAFTR | IHS+12~, IHS+19*, IHS+23! |
SENSBEF | IHS+12~, IHS+13*, IHS+23! |
SUB | BULTIN+1~* |
U | BULTIN+4, BULTIN+5, BULTIN+10 |
X | DGSEC1+12~, DGSEC1+13*, A~, 1+3~, BULTIN+1~, BULTIN+8*, BULTIN+9*, RUSURE+2~ |
XMB | BULTIN+6~, BULTIN+7*, BULTIN+21 |
XMB( | BULTIN+14* |
XMB(1 | BULTIN+8*, BULTIN+10* |
XMB(2 | BULTIN+13* |
XMB(3 | BULTIN+16* |
XMB(4 | BULTIN+17* |
XMB(5 | BULTIN+19* |
XMB(6 | BULTIN+20* |
XMB(7 | BULTIN+7* |
XMY | BULTIN+6~, BULTIN+21 |
XMY("G." | BULTIN+21* |
XMY0 | BULTIN+6~ |
XMZ | BULTIN+6~ |
Y | A~, A+1, 1+3~, 1+5, 1+6, BULTIN+1~, BULTIN+7*, BULTIN+10, PURNON~, PURNON+1* , PURNON+6*, RUSURE+2~, RUSURE+8, DTR+2, DTR+3, ED+1, ED+2 |
Name | Field # of Occurrence |
---|---|
$T(@(1)+1 | DGSEC1+13 |