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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: SDM2A

Package: Scheduling

Routine: SDM2A


Information

SDM2A ;ALB/OG - MAKE APPOINTMENT - overflow routine ;1/11/16 10:34am

Source Information

Source file <SDM2A.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 8 ^%DT  (,H)^%DTC  ^DIC  FILE^DICN  ^DIE  ^DIK  $$GET1^DIQ  ^DIR  
Scheduling 2 (MESS,MESS2)^SDWL120  EN^SDWLE11  

Entry Points

Name Comments DBIA/ICR reference
WL(SC) ;Wait List Hook/teh patch 263 ;SD/327 passed 'SC'
WLCL120(SC,DESDT) ; Is there clinic availability within 120 days of desired date ; sd/446
WL1 ; SD*567 check for bad record and delete if applicable
DELETE ; SD*567 delete bad record
WLCL120A(SDWLAPDT,SDDATE1,SC) ;
WLCLASK() ; No appointment availability warning. ; sd/446
HASAVSL(SCSR) ; Has available slots ; sd/446
; Look at CLINIC PATTERN CURRENT AVAILABILITY string (44.005/1)
; If there is 1-9,j-z within the [ ... ], there is availability for that day.

External References

Name Field # of Occurrence
^%DT WLCL120A+4
^%DTC WLCL120A+6
H^%DTC WLCL120+7, WLCL120+8
^DIC HASAVSL+5, HASAVSL+6
FILE^DICN WL+22, WL+30
^DIE WL+25, WL+28, WL+49
^DIK DELETE+3
$$GET1^DIQ WL+7, WLCL120+3, WLCL120A+3
^DIR WL+15, WLCL120A+16, WLCLASK+14
MESS^SDWL120 WL+51
MESS2^SDWL120 WL+10
EN^SDWLE11 WL+34

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Unable to acquire a lock on the Wait List file"
  • Line Location: WL+32
Function Call: WRITE
  • Prompt: !
  • Line Location: WLCL120A+16
Function Call: WRITE
  • Prompt: !
  • Line Location: WLCLASK+14
Routine Call
  • DIC
  • Line Location:
    • HASAVSL+5
    • HASAVSL+6
Routine Call
  • DIE
  • Line Location:
    • WL+25
    • WL+28
    • WL+49
Routine Call
  • DIR
  • Line Location:
    • WL+15
    • WLCL120A+16
    • WLCLASK+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(40.8 - [#40.8] GET1^DIQ
^SDWL(409.3 - [#409.3] Classic Fileman Calls
^SDWL(409.32 - [#409.32] Classic Fileman Calls
^SC - [#44] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] WL+43, WL+44
^SC - [#44] WL+4, WLCL120+5, WL1+1
^SDWL(409.3 - [#409.3] WL+32, WL+50
^SDWL(409.32 - [#409.32] WL+19, WLCL120A+10, WLCL120A+11

Label References

Name Line Occurrences
$$HASAVSL WLCL120+5
DELETE WL1+1
WL WLCL120A+20
WL1 WLCL120+5

Naked Globals

Name Field # of Occurrence
^(1 WLCL120+5
^(9 WL1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT WLCL120A+2~, WLCL120A+4*
>> %H WLCL120+7, WLCL120+8
DA WL+2~, WL+21~, WL+23, WL+32, WL+34, WL+50, DELETE+1*, DELETE+4!
DA(1 DELETE+1*, DELETE+2
DESDT WLCL120~, WLCL120+4, WLCL120+8
DESDTH WLCL120+6~, WLCL120+8*, WLCL120+9
>> DFN WL+30
DIC WL+21~, WL+22*, WL+30*, HASAVSL+3~, HASAVSL+5*
DIC(0 WL+22*, WL+30*
DIE WL+2~, WL+21~, WL+24*, WL+35*
DIK DELETE+2*, DELETE+4!
DIR WL+9~, WLCL120A+2~, WLCLASK+2~
DIR("A" WLCL120A+15*, WLCLASK+6*, WLCLASK+7*, WLCLASK+10*, WLCLASK+11*, WLCLASK+12*, WLCLASK+13*
DIR("B" WLCL120A+12*
DIR(0 WL+15*, WLCL120A+12*, WLCLASK+3*
DR WL+2~, WL+21~, WL+25*, WL+26*, WL+27*, WL+36*, WL+37*, WL+38*, WL+39*, WL+40*
, WL+41*, WL+42*, WL+43*, WL+44*, WL+45*, WL+46*, WL+47*, WL+48*
DUZ HASAVSL+5
F HASAVSL+3~, HASAVSL+8*, HASAVSL+9*, HASAVSL+11
I HASAVSL+10~, HASAVSL+12*
SBEG WL+2~, WLCL120+2~, WLCL120+4*, WLCL120+5*, WLCL120+7*, WLCL120+9, WL1+1, DELETE+1
SC WL~, WL+3, WL+4, WL+7, WL+10, WL+19, WL+22, WLCL120~, WLCL120+3, WLCL120+5
, WL1+1, DELETE+1, WLCL120A~, WLCL120A+3, WLCL120A+10, WLCL120A+20
SCSR WL+2~, HASAVSL~, HASAVSL+7, HASAVSL+8*, HASAVSL+9, HASAVSL+11
SCSR0 HASAVSL+10~, HASAVSL+11*, HASAVSL+12
SD120 WLCL120+2~, WLCL120+4*, WLCL120+9*, WLCL120+11, WL1+2
SDDATE1 WLCL120A~, WLCL120A+6
SDDIV WL+2~, WL+7*
SDINST WL+2~, WL+5*, WL+7*, WL+8
SDOK HASAVSL+3~, HASAVSL+8*, HASAVSL+9, HASAVSL+12*, HASAVSL+14
SDPAR WL+2~, WL+17*, WL+28*, WL+51
SDRET WLCL120A+2~, WLCL120A+19*, WLCL120A+20, WLCL120A+21
SDWLAPDT WLCL120A~, WLCL120A+4
SDWLDA WL+2~, WL+34*, WL+51
SDWLDFN WL+2~, WL+30*, WL+43, WL+44, WL+51, WLCL120A+2~, WLCL120A+10*, WLCL120A+11
>> SDWLFLG WL+51*
SDWLSCL WL+2~, WL+19*, WL+23*
SL HASAVSL+10~, HASAVSL+12*
U WL+43, WL+44, WLCL120A+11
X WL+21~, WL+22*, WL+30*, WLCL120+6~, WLCL120+7*, WLCL120+8*, WLCL120A+2~, WLCL120A+4*, WLCL120A+7, HASAVSL+3~
, HASAVSL+5*, HASAVSL+6*
X1 WLCL120A+2~, WLCL120A+6*
X2 WLCL120A+2~, WLCL120A+6*
Y WLCL120A+2~, WLCL120A+5, WLCL120A+6, WLCL120A+19, WLCLASK+15, HASAVSL+3~, HASAVSL+5, HASAVSL+6
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All