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

Package: Scheduling

Routine: SDWLPL


Information

SDWLPL ;IOFO BAY PINES/DMR,ESW - WAIT LIST PICK LIST ;JAN 15, 2016

Source Information

Source file <SDWLPL.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 $$GET1^DIQ  ^DIR  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Scheduling 4 SDAM2  SDCO1  SDM1A  SDMM  

Entry Points

Name Comments DBIA/ICR reference
ANS1 ;
ANS2(DFN,ANS2) ;
TST
DISPLAY ;
INIT(DFN,ANS2,FLG) ;
; ANS2: A - ALL
; S - All Specialties
; C - All Clinics
; M - Matches stop codes only
; FLG: (optional)
; NR - do not diplay entries with NON REMOVAL REASON - in check out
ARAY1 ;
ARAY2 ;
ARAY3 ;
ARAY4 ;identify both clinic and specialties EWL matching by stop code with entered appointment
SAVE(TYPE,WLTNI,IEN) ;
LIST(ANS2,DFN) ;

External References

Name Field # of Occurrence
$$GET1^DIQ INIT+9, ARAY1+1, ARAY1+2, ARAY1+3, ARAY1+4, ARAY2+2, ARAY3+2, ARAY4+3, ARAY4+9, ARAY4+10
, SAVE+4, SAVE+5, SAVE+6, SAVE+7, LIST+4, LIST+13, LIST+14, LIST+15, LIST+19, LIST+20
^DIR ANS1+1, TST+1
$$FMTE^XLFDT LIST+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This patient is currently on the Wait List."
  • Line Location: SDWLPL+9
Function Call: WRITE
  • Prompt: !!,"PLEASE ENTER 'A' for All entries, 'C' for clinic or 'S' for current specialty/stop code or '^' to quit."
  • Line Location: TST+2
Function Call: WRITE
  • Prompt: !!,"No selected open EWL entry has been found!"
  • Line Location: TST+5
Function Call: WRITE
  • Prompt: !,"=========================================================================="
  • Line Location: LIST+3
Function Call: WRITE
  • Prompt: !," Open EWL entries matching appointment specialty"
  • Line Location: LIST+6
Function Call: WRITE
  • Prompt: "-----------"
  • Line Location: LIST+7
Function Call: WRITE
  • Prompt: !,"EW List Type SC/P Waiting for Institution Orig Date By Des. Date Reopen"
  • Line Location: LIST+8
Function Call: WRITE
  • Prompt: !,"--------------------------------------------------------------------------------"
  • Line Location: LIST+9
Function Call: WRITE
  • Prompt: !?2,"Comment: ",SMT
  • Line Location: LIST+19
Function Call: WRITE
  • Prompt: !?2,"Reopen: ",SMO
  • Line Location: LIST+20
Function Call: WRITE
  • Prompt: !?2,"Non-Removal Reason: ",$P(REC,U,13)
  • Line Location: LIST+21
