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

Package: Radiology Nuclear Medicine

Routine: RARTST2


Information

RARTST2 ;HISC/CAH,FPT,GJC,DAD AISC/MJK,RMO-Reports Distribution ;3/19/97 13:45

Source Information

Source file <RARTST2.m>

Entry Points

Name Comments DBIA/ICR reference
SRT
SET
SET1 ; Set the data global
PRNT
START ;RANGE is only defined if prt'g via 'Individual Ward' or 'Single Clinic'
START0 ;
START1
Q
BANNER
NEWLOC ; Print Location/Requesting Physician data

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$G(RARTMES),!!,"No reports met the criteria selected."
  • Line Location: START0+6
Function Call: WRITE
  • Prompt: !,$P("^^^^^Ward^^Clinic",U,$P(RANGE,U,3)),": ",$P(RANGE,U,2)
  • Line Location: START0+7
Function Call: WRITE
  • Prompt: @IOF,"Total Number of Reports printed: ",RARTCNT,!!
  • Line Location: START0+10
Function Call: WRITE
  • Prompt: @IOF,!!!!!?10
  • Line Location: NEWLOC+2
Function Call: WRITE
  • Prompt: $S(RABTY["^":$P(RABTY,"^",2),1:RABTY)
  • Line Location: NEWLOC+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(42 - [#42] GET1^DIQ
^SC - [#44] GET1^DIQ
^RABTCH(74.4 - [#74.4] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call