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

Package: Lab Service

Routine: LRTSTJM1


Information

LRTSTJM1 ;DALOI/STAFF- JAM TESTS ONTO (OR OFF) ACCESSIONS (cont.) ;10/25/11 12:14

Source Information

Source file <LRTSTJM1.m>

Entry Points

Name Comments DBIA/ICR reference
EXPLD ;
EXPLD1 ;
COMPTST ;
COMTST1 ;
COMTST2 ;
SCAN ;
ORDTYP() ; Ask if test is "add on" or "reflex"
ORUT(LRDFN,LRAA,LRAD,LRAN,LR60,LRORDTYP,LRURG,LRODT,LRSN) ; Setup ORUT node in file #63 for test just added.
; Call with LRDFN = file #63 IEN
; LRAA = file #68 IEN
; LRAD = accession date
; LRAN = accession number
; LR60 = file #60 IEN
; LRORDTYP = 1(add)/2(reflex)^file #64.061 ien for code^if reflex parent test^if reflex parent NLT^
; LRURG = file #62.05 urgency ien
; LRORDT = file #69 order date
; LRSN = file #69 order ien

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"URGENCY must be defined. Test not added."
  • Line Location: COMTST2+1
Function Call: WRITE
  • Prompt: !," ...OK"
  • Line Location: COMTST2+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(64.061 - [#64.061] FIND1^DIC
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call