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 |  Local Variables |  All
Print Page as PDF
Routine: SDWLE

Package: Scheduling

Routine: SDWLE


Information

SDWLE ;BPOI/TEH - WAITING LIST-ENTER/EDIT;06/12/2002

Source Information

Source file <SDWLE.m>

Call Graph

Call Graph Total: 20

Package Total Call Graph
Scheduling 15 EN^SDWLD  (PCM,PCMD)^SDWLE1  EN^SDWLE10  NEW^SDWLE11  EN^SDWLE110  EN^SDWLE111  (EN,END)^SDWLE113  EN^SDWLE2  
EN^SDWLE3  EN^SDWLE4  EN^SDWLE5  $$EN^SDWLE6  COL80^SDWLIFT  $$GETTRN^SDWLIFT1  EN^SDWLKIL  
VA Fileman 4 ^DIC  YN^DICN  $$GET1^DIQ  ^DIR  
Registration 1 1^VADPT  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Scheduling 4 SD WAIT LIST ENTER/EDIT  SDM1  SDWL ENTER/EDIT WITH ACA FLAG  SDWLAPI  

Entry Points

Name Comments DBIA/ICR reference
OPT
PAT1
SB1
EN ;ENTRY POINT - INTIALIZE VARIABLES
END
ED3 ;-specialty
EDIT ;
ED1 ;-team
ED5
ENO
ED2 ;-position
EN1
EN2
EN3
ED4 ;-clinic
NEW ;
PAT ;SELECT PATIENT
HD
DIS ;DISPLAY DATA FOR PATIENT

External References

Name Field # of Occurrence
^DIC PAT+2
YN^DICN OPT+1
$$GET1^DIQ PAT+3, SB1
^DIR EN+4, EN1+9
EN^SDWLD DIS+3
PCM^SDWLE1 DIS+4
PCMD^SDWLE1 DIS+4
EN^SDWLE10 ENO+16
NEW^SDWLE11 NEW+1
EN^SDWLE110 ED3+2, ED4+2
EN^SDWLE111 EDIT+1
EN^SDWLE113 ED1+2, ED2+2, ED3+3, ED4+3
END^SDWLE113 EN3, END, EDIT+1, ED1+1, ED2+1, ED3+1, ED3+2, ED3+4, ED4+1, ED4+2
, ED4+4, ED5
EN^SDWLE2 ED3+1
EN^SDWLE3 ED1+2
EN^SDWLE4 ED4+1
EN^SDWLE5 ED2+2
$$EN^SDWLE6 EN1+1
COL80^SDWLIFT ENO+13
$$GETTRN^SDWLIFT1 ENO+10
EN^SDWLKIL END+1
1^VADPT EN+4, OPT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"PATIENT: ",VADM(1),?40,VA("PID")
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,*7,"PATIENT'S DATE OF DEATH HAS BEEN RECORDED"
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,"DO YOU WISH TO PLACE THIS PATIENT ON A WAITING LIST "
  • Line Location: OPT+1
Function Call: WRITE
  • Prompt: !!,"PATIENT: ",VADM(1),?40,VA("PID")
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+9
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+9
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: EN1+11
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: EN1+13
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: ENO+0
Function Call: WRITE
  • Prompt: !,"ANOTHER TERMINAL IS EDITING THIS ENTRY. TRY LATER."
  • Line Location: ENO+7
Function Call: WRITE
  • Prompt: !,SDWLMSG(SDWLI,0)
  • Line Location: ENO+14
Function Call: WRITE
  • Prompt: !!,"Editing is Completed"
  • Line Location: ENO+17
Function Call: WRITE
  • Prompt: !!,?15,"*** Patient has been added to Wait List ***",!
  • Line Location: EN2+0
Function Call: WRITE
  • Prompt: !,*7,"PATIENT'S DATE OF DEATH HAS BEEN RECORDED"
  • Line Location: PAT+3
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $D(IOF)
  • Line Location: HD+0
Function Call: WRITE
  • Prompt: !,?80-$L("Scheduling/PCMM Enter/Edit Wait List")\2,"Scheduling/PCMM Enter/Edit Wait List",!!
  • Line Location: HD+0
Routine Call
  • DIC
  • Line Location:
    • PAT+2
