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 ; 30 APR 85 9:02 am

Source Information

Source file <SDREACT.m>

Call Graph

Call Graph Total: 12

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

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
IHS Changes To Scheduling 2 ASDINACT  BSDNACT  
Scheduling 1 SD REACT  

Entry Points

Name Comments DBIA/ICR reference
PREACT
END
CHG
REACT
DEL
CLEAN
NEW
C1
D1
DT
MORE

External References

Name Field # of Occurrence
^%DT REACT, DT
C^%DTC DT+7, NEW
TURNON^DIAUTL SDREACT+4
^DIC SDREACT+5
YN^DICN MORE, CHG, D1
FILE^DIE REACT+7, DT+10, D1+7
DT^DIQ REACT+4
EN^SDB MORE+1
EN1^SDB0 REACT+4
DOW^SDM0 REACT+3, DT+7, NEW
DT^SDUTL SDREACT+2
DTS^SDUTL SDREACT+7, REACT+4, REACT+8, DT+5, DT+11
$$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+8
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
  • Prompt: "Enter new reactivate date: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • 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+11
Function Call: WRITE
  • Prompt: Y
  • Line Location: DT+11
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+8
Routine Call
  • DIC
  • Line Location:
    • SDREACT+5
Routine Call
  • DIE
  • Line Location:
    • REACT+7
    • DT+10
    • D1+7

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*!, C1, C1+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
DT DT, DT+1, DT+2
END SDREACT+5, REACT+5, MORE+1, CHG+1, DT, DT+11, DEL+1, D1+1, D1+8
MORE MORE
NEW DT+6, D1+3
PREACT SDREACT+6
REACT REACT+2, DT+5
SDREACT SDREACT+5, SDREACT+8, PREACT+1, REACT, REACT+3

Naked Globals

Name Field # of Occurrence
^( REACT+6, DT+4, C1!, C1+1!, C1+2!, DEL, D1+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, PREACT, REACT+3, REACT+6, REACT+7, DT+4, DT+9, DT+10, C1
, C1+1, C1+2, DEL, D1+2, D1+4, D1+5, D1+6, D1+7, 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
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!
SD REACT+1*, REACT+2, REACT+3, REACT+4, END!
>> SDEL REACT+4*
SDFSW REACT+3*, END!
SDH REACT+1*, REACT+7, REACT+8, 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, C1, C1+1
, C1+2, END!
SDRE1 REACT+3*, END!
SDREACT REACT*, REACT+5, END!
SDRES PREACT~*, PREACT+1
SDTOP END!
>> SDX SDREACT+6*, SDREACT+7, REACT+1, DT+1, C1, C1+1, C1+2, D1+3
SDX1 SDREACT+6*, SDREACT+7, DT+2, DT+4, DT+7, DT+8, DEL, D1+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*, REACT, REACT+1, REACT+3, REACT+4*, REACT+8*, DT, DT+1, DT+2
, DT+3, DT+5*, DT+7, DT+11*, 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