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 |  Marked Items  | All
Print Page as PDF
Routine: SDMULT1

Package: Scheduling

Routine: SDMULT1


Information

SDMULT1 ;ALB/TMP - MAKE MULTI-CLINIC APPOINTMENTS ; 18 APR 86

Source Information

Source file <SDMULT1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Scheduling 3 DOW^SDM0  EN1^SDM1  (END,LOOKA)^SDMULT0  
VA FileMan 3 ^%DT  C^%DTC  DT^DIQ  

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

Package Total Caller Graph
Scheduling 1 SDMULT0  

Entry Points

Name Comments DBIA/ICR reference
FND
ACT
PROC
H1
DAY ;;^SUN^MON^TUES^WEDNES^THURS^FRI^SATUR
BOOK
MADE
NOT
STARS
TM
S2
S3

External References

Name Field # of Occurrence
^%DT TM+1
C^%DTC ACT+4
DT^DIQ FND+4
DOW^SDM0 FND+4
EN1^SDM1 TM+3
END^SDMULT0 ACT, BOOK+2
LOOKA^SDMULT0 ACT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: FND+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: FND+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ACT+0
Function Call: WRITE
  • Prompt: !,"ENTER: ",!,?3,"'^' - EXIT "
  • Line Location: ACT+0
Function Call: WRITE
  • Prompt: D
  • Condition for execution: '$D(SDNEXT) "'B' - BOOK " W "'C' - CONTINUE SEARCH or 'R' - REDISPLAY: CONTINUE// " R X:DTIME G:X["^" END^SDMULT0 S X=$E(X) I X?1"?"!("BCR"'[X)
  • Line Location: ACT+0
Function Call: WRITE
  • Prompt: !,$E(LINE,1,80)
  • Line Location: PROC+3
Function Call: WRITE
  • Prompt: !,$E(^SC(SC,"ST",SDAPP,1),1,80),!
  • Line Location: PROC+4
Function Call: WRITE
  • Prompt: !,?10,"'C' TO LOOK FOR THE NEXT DATE ALL CLINICS HAVE AN AVAILABLE TIME SLOT",!,?10,"'R' TO REDISPLAY THIS SAME SCREEN"
  • Line Location: H1+1
Function Call: WRITE
  • Prompt: !!,$P(^SC(+SDC(G1),"S",SD,1,SDY,0),"^",2)," minute appointment made in ",$P(SDC(G1),"^",2),!
  • Line Location: MADE+0
Function Call: WRITE
  • Prompt: !!,"No appt made in ",$P(SDC1(SC),"^"),!
  • Line Location: NOT+0
Function Call: WRITE
  • Prompt: !,SD0
  • Line Location: STARS+0
Function Call: READ
  • Formatting: !!
  • Prompt: "SCHEDULE TIME: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: TM+0
Function Call: WRITE
  • Prompt: !,"Enter the appointment time for this clinic"
  • Line Location: TM+0
Function Call: WRITE
  • Prompt: *7," WHEN ??"
  • Line Location: TM+1
Function Call: WRITE
  • Prompt: !,*7,"Patient already has an appointment in ",Y1," at that time"
  • Line Location: TM+2
Function Call: WRITE
  • Prompt: !,LINE(G1),!,LINE1(G1)
  • Line Location: S3+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] TM+2
^SC - [#44] PROC+4, MADE, TM+2, S2

Label References

Name Line Occurrences
ACT FND+1, ACT, ACT+7
BOOK ACT+6
DAY FND+4
FND ACT+5
H1 ACT, ACT+7
MADE BOOK+1
NOT BOOK+1
PROC FND+4
S2 FND+4, BOOK+1
S3 BOOK+1
STARS BOOK, MADE, NOT
TM BOOK+1, TM, TM+1, TM+2, TM+4

Naked Globals

Name Field # of Occurrence
^(0 TM+2
^(1 PROC+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT TM+1*, TM+2!
>> CCX S3+2*
>> CCXN S3+2*
COLLAT BOOK+2!
>> DFN TM+2
>> DP S3+2*
DTIME ACT, TM
>> FND ACT+3*
>> G1 FND+4*, PROC+3, PROC+4, BOOK+1*, MADE, S3
>> HSI S3+1*
>> I ACT+3*
IOF FND+2, FND+3
>> LINE PROC+2*, PROC+3
>> LINE( PROC+3*, S3
>> LINE1( PROC+4*, S3
MXOK S3+2!
>> SB S3+1*
>> SC FND+1, FND+2, FND+4*, PROC, PROC+1, PROC+2, PROC+4, BOOK+1*, NOT, TM+3
, S2
>> SCPCMM( FND+4*
>> SD MADE, S3+2*
SD0 STARS*!
>> SDAPP FND+4, PROC+4, TM+1, S3+2
SDAPTYP TM+3!
>> SDC( FND+4, BOOK+1, MADE
>> SDC1( PROC+2, NOT, TM+3
>> SDCT ACT+3
>> SDDIF S3+1*
>> SDDT( ACT+3*
>> SDMADE BOOK+1, TM*, TM+4
>> SDMLT TM+3*
>> SDNEXT FND, FND+1, FND+2, FND+3, ACT, ACT+1*, ACT+6, PROC, PROC+1, H1
SDPCM1 FND*, FND+1!, ACT+2, ACT+7!, PROC+1!
>> SDPCMM ACT, ACT+1, ACT+7
>> SDPCMM( FND+1, FND+2, PROC*, PROC+1
>> SDSTRTDT ACT+4*
>> SDV PROC+2*
>> SDY MADE
>> SI PROC+2, S2*
>> SL TM+3*, S2*, S3+1
>> SM S3+1*
>> STARTDAY PROC+2, S2*, S3+1
>> STR S3+1*
U S3+1
>> X FND+4*, ACT*, ACT+2*, ACT+3, ACT+4, ACT+5, ACT+6, TM*, TM+1*, TM+2*
, S2*, S3+1*
>> X1 ACT+4*
>> X2 ACT+4*
>> Y FND+4*, PROC+2*, TM+1, TM+2*
Y1 TM+2*!

Marked Items

Name Field # of Occurrence
$T(DAY FND+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All