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 |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: GMTSLRM1

Package: Health Summary

Routine: GMTSLRM1


Information

GMTSLRM1 ;SLC/SBW - Microbiology Component Continue ;2/13/98 14:15

Source Information

Source file <GMTSLRM1.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Health Summary 2 $$WRAP^GMTSORC  CKP^GMTSUP  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Health Summary 1 GMTSLRM  

Entry Points

Name Comments DBIA/ICR reference
COMMENT ; Write comment
WRTGRM ; Writes Gram Stain Results
PARACOMM ; Write comment for parasite
ANTIBX ; Writes Antibiotic susceptability data
TBSUSC ;Display TB Susceptiblities
REMARKS ; Write remarks
WRTTEST ; Writes Lab Test for Accession
WRTSTER ; Writes sterility control data

External References

Name Field # of Occurrence
$$WRAP^GMTSORC REMARKS+5, COMMENT+6, PARACOMM+6, WRTGRM+3, TBSUSC+8
CKP^GMTSUP REMARKS+6, REMARKS+9, COMMENT+7, COMMENT+9, PARACOMM+7, PARACOMM+9, WRTGRM+4, WRTGRM+5, ANTIBX+5, ANTIBX+12
, WRTTEST+3, WRTTEST+6, WRTSTER+4, WRTSTER+8, TBSUSC+5, TBSUSC+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?12,"Remarks:"
  • Line Location: REMARKS+7
Function Call: WRITE
  • Prompt: ?21,$P(RPT,"|"),!
  • Line Location: REMARKS+8
Function Call: WRITE
  • Prompt: ?23,$P(RPT,"|",2),!
  • Line Location: REMARKS+9
Function Call: WRITE
  • Prompt: ?25,$P(COM,"|"),!
  • Line Location: COMMENT+8
Function Call: WRITE
  • Prompt: ?27,$P(COM,"|",2),!
  • Line Location: COMMENT+9
Function Call: WRITE
  • Prompt: ?27,$P(COM,"|"),!
  • Line Location: PARACOMM+8
Function Call: WRITE
  • Prompt: ?29,$P(COM,"|",2),!
  • Line Location: PARACOMM+9
Function Call: WRITE
  • Prompt: ?15,"Gram:"
  • Condition for execution: GMK=1
  • Line Location: WRTGRM+4
Function Call: WRITE
  • Prompt: ?21,$P(GMGRAM,"|"),!
  • Line Location: WRTGRM+4
Function Call: WRITE
  • Prompt: ?23,$P(GMGRAM,"|",2),!
  • Line Location: WRTGRM+5
Function Call: WRITE
  • Prompt: ?21
  • Line Location: ANTIBX+12
Function Call: WRITE
  • Prompt: ANAM,$S(ANEXT]"":", ",1:"")
  • Line Location: ANTIBX+13
Function Call: WRITE
  • Prompt: !
  • Line Location: ANTIBX+14
Function Call: WRITE
  • Prompt: ?4,"Test(s) ordered: "
  • Line Location: WRTTEST+3
Function Call: WRITE
  • Prompt: ?21
  • Line Location: WRTTEST+6
Function Call: WRITE
  • Prompt: TNAM,$S(TNEXT]"":", ",1:"")
  • Line Location: WRTTEST+7
Function Call: WRITE
  • Prompt: !
  • Line Location: WRTTEST+8
Function Call: WRITE
  • Prompt: ?2,"Sterility Control:",?21,STER,!
  • Line Location: WRTSTER+5
Function Call: WRITE
  • Prompt: ?13,"Number:",?21,GML,?44,"Results: ",$P(^TMP("LRM",$J,GMZ,GML),U),!
  • Line Location: WRTSTER+9
Function Call: WRITE
  • Prompt: ?21,$P(^TMP("LRM",$J,GMZ,GMK,"SUSC",GMTB),U)
  • Line Location: TBSUSC+6
Function Call: WRITE
  • Prompt: ?44,$P(QTY,"|"),!
  • Line Location: TBSUSC+9
