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

Package: Lab Service

Routine: LRUCE


Information

LRUCE ;AVAMC/REG - LAB COMMENT EDIT ; 6/2/86 9:03 AM ;

Source Information

Source file <LRUCE.m>

Entry Points

Name Comments DBIA/ICR reference
DATE
LRAN
ASK

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!,"NO ",LRAA(1)," ACCESSIONS IN FILE FOR ",LRH(0),!!
  • Line Location: DATE+2
Function Call: READ
  • Variable: LRAN
  • Timeout: DTIME
  • Line Location: LRAN+0
Function Call: WRITE
  • Prompt: $C(7),!!,"NUMBERS ONLY"
  • Line Location: LRAN+0
Function Call: WRITE
  • Prompt: $C(7),!!,"Accession #",LRAN," for ",LRH(0)," not in ACCESSION file",!!
  • Line Location: LRAN+1
Function Call: WRITE
  • Prompt: !,$P(LRP,"^"),?30,"ID: ",$P(LRP,"^",9)," ",LRLLOC
  • Line Location: LRAN+3
Function Call: WRITE
  • Prompt: !?7,"Someone else is editing this Patient ",!!,$C(7)
  • Line Location: ASK+0

FileMan Files Accessed Via FileMan Db Call

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