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

Package: Scheduling

Routine: SDM3


Information

SDM3 ;SF/GFT - MAKE APPOINTMENT ; 14 SEP 84 11:33 am

Source Information

Source file <SDM3.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Scheduling 3 (,E,SC)^SDM1  CK1^SDM2  DTS^SDUTL  
IHS Changes To Scheduling 1 $$MOVBKUSR^BSDU  
Kernel 1 $$UP^XLFSTR  
Registration 1 $$SITE^VASITE  
VA Fileman 1 ^%DT  

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Scheduling 5 PATIENT  SDAMWI1  SDASO  SDM1  SDM1A  
IHS Changes To Scheduling 1 BSDAM  
IHS VA Support Files 1 PATIENT  

Entry Points

Name Comments DBIA/ICR reference
END
ORDY
ERR
EN1
CLEAN
EN1K
ORD

External References

Name Field # of Occurrence
^%DT ORD+4
$$MOVBKUSR^BSDU SDM3+8
^SDM1 SDM3+8, SDM3+9
E^SDM1 SDM3+10
SC^SDM1 SDM3+9
CK1^SDM2 EN1K+3
DTS^SDUTL ORDY
$$SITE^VASITE EN1+1, EN1K+1
$$UP^XLFSTR SDM3+9, ORD+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,"ONLY "_S_" OVERBOOK"_$E("S",S>1)_" ALLOWED PER DAY!!",!
  • Line Location: SDM3+7
Function Call: WRITE
  • Prompt: !,*7,"ONLY "_S_" OVERBOOK"_$E("S",S>1)_" ALLOWED PER DAY!!",!
  • Line Location: SDM3+8
Function Call: READ
  • Timeout: DTIME
  • Line Location: SDM3+9
Function Call: READ
  • Prompt: !
  • Timeout: 30'):
  • Variable: "ENTER TYPE AND TIME (I.E. 'LAB@8
  • Line Location: ORD+0
Function Call: WRITE
  • Prompt: !,"ENTER EITHER 'LAB', 'XRAY', OR 'EKG' FOLLOWED BY THE '@' AND THE TIME"
  • Line Location: ORD+2
Function Call: WRITE
  • Prompt: !,"MUST ENTER THE '@' AFTER THE TYPE AND BEFORE THE TIME",*7
  • Line Location: ORD+3
Function Call: WRITE
  • Prompt: !,*7,"PATIENT ALREADY HAS APPOINTMENT AT THAT TIME IN ",$P(^SC(HSC,0),"^",1)
  • Line Location: ORD+5
Function Call: WRITE
  • Prompt: " SCHEDULED"
  • Line Location: ORD+6
Function Call: WRITE
  • Prompt: !,"ENTER EITHER 'LAB', 'XRAY', OR 'EKG' FOLLOWED BY AN '@' AND THE TIME"
  • Line Location: ERR+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] EN1+1, EN1K+1
^DPT - [#2] ORD+5, END+2*, EN1, EN1K, EN1K+2
^DPT("ASDPSD" EN1+3, EN1K+3!
^SC - [#44] SDM3+6, SDM3+9, SDM3+10, ORD+5, EN1+1, EN1K+1

Label References

Name Line Occurrences
CLEAN END
END ORD
ERR ORD+4
ORD ORD+2, ORD+3, ORD+5, ORD+6, ERR

Naked Globals

Name Field # of Occurrence
^( SDM3+6, EN1+3*, EN1K
^("DIV" EN1+1, EN1K+1
^("OB" SDM3+6
^(0 ORD+5, END+2, EN1+1, EN1K+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % SDM3+6*
>> %DT ORD+4*
A CLEAN!
CKDATE CLEAN!
CNT CLEAN!
COV CLEAN!
>> D SDM3+6*
>> DA(1 EN1K+3
>> DA(2 EN1K+1, EN1K+3
>> DFN ORD+5, END+2, EN1, EN1+3, EN1K+3*
DISBEG CLEAN!
>> DIV EN1+1*, EN1+3, EN1K+3*
>> DIV1 EN1K+3*
DT EN1+3
DTIME SDM3+9, ORD
DUZ SDM3+8
EKG ORDY*, ORD+6*, END!, END+2, END+3!
ENDATE CLEAN!
FND CLEAN!
GOT CLEAN!
HNDATE CLEAN!
>> HSC ORD+5*
HSI CLEAN!
HSTM CLEAN!
HY CLEAN!
I SDM3+6*, SDM3+9, SDM3+10, CLEAN!, EN1K+2*
INC CLEAN!
INCM CLEAN!
J CLEAN!
K CLEAN!
LAB ORDY*, ORD+6*, END!, END+2, END+3!
LEN CLEAN!
MIN CLEAN!
>> MXO SDM3+9*
>> MXOK SDM3+9*
NDATE CLEAN!
NS CLEAN!
NSTM CLEAN!
ORD ORD*, ORD+1*, ORD+2, ORD+3, ORD+4, ORD+6, END!, END+3!
REM CLEAN!
>> S SDM3+6*, SDM3+8, SDM3+9*, SDM3+10*, EN1K+3*
SB CLEAN!
>> SC SDM3+6, SDM3+8, SDM3+9, SDM3+10, EN1+1, EN1+3
>> SD SDM3+6, ORDY, END+2, EN1+3
SD1 CLEAN!
SDATE CLEAN!
SDAUTO EN1+4!
SDCT CLEAN!
SDDIF CLEAN!
SDDISP END+3!, EN1*, EN1+3, EN1+4!, EN1K+2*, EN1K+3
SDDOT CLEAN!
SDDT ORD+4*, END!, END+3!, CLEAN!
SDHX CLEAN!
SDI EN1*, EN1+4!
SDIE END+2*, END+3!
>> SDIV EN1K+1*, EN1K+3
SDJ CLEAN!
SDLN CLEAN!
SDMAX CLEAN!
SDSOH CLEAN!
SDSTRTDT CLEAN!
>> SDTY END+1*
SDWR ORDY*, ORD+6*, END!, END+3!
SI CLEAN!
SL SDM3+6, CLEAN!
SM SDM3+9*, CLEAN!
SODT ORDY*, ORD+4, END!, END+3!
SS CLEAN!
SSC CLEAN!
ST SDM3+6*, SDM3+8, SDM3+9, CLEAN!
STARTDAY CLEAN!
STIME CLEAN!
STM CLEAN!
STR CLEAN!
U SDM3+6, ORD+5, END+2
WY CLEAN+1!
>> X ORD+4*, EN1K, EN1K+2, EN1K+3
XRAY ORDY*, ORD+6*, END!, END+2, END+3!
XX CLEAN+1!
>> Y ORDY*, ORD+4, ORD+5, ORD+6
Z CLEAN+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All