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

Package: Radiology Nuclear Medicine

Routine: RAORD7A


Information

RAORD7A ;HISC/CAH-Log of Scheduled Requests by Procedure ;11/5/01 15:19

Source Information

Source file <RAORD7A.m>

Entry Points

Name Comments DBIA/ICR reference
START ;Entry point for Scheduled Request Log task
GET
GETDFN
WRT
NEG ;Negative reporting
Q
HD
CRCHK

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," No scheduled requests are logged for ",RALDTE1," through ",RALDTE2,"."
  • Line Location: START+19
Function Call: WRITE
  • Prompt: !,$E(RANME,1,12),?14,$$SSN^RAUTL(RADFN,1),?21,$S($E(RASORT)="P":RA5,1:RA7),?44,$E(RALOCN,1,10),?56,$$FMTE^XLFDT(RAOSCH,2)
  • Line Location: WRT+2
Function Call: WRITE
  • Prompt: ?71,$E(Y,1,7),!
  • Line Location: WRT+3
Function Call: WRITE
  • Prompt: ?28,"Requesting Loc: ",RARLOCN
  • Line Location: WRT+4
Function Call: WRITE
  • Prompt: !!," No scheduled requests are logged for ",RALDTE1," through ",RALDTE2,"."
  • Line Location: NEG+3
Function Call: WRITE
  • Prompt: !
  • Line Location: Q+3
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: RAPGE!($E(IOST,1,2)="C-")
  • Line Location: HD+0
Function Call: WRITE
  • Prompt: !,"Scheduled Request Log by Imaging Location, ",RASORT
  • Line Location: HD+0
Function Call: WRITE
  • Prompt: ?70,"Page: ",RAPGE,!?5,"Includes requests scheduled from ",RALDTE1," to ",RALDTE2
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: !,"Run Date: ",RARUNDTE,?31,"Imaging Location: ",RALNM
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !?5,$S($D(RANOSHOW):"(no-show's only) ",1:"")
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !,"Patient",?14,"Pt ID",?22,"Procedure",?44,"Pt Loc",?56,"Sched. Date",?71,"Urgency",!,RALNE
  • Line Location: HD+4
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: CRCHK+0
Function Call: WRITE
  • Prompt: !!,$C(7),"Press RETURN to continue or '^' to stop "
  • Line Location: CRCHK+0
Info |  Source |  Entry Points |  Interaction Calls