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

Package: Scheduling

Routine: SDUNC


Information

SDUNC ;MAN/GRR - RESTORE CLINIC AVAILABILITY ; 24 JUL 2003 10:08 am

Source Information

Source file <SDUNC.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Scheduling 4 DOW^SDM0  ERRM^SDUNC1  DTS^SDUTL  $$CLNCK^SDUTL2  
VA FileMan 3 ^%DT  ^DIC  DT^DICRW  

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 SDRESTORE  

Entry Points

Name Comments DBIA/ICR reference
NOWAY
NOPAT
B
N
FIX
CHK
FIX2
SEL
A
ROK
KMES
TC
TM

External References

Name Field # of Occurrence
^%DT SDUNC+6
^DIC SDUNC+2
DT^DICRW SDUNC+2
DOW^SDM0 B
ERRM^SDUNC1 SDUNC+13
DTS^SDUTL SDUNC+8
$$CLNCK^SDUTL2 SDUNC+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?5,"Clinic MUST be corrected before continuing."
  • Line Location: SDUNC+5
Function Call: WRITE
  • Prompt: !,*7,"Clinic is inactive ",$S(SDRE:"from ",1:"as of "),SDIN1,$S(SDRE:" to "_SDRE1,1:"")
  • Line Location: SDUNC+9
Function Call: WRITE
  • Prompt: !,"RESTORED!",*7
  • Line Location: SDUNC+12
Function Call: WRITE
  • Prompt: !,*7,"CLINIC HAS NOT BEEN CANCELLED FOR THAT DATE, SO IT CANNOT BE RESTORED",*7
  • Line Location: NOWAY+0
Function Call: WRITE
  • Prompt: !,*7,"NO UPCOMING OR INDEFINITE APPOINTMENT PATTERN EXISTS FOR DAY OF WEEK,",!,"CREATE 'AVAILABILITY' PATTERN THRU 'CLINIC SETUP', THEN RESTORE AGAIN",*7
  • Line Location: NOPAT+0
Function Call: WRITE
  • Prompt: !,*7,"CLINIC DOES NOT MEET ON THAT DAY"
  • Line Location: N+0
Function Call: WRITE
  • Prompt: !,"RESTORED!",*7
  • Line Location: N+1
Function Call: WRITE
  • Prompt: !,"Clinic has been cancelled for the following periods:",!
  • Line Location: SEL+1
Function Call: WRITE
  • Prompt: !,?9,"(",$J(I1,2),") ","From: ",$J($P(I,"^",1),8)," To: ",$J($P(I,"^",2),8)
  • Line Location: SEL+4
Function Call: READ
  • Formatting: !!
  • Prompt: "RESTORE WHICH PERIOD?: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !,"Enter the # that precedes the time period you want to restore."
  • Line Location: A+1
Function Call: WRITE
  • Prompt: " ",$P(SDTEMP(SDZZ(SDR)),"^",1)," - ",$P(SDTEMP(SDZZ(SDR)),"^",2)
  • Line Location: A+2
Function Call: WRITE
  • Prompt: !,*7,"INVALID CHOICE, TRY AGAIN"
  • Line Location: A+3
Routine Call
  • DIC
  • Line Location:
    • SDUNC+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SC - [#44] SDUNC+2, SDUNC+8, SDUNC+10, SDUNC+11, SDUNC+12*!, SDUNC+13, SDUNC+15*, B, N!, N+1!
FIXFIX+1, CHKFIX2SELSEL+2, SEL+3, ROK+2!

Label References

Name Line Occurrences
A A+1, A+3
B SDUNC+14
CHK SDUNC+12, N+1
FIX SDUNC+12
FIX2 B
KMES CHK
N SDUNC+15
NOPAT SDUNC+14
NOWAY SDUNC+10, SDUNC+11
ROK A+2
SDUNC SDUNC+2, SDUNC+5, SDUNC+9, NOWAYNOPATN
SEL FIXFIX2+1
TC ROK
TM SEL+2, SEL+3

Naked Globals

Name Field # of Occurrence
^( BSEL+2
^("I" SDUNC+8
^("MES" CHK, KMES!, KMES+1!
^("SL" SDUNC+3, SEL
^(0 ROK+2*
^(1 SDUNC+11, SDUNC+12, B

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % SDUNC+7*, SEL*, ROK, TC*, TM*
%DT SDUNC+6*!
%DT("A" SDUNC+6*
>> CDATE SDUNC+7*, SDUNC+9, ROK+1
CNT ROK+2*!
>> DA(1 B*
>> DH SDUNC+14, SDUNC+15, B*, FIX2+1*
>> DIC SDUNC+2*
DIC("A" SDUNC+2*!
DIC("S" SDUNC+2*!
>> DIC(0 SDUNC+2*
>> DO B*
>> DOW B*
DTIME A
FR ROK*, ROK+1, ROK+4!
>> HOLD SDUNC+12, B*, FIX+1*, FIX2+1, ROK+2*, ROK+3*
>> I SEL+2*, SEL+3*, SEL+4*
>> I1 SEL+4*
I5 ROK+3*!
>> N1 CHK*, KMES+1
>> SC SDUNC+3*, SDUNC+4, SDUNC+8, SDUNC+10, SDUNC+11, SDUNC+12, SDUNC+13, SDUNC+15, BN
N+1, FIXFIX+1, CHKFIX2SELSEL+2, SEL+3, ROK+2
>> SD SDUNC+7*, SDUNC+10, SDUNC+11, SDUNC+12, SDUNC+13, SDUNC+15, BNN+1, FIX
FIX+1, CHKFIX2SEL+2, SEL+3, ROK+2
SDANS ROK+4!
SDBEG ROK*, ROK+2, ROK+4!
SDEND ROK*, ROK+2, ROK+4!
SDFR SEL+2*, SEL+3*, A!
SDFR1 SDUNC+12, SDUNC+15, CHKFIX2+1, SEL!, ROK+1*, ROK+2, KMESKMES+1
SDFRX SEL+2*, SEL+3*, A!
SDIN SDUNC+8!*, SDUNC+9, SDUNC+10!
SDIN1 SDUNC+8!*, SDUNC+9, SDUNC+10!
SDR A+2*, ROKROK+1!
SDRE SDUNC+8!*, SDUNC+9, SDUNC+10!
SDRE1 SDUNC+8!*, SDUNC+9, SDUNC+10!
SDRES SDUNC+4~*, SDUNC+5
>> SDREST FIX*, FIX2+1*, ROK+2
SDTEMP SEL+2!, ROK+1!
SDTEMP( SEL+2*, SEL+3*, SEL+4, A+2
SDTO SEL+2*, A!
SDZZ SEL+2!*, SEL+3*, ROK+1!
SDZZ( SEL+2*, SEL+3*, SEL+4, A+2, ROK
SI SDUNC+7*, B, SEL*, ROKROK+4!, TC
>> SL SDUNC+3*, SDUNC+7, SEL*
>> SS B*
STARTDAY SDUNC+7*, SEL*, ROK+4!, TC
TO ROK*, ROK+4!
U SDUNC+6, SDUNC+7, SELROK+2
>> X SDUNC+2, B*, SEL+2*, SEL+3*, A*, A+1, A+2, ROK*, TC, TM*
X1 SEL+2, SEL+3, A!, TM*
>> Y SDUNC+2, SDUNC+3, SDUNC+6, SDUNC+7, SDUNC+8*, B
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All