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

Package: Scheduling

Routine: SDREACT


Information

SDREACT ;ALB/TMP - REACTIVATE A CLINIC ;JAN 15, 2016

Source Information

Source file <SDREACT.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
VA FileMan 7 ^%DT  C^%DTC  TURNON^DIAUTL  ^DIC  YN^DICN  FILE^DIE  DT^DIQ  
Scheduling 6 EN^SDB  EN1^SDB0  $$GETRES^SDECUTL  DOW^SDM0  (DT,DTS)^SDUTL  $$CLNCK^SDUTL2  

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 SD REACT  

Entry Points

Name Comments DBIA/ICR reference
PREACT
REACT
MORE
CHG
DT
C1
DEL
D1
NEW
CLEAN
END
SDEC(SC,SDDATE) ;update REACTIVATED DATE/TIME in SDEC RESOURCE ;alb/sat 627
DELSDEC(SC) ;delete reactavation date (lab 781)

External References

Name Field # of Occurrence
^%DT REACTDT
C^%DTC DT+7, NEW
TURNON^DIAUTL SDREACT+4
^DIC SDREACT+5
YN^DICN MORECHGD1
FILE^DIE REACT+7, DT+10, D1+7, SDEC+6, DELSDEC+6
DT^DIQ REACT+4
EN^SDB MORE+1
EN1^SDB0 REACT+4
$$GETRES^SDECUTL SDEC+2, DELSDEC+2
DOW^SDM0 REACT+3, DT+7, NEW
DT^SDUTL SDREACT+2
DTS^SDUTL SDREACT+7, REACT+4, REACT+9, DT+5, DT+12
$$CLNCK^SDUTL2 PREACT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!,"NOT INACTIVE!!"
  • Line Location: SDREACT+5
Function Call: WRITE
  • Prompt: !,*7,"Clinic is inactive as of "
  • Line Location: SDREACT+7
Function Call: WRITE
  • Prompt: Y
  • Line Location: SDREACT+7
Function Call: WRITE
  • Prompt: Y
  • Line Location: SDREACT+7
Function Call: WRITE
  • Prompt: *7,!,"Clinic cannot be reactivated - not inactive"
  • Line Location: SDREACT+8
Function Call: WRITE
  • Prompt: !,?5,"Clinic MUST be corrected before continuing."
  • Line Location: PREACT+1
Function Call: WRITE
  • Prompt: !,*7,"Reactivate date must be later than inactivate date"
  • Line Location: REACT+2
Function Call: WRITE
  • Prompt: !!,"AVAILABILITY DATE: ",Y," ("
  • Line Location: REACT+4
Function Call: WRITE
  • Prompt: ")"
  • Line Location: REACT+4
Function Call: WRITE
  • Prompt: *7,!,"Clinic not reactivated!!!"
  • Line Location: REACT+5
Function Call: WRITE
  • Prompt: !,*7,"Clinic will be reactivated effective ",Y
  • Line Location: REACT+9
Function Call: WRITE
  • Prompt: !,"ANSWER (Y)ES OR (N)O"
  • Line Location: MORE+0
Function Call: WRITE
  • Prompt: !,"RESPOND YES (Y) OR NO (N)"
  • Line Location: CHG+0
Function Call: READ
  • Formatting: !
  • Prompt: "Enter new reactivate date: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: *7,!,"Must be > inactivate date"
  • Line Location: DT+1
Function Call: WRITE
  • Prompt: *7,!,"That is the current reactivate date"
  • Line Location: DT+2
Function Call: WRITE
  • Prompt: !,"Valid appointments exist before the new reactivate date ... must reactivate before "
  • Line Location: DT+5
Function Call: WRITE
  • Prompt: Y
  • Line Location: DT+5
Function Call: WRITE
  • Prompt: !,"Clinic will now be reactivated effective "
  • Line Location: DT+12
Function Call: WRITE
  • Prompt: Y
  • Line Location: DT+12
Function Call: WRITE
  • Prompt: !,"RESPOND YES (Y) OR NO (N)"
  • Line Location: D1+0
Function Call: WRITE
  • Prompt: !,*7,"Reactivation date DELETED!!"
  • Line Location: D1+9
Routine Call
  • DIC
  • Line Location:
    • SDREACT+5
