Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: LRAPBK1

Package: Lab Service

Routine: LRAPBK1


Information

LRAPBK1 ;DALOI/STAFF - AP LOG BOOK ;Dec 19 , 2007

Source Information

Source file <LRAPBK1.m>

Entry Points

Name Comments DBIA/ICR reference
M ;
E ;
AU ;
MA ;
EA ;
W ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?14,"T-",$P(X,"^",2)," (SNM) ",$P(X,"^")
  • Line Location: LRAPBK1+10
Function Call: WRITE
  • Prompt: !,?14,$S(LRPSNM=2:"Topography: ",1:""),$P(LRSCT,"^")," (",$P(LRSCT,"^",3),") ",$P(LRSCT,"^",2)
  • Line Location: LRAPBK1+13
Function Call: WRITE
  • Prompt: !?17,"M-",$P(LRM(1),"^",2)," ",$P(LRM(1),"^")
  • Line Location: M+5
Function Call: WRITE
  • Prompt: !?17,"P-",$P(X,"^",2)," ",$P(X,"^")
  • Line Location: M+15
Function Call: WRITE
  • Prompt: !?17,"D-",$P(LRM(1),"^",2)," ",$P(LRM(1),"^")
  • Line Location: M+22
Function Call: WRITE
  • Prompt: !?17,"F-",$P(LRM(1),"^",2)," ",$P(LRM(1),"^")
  • Line Location: M+28
Function Call: WRITE
  • Prompt: !?20,"E-",$P(LRE(1),"^",2)," (SNM) ",$P(LRE(1),"^")
  • Line Location: E+4
Function Call: WRITE
  • Prompt: !,?20,$S(LRPSNM=2:"Etiology: ",1:""),$P(LRSCT,"^")," (",$P(LRSCT,"^",3),") ",$P(LRSCT,"^",2)
  • Line Location: E+7
Function Call: WRITE
  • Prompt: !?14,"T-",$P(X,"^",2)," ",$P(X,"^")
  • Line Location: AU+6
Function Call: WRITE
  • Prompt: !?17,"M-",$P(LRM(1),"^",2)," ",$P(LRM(1),"^")
  • Line Location: MA+5
Function Call: WRITE
  • Prompt: !?17,"P-",$P(X,"^",2)," ",$P(X,"^")
  • Line Location: MA+15
Function Call: WRITE
  • Prompt: !?17,"D-",$P(LRM(1),"^",2)," ",$P(LRM(1),"^")
  • Line Location: MA+22
Function Call: WRITE
  • Prompt: !?17,"F-",$P(LRM(1),"^",2)," ",$P(LRM(1),"^")
  • Line Location: MA+28
Function Call: WRITE
  • Prompt: !?20,"E-",$P(LRE(1),"^",2)," (SNM) ",$P(LRE(1),"^")
  • Line Location: EA+4
Function Call: WRITE
  • Prompt: !,?20,$S(LRPSNM=2:"Etiology: ",1:""),$P(LRSCT,"^")," (",$P(LRSCT,"^",3),") ",$P(LRSCT,"^",2)
  • Line Location: EA+7
Function Call: WRITE
  • Prompt: " (",$S(LRX(1)=1:"Positive",LRX(1)=0:"Negative",1:"?"),")"
  • Line Location: W+1
Info |  Source |  Entry Points |  Interaction Calls