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

Package: Scheduling

Routine: SDC0


Information

SDC0 ;MAN/GRR,ALB/TMP/LDB - Continuation of SDC (cancel a clinic) ; 16 JUL 2003 1:27 pm

Source Information

Source file <SDC0.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Scheduling 7 ^SDAUT1  ^SDAUT2  DELETE^SDC1  (,PR)^SDC3  ^SDCCP  (,BADADD,REST,WRAPP)^SDLT  (DISREB,MESS,OPENEWL,REBOOK)^SDWLREB  
Registration 2 $$BADADR^DGUTL3  (CLOSE,ZIS)^DGUTQ  
VA Fileman 1 YN^DICN  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Changes To Scheduling 1 BSDC  
Scheduling 1 SDC  

Entry Points

Name Comments DBIA/ICR reference
EN ;Q:($P(^SC(SC,0),"^",3)'="C")!($D(SDVAUTC(+SC))) S SDIV=$P(^SC(SC,0),"^",15),SDIV=$S(SDIV:SDIV,1:$N(^DG(40.8,0))) I $D(SDLT),SDIV'=SDV1 Q ;IHS/ANMCLJF 8/18/2000
END ;
CHKEND
APP
CHK
CHK1
START
RESOLVE ;evaluate canceled and rebooked appointments with relation to EWL
AOR
DUP ;SCREEN FOR DUPLICATE PATIENTS - SD*5.3*379
ASKL ;S SDLT1="",%=1,(SDLET,SDFORM)="" W !,"WANT LETTERS PRINTED NOW" D YN^DICN I '% W !,"REPLY YES (Y) OR NO (N)" G ASKL ;IHS/ANMC/LJF 8/18/2000
CHECK
BEG1

External References

Name Field # of Occurrence
$$BADADR^DGUTL3 CHECK
CLOSE^DGUTQ END+5
ZIS^DGUTQ AOR+3
YN^DICN CHKEND+2, ASKL+1
^SDAUT1 BEG1+8
^SDAUT2 BEG1+11
DELETE^SDC1 BEG1+13, BEG1+14, RESOLVE+3, RESOLVE+4, DUP+3, DUP+4, APP+3, APP+4
^SDC3 DUP+7
PR^SDC3 BEG1+7
^SDCCP BEG1+11
^SDLT CHECK+6
BADADD^SDLT APP+7
REST^SDLT CHK1+1, CHK1+2, CHK1+4
WRAPP^SDLT CHK1, CHK1+4
DISREB^SDWLREB RESOLVE+8
MESS^SDWLREB RESOLVE+10
OPENEWL^SDWLREB RESOLVE+9
REBOOK^SDWLREB RESOLVE+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"REPLY YES (Y) OR NO (N)"
  • Line Location: CHKEND+1
Function Call: WRITE
  • Prompt: !,"REPLY YES (Y) OR NO (N)"
  • Line Location: CHKEND+2
Function Call: WRITE
  • Prompt: !,"REPLY YES (Y) OR NO (N)"
  • Line Location: ASKL+0
Function Call: WRITE
  • Prompt: !,"REPLY YES (Y) OR NO (N)"
  • Line Location: ASKL+1
Function Call: WRITE
  • Prompt: !,"NO LETTERS ARE ASSIGNED TO THE ",$P(^SC(SC,0),"^")," CLINIC"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"AUTO-REBOOKING NOT ALLOWED FOR THIS CLINIC"
  • Line Location: BEG1+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BEG1+16
Function Call: WRITE
  • Prompt: $P(^SC(SC,0),"^")," does not have an appointment length indicated."
  • Line Location: CHK+0
Function Call: WRITE
  • Prompt: !!,"The cancelled appointment(s) were rescheduled as follows:",!
  • Line Location: CHK1+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] EN+1, EN+6
