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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SDWLCU1

Package: Scheduling

Routine: SDWLCU1


Information

SDWLCU1 ;IOFO BAY PINES/DMR - EWL FILE 409.3 CLEANUP ;2/4/03

Source Information

Source file <SDWLCU1.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$TF^XUAF4  
VA Fileman 2 $$GET1^DIQ  ^DIR  
Scheduling 1 ^SDWLCU5  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Scheduling 1 SD WAIT LIST CLEANUP  

Entry Points

Name Comments DBIA/ICR reference
NULL ;
QEND ;
EDIT ;
QUE1
START ;
INIT ;
QUE ;Queue Report
EXIT ;
SAVE ;
DISPLAY ;

External References

Name Field # of Occurrence
^%ZIS QUE+2
^%ZISC QEND+2
^%ZTLOAD QUE+7
$$GET1^DIQ START+2, SAVE+7, SAVE+9
^DIR EDIT+15
^SDWLCU5 INIT+6
$$TF^XUAF4 START+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," ***** EWL CLEANUP RUN HAS FINISHED *****"
  • Line Location: INIT+8
Function Call: WRITE
  • Prompt: !!,"==>> Run option until list is clean.",!
  • Line Location: INIT+9
Function Call: WRITE
  • Prompt: #
  • Line Location: DISPLAY+3
Function Call: WRITE
  • Prompt: !,COUNT,?10,"ENTRIES IN SD WAIT LIST POINT TO AN INSTITUTION WITH"
  • Line Location: DISPLAY+4
Function Call: WRITE
  • Prompt: !,?10,"A STATUS NOT EQUAL TO NATIONAL OR ISN'T A TREATING FACILITY."
  • Line Location: DISPLAY+5
Function Call: WRITE
  • Prompt: !!,"** CHECK KEY FIELDS FOR NULL VALUE **",!!
  • Line Location: NULL+1
Function Call: WRITE
  • Prompt: !,"REQUEST QUEUED"
  • Line Location: QUE+7
Routine Call
  • DIR
  • Line Location:
    • EDIT+15
Routine Call
  • %ZIS
  • Line Location:
    • QUE+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ
