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

Package: Lab Service

Routine: LRMIPSZ3


Information

LRMIPSZ3 ;DALOI/STAFF - MICRO PATIENT REPORT - STERILITY, PARASITES, VIRUS ;Jul 15, 2021@13:13

Source Information

Source file <LRMIPSZ3.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Lab Service 4 PRE^LRMIPSU  NP^LRMIPSZ1  MES^LRMIPSZ2  D^LRU  
VA FileMan 1 $$EXTERNAL^DILFD  

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 LRMIPSZ1  LROR4  

Entry Points

Name Comments DBIA/ICR reference
STER ;
; from LRMIPSZ1
; also called from RPT^LROR4
PARA ;
; from LRMIPSZ1
; also called from RPT^LROR4
STG ;
SET ;
; File DD/999
LIST1 ;
VIR ;
; from LRMIPSZ1
; also called from RPT^LROR4
NP ;
; Convenience method

External References

Name Field # of Occurrence
$$EXTERNAL^DILFD STER+13, STER+23
PRE^LRMIPSU PARA+26, VIR+27
NP^LRMIPSZ1 NP+2
MES^LRMIPSZ2 PARA+15, VIR+15
D^LRU PARA+22, VIR+22

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"STERILITY CONTROL: ",LRX(0)
  • Line Location: STER+15
Function Call: WRITE
  • Prompt: !
  • Line Location: STER+18
Function Call: WRITE
  • Prompt: !,"NUMBER: ",I,?20,"STERILITY RESULTS: ",LRX(0)
  • Line Location: STER+25
Function Call: WRITE
  • Prompt: !
  • Line Location: STER+26
Function Call: WRITE
  • Prompt: !
  • Line Location: PARA+23
Function Call: WRITE
  • Prompt: !,"* PARASITOLOGY ",$S(LRTUS="F":"FINAL",LRTUS="P":"PRELIMINARY",1:"")," REPORT => ",Y," TECH CODE: ",DZ
  • Line Location: PARA+24
Function Call: WRITE
  • Prompt: !
  • Line Location: PARA+29
Function Call: WRITE
  • Prompt: !,"PARASITOLOGY SMEAR/PREP:"
  • Line Location: PARA+30
Function Call: WRITE
  • Prompt: !?5,^(LRMYC,0)
  • Line Location: PARA+33
Function Call: WRITE
  • Prompt: !,"Parasite: ",$E($P(^LAB(61.2,^TMP("LRMI",$J,LRDFN,"MI",LRIDT,6,LRPAR,0),0),U),1,25),?30," "
  • Line Location: PARA+36
Function Call: WRITE
  • Prompt: !,"Parasitology Remark(s):"
  • Line Location: PARA+40
Function Call: WRITE
  • Prompt: !,?3,^(LRPAR,0)
  • Line Location: PARA+43
Function Call: WRITE
  • Prompt: !," Stage: "
  • Line Location: STG+7
Function Call: WRITE
  • Prompt: !," Quantity: ",Y1
  • Condition for execution: $L(Y1)
  • Line Location: STG+7
Function Call: WRITE
  • Prompt: !," Comment: "
  • Line Location: LIST1+3
Function Call: WRITE
  • Prompt: ?13,^(C,0),!
  • Line Location: LIST1+5
Function Call: WRITE
  • Prompt: !
  • Line Location: VIR+23
Function Call: WRITE
  • Prompt: !,"* VIROLOGY ",$S(LRTUS="F":"FINAL",LRTUS="P":"PRELIMINARY",1:"")," REPORT => ",Y," TECH CODE: ",DZ
  • Line Location: VIR+24
Function Call: WRITE
  • Prompt: !
  • Line Location: VIR+30
Function Call: WRITE
  • Prompt: !,"Virus: ",$P(^LAB(61.2,$P(^(LRPAR,0),U),0),U)
  • Line Location: VIR+32
Function Call: WRITE
  • Prompt: !,"Virology Remark(s):"
  • Line Location: VIR+38
