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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: SDCNL

Package: Scheduling

Routine: SDCNL


Information

SDCNL ;ALB/LDB - CANCELLED APPOINTMENT LETTER ; 25 MAR 88@13:00

Source Information

Source file <SDCNL.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Registration 2 $$BADADR^DGUTL3  (DEM,KVAR)^VADPT  
Scheduling 2 (,BADADD,REST,WRAPP)^SDLT  END^SDN1  
VA Fileman 1 DT^DIQ  

Entry Points

Name Comments DBIA/ICR reference
PR
END
PT
NO
CHK
S
ASDCN1
CHK1
START ;F SDX=SDBD:0 S SDX=$N(^DPT(SDPT,"S",SDX)) Q:SDX>(SDED+.9999)!(SDX'>0) S SDAP=^DPT(SDPT,"S",SDX,0),SDV2=0 I $P(SDAP,"^",2)["C" D MDIV I SDV2!'SDV S SDC=+SDAP D CHK1 I 'SDOK D CHK ;IHS/ANMC/LJF 8/18/2000
MDIV
R
CAN
ASDCN
NOAP2
NOAP1
NOAP

External References

Name Field # of Occurrence
$$BADADR^DGUTL3 PT+1, CHK+1
DT^DIQ NOAP1, NOAP2+1
^SDLT PR+1
BADADD^SDLT PR+3
REST^SDLT R+9
WRAPP^SDLT PR+1, R+7
END^SDN1 END
DEM^VADPT CHK
KVAR^VADPT CHK, CHK+2

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: B0=""
  • Variable: Q
  • Line Location: PR+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: NO+0
Function Call: WRITE
  • Prompt: !
  • Line Location: NO+1
Function Call: WRITE
  • Prompt: !!,$P(^DPT(SDPT,0),"^")," ",$P(^(0),"^",9),!,"has the following cancelled appointment(s) in ",$P(^SC(SDC,0),"^")," CLINIC"
  • Line Location: NOAP+0
Function Call: WRITE
  • Prompt: !,"but no letter is assigned to the clinic"
  • Line Location: NOAP2+0
Function Call: WRITE
  • Prompt: !
  • Line Location: NOAP2+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(43 - [#43] SDCNL+6
^DPT - [#2] PT+1, PT+2, START+1, MDIV, CAN, CAN+3, CAN+4, ASDCN1, R+6, S
, NOAP, CHK+1
^DPT("ASDCN" ASDCN1, CHK+2
^SC - [#44] MDIV, CAN+1, ASDCN+2, NOAP, CHK1, CHK1+1
^TMP($J PT+1*, PR+3!, CHK+1*
^UTILITY($J PT+3, PR+1, PR+2, END!, CAN+2*, CAN+3*, CAN+4*, R+5, NO+1
^VA(200 - [#200] PR+2

Label References

Name Line Occurrences
ASDCN SDCNL+7
ASDCN1 ASDCN, ASDCN+2
CAN CHK+2
CHK START+1, ASDCN1
CHK1 START+1, ASDCN1
END PR+4
MDIV START+1
NO PR+2
NOAP NO+1
NOAP1 NO+1
NOAP2 NO+1
PR PT+3, ASDCN+1, ASDCN+3
R PR+1
S PR+1
START PT+2

Naked Globals

Name Field # of Occurrence
^( R+5, R+6, CHK1+1
^("GL" SDCNL+6
^("LTR" CAN+1
^(0 PT+2, ASDCN+2, ASDCN1, S, NOAP

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A PR+1*, R+6*, S*
A0 PR+1*, END!
A1 PR+1*, END!
>> A2 PR+1*
A3 END!, R+5*, NO+1*
>> A4 NO+1*
A5 PR+1*, END!, R, R+5, R+6, NO+1*
ALL END!
>> B PT*
B0 PR+1*, END!, S
BEGDATE END+1!
BSDCNT R+4!, R+7*
>> DFN R+6*, CHK*
DGPGM END!
DGVAR END!
DIC END!
DTOUT END+1!
DUOUT END+1!
DUZ PR+2
ENDDATE END+1!
IOF NO
>> P CHK1+1*
>> S1 SDCNL+7
>> SD9 CAN+1
SDA END!, R*
SDAP START+1*, END!, MDIV*, CAN*, CAN+3*, CAN+4, ASDCN*, ASDCN+2*, NO+1*, NOAP1
, NOAP2+1, CHK1, CHK1+1
SDBAD SDCNL+6~, PT+1*, CHK+1*
SDBD START+1, END+1!, ASDCN1
SDBD1 END+1!
>> SDC START+1*, CAN*, CAN+1, CAN+2, CAN+3, ASDCN*, ASDCN+2*, ASDCN1, R+6*, S*
, NO+1*, NOAP, CHK+2
SDCP END+1!
SDED START+1, END+1!, ASDCN1
SDFIRST PR~*
SDINP PT*, PT+2*, END!
SDLET PR+1*, END+1!, CAN+1*, CAN+2, CAN+3, CAN+4, R+5
SDLET1 END+1!
>> SDLT1 CAN+1, CAN+2, CAN+3, CAN+4
SDOK SDCNL+6*, START+1, END!, ASDCN1, CHK1*, CHK1+1*
SDPT PT*, PT+1, PT+2, START+1, END!, MDIV, CAN, CAN+2, CAN+3, CAN+4
, ASDCN1*, NO*, NO+1*, NOAP, CHK, CHK+1, CHK+2, CHK1+1
>> SDR R*, R+7*
SDS END!, R+6*, S*
SDV SDCNL+6*, START+1, END!, END+1!, MDIV*
>> SDV1 MDIV, ASDCN+2
SDV2 START+1*, END+1!, MDIV*
SDV21 END!
>> SDVAUTC( ASDCN+2
SDX START+1*, END!, MDIV, CAN, CAN+2, CAN+3, CAN+4, ASDCN1*, R+6*, S*
, CHK+2, CHK1, CHK1+1
SDX1 END!
SDX8 END!, R*, R+5*, R+6
>> T ASDCN1*
>> VADM(6 CHK
>> VAUTC ASDCN, ASDCN+1, ASDCN+2, ASDCN+3
>> VAUTC( ASDCN
>> VAUTN( PT
>> W ASDCN1*
X7 PR+1*, END!, S
X8 END+1!
Y END+1!, NOAP1*, NOAP2+1*
>> Z ASDCN*, ASDCN+2*
Z0 END!
Z5 END!
ZTSK END!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All