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: LRAPDSR

Package: Lab Service

Routine: LRAPDSR


Information

LRAPDSR ;DALOI/STAFF - AP SUPPLEMENTARY REPORT ENTRY;Dec 17, 2008

Source Information

Source file <LRAPDSR.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 7 ^%DT  EN^DDIOL  FILE^DICN  (,UPDATE,WP)^DIE  $$EXTERNAL^DILFD  GETS^DIQ  ^DIR  
Lab Service 3 GETDATA^LRAPESON  UPDATE^LRPXRM  EDIT^LRRPLU  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Lab Service 2 LRAPDA  LRAPMRL  

Entry Points

Name Comments DBIA/ICR reference
MAIN ; Main Subroutine
RELEAS1 ; Is the ENTIRE report already released?
GETRPT ; First, select the report
RELEAS2 ; Is the supplementary report already released?
COPY ; Make a copy of the current report.
RPT ;
QUESP ; Update the preliminary report print queue
COMPARE ; Compare reports
UNRELEAS ; Unrelease the supplementary report.
UPDATE ; File changes
; First, store the date of the change and user ID
STORE ; Second, store the original report

External References

Name Field # of Occurrence
^%DT UPDATE+4
EN^DDIOL QUESP+8
FILE^DICN GETRPT+46
^DIE RPT+7
UPDATE^DIE QUESP+14, UNRELEAS+3, UPDATE+11
WP^DIE STORE+3
$$EXTERNAL^DILFD GETRPT+10, GETRPT+11, GETRPT+18, GETRPT+19
GETS^DIQ COPY+6
^DIR GETRPT+29, GETRPT+39, RELEAS2+12
GETDATA^LRAPESON MAIN+21
UPDATE^LRPXRM UPDATE+2
EDIT^LRRPLU MAIN+11
$$FMTE^XLFDT GETRPT+8, GETRPT+17

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$C(7),"This AUTOPSY has been released. Supplementary report additions/modifications"
  • Line Location: RELEAS1+5
Function Call: WRITE
  • Prompt: !,"will create an audit trail.",!
  • Line Location: RELEAS1+6
Function Call: WRITE
  • Prompt: $C(7),!!,"This "_$G(LRAA(1))_" report has been released."
  • Line Location: RELEAS1+11
Function Call: WRITE
  • Prompt: !,"Supplementary report additions/modifications will create an audit trail.",!
  • Line Location: RELEAS1+12
Function Call: WRITE
  • Prompt: !,"Adding a new SUPPLEMENTARY REPORT"
  • Line Location: GETRPT+37
Function Call: WRITE
  • Prompt: $C(7),!!,"No changes were made to the supplementary report."
  • Line Location: COMPARE+19
Routine Call
  • DIE
  • Line Location:
    • RPT+7
Routine Call
  • DIE
  • Line Location:
    • QUESP+14
    • UNRELEAS+3
    • UPDATE+11
Routine Call
  • DIE
  • Line Location:
    • STORE+3