^DPT - [#2] BEG1+11, CHK1+2, CHK1+4, CHECK, CHECK+6
^SC - [#44] EN+1, EN+2, EN+3, EN+5, BEG1+4, BEG1+10, BEG1+11, BEG1+13, BEG1+14, CHK
, RESOLVE+2, RESOLVE+3, RESOLVE+4, RESOLVE+5, DUP+1, DUP+2, DUP+3, DUP+4, DUP+5, DUP+6
, APP+1, APP+3, APP+4
^TMP("SDC0" END+3!, DUP+7*, CHECK+4, CHECK+5*
^TMP("SDWLREB" RESOLVE+1!, RESOLVE+10
^TMP($J END+5!, RESOLVE+1!, RESOLVE+9!, APP+7!, CHECK*
^UTILITY("SD" END+4!
^UTILITY("SDLT" BEG1+7

Label References

Name Line Occurrences
AOR ASKL+2
APP START, BEG1+9, BEG1+17
ASKL ASKL+1
CHECK APP+1
CHK EN+7
CHK1 CHECK+6
CHKEND CHKEND+2
DUP BEG1+5
EN BEG1+3
END CHKEND, AOR, AOR+3, START, BEG1+7, BEG1+9
RESOLVE END+1

Naked Globals

Name Field # of Occurrence
^("C" BEG1+13, RESOLVE+3, DUP+3, APP+3
^("I" EN+2
^("LTR" EN+3, EN+6
^("SL" CHK
^(0 BEG1+11, CHECK+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% CHKEND+2*, CHKEND+3, ASKL+1*, ASKL+2, END+2!, CHK*!
%DT END+2!
%H END+2!
%I END+2!
%IS END+2!
%ZIS END+2!
A BEG1+11*, END+2!, DUP+6*, DUP+7, APP+1*, CHK1+2, CHK1+4, CHECK, CHECK+4, CHECK+5
, CHECK+6
ADDR END+2!
ALS ASKL+2*, EN+3*, EN+4, EN+5, EN+7, AOR, START, BEG1+1*, BEG1+9, BEG1+17
, END+2!
ANS CHKEND+3*, EN+4, AOR, START, BEG1+1*, END+2!
B END+2!
BY END+2!
CDATE BEG1+4*, BEG1+10, END+1, END+2!, RESOLVE+1, RESOLVE+2, APP+1
CHAR END+2!
CLIN END+2!
D END+2!
DA END+2!
DFN END+2!, RESOLVE+5*, RESOLVE+6, RESOLVE+8, RESOLVE+9
DGPGM AOR+1*, END+4!
DGVAR AOR+1*, END+4!
DH END+2!
DHD END+2!
DIC END+2!
DIS END+2!
DIW END+5!
DIWF END+5!
DIWL END+5!
DIWR END+5!
DIWT END+5!
DN END+5!
DO END+2!
DOW END+2!
>> DTOUT CHKEND+2*, CHKEND+3
DUPE END+4!, END+5!
ENDATE END+2!
FLDS END+2!
FR END+2!
FSW END+2!
GDATE BEG1+10*, BEG1+11, BEG1+13, BEG1+14, END+2!, RESOLVE+1*, RESOLVE+2*, RESOLVE+3, RESOLVE+4, RESOLVE+5
, RESOLVE+6, RESOLVE+9, APP+1*, APP+3, APP+4, CHK1, CHECK+4, CHECK+5, CHECK+6
HX END+2!
I END+2!
IO START
IOF BEG1+16
J BEG1+13*!, BEG1+14*!, END+2!, RESOLVE+3*!, RESOLVE+4*!, DUP+3*, DUP+4*, APP+3*!, APP+4*!
J2 BEG1+13*!, BEG1+14*!, END+4!, END+5!, RESOLVE+3*!, RESOLVE+4*!, DUP+3*, DUP+4*, APP+3*!, APP+4*!
L BEG1+11*, BEG1+13, BEG1+14, END+2!, RESOLVE+2*, RESOLVE+3, RESOLVE+4, RESOLVE+5, APP+1*, APP+3
, APP+4
L0 END+2!
L1 END+2!
L2 END+2!
LET END+2!
LL END+2!
MAX BEG1+9, END+2!
MESS END+4!, END+5!
NDATE END+4!, END+5!
NOAP CHKEND, END+2!
P END+2!
PDAT END+2!
POP AOR+3, BEG1+11, BEG1+12*, BEG1+13*, BEG1+14*, BEG1+15!, END+2!, APP+1, APP+2*, APP+3*
, APP+4*, APP+6!
RBFLG RESOLVE+6~, RESOLVE+7, RESOLVE+8
S END+2!, CHK1+1, CHK1+2, CHK1+4*, CHECK+6*
SC EN+1, EN+2, EN+3, EN+5, BEG1+2*, BEG1+4, BEG1+10, BEG1+11, BEG1+13, BEG1+14
, END+1, END+4!, CHK, RESOLVE+2, RESOLVE+3, RESOLVE+4, RESOLVE+5, RESOLVE+6, RESOLVE+8, RESOLVE+9
, DUP+1, DUP+2, DUP+3, DUP+4, DUP+5, DUP+6, APP+1, APP+3, APP+4
SD BEG1+4*, END+4!, DUP+1, DUP+2, DUP+3, DUP+4, DUP+5, DUP+6, DUP+7
SD1 END+4!
SD8 END+4!
SD81 END+4!
SD82 END+4!
SDADD END+5!
SDANS END+4!
SDAP END+3!, DUP+1*, DUP+2, DUP+3, DUP+4, DUP+5, DUP+6
SDAPNUM END+3!, DUP+2*, DUP+3, DUP+4, DUP+5, DUP+6
>> SDAR BEG1+1*, BEG1+2
>> SDBD EN+2, BEG1+4
SDC END+5!
SDCAN RESOLVE+6~
SDCL END+5!
SDCNT END+4!
SDDAT END+5!
SDDIF END+4!, END+5!
>> SDED EN+2, BEG1+4
SDERR END+4!
SDFFFF EN+4*, BEG1+6, END+5!, APP
SDFIRST BEG1~, BEG1+6*, APP*
SDFORM ASKL+1*, EN+6*, END+4!, END+5!
SDHTO END+4!
SDHX END+5!
SDIN EN+2!*, AOR+1, END+2!
SDINP END+4!, END+5!
SDIV EN+1*, EN+6, END+5!
SDJ END+4!
SDLE END+4!
SDLET ASKL+1*, EN+3*, BEG1+3, END+4!, END+5!
>> SDLT EN+1, EN+2, EN+5, EN+7, EN+8, AOR+1, AOR+3, START, BEG1+1, BEG1+7
, BEG1+8
SDLT1 ASKL+1*, EN+3, END+4!
SDNODE END+4!, END+5!
SDOK END+4!
SDOK1 BEG1+3!, END+4!, CHK!*
SDRE EN+2!*, END+2!
SDRE1 END+2!
SDREB RESOLVE+6~*, RESOLVE+8*, RESOLVE+9
SDRT END+4!, END+5!
SDSOH END+4!, END+5!
SDST END+4!, END+5!
SDSTRTDT END+2!
SDT0 END+5!
SDTIME BEG1+11, END+4!, RESOLVE+6, CHECK+6
SDTRB RESOLVE+6~, RESOLVE+8
SDV1 EN+1, END+4!, END+5!
>> SDVAUTC( EN+1
>> SDX CHK1*, CHK1+2*, CHK1+4
SDX1 END+2!
SDX2 END+2!
SDZ END+4!
SI END+2!, CHK*
SL END+2!, CHK*!
SM END+2!
SS END+2!
ST END+2!
STARTDAY END+4!
STIME END+2!
TIME END+2!
TO END+2!
TST END+4!, END+5!
>> VAUTC BEG1+1
W END+4!
X END+2!, CHK1*
X1 END+2!
X2 END+2!
Y END+2!
Z END+2!
Z0 END+4!
Z5 END+4!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All