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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRAPR

Package: Lab Service

Routine: LRAPR


Information

LRAPR ;DALOI/REG/WTY/KLL/CKA - ANAT RELEASE REPORTS ;10/30/01

Source Information

Source file <LRAPR.m>

Call Graph

Call Graph Total: 19

Package Total Call Graph
Lab Service 10 OERR^LR7OB63D  ^LRAP  (,PNAME)^LRAPDA  GETDATA^LRAPESON  (CHKSUP,CKSIGNR,RELCHK,UNRLSE)^LRAPR1  (,RELEASE,SECTION,STORE,TIUPREP)^LRAPRES  (CLSSCHK,MAIN)^LRAPRES1  (V,YN)^LRU  
^LRUP  X^LRUWK  
VA Fileman 8 (,DD)^%DT  NOW^%DTC  EN^DDIOL  ^DIC  $$GET1^DID  FILE^DIE  $$GET1^DIQ  ^DIR  
Kernel 1 SIG^XUSESIG  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Lab Service 3 LRAPDA  LRAPR  LRAPRS  

Entry Points

Name Comments DBIA/ICR reference
A
C ;
B ;Autopsy
END ;
DIE ;Define default supplementary report
DIE1 ;
SWITCH ;Check to see if electronic signature is enabled
REST
UPDATE ;
S ;from LRAPDA
EN ;Supplementary Report Entry Point
ESIG ;Prompt for electronic signature
W
RINFO ;Display release information
RELEASE ;Prompt for release/unrelease
NMPATH ;Check for missing pathologist name
CAP
RELMN ;Allow release of main report as long as all supp reports are
; released, and signer is same person for main and supp report(s)
SUPCHK ;Check for unreleased supplementary reports

External References

Name Field # of Occurrence
^%DT EN+17
DD^%DT SUPCHK+9, SUPCHK+16, RINFO+5
NOW^%DTC RELMN+22
EN^DDIOL DIE+28, DIE+32, UPDATE+5
^DIC DIE1+8
$$GET1^DID DIE+5
FILE^DIE UPDATE+10, RELMN+25, RELMN+28
$$GET1^DIQ DIE+10, DIE+12, DIE+14, DIE+20, DIE+22, DIE+24, DIE1+12, DIE1+15, UPDATE+15, UPDATE+19
, RELMN+10, RELMN+11, RELMN+12, RELMN+13, RELMN+14, RELMN+16, RELMN+17, RELMN+18, RELMN+19, RELMN+20
^DIR DIE1+25, RELEASE+4
OERR^LR7OB63D RELMN+29
^LRAP A, C+1
^LRAPDA LRAPR+31, B+20
PNAME^LRAPDA W+3
GETDATA^LRAPESON SWITCH+1
CHKSUP^LRAPR1 DIE1+30
CKSIGNR^LRAPR1 UPDATE+9
RELCHK^LRAPR1 RELMN+4
UNRLSE^LRAPR1 RELMN+26
^LRAPRES LRAPR+8
RELEASE^LRAPRES RELMN+27
SECTION^LRAPRES EN+7
STORE^LRAPRES RELMN+24
TIUPREP^LRAPRES RELMN+23
CLSSCHK^LRAPRES1 EN+11
MAIN^LRAPRES1 UPDATE+20
V^LRU END+1
YN^LRU EN+15
^LRUP REST+5
X^LRUWK LRAPR+15
SIG^XUSESIG ESIG+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?27,"Release Pathology Reports",!!
  • Line Location: LRAPR+10
Function Call: WRITE
  • Prompt: !!?20,"Release Supplementary Pathology Reports",!
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !!,"Data entry for ",LRH(0)," "
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: " for ",LRH(0)
  • Line Location: REST+0
Function Call: WRITE
  • Prompt: !,LRP," ID: ",SSN
  • Line Location: REST+6
Function Call: WRITE
  • Prompt: !,LRP," ID: ",HRCN
  • Line Location: REST+7
Function Call: WRITE
  • Prompt: !,^(0)
  • Line Location: REST+12
Function Call: WRITE
  • Prompt: !!,"This supplementary rept has already been released.",!
  • Line Location: DIE1+19
Function Call: WRITE
  • Prompt: "...Released"
  • Line Location: UPDATE+11
Function Call: WRITE
  • Prompt: $C(7),!,"Report "
  • Line Location: RINFO+1
Function Call: WRITE
  • Prompt: "released "
  • Line Location: RINFO+3
Function Call: WRITE
  • Prompt: !
  • Line Location: RELEASE+1
Function Call: WRITE
  • Prompt: !!,?25,"*** Main Report Release ***",!
  • Line Location: RELMN+21
Routine Call
  • DIC
  • Line Location:
    • DIE1+8
