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

Package: Automated Medical Information Exchange

Routine: DVBCADE2


Information

DVBCADE2 ;ALB/GTS-557/THM-ADD C&P EXAMS TO REQUESTS, PART 2 ; 4/18/91 7:23 AM

Source Information

Source file <DVBCADE2.m>

Entry Points

Name Comments DBIA/ICR reference
EXMHD
EXMSEL
FMT ;drop into
FMT1
EXMDIS
EXMOD ;drop into
EXMOD1
EXMASK
EXMLOG

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @FF,?(IOM-$L(HD2)\2),HD2,!!,"Please select the exams for ",$P(PNAM,",",2,99)," ",$P(PNAM,",",1),!,"Use ? to see a list exams available for selection.",!!
  • Line Location: EXMHD+0
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: EXMSEL+5
Function Call: WRITE
  • Prompt: " Duplicate - ignored",!,*7
  • Line Location: EXMSEL+7
Function Call: WRITE
  • Prompt: *7," -- already ON FILE",!
  • Line Location: EXMSEL+8
Function Call: WRITE
  • Prompt: *7," -- Previously cancelled, addition allowable",!
  • Line Location: EXMSEL+9
Function Call: WRITE
  • Prompt: @FF,!!!
  • Line Location: FMT1+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 select more exams or N to abort adding exams to this request.",!!
  • Line Location: EXMDIS+2
Function Call: WRITE
  • Prompt: @FF,!!,"You have selected:",!!
  • Line Location: EXMDIS+4
Function Call: WRITE
  • Prompt: ?5,EXMNM,!
  • Line Location: EXMDIS+5
Function Call: WRITE
  • Prompt: @FF,!!!
  • Line Location: EXMOD1+0
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>50!($X<10)
  • Line Location: EXMOD1+4
Function Call: WRITE
  • Prompt: " Ok ..."
  • Line Location: EXMOD1+4
Function Call: WRITE
  • Prompt: @FF,!!,"Want to add more exams"
  • Line Location: EXMASK+1
Function Call: WRITE
  • Prompt: !!,"Enter Y to add more exams or N to go on and log existing selections."
  • Line Location: EXMASK+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: EXMLOG+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EXMLOG+9

FileMan Files Accessed Via FileMan Db Call

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