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
Print Page as PDF
Routine: MAGDIWDX

Package: Imaging

Routine: MAGDIWDX


Information

MAGDIWDX ;WOIFO/PMK - Formatted listing of On Demand Routing request file ; Mar 10, 2022@14:18:40

Source Information

Source file <MAGDIWDX.m>

Entry Points

Name Comments DBIA/ICR reference
REPORT(LOC,A,ODEVNAME,ODEVTYPE) ; display the list of studies in the output file
HEADING(MSG) ;
NEWLINE() ; output a <carriage return> <line feed> with scrolling control
YESNO(PROMPT,DEFAULT,CHOICE) ; generic YES/NO question driver

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There are multiple sending locations on file:",!
  • Line Location: REPORT+13
Function Call: WRITE
  • Prompt: !,$J(I,5)," -- ",LOCATION(LOCATION)
  • Line Location: REPORT+16
Function Call: WRITE
  • Prompt: !!,"Enter 1-",I," or ""A"" for all: "
  • Line Location: REPORT+19
Function Call: WRITE
  • Prompt: DEFAULT,"// "
  • Line Location: REPORT+20
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: REPORT+21
Function Call: WRITE
  • Prompt: X
  • Line Location: REPORT+22
Function Call: WRITE
  • Prompt: " -- ",LOCATION(LOC)
  • Line Location: REPORT+24
Function Call: WRITE
  • Prompt: " -- All"
  • Line Location: REPORT+25
Function Call: WRITE
  • Prompt: !!,"There are multiple Store SCPs on file:",!
  • Line Location: REPORT+38
Function Call: WRITE
  • Prompt: !,$J(I,5)," -- ",USERAPP("N",I)
  • Line Location: REPORT+40
Function Call: WRITE
  • Prompt: !!,"Enter 1-",J," or ""A"" for all: "
  • Line Location: REPORT+42
Function Call: WRITE
  • Prompt: DEFAULT,"// "
  • Line Location: REPORT+43
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: REPORT+44
Function Call: WRITE
  • Prompt: X
  • Line Location: REPORT+45
Function Call: WRITE
  • Prompt: " -- ",SCP
  • Line Location: REPORT+47
Function Call: WRITE
  • Prompt: " -- All"
  • Line Location: REPORT+48
Function Call: WRITE
  • Prompt: ACNUMB
  • Line Location: REPORT+98
Function Call: WRITE
  • Prompt: ?20,$J(COUNT,4),?28,STATE,?40,$$HTE^XLFDT(DATETIME,"2M")
  • Line Location: REPORT+102
Function Call: WRITE
  • Prompt: ?57,"(",$$FMTE^XLFDT(REQUESTDATETIME,"2M"),")"
  • Line Location: REPORT+103
Function Call: WRITE
  • Prompt: "End of Report"
  • Line Location: REPORT+108
Function Call: WRITE
  • Prompt: !!,"Report successfully written to file """,ODEVNAME,"""",!
  • Line Location: REPORT+117
Function Call: WRITE
  • Prompt: $TR($J("",80)," ","*")
  • Line Location: HEADING+2
Function Call: WRITE
  • Prompt: "*** ",MSG,?76," ***"
  • Line Location: HEADING+3
Function Call: WRITE
  • Prompt: "*** ",MSG(I),?76," ***"
  • Line Location: HEADING+7
Function Call: WRITE
  • Prompt: $TR($J("",80)," ","*")
  • Line Location: HEADING+10
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWLINE+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: NEWLINE+5
Function Call: WRITE
  • Prompt: "more..."
  • Line Location: NEWLINE+5
Function Call: WRITE
  • Prompt: $C(8,32,8)
  • Line Location: NEWLINE+5
Function Call: WRITE
  • Prompt: !!,PROMPT," "
  • Line Location: YESNO+3
Function Call: WRITE
  • Prompt: DEFAULT," // "
  • Line Location: YESNO+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: YESNO+4
Function Call: WRITE
  • Prompt: X
  • Line Location: YESNO+5
Function Call: WRITE
  • Prompt: " ??? - Please enter ""Yes"" or ""No""."
  • Line Location: YESNO+10
Info |  Source |  Entry Points |  Interaction Calls