Routine Call
  • DIE
  • Line Location:
    • UPDATE+10
    • RELMN+25
    • RELMN+28
Routine Call
  • DIR
  • Line Location:
    • DIE1+25
    • RELEASE+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LR - [#63] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] REST+5, REST+11, REST+12, DIE+7, DIE+8, DIE+17, DIE+18, S+1, UPDATE+14, UPDATE+18
, UPDATE+24, UPDATE+25, SUPCHK+4, SUPCHK+5, SUPCHK+6, SUPCHK+8, SUPCHK+11, SUPCHK+12, SUPCHK+13, SUPCHK+15
^LRO(68 - [#68] EN+19, REST+1, REST+4, REST+9, S+1, S+2, S+3, S+5*, CAP*, CAP+1
^VA(200 - [#200] RINFO+7

Label References

Name Line Occurrences
A LRAPR+11
B LRAPR+16
CAP S+4
DIE W+5
END LRAPR+9, LRAPR+12, LRAPR+13, LRAPR+32, B+21, EN+8, EN+15, EN+16, W+1, W+2
, A, C+2
ESIG DIE1+22
RELMN UPDATE+26
REST W+6
SWITCH LRAPR+6, EN+2
UPDATE DIE1+23, DIE1+27
W W+2, W+7

Naked Globals

Name Field # of Occurrence
^(0 REST+5, REST+12, S+1*, S+2*, S+3*, CAP+1*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+15*, EN+16, RELMN+22
%DT EN+17*!
%DT("A" EN+17*
%DT(0 EN+17*
>> C S+4*, CAP, CAP+1
DIC DIE1+4*, DIE1+5*, DIE1+8!
DIC("A" DIE1+6*
DIC("B" DIE+3*, DIE+14*, DIE+24*, DIE+29
DIC(0 DIE1+7*
DIR DIE1+25!
DIR("A" DIE1+24*, RELEASE+2*, RELEASE+3*
DIR("B" DIE1+24*, RELEASE+1*
DIR(0 DIE1+24*, RELEASE+1*
>> DR LRAPR+18*, LRAPR+19*, LRAPR+20*, LRAPR+21*, LRAPR+22*, LRAPR+23*, LRAPR+26*, LRAPR+27*, LRAPR+28*, LRAPR+29*
, LRAPR+30*, B+2*, B+3*, B+5*, B+7*, B+8*, B+9*, B+10*, B+13*, B+14*
, B+15*, B+16*, B+17*, B+18*, B+19*
DTIME W
DUZ EN+11, S+2, CAP
DUZ(2 CAP
>> HRCN REST+7
>> LR("CK" W!
>> LRA UPDATE+14*, UPDATE+16, UPDATE+18*
>> LRAA EN+19, REST+1, REST+4, REST+9, S+1, S+2, S+3, S+5, CAP, CAP+1
>> LRAA(1 EN+20
>> LRAC UPDATE+15*, UPDATE+19*, UPDATE+20
>> LRAD EN+18*, EN+19, REST+1, REST+4, REST+9, S+1, S+2, S+3, S+5, CAP
, CAP+1
>> LRAN W*, W+1, W+2, W+4, REST+1, REST+2, REST+4, REST+9, S+1, S+2
, S+3, S+5, CAP, CAP+1
>> LRAU RELMN+8*, RELMN+9, RELMN+15
>> LRCAPA LRAPR+13
>> LRCKREL DIE1+30, UPDATE+23*, UPDATE+24*, UPDATE+25*, UPDATE+26
LRDA DIE+1~, DIE1+10*, DIE1+11, UPDATE+1
>> LRDFN REST+4*, REST+5, REST+11, REST+12, DIE+6, DIE+7, DIE+8, DIE+16, DIE+17, DIE+18
, S+1, UPDATE+14, UPDATE+15, UPDATE+18, UPDATE+20, UPDATE+24, UPDATE+25, SUPCHK+4, SUPCHK+5, SUPCHK+6
, SUPCHK+8, SUPCHK+11, SUPCHK+12, SUPCHK+13, SUPCHK+15, RELMN+16, RELMN+17, RELMN+18, RELMN+19, RELMN+20
>> LRDICS C+1*
>> LREND EN+10*, EN+11, EN+12
LRESSW LRAPR+5~, LRAPR+7, EN+1~, EN+11, DIE1+16, DIE1+18, DIE1+21, DIE1+30, SWITCH+1, UPDATE+26
LRFDA DIE+1~
LRFDA( UPDATE+6*
LRFDA2 DIE+2~
LRFDA2( UPDATE+7*
LRFILE DIE+1~, DIE+5*, DIE+10, DIE+12, DIE+14, DIE+16*, DIE+20, DIE+22, DIE+24, DIE1+12
, DIE1+15, UPDATE+6, UPDATE+7
>> LRH(0 EN+14, EN+18*, EN+20, REST, REST+2
>> LRI REST+9*, REST+11, REST+12, DIE+6, DIE+7, DIE+8, S+1, UPDATE+16*, UPDATE+18, UPDATE+20
, UPDATE+24, SUPCHK+4, SUPCHK+5, SUPCHK+6, SUPCHK+8
LRIENS DIE+1~, DIE+9*, DIE+10, DIE+12, DIE+14, DIE+19*, DIE+20, DIE+22, DIE+24, DIE1+11*
, DIE1+12, DIE1+15, UPDATE+6, UPDATE+7, UPDATE+19
LRIENS1 DIE+1~, DIE+6*, DIE+9, DIE+16*, DIE+19, DIE1+11, RELMN+10, RELMN+11, RELMN+12, RELMN+13
, RELMN+14
>> LRK S+1*, S+2, CAP
LRLKFL DIE+1~, DIE1+4*, DIE1+5*, UPDATE+1*, UPDATE+2, UPDATE+12
>> LRLLOC REST+4*
LRMSG DIE+2~, DIE+26!, DIE+27*, DIE+28, DIE+30!, DIE+31*, DIE+32, UPDATE+3*, UPDATE+4*, UPDATE+5
LRNOSP DIE+1~, DIE+3*, DIE+7*, DIE+17*, DIE+25
>> LRNTIME RELMN+22*
>> LRP REST+7, UPDATE+20
>> LRPAT RELMN+10*, RELMN+16*
>> LRQT RELMN+3*, RELMN+5
LRQUIT EN+6*, DIE+1~, DIE1+1*, DIE1+2, DIE1+9*, DIE1+22, ESIG+1*, ESIG+5*, RELMN+25, RELMN+28
, RELMN+30*
LRRLM DIE+2~, DIE1+1*, DIE1+15*, DIE1+18, DIE1+19
LRRLS DIE+1~, DIE1+12*, DIE1+16, DIE1+18
>> LRSF DIE+5, UPDATE+19, UPDATE+20, RELMN+10, RELMN+11, RELMN+12, RELMN+13, RELMN+14
>> LRSOP LRAPR+17*, B+1*
LRSR SUPCHK+1~, SUPCHK+2*, SUPCHK+5*, SUPCHK+6, SUPCHK+8, SUPCHK+12*, SUPCHK+13, SUPCHK+15
LRSR1 SUPCHK+1~, SUPCHK+2*, SUPCHK+5, SUPCHK+6*, SUPCHK+7, SUPCHK+12, SUPCHK+13*, SUPCHK+14, SUPCHK+17
LRSR2 SUPCHK+1~, SUPCHK+9*, SUPCHK+16*, SUPCHK+18
LRSRFL DIE+2~, DIE+10*, DIE+13, DIE+20*, DIE+23
LRSRMD DIE+2~, DIE+12*, DIE+13, DIE+22*, DIE+23
>> LRSS LRAPR+12, LRAPR+14, LRAPR+16, EN+8, REST+8, REST+11, REST+12, DIE+4, DIE+7, DIE+8
, DIE+15, DIE1+4, DIE1+5, S+1, UPDATE+13, UPDATE+17, UPDATE+18, UPDATE+20, UPDATE+24, UPDATE+25
, SUPCHK+3, SUPCHK+4, SUPCHK+5, SUPCHK+6, SUPCHK+8, SUPCHK+10, RELMN+8
>> LRT S+2, S+3, S+5, CAP, CAP+1
>> LRT( S+4
LRX DIE+1~, DIE+8*, DIE+9, DIE+18*, DIE+19
>> LRZ RELMN+11*, RELMN+17*
>> LRZ( RELMN+13*, RELMN+19*
>> LRZ(1 RINFO+7, RELMN+12*, RELMN+18*
>> LRZ(2 RINFO+2, RINFO+4, RINFO+6, RELEASE+2, RELEASE+3, RELMN+14*, RELMN+20*
>> LRZ(3 NMPATH+1
U W+1, UPDATE+16, SUPCHK+4, SUPCHK+6, SUPCHK+8, SUPCHK+11, SUPCHK+13, SUPCHK+15, RINFO+7
X LRAPR+13, LRAPR+14*, LRAPR+15, W!, REST+4*, REST+5*, REST+11*, REST+12, S+2*, CAP+1*
>> X1 ESIG+3
Y EN+16, EN+18, W!, DIE1+9, DIE1+10, DIE1+26, A, C+2, SUPCHK+8*, SUPCHK+9
, SUPCHK+15*, SUPCHK+16, SUPCHK+20*, RINFO+4*, RINFO+6, RINFO+8!, NMPATH+3*, RELEASE+5!, RELEASE+6*
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 |  Naked Globals |  Local Variables |  All