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

Package: Lab Service

Routine: LRMLRCP


Information

LRMLRCP ;BPFO/DTG - FILE 60 ITEMS WITHOUT MLTF REPORT PGM FOR NTRT PROCESS ;02/10/2016

Source Information

Source file <LRMLRCP.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZTLOAD  ($$DT,$$FMTE,$$NOW)^XLFDT  $$KSP^XUPARAM  
VA FileMan 3 ($$GET1,GETS)^DIQ  EN^DIQ1  ^DIR  
Registration 1 $$SITE^VASITE  

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

Package Total Caller Graph
Lab Service 1 LR NDS SPECIMENS W/O VUIDS  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point
ST ;
DEVICE
DO
DONE ; exit
BK ;entry if queued
PRT ; print report
PL ; Step down the B X-ref - exclude synomyms
PLE
PDONE ; print done
HEADER ;Description: Prints the report header.
PAUSE
GET664 ; get file 66.4 info
GET60T ; get top of file 60 test info

External References

Name Field # of Occurrence
^%ZIS DEVICE
HOME^%ZIS ST+2, DEVICE+1
^%ZTLOAD DEVICE+2
$$GET1^DIQ EN+7
GETS^DIQ PLE+2, GET664+3
EN^DIQ1 GET60T+1
^DIR PAUSE+2
$$SITE^VASITE EN+5, GET664+1
$$DT^XLFDT EN+4
$$FMTE^XLFDT PL+13, PLE+11, HEADER+5
$$NOW^XLFDT ST+4, DEVICE+2
$$KSP^XUPARAM EN+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!?(IOM-$L(HD)\2),HD,!!!
  • Line Location: ST+2
Function Call: WRITE
  • Prompt: !,*7,"Starting Date Not Selected"
  • Line Location: ST+7
Function Call: WRITE
  • Prompt: !,*7,"Ending Date Not Selected"
  • Line Location: ST+10
Function Call: WRITE
  • Prompt: !,*7,"No Device Selected"
  • Line Location: DEVICE+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: !,LRTSTN,?42,"Create Date: ",LRTC,?67,"Inactive: "
  • Line Location: PLE+6
Function Call: WRITE
  • Prompt: $S(B="":"N",1:B)
  • Line Location: PLE+6
Function Call: WRITE
  • Prompt: !,?2,D,?35,K,?47,C,?57,E
  • Line Location: PLE+16
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,?11,HD
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,?27,"Date Printed: "_$$FMTE^XLFDT(DT),?70,"Page ",PAGE,!
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !,?2,"Specimen",?35,"Create DT",?47,"Inactive",?57,"Exception"
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !,ULINE
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !,LRTSTN
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+1
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE
Routine Call
  • %ZIS
  • Line Location:
    • ST+2
    • DEVICE+1
Routine Call
  • DIR
  • Line Location:
    • PAUSE+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