Routine Call
  • DIR
  • Line Location:
    • GETRPT+29
    • GETRPT+39
    • RELEAS2+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LR - [#63] Classic Fileman Calls
63.324 EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] RELEAS1+3, RELEAS1+8, GETRPT+6, GETRPT+7, GETRPT+15, GETRPT+16, RELEAS2+2, RELEAS2+3, UPDATE+15*, UPDATE+16*
^LRO(69.2 - [#69.2] QUESP+2, QUESP+4, QUESP+15
^TMP("DIQ1" COPY+1!, COMPARE+1, COMPARE+10, COMPARE+12, COMPARE+16, COMPARE+20!, STORE+4!

Label References

Name Line Occurrences
COMPARE MAIN+16
COPY MAIN+6
GETRPT MAIN+2
QUESP MAIN+14
RELEAS1 MAIN+1
RELEAS2 MAIN+4
RPT MAIN+8
STORE MAIN+25
UNRELEAS MAIN+22, COMPARE+5
UPDATE MAIN+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT UPDATE+4*
DA GETRPT+2~, GETRPT+42!, GETRPT+43*, GETRPT+44*, RPT+1~, RPT+4*
DA(1 GETRPT+43*, RPT+5*, RPT+6*
DA(2 RPT+6*
DIC GETRPT+2~, GETRPT+42!, GETRPT+43*, GETRPT+44*
DIC("DR" GETRPT+45*
DIC(0 GETRPT+45*
DIE RPT+1~, RPT+3*
DILOCKTM QUESP+4
DIR GETRPT+2~, GETRPT+36!, RELEAS2+6~
DIR("?" GETRPT+26*, GETRPT+27*
DIR("A" GETRPT+8*, GETRPT+10*, GETRPT+11*, GETRPT+17*, GETRPT+18*, GETRPT+19*, GETRPT+24*, GETRPT+25*, RELEAS2+8*, RELEAS2+9*
RELEAS2+10*, RELEAS2+11*
DIR("B" RELEAS2+7*
DIR(0 GETRPT+28*, GETRPT+38*, RELEAS2+7*
DIRUT GETRPT+2~, GETRPT+36!, RELEAS2+6~
DO GETRPT+2~, GETRPT+42!
DR RPT+1~, RPT+7*
DTOUT GETRPT+2~, GETRPT+36!, RELEAS2+6~
DUOUT GETRPT+2~, GETRPT+36!, RELEAS2+6~
DUZ UPDATE+10
LRA LRAPDSR+3~, COMPARE+7*, COMPARE+8*, COMPARE+10, COMPARE+12, COMPARE+15*, COMPARE+16*
>> LRAA QUESP+2, QUESP+4, QUESP+9, QUESP+15
>> LRAA(1 RELEAS1+11
>> LRAN QUESP+2, QUESP+13
LRDA LRAPDSR+4~, RPT+4*, UPDATE+15, UPDATE+16
>> LRDFN MAIN+11, RELEAS1+3, RELEAS1+8, GETRPT+6, GETRPT+7, GETRPT+15, GETRPT+16, GETRPT+43, GETRPT+44, RELEAS2+2
RELEAS2+3, COPY+2, RPT+5, RPT+6, QUESP+10, UPDATE+2, UPDATE+15, UPDATE+16
LRESSW MAIN+20~, MAIN+21, MAIN+22, UPDATE+14
LRFDA LRAPDSR+4~, QUESP+3!, UNRELEAS+1!, UPDATE+3!
LRFDA( QUESP+10*, QUESP+11*, QUESP+12*
LRFDA(1 UNRELEAS+2*, UPDATE+9*, UPDATE+10*
LRFIELD LRAPDSR+4~, UPDATE+10*, STORE+3
LRFILE LRAPDSR+3~, COMPARE+2*, COMPARE+3*, COMPARE+4, COMPARE+8, COMPARE+9, COMPARE+17, UPDATE+6*, UPDATE+7*, UPDATE+8
UPDATE+9, UPDATE+10, STORE+3
LRFILE1 LRAPDSR+3~, COPY+3*, COPY+4*, COPY+5, COPY+6, COMPARE+10, COMPARE+12, COMPARE+16, UNRELEAS+2
LRFLG LRAPDSR+4~, COMPARE+7*, COMPARE+10*, COMPARE+11, COMPARE+13*, COMPARE+14, COMPARE+17*, COMPARE+18
>> LRH(0 QUESP+12
>> LRI MAIN+11, RELEAS1+8, GETRPT+6, GETRPT+7, GETRPT+43, RELEAS2+2, COPY+2, RPT+6, QUESP+11, UPDATE+2
UPDATE+15
LRIENS LRAPDSR+3~, COPY+2*, COPY+6, QUESP+1~, QUESP+9*, QUESP+10, QUESP+11, QUESP+12, COMPARE+10, COMPARE+12
COMPARE+16, UNRELEAS+2, UPDATE+5, STORE+1
LRIENS1 LRAPDSR+4~, UPDATE+5*, UPDATE+9, UPDATE+10
LRIENS2 LRAPDSR+4~, STORE+1*, STORE+3
LRLAST GETRPT+2~, GETRPT+22*, GETRPT+23, GETRPT+24, GETRPT+26, GETRPT+28, GETRPT+33, GETRPT+37
LRNOW LRAPDSR+4~, UPDATE+4*, UPDATE+9
LRORIEN LRAPDSR+4~
LRORIEN(1 QUESP+13*, STORE+1
LRQUIT LRAPDSR+4~, MAIN+3, MAIN+5, MAIN+7, MAIN+15, MAIN+17, MAIN+24, RELEAS1+1*, GETRPT+23, GETRPT+30*
GETRPT+40*, GETRPT+47*, RELEAS2+14*, COPY+5*, RPT+8*, COMPARE+1*, COMPARE+6*, COMPARE+21*, UPDATE+8*
LRRLS LRAPDSR+3~, MAIN+6, RELEAS1+1*, RELEAS1+7*, RELEAS1+13*, RPT+8
LRRLS1 LRAPDSR+3~, MAIN+22, RELEAS1+1*, RELEAS2+13*, COMPARE+5
LRRLS2 LRAPDSR+3~, RELEAS2+4*, RELEAS2+5
LRSFN GETRPT+2~, GETRPT+9*, GETRPT+10, GETRPT+11
LRSRDA LRAPDSR+4~, GETRPT+33*, GETRPT+48*, RELEAS2+2, RELEAS2+3, COPY+2, RPT+4
>> LRSS MAIN+11, RELEAS1+2, RELEAS1+3, RELEAS1+8, GETRPT+5, GETRPT+6, GETRPT+7, GETRPT+9, GETRPT+14, GETRPT+38
GETRPT+43, RELEAS2+2, COPY+2, COPY+3, COPY+4, RPT+3, RPT+5, RPT+6, COMPARE+2, COMPARE+3
UPDATE+2, UPDATE+6, UPDATE+7, UPDATE+15, UPDATE+16
LRWPROOT LRAPDSR+3~, STORE+2*, STORE+3
LRX LRAPDSR+3~, RELEAS1+3*, RELEAS1+4, RELEAS1+8*, RELEAS1+10, GETRPT+2~, RELEAS2+2*, RELEAS2+3*, RELEAS2+4
LRX( GETRPT+12*, GETRPT+20*, GETRPT+33
LRXTMP LRAPDSR+4~, COMPARE+9*, COMPARE+13
LRYTMP LRAPDSR+3~, COMPARE+12*, COMPARE+13
MSG QUESP+8!
MSG(1 QUESP+6*
MSG(2 QUESP+7*
X GETRPT+2~, GETRPT+4*, GETRPT+6*, GETRPT+7, GETRPT+12, GETRPT+15*, GETRPT+16, GETRPT+20, GETRPT+36!, GETRPT+45*
RELEAS2+6~, UPDATE+4*
X(0 GETRPT+7*, GETRPT+8, GETRPT+10, GETRPT+11, GETRPT+16*, GETRPT+17, GETRPT+18, GETRPT+19
Y GETRPT+2~, GETRPT+4*, GETRPT+7*, GETRPT+8, GETRPT+10, GETRPT+11, GETRPT+12, GETRPT+16*, GETRPT+17, GETRPT+18
GETRPT+19, GETRPT+20, GETRPT+22, GETRPT+30, GETRPT+33, GETRPT+36!, GETRPT+40, GETRPT+45, GETRPT+47, GETRPT+48
RELEAS2+6~, RELEAS2+13, UPDATE+4
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