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

Package: Radiology Nuclear Medicine

Routine: RAORDCP


Information

RAORDCP ;WOIFO/KLM - Log of Discontinued Requests ; May 26, 2021@10:50:10

Source Information

Source file <RAORDCP.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;Option entry point - [RA ORDER DISCONTINUED]
START ;report processing
KILL
CONT ;
MORE ;
WRT ;
HDR ; header
SETTMP ;results in TMP
EOS ; end of screen

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?2,"This option will generate a list of DISCONTINUED requests",!?2,"for a selected date range"
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!,"This report requires a 132 column output device."
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !
  • Line Location: KILL+0
Function Call: WRITE
  • Prompt: !?2,"No DISCONTINUED requests for "_RAOBEG("X")_" to "_RAOEND("X")_".",!
  • Line Location: CONT+3
Function Call: WRITE
  • Prompt: !,$S($D(^DPT(RADFN,0)):$E($P(^(0),"^"),1,19),1:"Unknown"),?21,$E($P(^DPT(RADFN,0),"^",9),6,9),?27,$S($D(^RAMIS(71,RAPR,0)):$E($P(^(0),"^"),1,24),1:"Unknown"),?53,$P(RADD,"@")
  • Line Location: WRT+2
Function Call: WRITE
  • Prompt: ?67,RALADTX
  • Line Location: WRT+3
Function Call: WRITE
  • Prompt: ?83,$S(RADCBY="Unknown":RADCBY,1:$E($$GET1^DIQ(200,RADCBY,.01),1,19))
  • Line Location: WRT+4
Function Call: WRITE
  • Prompt: ?104,$S(RAOREA="":$E($$GET1^DIQ(75.1,RAO,27),1,28),1:$E($$GET1^DIQ(75.2,RAOREA,.01),1,28))
  • Line Location: WRT+6
Function Call: WRITE
  • Prompt: !?(80-$L(RAHDR)/2),RAHDR
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !?14,"Includes discontinued requests from ",RAOBEG("X")," to ",RAOEND("X")
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?21,"SSN",?27,"PROCEDURE",?53,"DATE DESIRED",?67,"CANCELLED DATE"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: ?83,"CANCELLED BY"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?104,"CANCEL REASON",!,QQ,!!
  • Line Location: HDR+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^RAO(75.1 - [#75.1] GET1^DIQ
^RA(75.2 - [#75.2] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call