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

Package: Lab Service

Routine: LRDIDLE0


Information

LRDIDLE0 ;VA/DALOI/JMC - Create audit trail of changed values ; 13-Oct-2017 14:04 ; MKK

Source Information

Source file <LRDIDLE0.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 2 $$GET1^DIQ  ^DIWP  
IHS Changes To Lab 1 SENDMAIL^BLRUTIL8  
Kernel 1 $$FMTE^XLFDT  
Lab Service 1 FILECOM^LRVR4  
Toolkit 1 $$GET^XPAR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRVER3  

Entry Points

Name Comments DBIA/ICR reference
INIT ;
; This code controls the automatic audit trail entries for CH subscripted
; tests which are reported and subsequently changed. Modification of this
; code by local stations may have Medical/Legal ramifications. Local
; stations are STRONGLY advised to NOT make changes.
STORE ; Store comments in file #63, field #99 COMMENTS
EVAL ; EP
USERID(LRDUZ) ; Create user id for comment text

External References

Name Field # of Occurrence
SENDMAIL^BLRUTIL8 STORE+40
$$GET1^DIQ STORE+31, USERID+12
^DIWP STORE+10
FILECOM^LRVR4 STORE+21
$$FMTE^XLFDT INIT+8
$$GET^XPAR STORE+26

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,LRX
  • Line Location: STORE+22

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^DIC(4 - [#4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^UTILITY($J STORE+9!, STORE+11, STORE+12, STORE+16!

Label References

Name Line Occurrences
$$USERID INIT+8, EVAL+6, EVAL+15, EVAL+29, EVAL+38
STORE EVAL+42

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHNGRI STORE+28~, STORE+30*, STORE+31, STORE+39
CHNGRN STORE+28~, STORE+31*, STORE+32*, STORE+39
DIWF STORE+2~, STORE+8*
DIWL STORE+2~, STORE+8*, STORE+11, STORE+12
DIWR STORE+2~, STORE+8*
DUZ INIT+8
DUZ("AG" USERID+9
DUZ(2 USERID+10
>> J STORE+14*
>> LRACC STORE+36, STORE+40
LRCHDT7 INIT+6~, INIT+8*, EVAL+8, EVAL+18, EVAL+19, EVAL+31, EVAL+40
>> LRDFN STORE+21
LRDUZ USERID~, USERID+7
LRDUZ("AG" USERID+9*, USERID+12
LRDUZ(2 USERID+10*, USERID+12
LRI INIT+6~, EVAL+23~, EVAL+34*, EVAL+35, EVAL+36, EVAL+37, STORE+2~, STORE+5*, STORE+6*, STORE+7
, STORE+8, STORE+9, STORE+12, STORE+18*, STORE+19*, STORE+20, STORE+29*, STORE+30, STORE+33*, STORE+34*
, STORE+35*, STORE+36*, STORE+37*, STORE+38*, STORE+39
>> LRIDT STORE+21
LRJ INIT+6~, INIT+8*, EVAL+7*, EVAL+8*, EVAL+16*, EVAL+17*, EVAL+18, EVAL+19, EVAL+30*, EVAL+31*
, EVAL+39*, EVAL+40*, EVAL+42, STORE+2~, STORE+8*, STORE+11*, STORE+12
LRK STORE+2~, STORE+12*, STORE+13, STORE+14, STORE+15
LRNEW INIT+6~, EVAL+4*, EVAL+8, EVAL+12*, EVAL+13*, EVAL+18, EVAL+19, EVAL+27*, EVAL+31, EVAL+35*
, EVAL+40
>> LRNOW7 INIT+8
>> LROK INIT+8*
LROLD INIT+6~, EVAL+5*, EVAL+6, EVAL+14*, EVAL+15, EVAL+28*, EVAL+29, EVAL+36*, EVAL+38
>> LRSA( EVAL+3, EVAL+5, EVAL+6, EVAL+7, EVAL+11, EVAL+14, EVAL+15, EVAL+16, EVAL+22, EVAL+24
, EVAL+29, EVAL+30, EVAL+38, EVAL+39
>> LRSB EVAL+3, EVAL+4, EVAL+5, EVAL+6, EVAL+7, EVAL+11, EVAL+12, EVAL+13, EVAL+14, EVAL+15
, EVAL+16, EVAL+22, EVAL+24, EVAL+29, EVAL+30, EVAL+38, EVAL+39
>> LRSB( EVAL+4, EVAL+12, EVAL+13, EVAL+24
LRSQ9 INIT+6~, EVAL+6*, EVAL+7, EVAL+15*, EVAL+16, EVAL+29*, EVAL+30, EVAL+38*, EVAL+39
LRTXT INIT+6~, STORE+40
LRTXT( EVAL+7*, EVAL+8*, EVAL+16*, EVAL+18*, EVAL+19*, EVAL+30*, EVAL+31*, EVAL+39*, EVAL+40*, STORE+6
, STORE+7, STORE+8, STORE+9!, STORE+12*, STORE+13, STORE+14*, STORE+15*, STORE+19, STORE+20, STORE+30
, STORE+34*, STORE+35*, STORE+36*, STORE+37*, STORE+38*, STORE+39*
LRTXT("A" STORE+29
>> LRUID STORE+37
LRUSER INIT+6~, INIT+8*, EVAL+8, EVAL+18, EVAL+19, EVAL+31, EVAL+40
LRX EVAL+23~, EVAL+24*, EVAL+26, EVAL+27, EVAL+34, EVAL+35, STORE+2~, STORE+20*, STORE+21, STORE+22
LRY EVAL+23~, EVAL+24*, EVAL+26, EVAL+28, EVAL+34, EVAL+36, USERID+6~, USERID+7*, USERID+12*, USERID+13
LRZ EVAL+23~, EVAL+37*, EVAL+39
LRZ(0 EVAL+33*, EVAL+37
>> VADM(1 STORE+35
X STORE+2~, STORE+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All