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

Package: Lab Service

Routine: LRAUAW


Information

LRAUAW ;AVAMC/REG/CKA - AUTOPSY DATA ENTRY ; 7/9/16 10:56pm

Source Information

Source file <LRAUAW.m>

Entry Points

Name Comments DBIA/ICR reference
DIE
DEL ;from LRUDEL
SET
D ;get date died- called by DD(63,11,0),LRAPED,LRAPBK,LRAPS2,LRAPT2,
; LRAPAUSR,LRAPPF1,LRAPAUL,LRAPLG2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Enter Weights & Measurements "
  • Line Location: LRAUAW+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DIE+0
Function Call: WRITE
  • Prompt: $C(7),!!,"All Prompts were not answered <ENTRY DELETED>"
  • Line Location: DIE+2
Function Call: WRITE
  • Prompt: !,"DATE DIED ",Y
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: $C(7)," Cannot delete a completed autopsy."
  • Line Location: DEL+2
Function Call: WRITE
  • Prompt: !!?10,"Someone else is editing this entry ",!,$C(7)
  • Line Location: DEL+4
Function Call: WRITE
  • Prompt: " OK to DELETE "
  • Line Location: DEL+5

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