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

Package: Lab Service

Routine: LRAPM


Information

LRAPM ;AVAMC/REG/WTY - ANATOMIC PATH MODIFY MICRO/DX ;03/07/12 16:17

Source Information

Source file <LRAPM.m>

Entry Points

Name Comments DBIA/ICR reference
AK
W
REST
DIE
ASK
A
SP
CY
EM
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Modify data for ",LRH(0)," "
  • Line Location: AK+0
Function Call: WRITE
  • Prompt: $C(7),!!,"NO ",LRAA(1)," ACCESSIONS IN FILE FOR ",LRH(0),!!
  • Line Location: AK+3
Function Call: WRITE
  • Prompt: D
  • Line Location: W+2
Function Call: WRITE
  • Prompt: $C(7),!!,"Accession # ",LRAN," for ",LRH(0)," not in ACCESSION file",!!
  • Line Location: REST+0
Function Call: WRITE
  • Prompt: !,LRP," ID: ",SSN
  • Line Location: REST+3
Function Call: WRITE
  • Prompt: !,$P($G(^(X,0)),U)
  • Line Location: REST+5
Function Call: WRITE
  • Prompt: $C(7),!!,"Report not verified. Do not need to use this option !"
  • Line Location: DIE+1
Function Call: WRITE
  • Prompt: !?14,"1. MODIFY GROSS DESCRIPTION",!?14,"2. MODIFY MICROSCOPIC DESCRIPTION",!?14,"3. MODIFY DIAGNOSIS"
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !?14,"4. MODIFY FROZEN SECTION"
  • Line Location: ASK+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !,"CHOOSE (1-",LRB,"): "
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: $C(7),!,"Choose from 1 to ",LRB
  • Line Location: ASK+3
Function Call: WRITE
  • Prompt: !
  • Line Location: A+8
Function Call: WRITE
  • Prompt: $C(7),!!,"No changes were made to ",LRB(LRB)
  • Line Location: A+24

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