Routine Call
  • DIR
  • Line Location:
    • EN+4
    • EN1+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SDWL(409.3 - [#409.3] EN1+3, ENO+7, EN2+5, HD+1
^TMP("SDWLD" EN+5!, EN1+12, EN1+14, ENO+3

Label References

Name Line Occurrences
DIS EN1+2
ED1 EDIT+5
ED2 EDIT+4
ED3 EDIT+3
ED4 EDIT+2
EDIT ENO+17, ENO+19, ENO+20
EN1 EN+4, EN1+11, EN1+13, ENO
EN2 EN1+1, ENO+19
EN3 EN1+11, EN1+13, ENO
END EN+4, EN+6, EN1+10, ENO+18
ENO EN1+5
HD EN+4, EN+5
NEW ENO+19, ENO+20
OPT EN+2
PAT EN+6, PAT+3
PAT1 PAT+2
SB1 EN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN+1~, OPT+1*, OPT+2
DA ENO+3~*, ENO+7
>> DFN EN+3, EN+4, EN+6, OPT+4, EN1+3, EN1+12, EN1+14, ENO+3, PAT+2*, PAT+3
, DIS+3, SB1, HD+1
DIC PAT+2*, EDIT+2!, EDIT+3!, EDIT+4!, EDIT+5!
DIC(0 PAT+2*
DIE EDIT+2!, EDIT+3!, EDIT+4!, EDIT+5!
DIR EN1+9!, EDIT+2!, EDIT+3!, EDIT+4!, EDIT+5!
DIR("?" EN1+6*, EN1+7*
DIR("A" EN1+6*, EN1+7*, EN1+8*
DIR(0 EN+4*, EN1+6*, EN1+7*, EN1+8*
DR EDIT+2!, EDIT+3!, EDIT+4!, EDIT+5!
DTOUT EN+1~, EN1+10
DUOUT EN+4, EN1+10, EN1+12, EN1+14, ENO+1, ENO+7*, ENO+8, ENO+10*, EN2, EN2+1!
, EDIT+1, ED1+1, ED1+2, ED2+1, ED2+2, ED3+1, ED3+2, ED3+3, ED4+1, ED4+2
, ED4+3, SB1*
IOF HD
SDWLCN EN1~*, EN1+3, EN1+4, EN1+6
SDWLDA ENO+3~*, ENO+10, EN2+5
>> SDWLDFN EN+4*, OPT+4*, EN1+1, PAT+2*
SDWLEDIT ENO+3*, ENO+17!, EDIT+1, ED1+1, ED2+1, ED3+1, ED3+2, ED4+1, ED4+2
SDWLERR OPT*, OPT+2*, OPT+3, EN1~*, EN1+1, EN1+11, EN1+12*, EN1+13, EN1+14*, ENO
, ENO+1*, ENO+17*, ENO+18, EN2
>> SDWLHDR DIS+2*
SDWLI ENO+11~, ENO+14*
SDWLINNM ENO+9~, ENO+10, ENO+12
SDWLLIST EN+3!, EN+4, HD+1
SDWLMSG ENO+11~, ENO+13
SDWLMSG( ENO+12*, ENO+13, ENO+14
SDWLMSG(0 ENO+12*, ENO+13, ENO+14
>> SDWLNAM PAT+4*
SDWLNEW EN1~*, ENO+19*, ENO+20*, EN2, EN2+1!
>> SDWLOPT EN+2, OPT, OPT+3, EN1+5
>> SDWLPCMM OPT*
>> SDWLPOS EN+4*, OPT+6*
>> SDWLPS EN1+4*, EN1+5, EN1+6, EN1+7, EN1+8, EN1+11, EN1+13, ENO, ENO+2, ENO+19
, ENO+20
>> SDWLSSN PAT+4*
SDWLSTN ENO+9~, ENO+10, ENO+12
>> SDWLTEM EN+4*, OPT+6*
>> SDWLTYE EDIT+2, EDIT+3, EDIT+4, EDIT+5
SDWLWTE EN1~*
U PAT+2
VA PAT1!
VA("PID" EN+4, EN1+3, PAT+4, DIS+3, HD+2
VA(1 PAT+4
VADM PAT1!
VADM(1 EN+4, EN1+3, DIS+3, HD+2
VAERR PAT1!
VAIN PAT1!
>> X EN1+5*, EN1+12, EN1+14, ENO+1, ENO+2, ENO+3, ENO+19, PAT+3*, SB1*
>> Y PAT+2
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 |  Local Variables |  All