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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: LAHWATCH

Package: Automated Lab Instruments

Routine: LAHWATCH


Information

LAHWATCH ;DALOI/JMC - WATCH DATA IN ^LAH GLOBAL ;Sep 12, 2008

Source Information

Source file <LAHWATCH.m>

Entry Points

Name Comments DBIA/ICR reference
IN ;
FIND ;
EN
STRT1 ;
ALOOP ;
STRT2 ;*** Logic to list interpreted ^LAH data ***
BLOOP ;
CHK ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,"This routine will allow you to look at the verifiable data in the ^LAH GLOBAL ",!,"for a specific instrument",!!
  • Line Location: IN+3
Function Call: WRITE
  • Prompt: !!?5,"No data for ",LRINST,!!
  • Line Location: FIND+5
Function Call: WRITE
  • Prompt: !!,?10,"No load/worklist defined for this instrument ",!!,$C(7)
  • Line Location: STRT1+1
Function Call: WRITE
  • Prompt: !!,"I am about to display the data in ^LAH(",LRWL,")",!,?10,"You may exit at any time by entering the ""^""."
  • Line Location: STRT1+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ALOOP+2
Function Call: WRITE
  • Prompt: !,LREF," = ",@LREF
  • Line Location: ALOOP+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ALOOP+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BLOOP+2
Function Call: WRITE
  • Prompt: !!?5,"Accession # ",$P(@(LREF),U,5)
  • Line Location: BLOOP+5
Function Call: WRITE
  • Prompt: !,"Test",?25,"Value"
  • Line Location: BLOOP+6
Function Call: WRITE
  • Prompt: !?5,"Organism: ",$P($G(^LAB(61.2,+@LREF,0)),U)
  • Line Location: BLOOP+8
Function Call: WRITE
  • Prompt: !,"***Organism entry points to missing entry # ",+@LREF," in file 61.2 (ETIOLOGY)***"
  • Line Location: BLOOP+9
Function Call: WRITE
  • Prompt: !,$P(^(0),"^"),?25,@LREF
  • Line Location: BLOOP+10
Function Call: WRITE
  • Prompt: !,$P(^DD(63.04,+$P($P(LREF,"(",2),",",4),0),"^"),?25,+@LREF
  • Line Location: BLOOP+11
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BLOOP+12
Function Call: WRITE
  • Prompt: !!!,?20,"This instrument has no pointer to ^LAH!",!!!
  • Line Location: CHK+1
Function Call: WRITE
  • Prompt: !!!,?20,"No data in ^LAH for this instrument!",!!!
  • Line Location: CHK+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LRO(68.2 - [#68.2] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call