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

Package: Imaging

Routine: MAGDRCU2


Information

MAGDRCU2 ;WOIFO/PMK - List entries in ^MAG(2006.5839) ; 10 May 2013 9:41 AM

Source Information

Source file <MAGDRCU2.m>

Entry Points

Name Comments DBIA/ICR reference
REPORT ; now scan the database and generate the report
ONELINE ; output one line of the report
NEWLINE(J) ; output a <cr> <lf> with scrolling control or pagination
HEADING ; print heading
ERROR(MSG) ; Error Message

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Building"
  • Line Location: REPORT+10
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>79
  • Line Location: REPORT+61
Function Call: WRITE
  • Prompt: "."
  • Line Location: REPORT+61
Function Call: WRITE
  • Prompt: PNAME," ",PID," (",SEX,") ",DOB
  • Line Location: ONELINE+5
Function Call: WRITE
  • Prompt: " ",ORDRDATE," (",STATUS(STATUS),") ",$E(SERVICE("S",SERVICE),1,30)
  • Line Location: ONELINE+12
Function Call: WRITE
  • Prompt: " ",REQTYPE," #",GMRCIEN
  • Line Location: ONELINE+13
Function Call: WRITE
  • Prompt: ?65,"Exam: ",EXAMDATE
  • Line Location: ONELINE+16
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWLINE+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: NEWLINE+6
Function Call: WRITE
  • Prompt: "more..."
  • Line Location: NEWLINE+6
Function Call: WRITE
  • Prompt: $C(8,32,8)
  • Line Location: NEWLINE+6
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWLINE+11
Function Call: WRITE
  • Prompt: ?IOM-10,"Page ",PAGE,!
  • Line Location: NEWLINE+12
Function Call: WRITE
  • Prompt: @IOF,TITLE,?IOM-$L(NOW),NOW,!
  • Line Location: HEADING+1
Function Call: WRITE
  • Prompt: SUBTITLE(1)," -- ",SUBTITLE(2)
  • Line Location: HEADING+3
Function Call: WRITE
  • Prompt: SUBTITLE(1),!,SUBTITLE(2)
  • Line Location: HEADING+6
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADING+8
Function Call: WRITE
  • Prompt: !
  • Line Location: ERROR+2
Function Call: WRITE
  • Prompt: "*"
  • Line Location: ERROR+2
Function Call: WRITE
  • Prompt: !,"*** ",MSG(I),?76," ***"
  • Line Location: ERROR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ERROR+4
Function Call: WRITE
  • Prompt: "*"
  • Line Location: ERROR+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(100.01 - [#100.01] GET1^DIQ
^GMR(123 - [#123] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call