^DIC(40.7 - [#40.7] GET1^DIQ
^SC - [#44] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SCTM(404.51 - [#404.51] SAVE+3
^SCTM(404.57 - [#404.57] SAVE+5
^SDWL(409.3 - [#409.3] START+1, START+3, SAVE+1, SAVE+2, SAVE+3, SAVE+4, SAVE+5, SAVE+6, SAVE+7, SAVE+8
, SAVE+9
^SDWL(409.31 - [#409.31] SAVE+7
^SDWL(409.32 - [#409.32] SAVE+9
^TMP($J INIT+3!, SAVE+1*, SAVE+3*, SAVE+5*, SAVE+7*, SAVE+9*, DISPLAY+1, DISPLAY+7, DISPLAY+8, DISPLAY+12
, DISPLAY+13, DISPLAY+17, DISPLAY+18, DISPLAY+22, DISPLAY+23, EXIT+1!

Label References

Name Line Occurrences
@( EDIT+16, EDIT+17, QUE1
DISPLAY INIT+5, EDIT+16, EDIT+17
EDIT EDIT+15
EXIT INIT+10, EDIT+15
NULL INIT+7
QEND QUE+7
QUE1 QUE+2
SAVE START+5
START INIT+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS QUE+2!*
ANS INIT+1*, EXIT+2!
C EXIT+5!
CC DISPLAY+1*, EXIT+2!
CLINIC INIT+2*, SAVE+9*, EXIT+3!
CLINICN INIT+2*, SAVE+9*, EXIT+3!
CLNAM INIT+2*, SAVE+9*, EXIT+3!
CODE INIT+1*, START+2*, START+5, EXIT+2!
COUNT INIT+1*, DISPLAY+1*, DISPLAY+2, DISPLAY+4, EXIT+2!
COUNT1 DISPLAY+6*, DISPLAY+8*, DISPLAY+10, DISPLAY+11*, DISPLAY+13*, DISPLAY+15, DISPLAY+16*, DISPLAY+18*, DISPLAY+20, DISPLAY+21*
, DISPLAY+23*, DISPLAY+25, EXIT+5!
CS EXIT+5!
DIC QEND+1!
DIE QEND+1!
DIR QEND+1!
DIR("A" EDIT+14*
DIR("L" EDIT+8*, EDIT+9*, EDIT+10*, EDIT+11*, EDIT+12*, EDIT+13*
DIR(0 EDIT+7*
DR QEND+1!
>> DUOUT EDIT+15
ENTRY EXIT+5!
HEAD EXIT+2!
IEN INIT+1*, START+3*, SAVE+1, SAVE+2, SAVE+3, SAVE+4, SAVE+5, SAVE+6, SAVE+7, SAVE+8
, SAVE+9, DISPLAY+8*, DISPLAY+13*, DISPLAY+18*, DISPLAY+23*, EXIT+2!
INCK START+4*, START+5, EXIT+2!
INST INIT+1*, START+1*, START+2, START+3, START+4, SAVE+3, SAVE+5, SAVE+7, SAVE+9, DISPLAY+6*
, DISPLAY+7*, DISPLAY+8, DISPLAY+11*, DISPLAY+12*, DISPLAY+13, DISPLAY+16*, DISPLAY+17*, DISPLAY+18, DISPLAY+21*, DISPLAY+22*
, DISPLAY+23, EXIT+2!, EXIT+4!
INST1 INIT+2*, EXIT+3!
INST2 INIT+2*, EXIT+3!
INST3 INIT+2*, EXIT+3!
INST4 INIT+2*, EXIT+3!
IO QUE1
IO("Q" QUE+7!
IOC QUE+2!
IOP QUE+2!
NAME INIT+1*, EXIT+2!
NN EXIT+2!
NUM INIT+1*, EXIT+2!
PAT EXIT+5!
POP QUE+1~, QUE+2
POS INIT+2*, SAVE+5*, EXIT+3!
POSNAM INIT+2*, SAVE+5*, EXIT+3!
REC INIT+1*, EXIT+2!
SDREC EXIT+5!
SDWLDA EXIT+5!
SDWLERR INIT+3!, EXIT+4!
SDWLI EXIT+5!
SDWLIENS EXIT+5!
SDWLIN EXIT+5!
SDWLINS EXIT+5!
SDWLINSN EXIT+6!
SDWLINST EXIT+6!
SDWLIX EXIT+6!
SDWLIZ EXIT+6!
SDWLPO EXIT+6!
SDWLR EDIT+16*, EDIT+17*, EXIT+6!
SDWLSC EXIT+6!
SDWLSCX EXIT+6!
SDWLSPT QUE+2!
SDWLSS EXIT+6!
SDWLSSN EXIT+7!
SDWLSSV EXIT+7!
SDWLSSX EXIT+7!
SDWLTM EXIT+7!
SDWLTY EDIT+16*, EDIT+17*, EXIT+7!
SER INIT+2*, SAVE+7*, EXIT+3!
SERN INIT+2*, SAVE+7*, EXIT+3!
SERNAM INIT+2*, SAVE+7*, EXIT+3!
SSN EXIT+4!
TAG EXIT+7!
TEAM INIT+2*, SAVE+3*, EXIT+3!, EXIT+4!
TEAMN INIT+2*, SAVE+3*, EXIT+3!, EXIT+4!
TOTAL INIT+1*, EXIT+2!
WLTC1 INIT+1*, SAVE+2*, DISPLAY+6, DISPLAY+9, EDIT+1, EDIT+3, EDIT+10, EXIT+2!
WLTC2 INIT+1*, SAVE+4*, DISPLAY+11, DISPLAY+14, EDIT+1, EDIT+4, EDIT+11, EXIT+2!
WLTC3 INIT+1*, SAVE+6*, DISPLAY+16, DISPLAY+19, EDIT+1, EDIT+5, EDIT+12, EXIT+2!
WLTC4 INIT+1*, SAVE+8*, DISPLAY+21, DISPLAY+24, EDIT+1, EDIT+6, EDIT+13, EXIT+2!
>> X EDIT+2*, EDIT+3*, EDIT+4*, EDIT+5*, EDIT+6*, EDIT+7
>> Y EDIT+15, EDIT+16, EDIT+17
ZCC EXIT+7!
ZTDESC QUE+3*, QEND+1!
ZTDTH QUE+3*, QEND+1!
ZTIO QUE+2!
ZTQUEUED QUE+1~
ZTRTN QUE+3*, QUE1, QEND+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All