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

Package: Automated Medical Information Exchange

Routine: DVBCLOGE


Information

DVBCLOGE ;ALB/GTS-557/THM-SET UP C&P EXAM ; 5/10/91 8:55 AM

Source Information

Source file <DVBCLOGE.m>

Entry Points

Name Comments DBIA/ICR reference
EXMHD
EXMSEL
EXMDIS
EXMOD ;drop into - correct exams
EXMOD1
EXMASK
EXMLOG
EXMLOG1 ;called by EXMLOG
KVARS ;Kill this routines variables

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @FF,?(IOM-$L(HD2)\2),HD2
  • Line Location: EXMHD+1
Function Call: WRITE
  • Prompt: !!,"Please select the exams for ",$P(PNAM,",",2,99)," ",$P(PNAM,",",1)
  • Line Location: EXMHD+2
Function Call: WRITE
  • Prompt: !,"Use ? to see a list of exams available for selection.",!!
  • Line Location: EXMHD+3
Function Call: WRITE
  • Prompt: " ???"
  • Line Location: EXMSEL+11
Function Call: WRITE
  • Prompt: " Duplicate - ignored",!,*7
  • Line Location: EXMSEL+12
Function Call: WRITE
  • Prompt: *7," -- already ON FILE",!
  • Line Location: EXMSEL+13
Function Call: WRITE
  • Prompt: @FF,!!
  • Line Location: EXMDIS+0
Function Call: WRITE
  • Prompt: !!,*7,"You have not selected any exams.",!,"Do you want to try again"
  • Line Location: EXMDIS+1
Function Call: WRITE
  • Prompt: !!,"Enter Y to go back and select exams or N to DELETE the entire request",!,"as well as any exams selected."
  • Line Location: EXMDIS+2
Function Call: WRITE
  • Prompt: !!,"You have selected these exams:",!!
  • Line Location: EXMDIS+4
Function Call: WRITE
  • Prompt: ?5,EXMNM,!
  • Line Location: EXMDIS+4
Function Call: WRITE
  • Prompt: !,"Enter Y to go ahead and log the selected exams or N to modify the list."
  • Line Location: EXMDIS+8
Function Call: WRITE
  • Prompt: @FF,!!!
  • Line Location: EXMOD+1
Function Call: WRITE
  • Prompt: " Ok ..."
  • Line Location: EXMOD1+4
Function Call: WRITE
  • Prompt: @FF,!!,"Want to add more exams"
  • Line Location: EXMASK+0
Function Call: WRITE
  • Prompt: !!,"Enter Y to add more exams or N to go on and log existing selections."
  • Line Location: EXMASK+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: EXMLOG+0
Function Call: WRITE
  • Prompt: @IOF,!,"Please enter any remarks for this request:",!!!
  • Line Location: EXMLOG+10
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>50
  • Line Location: EXMLOG1+4
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>40&($L(EXMNM)>30)
  • Line Location: EXMLOG1+4
Function Call: WRITE
  • Prompt: EXMNM_" -added, "
  • Line Location: EXMLOG1+4
Function Call: WRITE
  • Prompt: *7,"Exam addition error ! "
  • Line Location: EXMLOG1+5
Function Call: WRITE
  • Prompt: *7,"Exam addition error ! "
  • Line Location: EXMLOG1+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DVB(396.3 - [#396.3] Classic Fileman Calls
^DVB(396.4 - [#396.4] Classic Fileman Calls
^DVB(396.6 - [#396.6] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call