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

Package: Radiology Nuclear Medicine

Routine: RARTST


Information

RARTST ;HISC/CAH,FPT,GJC AISC/MJK,RMO-Reports Distribution ;2/10/98 11:02

Source Information

Source file <RARTST.m>

Entry Points

Name Comments DBIA/ICR reference
STUFF
INIT ; initialize variables
CHK
S
LOCK
DUPCHK ;Check if this report (RARPT) is already in this queue (RAB)
RESET ;; **** Radiology Report Distribution File Rebuild Routine ****
START
Q
LOOP
PURGE ;; **** Routine to Purge Reports Distribution File ****
PURGE1
EXIT
MAIL ; Mail to Req. Physician if applicable

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$P($T(RESET),";;",2),!
  • Line Location: RESET+1
Function Call: WRITE
  • Prompt: !
  • Line Location: RESET+2
Function Call: WRITE
  • Prompt: !!,"Distribution files rebuilding process beginning at ",Y
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !,"All Distribution Queues have been inactivated. Aborting Distribution File",!,"rebuild."
  • Line Location: START+2
Function Call: WRITE
  • Prompt: "."
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !!?3,"Total reports used to rebuild files: ",C1
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !!,*7,"Distribution files rebuilding process completed at ",Y,"."
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !!,$P($T(PURGE),";;",2),!
  • Line Location: PURGE+1

FileMan Files Accessed Via FileMan Db Call

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