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

Package: Automated Medical Information Exchange

Routine: DVBCUTL4


Information

DVBCUTL4 ;ALB-ISC/JLU/GTS-A utility routine ;2/22/93

Source Information

Source file <DVBCUTL4.m>

Entry Points

Name Comments DBIA/ICR reference
SITE() ;returns the site's name from the amie parameter file (396.1)
EXAM() ;returns the next exam .01 number in the 396.4 Exam file
EXSRH(A,B,C) ;searches for the exam for a specific request.
ROLLBCK ; ** Sort the ^TMP global to find added exams **
LOOP2 ; ** Loop through 'PE' X-Ref:delete exams just added **
CONTMES ; ** Continue Message to replace HANG statements **
EXMLOG1 ; ** Add exam (Called from DVBCADE2) **
STATCHK ; ** Check Statuses (Called from ^DVBCEDIT) **
COMP ; ** Check to see if transcription completed (Called from ^DVBCEDIT) **
PAUSE ;this is a pause, only looking for a return or up arrow
STM ;start response clock
SPM ;stop monitor clock
DELSER ;this subroutine will delete the server message
PHYS(A) ; ** Question user for access to Physicians Guide **
DATE(PAR1,PAR2) ;gets the beginning and ending dates from the users
DATE1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: DVBCCONT
  • Timeout: DTIME
  • Line Location: CONTMES+1
Function Call: WRITE
  • Prompt: !!," Press RETURN to continue..."
  • Line Location: CONTMES+1
Function Call: WRITE
  • Prompt: EXMNM_" -added, "
  • Line Location: EXMLOG1+5
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>50
  • Line Location: EXMLOG1+5
Function Call: WRITE
  • Prompt: *7,"Exam addition error ! "
  • Line Location: EXMLOG1+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: EXMLOG1+20
Function Call: WRITE
  • Prompt: *7,!!,"This exam has been cancelled by the RO.",!!
  • Line Location: STATCHK+1
Function Call: WRITE
  • Prompt: *7,!!,"This request has been completed and transferred out.",!!
  • Line Location: STATCHK+2
Function Call: WRITE
  • Prompt: *7,!!,"This exam has been completed.",!
  • Line Location: STATCHK+3
Function Call: WRITE
  • Prompt: *7,!!,"This exam has been cancelled by MAS.",!!
  • Line Location: STATCHK+4
Function Call: WRITE
  • Prompt: *7,!!,"This exam has been released to the RO.",!!
  • Line Location: STATCHK+5
Function Call: WRITE
  • Prompt: !!,"Is transcription completed for this exam"
  • Line Location: COMP+1
Function Call: WRITE
  • Prompt: !!,"Enter Y if all information has been entered and transcription is finished",!,"or N if more information will be entered later",!!
  • Line Location: COMP+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^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