Routine Call
  • DIR
  • Line Location:
    • ANS1+1
    • TST+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^DIC(4 - [#4] GET1^DIQ
^SCTM(404.51 - [#404.51] GET1^DIQ
^SCTM(404.57 - [#404.57] GET1^DIQ
^SDWL(409.3 - [#409.3] GET1^DIQ
^SDWL(409.31 - [#409.31] GET1^DIQ
^SDWL(409.32 - [#409.32] GET1^DIQ
^SC - [#44] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SDWL(409.3 - [#409.3] SDWLPL+7, INIT+8, INIT+13
^TMP("SDWLPL" INIT+7!, INIT+13*, INIT+14, ARAY1+1, ARAY1+2, ARAY1+3, ARAY1+4, ARAY2+2, ARAY3+2, ARAY4+3
, ARAY4+9, SAVE+1, SAVE+2, SAVE+3, SAVE+14!
^TMP($J TST+5, INIT+7!, ARAY2+2, ARAY3+2, ARAY4+1, SAVE+8, SAVE+9*, SAVE+12*, SAVE+13*, LIST+11
^XTMP("SDECLKE-" INIT+12

Label References

Name Line Occurrences
ARAY1 INIT+16
ARAY2 INIT+17
ARAY3 INIT+18
ARAY4 INIT+19
INIT TST+5
LIST DISPLAY+1
SAVE ARAY1+5, ARAY2+5, ARAY3+5, ARAY4+6, ARAY4+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS1 INIT+21!
ANS2 ANS2~, ANS2+1*, ANS2+2, TST+1*, TST+2, TST+4, TST+5, DISPLAY+1, INIT~, INIT+16
, INIT+17, INIT+18, INIT+19, LIST~, LIST+7
CLINIC INIT+7*, INIT+21!, INIT+22!, ARAY3+2*
DENTER INIT+7*, INIT+13*, INIT+15, INIT+21!, SAVE+9
DESIRD INIT+7*, INIT+21!
DESIRED SAVE+3~*, SAVE+9
DFN SDWLPL+7, ANS2~, TST+5, DISPLAY+1, INIT~, INIT+8, SAVE+5, LIST~, LIST+4
DIR ANS1+2!, TST+3!
DIR("A" ANS1+1*, TST+1*
DIR("B" ANS1+1*, TST+1*
DIR(0 ANS1+1*, TST+1*
FLG INIT~
IEN INIT+7*, INIT+8*, INIT+9, INIT+12, INIT+13, INIT+14, ARAY1+1, ARAY1+2, ARAY1+3, ARAY1+4
, ARAY1+5, ARAY2+2, ARAY2+5, ARAY3+2, ARAY3+5, ARAY4+3, ARAY4+6, ARAY4+9, ARAY4+13, SAVE~
, SAVE+1, SAVE+2, SAVE+3, SAVE+4, SAVE+6, SAVE+7, SAVE+9, SAVE+14, LIST+12*, LIST+13
, LIST+14, LIST+19, LIST+20
INST INIT+7*, INIT+21!, SAVE+2*, SAVE+9
IOF LIST+1
NAME SAVE+5~*, LIST+4~*
NN SDWLPL+8*, INIT+21!, SAVE+8*, SAVE+9, SAVE+12, SAVE+13
NUM INIT+14*, INIT+22!, ARAY1+1*, ARAY1+2*, ARAY1+3*, ARAY1+4*, ARAY2+2*, ARAY3+2*, ARAY4+3*, ARAY4+9*
, LIST+10*, LIST+11*, LIST+16
REC INIT+22!, LIST+10*, LIST+11*, LIST+12, LIST+15, LIST+16, LIST+21
REQBY INIT+7*, INIT+21!, SAVE+1*
SCODE INIT+7*, INIT+21!, ARAY2+2*, ARAY4+1*, ARAY4+4, ARAY4+11
SCPRI INIT+7*, INIT+21!, SAVE+4*, SAVE+9
SDBY SAVE+6~*, SAVE+9
SDCLSC ARAY4+8~, ARAY4+10*, ARAY4+11
SDIN LIST+15~*, LIST+16
SDINS LIST+15~*
SDLO LIST+17~, LIST+18*, LIST+19, LIST+20
SDNR SAVE+7~*, SAVE+13
SDP LIST+12~, LIST+13*, LIST+16
SDR LIST+12~, LIST+14*, LIST+16
SDUP LIST+17~, LIST+18*, LIST+19, LIST+20
SMO LIST+20~*
SMT LIST+19~*
SPIEC SAVE+11~*, SAVE+12
SSN INIT+7*, SAVE+5~*, LIST+4~*
STR ANS2+1~*, ANS2+2
TYPE INIT+14*, INIT+15, INIT+22!, ARAY1+1, ARAY1+2, ARAY1+3, ARAY1+4, ARAY1+5, ARAY2+1, ARAY2+5
, ARAY3+1, ARAY3+5, ARAY4+2, ARAY4+6, ARAY4+7, ARAY4+13, SAVE~, SAVE+11
U ARAY2+2, ARAY3+2, ARAY4+1, SAVE+9, SAVE+12, SAVE+13, LIST+16, LIST+21
WLTN INIT+14*, INIT+22!, ARAY1+1*, ARAY1+2*, ARAY1+3*, ARAY1+4*, ARAY2+2*, ARAY3+2*, ARAY4+3*, ARAY4+9*
, SAVE+9
WLTNI ARAY1+1*, ARAY1+2*, ARAY1+3*, ARAY1+4*, ARAY1+5, ARAY2+2*, ARAY2+5, ARAY3+2*, ARAY3+5, ARAY4+3*
, ARAY4+4, ARAY4+6, ARAY4+9*, ARAY4+10, ARAY4+13, SAVE~, SAVE+12
WLTYPE INIT+14*, INIT+22!, ARAY1+1*, ARAY1+2*, ARAY1+3*, ARAY1+4*, ARAY2+4*, ARAY3+4*, ARAY4+5*, ARAY4+12*
, SAVE+9
>> Y ANS1+3, TST+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