Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: SDPURG1

Package: Scheduling

Routine: SDPURG1


Information

SDPURG1 ;ALB/TMP - Purge-Print Routine ; 12/24/85

Source Information

Source file <SDPURG1.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 (C,NOW)^%DTC  ^DIK  DT^DIQ  
Registration 1 CLOSE^DGUTQ  
Scheduling 1 ^SDPURG2  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Scheduling 2 SDPURG  SDPURG2  

Entry Points

Name Comments DBIA/ICR reference
A
PRTS
END
SETA
SD2
MORE3
Q
ENDA
START
CT
KILL
MORE
1010
DOT
D ;K ^SC(A,"S",B) Q ;original line

External References

Name Field # of Occurrence
C^%DTC END+1
NOW^%DTC START, SD2, END
CLOSE^DGUTQ Q
^DIK START+2, D+1, MORE+3, CT+1
DT^DIQ START+1, END, END+1
^SDPURG2 SD2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"*** SCHEDULING PURGE IN PROCESS ***",!
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !,"Begin purge of Hospital Location File nodes "
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !,SDCT," APPTS AND MISCELLANEOUS HOSPITAL LOCATION NODES DELETED"
  • Line Location: ENDA+0
Function Call: WRITE
  • Prompt: !!,"*** SCHEDULING PURGE COMPLETED *** "
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !
  • Line Location: END+1
Function Call: WRITE
  • Prompt: "Hospital Location "
  • Condition for execution: SD44
  • Line Location: END+1
Function Call: WRITE
  • Prompt: "and "
  • Condition for execution: SD44&(SD2)
  • Line Location: END+1
Function Call: WRITE
  • Prompt: "Patient "
  • Condition for execution: SD2
  • Line Location: END+1
Function Call: WRITE
  • Prompt: "file nodes have been purged through: "
  • Line Location: END+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SC - [#44] START+2, A, SETA*, PRTS, PRTS+1, MORE+1, MORE+2
^SC("AAS" 1010, MORE3

Label References

Name Line Occurrences
1010 START+3
A START+2
CT MORE+1, MORE+2, MORE3
DOT A, 1010
END SD2
ENDA START+2
KILL MORE+1, MORE+2, MORE3
MORE A
MORE3 1010
PRTS START+2
SD2 START+1

Naked Globals

Name Field # of Occurrence
^( START+2, PRTS+1
^(0 START+2, PRTS*, PRTS+1, MORE+1*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% START+1, END, Q!
%Y Q!
A START+2*, A, 1010*, SETA, PRTS, PRTS+1, D+1, MORE+1, MORE+2, MORE+3
, MORE3, Q!
B START+2*, A*, 1010*, PRTS, PRTS+1, D+1, MORE+1, MORE+2, MORE+3, MORE3
, Q!
C A*, PRTS+1*, MORE+1, MORE+2, MORE+3, Q!
D Q!
>> DA START+2*, D+1*, MORE+3*
>> DA(1 START+2*, D+1*, MORE+3*
DIK START+2*!, D+1*, MORE+3*!
E Q!
F Q!
I MORE+1*, MORE+2*, MORE3*, Q!
IO START
IOF START
J MORE*, MORE+1*, Q!
POP START*, SETA*, MORE+1*, MORE+2*, MORE3*, KILL+1*, Q!
SD2 SD2, END+1, Q!
SD44 START+1, END+1, Q!
SDC Q!
SDCT START*, START+1*, START+2, START+3*, 1010, SD2*, DOT, ENDA, PRTS+1*, CT*
, Q!
SDLIM Q!
SDLIM1 START+2, A, 1010, END+1, Q!
SDPR START+2, DOT, PRTS+1, KILL, Q!
X START+2*, 1010*, PRTS+1, MORE+1*, MORE+2*, MORE+3*, MORE3*, KILL, END+1, Q!
X1 END+1*, Q!
X2 END+1*, Q!
Y START+1*, END*, END+1*, Q!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All