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

Package: Lab Service

Routine: LRUTRAN


Information

LRUTRAN ;AVAMC/REG - TRANSFER ^LR(LRDF,LRSS, TO ^LR(LRDFN#2,LRSS, ;5/9/91 18:24 ;

Source Information

Source file <LRUTRAN.m>

Entry Points

Name Comments DBIA/ICR reference
A
B
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Transfer data in Lab Data File (#63) from one entry to another"
  • Line Location: LRUTRAN+2
Function Call: WRITE
  • Prompt: !!?7,"Transfer from"
  • Line Location: A+0
Function Call: WRITE
  • Prompt: $C(7),!,"There are no entries to transfer !"
  • Line Location: A+1
Function Call: WRITE
  • Prompt: !!?7,"Transfer to"
  • Line Location: A+2
Function Call: WRITE
  • Prompt: $C(7),!!?22,"Same patient- transfer not necessary!"
  • Line Location: A+3
Info |  Source |  Entry Points |  Interaction Calls