Routine Call
  • DIE
  • Line Location:
    • REACT+7
    • DT+10
    • D1+7
    • SDEC+6
    • DELSDEC+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SC - [#44] Classic Fileman Calls,  TURNON^DIAUTL

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SC - [#44] SDREACT+5, SDREACT+6, REACT+3, REACT+6, DT+4, DT+9*!, C1C1+1, C1+2, DEL
D1+2, D1+4*!, D1+5, D1+6, CLEAN

Label References

Name Line Occurrences
C1 DT+8
CHG SDREACT+7, CHG
CLEAN REACT+6
D1 D1
DEL CHG+1
DELSDEC D1+8
DT DTDT+1, DT+2
END SDREACT+5, REACT+5, MORE+1, CHG+1, DTDT+12, DEL+1, D1+1, D1+9
MORE MORE
NEW DT+6, D1+3
PREACT SDREACT+6
REACT REACT+2, DT+5
SDEC REACT+8, DT+11
SDREACT SDREACT+5, SDREACT+8, PREACT+1, REACTREACT+3

Naked Globals

Name Field # of Occurrence
^( REACT+6, DT+4, C1!, C1+1!, C1+2!, DELD1+2!, D1+5!, D1+6!, CLEAN!
^("I" SDREACT+5, SDREACT+6
^("SL" REACT+3
^(0 DT+9*, D1+4*
^(1 REACT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % MORE*, MORE+1, CHG*, CHG+1, D1*, D1+1
%DT REACT*, REACT+1!, DT*
%DT("A" REACT*
CNT END!
D0 END!
DA SDREACT+5*, SDREACT+6, PREACTREACT+3, REACT+6, REACT+7, REACT+8, DT+4, DT+9, DT+10
DT+11, C1C1+1, C1+2, DELD1+2, D1+4, D1+5, D1+6, D1+7
D1+8, CLEAN, END!
DH END!
DIC SDREACT+3*, SDREACT+5!, END!
DIC("A" SDREACT+3*
DIC("S" SDREACT+3*
DIC(0 SDREACT+3*
DO END!
DOW REACT+3*, END!
DT SDREACT+2, SDREACT+7
DTIME SDREACT+2*, DT
DUZ SDEC+5
FDA REACT+7!, DT+10!, D1+7!
FDA(44 REACT+7*, DT+10*, D1+7*
H1 END!
H2 END!
HSDX END!
I REACT+6*, DT+4*, DT+5, DT+7*, DT+9*, C1*, C1+1*, C1+2*, DEL*, D1+2*
D1+4*, D1+5*, D1+6*, NEW*, CLEAN, END!
I1 REACT+6*, END!
I2 REACT+6*, CLEAN*, END!
IENS REACT+7!*, DT+10!*, D1+7!*
J DT+4*, DEL*, D1+4*, END!
K DT+4*, END!
LT END!
M1 END!
M2 END!
NSL END!
POP REACT+4*, DT+4*, DT+5, DEL*, DEL+1, END!
SC END!, SDEC~, SDEC+2, DELSDEC~, DELSDEC+2
SD REACT+1*, REACT+2, REACT+3, REACT+4, END!
SDDATE SDEC~, SDEC+4
>> SDEL REACT+4*
SDFDA SDEC+1~, DELSDEC+1~
SDFDA( SDEC+4*, SDEC+5*, DELSDEC+4*, DELSDEC+5*
SDFSW REACT+3*, END!
SDH REACT+1*, REACT+7, REACT+8, REACT+9, END!
SDIN REACT+1*, END!
SDINACT REACT+1*, REACT+2, END!
SDN DT+6!, D1+3!, END!
SDN( DT+9, D1+4, NEW*
SDO DT+7!, END!
SDO( DT+7*, DT+9
SDRE REACT+1*, REACT+3, DT+3*, DT+4, DT+6, DT+8, DT+10, DT+11, DT+12, C1
C1+1, C1+2, END!
SDRE1 REACT+3*, END!
SDREACT REACT*, REACT+5, END!
SDRES PREACT~*, PREACT+1, SDEC+1~, SDEC+2*, SDEC+3, SDEC+4, SDEC+5, DELSDEC+1~, DELSDEC+2*, DELSDEC+3
, DELSDEC+4, DELSDEC+5
SDTOP END!
>> SDX SDREACT+6*, SDREACT+7, REACT+1, DT+1, C1C1+1, C1+2, D1+3
SDX1 SDREACT+6*, SDREACT+7, DT+2, DT+4, DT+7, DT+8, DELD1+2, D1+5, D1+6
, END!
SDZQ REACT+4*, MORE+1*, END!
SI REACT+3*, END!
SL REACT+3*, END!
SLT END!
STARTDAY REACT+3*, END!
STIME END!
T1 END!
T2 END!
X REACT+3*, DT*, DT+6*, DT+7*, D1+3*, NEW, END!
X1 DT+7*, NEW*, END!
X2 DT+7*, NEW*, END!
Y SDREACT+5, SDREACT+7*, REACTREACT+1, REACT+3, REACT+4*, REACT+9*, DTDT+1, DT+2
DT+3, DT+5*, DT+7, DT+12*, NEW, END!
Info |  Source |  Call Graph |  Caller 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