Function Call: WRITE
  • Prompt: !,?3,^(LRPAR,0)
  • Line Location: VIR+41

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
63.05 EXTERNAL^DILFD
63.292 EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(63.35 SET+2
^LAB(61.2 - [#61.2] PARA+36, VIR+32
^LR - [#63] STER+7, PARA+7, VIR+7
^TMP("LRMI" STER+5, STER+7*, STER+8!, STER+10, STER+12, STER+17, STER+20, STER+22, STER+28!, PARA+5
, PARA+7*, PARA+8!, PARA+10, PARA+18!, PARA+20, PARA+28, PARA+33, PARA+36, PARA+38, PARA+43
, PARA+46!, STG+3, STG+5, STG+7, LIST1+5, VIR+5, VIR+7*, VIR+8!, VIR+10, VIR+18!
, VIR+20, VIR+29, VIR+33, VIR+35, VIR+41, VIR+44!
^XTMP("LRMICRO EDIT" PARA+11, VIR+11

Label References

Name Line Occurrences
LIST1 STG+7
NP STER+11, STER+21, PARA+23, PARA+25, PARA+27, PARA+29, PARA+31, PARA+33, PARA+36, PARA+39
, PARA+41, PARA+43, STG+2, STG+7, LIST1+2, LIST1+5, VIR+23, VIR+25, VIR+31, VIR+37
, VIR+39, VIR+41
SET STG+7
STG PARA+36

Naked Globals

Name Field # of Occurrence
^( PARA+33, PARA+36, PARA+43, STG+7, LIST1+5, VIR+32, VIR+41
^(16 VIR+21
^(5 PARA+21

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % SET+2*
B STG+1~, STG+6*, STG+7*, LIST1+5
C LIST1+1~, LIST1+4*, LIST1+5*
>> DZ PARA+21*, PARA+24, VIR+21*, VIR+24
I STER+3~, STER+19*, STER+20*, STER+22, STER+25, PARA+33*
LR7SB PARA+14~*, VIR+14~*
>> LRABORT STER+10, STER+11, STER+20, STER+21, PARA+23, PARA+25, PARA+27, PARA+29, PARA+31, PARA+33
, PARA+36, PARA+39, PARA+41, PARA+43, STG+2, STG+7, LIST1+2, LIST1+5, VIR+23, VIR+25
, VIR+29, VIR+31, VIR+37, VIR+39, VIR+41
LRBLDTMP STER+3~, STER+4*, STER+6*, STER+28, PARA+3~, PARA+4*, PARA+6*, PARA+18, PARA+45, VIR+3~
, VIR+4*, VIR+6*, VIR+18, VIR+43
>> LRBUG( STG+3*, VIR+33*
>> LRDFN STER+5, STER+7, STER+8, STER+10, STER+12, STER+17, STER+20, STER+22, STER+28, PARA+5
, PARA+7, PARA+8, PARA+10, PARA+11, PARA+18, PARA+20, PARA+28, PARA+33, PARA+36, PARA+38
, PARA+43, PARA+46, STG+3, STG+5, STG+7, LIST1+5, VIR+5, VIR+7, VIR+8, VIR+10
, VIR+11, VIR+18, VIR+20, VIR+29, VIR+33, VIR+35, VIR+41, VIR+44
LRERR STER+3~, STER+14!, STER+24!
LRFLAG STER+3~, STER+17*, STER+18, STER+26
>> LRHC PARA+23, PARA+29, PARA+36, PARA+39, VIR+23, VIR+30, VIR+36
>> LRIDT STER+5, STER+7, STER+8, STER+10, STER+12, STER+17, STER+20, STER+22, STER+28, PARA+5
, PARA+7, PARA+8, PARA+10, PARA+11, PARA+18, PARA+20, PARA+28, PARA+33, PARA+36, PARA+38
, PARA+43, PARA+46, STG+3, STG+5, STG+7, LIST1+5, VIR+5, VIR+7, VIR+8, VIR+10
, VIR+11, VIR+18, VIR+20, VIR+29, VIR+33, VIR+35, VIR+41, VIR+44
>> LRLABKY PARA+10, VIR+10
>> LRMYC PARA+32*, PARA+33*
>> LRPAR PARA+35*, PARA+36*, PARA+42*, PARA+43*, STG+3, STG+4, VIR+28*, VIR+29*, VIR+32, VIR+33
, VIR+40*, VIR+41*
>> LRPRE PARA+26*, VIR+26*
LRQUIT PARA+3~, PARA+4*, PARA+10*, PARA+17, VIR+3~, VIR+4*, VIR+10*, VIR+17
>> LRSB PARA+10, VIR+10
>> LRSET SET+2*
>> LRTA STG+4*, STG+5, STG+7, LIST1+5
>> LRTUS PARA+20*, PARA+24, VIR+20*, VIR+24
>> LRWRDVEW PARA+10, VIR+10
LRX STER+3~, STER+12*, STER+13, STER+14, STER+22*, STER+23, STER+24
LRX(0 STER+13*, STER+14*, STER+15, STER+23*, STER+24*, STER+25
>> S1 STG+4*, STG+5, STG+7, LIST1+5
U STER+10, STER+12, PARA+10, PARA+20, PARA+21, PARA+36, STG+7, SET+2, VIR+10, VIR+20
, VIR+21, VIR+32
X STER+3~
>> Y PARA+21*, PARA+24, STG+7*, SET+2, VIR+21*, VIR+24
>> Y1 STG+7*
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