60.01 GETS^DIQ
^LAB(66.4 - [#66.4] GET1^DIQ,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" ST+1
^LAB(60 - [#60] PLE, HEADER+11
^LAB(66.4 - [#66.4] EN+6, GET664+2

Label References

Name Line Occurrences
DO DEVICE+2
DONE DEVICE+1, DO+1, PDONE+1
GET60T PL+5
GET664 PRT+1
HEADER PRT+4, PLE+22, PLE+25
PAUSE PLE+19
PDONE PL+1, PLE+18
PL PL+2, PL+8, PL+9, PLE
PLE PLE+3, PLE+5, PLE+27
PRT DEVICE+5
ST EN+5, EN+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DEVICE*
>> %ZIS("A" DEVICE*
A EN+1~, EN+7*, DONE+1!
AA EN+3~, DONE+3!, PL+7*, PL+8, PL+9
AR EN+2~, DONE+2!, GET664+4!
AR("66.4" GET664+4
AUTO ST+1!
B EN+1~, EN+5*, EN+6, DONE+1!, PLE+1*, PLE+2, PLE+4, PLE+6*, HEADER+11*
C EN+1~, DONE+1!, PLE+2!, PLE+4!, PLE+13*, PLE+16
C("60.01" PLE+4
CRT EN+2~, DONE+2!, PRT+2*, PRT+3, PLE+18, PLE+23
D EN+1~, DONE+1!, PLE+9*, PLE+16
DA EN+1~, DONE+1!, GET60T+1*, GET60T+2
DDIQ EN+3~, DONE+3!
DIC EN+3~, DONE+3!, GET60T+1*
DIDEL EN+1~, DONE+1!
DIE EN+1~, DONE+1!
DIQ EN+3~, DONE+3!, GET60T+1*
DIQ(0 GET60T+1*
DIR PAUSE~
DIR(0 PAUSE+2*
DIRUT PAUSE~, PAUSE+3
DR EN+1~, DONE+1!, GET60T+1*
DT EN+4*, ST+3, HEADER+5
E EN+1~, DONE+1!, PLE+15*, PLE+16
EDPRT ST+1!
FF EN+3~, ST+2*, DONE+3!
FN EN+2~, DONE+2!
FO EN+2~, DONE+2!
HD EN+3~, ST+2*, DONE+3!, HEADER+4
I EN+3~, DEVICE+3*, DONE+3!
IO("Q" DEVICE+2
IOF ST+2, PRT+3, PLE+21, PLE+24, HEADER+3
IOM ST+2
ION DEVICE+2
IOSL PLE+18, PLE+23, PAUSE+1
IOST PRT+2
>> IOT DEVICE+2
K EN+1~, DONE+1!, PLE+11*, PLE+16
LD EN+1~, DONE+1!
LDT EN+1~, DONE+1!
LINE HEADER+2~
LR1 EN+2~, DONE+2!, PL+15*, PLE+6, PLE+7*
LRDT EN+2~, DONE+2!
LRDT(0 ST+3*
LRDTA EN+1~, DONE+1!, PLE+2!, PLE+4*
LRDTA( PLE+9
LRDTA(30 PLE+5
LRDTA(32 PLE+13
LRDTA(34 PLE+15
LRDTA(35 PLE+11
LRER PLE+2!
LRER("DIERR" PLE+3
LRFD EN+1~, ST+4*, DONE+1!
LRFDAT EN+1~, DONE+1!
LRNT EN+3~, DONE+3!, GET664+2*, GET664+3, GET664+4
LRNTI EN+2~, DONE+2!, GET664+4*
LRROOT EN+2~, DONE+2!, PRT+5*, PL+1*, PL+2, PL+3
LRROOTA EN+2~, DONE+2!, PRT+5*, PL+1
LRSITE EN+1~, EN+5*, EN+6*, EN+7*, EN+8*, DONE+1!
LRTC EN+3~, DONE+3!, PL+13*, PLE+6
LRTDAT EN+1~, DONE+1!
LRTE EN+2~, DONE+2!, PRT+2*, PL+15*, PLE*, PLE+1, HEADER+11
LRTST EN+1~, DONE+1!, PRT+2*, PL+3*, PLE, PLE+1, HEADER+11, GET60T+1
LRTSTN EN+2~, DONE+2!, PRT+2*, PL+11*, PLE+6, HEADER+12
LSITE EN+3~, DONE+3!, GET664+1*, GET664+2
LT EN+1~, DONE+1!
LXA EN+2~, DONE+2!, GET60T+2!*
LXA( PL+11
LXA(131 PL+13
LXA(132 PLE+6
LXA(4 PL+7
LXB EN+2~, DONE+2!, GET60T+2!
LXB(60 GET60T+2
PAGE EN+1~, DONE+1!, PRT+2*, PRT+3, PRT+4*, HEADER+5, HEADER+6*, HEADER+10
PDT EN+1~, DONE+1!
PGHD EN+2~, ST+3*, DONE+2!
POP EN+3~, DEVICE+1, DONE+3!
PS EN+1~, EN+6*, EN+7, DONE+1!
QUIT EN+2~, DONE+2!, PRT+2*, PLE+18, PLE+20, PDONE+1, HEADER+1, PAUSE+3*
U EN+4*, EN+5, GET664+1
ULINE EN+2~, ST+1!*, DONE+2!, HEADER+9
X EN+2~, DONE+2!, PAUSE~
XDD EN+2~, ST+1*, ST+3, DONE+2!
Y EN+2~, ST+3*, DONE+2!, PAUSE~, PAUSE+3
ZTDESC DEVICE+2~*, DO!
ZTDTH DEVICE+2~*, DO!
ZTIO DEVICE+2~*, DO!
>> ZTQUEUED DONE+4
>> ZTREQ DONE+4*
ZTRTN DEVICE+2~*, DO!
ZTSAVE DEVICE+2~, DO!
ZTSAVE( DEVICE+3*
ZTSK DEVICE+2, DO!
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