Function Call: WRITE
  • Prompt: ?44,$P(QTY,"|",2),!
  • Line Location: TBSUSC+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("LRM" REMARKS+3, REMARKS+4, COMMENT+1, COMMENT+4, COMMENT+5, PARACOMM+1, PARACOMM+4, PARACOMM+5, WRTGRM+2, ANTIBX+4
, ANTIBX+11, WRTTEST+2, WRTTEST+5, WRTSTER+2, WRTSTER+7, WRTSTER+9, TBSUSC+1, TBSUSC+4, TBSUSC+6, TBSUSC+7

Naked Globals

Name Field # of Occurrence
^( ANTIBX+11, WRTTEST+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANAM ANTIBX+1~, ANTIBX+11*, ANTIBX+12, ANTIBX+13
ANEXT ANTIBX+1~, ANTIBX+11*, ANTIBX+13
ANLEN ANTIBX+1~, ANTIBX+10*, ANTIBX+12*, ANTIBX+13*
COM COMMENT+2~, COMMENT+5*, COMMENT+6*, COMMENT+8, COMMENT+9, PARACOMM+2~, PARACOMM+5*, PARACOMM+6*, PARACOMM+8, PARACOMM+9
FIRST REMARKS+1~, REMARKS+2*, REMARKS+7*
>> GMABX ANTIBX+2*
GMCNT ANTIBX+1~, WRTTEST+1~
GMGRAM WRTGRM+1~, WRTGRM+2*, WRTGRM+3*, WRTGRM+4, WRTGRM+5
>> GMK REMARKS+3, REMARKS+4, COMMENT+1, COMMENT+4, COMMENT+5, PARACOMM+1, PARACOMM+4, PARACOMM+5, WRTGRM+2, WRTGRM+4
, ANTIBX+4, ANTIBX+11, TBSUSC+1, TBSUSC+4, TBSUSC+6, TBSUSC+7
GML PARACOMM+1, PARACOMM+4, PARACOMM+5, ANTIBX+1~, ANTIBX+10*, ANTIBX+11*, WRTTEST+1~, WRTTEST+4*, WRTTEST+5*, WRTSTER+1~
, WRTSTER+6*, WRTSTER+7*, WRTSTER+9
GMSUB ANTIBX+1~, ANTIBX+3*, ANTIBX+4, ANTIBX+6, ANTIBX+7, ANTIBX+8, ANTIBX+9, ANTIBX+11
GMTB TBSUSC+2~, TBSUSC+3*, TBSUSC+4*, TBSUSC+6, TBSUSC+7
>> GMTSNPG ANTIBX+12, WRTTEST+6
>> GMTSQIT REMARKS+3, REMARKS+6, REMARKS+9, COMMENT+7, COMMENT+9, PARACOMM+7, PARACOMM+9, WRTGRM+4, WRTGRM+5, ANTIBX+3
, ANTIBX+5, ANTIBX+11, ANTIBX+12, WRTTEST+3, WRTTEST+5, WRTTEST+6, WRTSTER+4, WRTSTER+7, WRTSTER+8, TBSUSC+4
, TBSUSC+5, TBSUSC+10
>> GMZ REMARKS+3, REMARKS+4, COMMENT+1, COMMENT+4, COMMENT+5, PARACOMM+1, PARACOMM+4, PARACOMM+5, WRTGRM+2, ANTIBX+4
, ANTIBX+11, WRTTEST+2, WRTTEST+5, WRTSTER+7, WRTSTER+9, TBSUSC+1, TBSUSC+4, TBSUSC+6, TBSUSC+7
NUM REMARKS+1~, REMARKS+2*, REMARKS+3*, REMARKS+4
QTY TBSUSC+2~, TBSUSC+7*, TBSUSC+8*, TBSUSC+9, TBSUSC+10
REC COMMENT+2~, COMMENT+3*, COMMENT+4*, COMMENT+5, PARACOMM+2~, PARACOMM+3*, PARACOMM+4*, PARACOMM+5
RPT REMARKS+1~, REMARKS+4*, REMARKS+5*, REMARKS+8, REMARKS+9
STER WRTSTER+1~, WRTSTER+2*, WRTSTER+3, WRTSTER+5
TLEN WRTTEST+1~, WRTTEST+4*, WRTTEST+6*, WRTTEST+7*
TNAM WRTTEST+1~, WRTTEST+5*, WRTTEST+6, WRTTEST+7
TNEXT WRTTEST+1~, WRTTEST+5*, WRTTEST+7
U ANTIBX+11, WRTTEST+5, WRTSTER+9, TBSUSC+6, TBSUSC+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All