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 ;24 Jun 2008 11:57 AM

Source Information

Source file <SDM2A.m>

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
WLCL120A(SDWLAPDT,SDDATE1,SC) ;
WLCLASK() ; No appointment availability warning. ; sd/446
WLCL120(SC,DESDT) ; Is there clinic availability within 120 days of desired date ; 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.
WL1 ; SD*567 check for bad record and delete if applicable
WL(SC) ;Wait List Hook/teh patch 263 ;SD/327 passed 'SC'
DELETE ; SD*567 delete bad record

External References

Name Field # of Occurrence
^%DT WLCL120A+3
^%DTC WLCL120A+5
H^%DTC WLCL120+6, WLCL120+7
^DIC HASAVSL+5, HASAVSL+6
FILE^DICN WL+21, WL+29
^DIE WL+24, WL+27, WL+48
^DIK DELETE+3
$$GET1^DIQ WL+6, WLCL120+2, WLCL120A+2
^DIR WL+14, WLCL120A+9, WLCLASK+9
MESS^SDWL120 WL+50
MESS2^SDWL120 WL+9
EN^SDWLE11 WL+33

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Unable to acquire a lock on the Wait List file"
  • Line Location: WL+31
Function Call: WRITE
  • Prompt: !
  • Line Location: WLCL120A+9
Function Call: WRITE
  • Prompt: !
  • Line Location: WLCLASK+9
Routine Call
  • DIE
  • Line Location:
    • WL+24
    • WL+27
    • WL+48
Routine Call
  • DIC
  • Line Location:
    • HASAVSL+5
    • HASAVSL+6
Routine Call
  • DIR
  • Line Location:
    • WL+14
    • WLCL120A+9
    • WLCLASK+9

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+42, WL+43
^SC - [#44] WL+3, WLCL120+4, WL1+1
^SDWL(409.3 - [#409.3] WL+31, WL+49
^SDWL(409.32 - [#409.32] WL+18

Label References

Name Line Occurrences
$$HASAVSL WLCL120+4
DELETE WL1+1
WL WLCL120A+10
WL1 WLCL120+4

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT WLCL120A+1~, WLCL120A+3*
>> %H WLCL120+6, WLCL120+7
DA WL+1~, WL+20~, WL+22, WL+31, WL+33, WL+49, DELETE+1*, DELETE+4!
DA(1 DELETE+1*, DELETE+2
DESDT WLCL120~, WLCL120+3, WLCL120+7
DESDTH WLCL120+5~, WLCL120+7*, WLCL120+8
>> DFN WL+29
DIC WL+20~, WL+21*, WL+29*, HASAVSL+3~, HASAVSL+5*
DIC(0 WL+21*, WL+29*
DIE WL+1~, WL+20~, WL+23*, WL+34*
DIK DELETE+2*, DELETE+4!
DIR WL+8~, WLCL120A+1~, WLCLASK+1~
DIR("A" WLCL120A+8*, WLCLASK+3*, WLCLASK+4*, WLCLASK+5*, WLCLASK+6*, WLCLASK+7*, WLCLASK+8*
DIR("B" WLCL120A+7*
DIR(0 WL+14*, WLCL120A+7*, WLCLASK+2*
DR WL+1~, WL+20~, WL+24*, WL+25*, WL+26*, WL+35*, WL+36*, WL+37*, WL+38*, WL+39*
, WL+40*, WL+41*, WL+42*, WL+43*, WL+44*, WL+45*, WL+46*, WL+47*
DUZ HASAVSL+5
F HASAVSL+3~, HASAVSL+8*, HASAVSL+9*, HASAVSL+11
I HASAVSL+10~, HASAVSL+12*
SBEG WL+1~, WLCL120+1~, WLCL120+3*, WLCL120+4*, WLCL120+6*, WLCL120+8, WL1+1, DELETE+1
SC WL~, WL+2, WL+3, WL+6, WL+9, WL+18, WL+21, WLCL120~, WLCL120+2, WLCL120+4
, WL1+1, DELETE+1, WLCL120A~, WLCL120A+2, WLCL120A+10
SCSR WL+1~, HASAVSL~, HASAVSL+7, HASAVSL+8*, HASAVSL+9, HASAVSL+11
SCSR0 HASAVSL+10~, HASAVSL+11*, HASAVSL+12
SD120 WLCL120+1~, WLCL120+3*, WLCL120+8*, WLCL120+10, WL1+2
SDDATE1 WLCL120A~, WLCL120A+5
SDDIV WL+1~, WL+6*
SDINST WL+1~, WL+4*, WL+6*, WL+7
SDOK HASAVSL+3~, HASAVSL+8*, HASAVSL+9, HASAVSL+12*, HASAVSL+14
SDPAR WL+1~, WL+16*, WL+27*, WL+50
SDWLAPDT WLCL120A~, WLCL120A+3
SDWLDA WL+1~, WL+33*, WL+50
SDWLDFN WL+1~, WL+29*, WL+42, WL+43, WL+50
>> SDWLFLG WL+50*
SDWLSCL WL+1~, WL+18*, WL+22*
SL HASAVSL+10~, HASAVSL+12*
U WL+42, WL+43
X WL+20~, WL+21*, WL+29*, WLCL120+5~, WLCL120+6*, WLCL120+7*, WLCL120A+1~, WLCL120A+3*, WLCL120A+6, HASAVSL+3~
, HASAVSL+5*, HASAVSL+6*
X1 WLCL120A+1~, WLCL120A+5*
X2 WLCL120A+1~, WLCL120A+5*
Y WLCL120A+1~, WLCL120A+4, WLCL120A+5, WLCL120A+10, WLCLASK+10, 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