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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: LRBLAUD

Package: Lab Service

Routine: LRBLAUD


Information

LRBLAUD ; IHS/DIR/AAB - AUDIT TRAIL MULTIPLE FIELDS 9/3/97 14:32 ; [ 9/3/97 9:28 AM ]

Source Information

Source file <LRBLAUD.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
Lab Service 1 EN^LRUD  

Entry Points

Name Comments DBIA/ICR reference
PAT1 ; Gets all Patients Xmatched/Assigned for a unit after editing and
; puts into AFTP() array. If total after editing < original total
; then the deleted patient Xmatched/Assigned node is built onto the
; audit trail. The input template then call line BLD3 to get the
; associated Blood Sample date/time multiple & include this on the
; audit trail also.
AUDIT
PAT ; Gets all unit's Patient Xmatched/Assigned episodes, sets into
; the BEGP() array & counts total for later comparison
REL1 ; Gets relocation episodes for unit after editing, sets into AFTR()
; array, counts total. If total after edit < original total, then
; entire deleted record is built onto the audit trail
CHECK
REL ; Gets original relocation episodes for a unit, sets into the
; BEGR() array and counts total for later comparison
BLD3 ; Gets all Blood Sample date/time assigned to a particular
; LRDFN, sets into BEGB1() array, counts total. This is so
; that the audit trail is built for this submultiple node
; in the case that the entire Patient Xmatched/Assigned node
; is deleted.
BLD2 ; Actual code that puts the Blood Sample Date/Time subfields
; into the audit trail.
BLD ; Gets all original blood samples for a patient, sets into the
; BEGB() array and counts total for later comparison
BLD1 ; Gets patient blood samples after editing, set into AFTB() array,
; counts total. If total after editing < original total, then the
; deleted node is built onto the audit trail.
K ; Kills variables created during editing of a disposition
BLD4 ; If a Patients Xmatched/Assigned entry has been deleted, adds
; adds any Blood Sample Date/time entries for that deleted
; patient to the audit trail.

External References

Name Field # of Occurrence
EN^LRUD AUDIT, CHECK

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LRD(65 - [#65] REL+3, REL1+4, PAT+3, PAT1+7, BLD+3, BLD1+4, BLD3+6

Label References

Name Line Occurrences
AUDIT REL1+7, REL1+8, REL1+9, REL1+10, REL1+11, REL1+12, REL1+13, PAT1+10, PAT1+11, BLD2+3
, BLD2+4, BLD2+5, BLD2+6, BLD2+7, BLD2+8, BLD2+9, BLD2+10, BLD2+11
BLD2 BLD1+5, BLD4+4
BLD4 PAT1+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AFTB( BLD1+4*
>> AFTBLD BLD1+3*, BLD1+4*, BLD1+5
>> AFTP( PAT1+7*
>> AFTPAT PAT1+6*, PAT1+7*, PAT1+8, PAT1+12
>> AFTR( REL1+4*
>> AFTREL REL1+3*, REL1+4*, REL1+5
>> BEGB( BLD+3*
>> BEGB1 BLD4+3
>> BEGB1( BLD3+6*, BLD4+4
>> BEGBLD BLD+2*, BLD+3*, BLD1+5
>> BEGBLD1 BLD3+5*, BLD3+6*
>> BEGP( PAT+3*
>> BEGPAT PAT+2*, PAT+3*, PAT1+8, PAT1+12
>> BEGR( REL+3*
>> BEGREL REL+2*, REL+3*, REL1+5
>> BLD BLD+2*, BLD+3*, BLD1+3*, BLD1+4*
>> BLD1 BLD3+5*, BLD3+6*, BLD4+4*
>> BNODE BLD2+2, BLD4+4*
LRCOMP K+1!
LRCOMPID K+1!
>> LRDFN BLD+3, BLD1+4, BLD3+6
LRDIPD K+1!
LRDISP K+1!
LRDIST K+1!
LRDSP K+1!
LRENTP K+1!
>> LRIEN REL+3, REL1+4, PAT+3, PAT1+7, BLD+3, BLD1+4, BLD3+6
>> LRM REL1+6*, REL1+7, REL1+8, REL1+9, REL1+10, REL1+11, REL1+12, REL1+13, PAT1+9*, PAT1+10
, PAT1+11, BLD2+2*, BLD2+3, BLD2+4, BLD2+5, BLD2+6, BLD2+7, BLD2+8, BLD2+9, BLD2+10
, BLD2+11
LROLD K+1!
LRPERS K+1!
LRPHYS K+1!
LRPOOL K+1!
LRPROVN K+1!
LRPTR K+1!
LRPTRANS K+1!
LRPTREC K+1!
LRREACT K+1!
LRREC K+1!
LRRECRX K+1!
LRRXTYPE K+1!
LRTRDT K+1!
LRTS K+1!
LRTSNUM K+1!
LRTYPE K+1!
LRUNABO K+1!
LRUNRH K+1!
LRVOL K+1!
NODE REL1+6, REL1+14!
>> O REL1+7*, REL1+8*, REL1+9*, REL1+10*, REL1+11*, REL1+12*, REL1+13*, PAT1+10*, PAT1+11*, BLD2+3*
, BLD2+4*, BLD2+5*, BLD2+6*, BLD2+7*, BLD2+8*, BLD2+9*, BLD2+10*, BLD2+11*, AUDIT, CHECK
>> PAT PAT+2*, PAT+3*, PAT1+6*, PAT1+7*
>> PNODE PAT1+9
>> REL REL+2*, REL+3*, REL1+3*, REL1+4*
U REL1+7, REL1+8, REL1+9, REL1+10, REL1+11, REL1+12, REL1+13, PAT1+10, PAT1+11, BLD2+3
, BLD2+4, BLD2+5, BLD2+6, BLD2+7, BLD2+8, BLD2+9, BLD2+10, BLD2+11
>> X AUDIT*, CHECK
>> Z REL1+7*, REL1+8*, REL1+9*, REL1+10*, REL1+11*, REL1+12*, REL1+13*, PAT1+10*, PAT1+11*, BLD2+3*
, BLD2+4*, BLD2+5*, BLD2+6*, BLD2+7*, BLD2+8*, BLD2+9*, BLD2+10*, BLD2+11*
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All