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

Package: Scheduling

Routine: SDWLEC


Information

SDWLEC ;;IOFO BAY PINES/ESW - CLOSED WAITING LIST-EDIT;06/12/2002; Compiled April 17, 2009 14:22:44

Source Information

Source file <SDWLEC.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Scheduling 4 EN^SDWLD  (PCM,PCMD)^SDWLE1  EN^SDWLE10  EN^SDWLKIL  
VA FileMan 4 ^DIC  ^DIE  $$GET1^DIQ  ^DIR  
Registration 1 1^VADPT  

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 WAIT LIST OPEN CLOSED ENTRY  

Entry Points

Name Comments DBIA/ICR reference
EN ;ENTRY POINT - INTIALIZE VARIABLES
OPT ;
EN1
ENO
END ;
PAT ;SELECT PATIENT
PAT1
DIS ;DISPLAY DATA FOR PATIENT
EDITC(SDWLDA,SDCAN) ;edit closed entry
SB1
HD

External References

Name Field # of Occurrence
^DIC PAT+2
^DIE EDITC+12, EDITC+13, EDITC+14, EDITC+15
$$GET1^DIQ PAT+3, SB1
^DIR EN+5, EN1+8, EDITC+6
EN^SDWLD DIS+3
PCM^SDWLE1 DIS+4
PCMD^SDWLE1 DIS+4
EN^SDWLE10 ENO+10
EN^SDWLKIL END+1
1^VADPT EN+5, OPT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"PATIENT: ",VADM(1),?40,VA("PID")
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,*7,"PATIENT'S DATE OF DEATH HAS BEEN RECORDED"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!,"PATIENT: ",VADM(1),?40,VA("PID")
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+8
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+8
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: EN1+10
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: EN1+12
Function Call: WRITE
  • Prompt: !,"ANOTHER TERMINAL IS EDITING THIS ENTRY. TRY LATER."
  • Line Location: ENO+8
Function Call: WRITE
  • Prompt: !,"This process has been canceled."
  • Line Location: ENO+12
Function Call: WRITE
  • Prompt: !,"The requested entry has been opened."
  • Line Location: ENO+13
Function Call: WRITE
  • Prompt: !,*7,"PATIENT'S DATE OF DEATH HAS BEEN RECORDED"
  • Line Location: PAT+3
Function Call: WRITE
  • Prompt: !," ENTERED IN ERROR - NOT TO BE OPENED"
  • Line Location: EDITC+2
Function Call: WRITE
  • Prompt: !,"Reopen comment required to open this entry. Reopen reason: O - Other.",!
  • Line Location: EDITC+3
Function Call: WRITE
  • Prompt: !,"At least 10 char comment required"
  • Line Location: EDITC+7
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $D(IOF)
  • Line Location: HD+0
Function Call: WRITE
  • Prompt: !,?80-$L("Scheduling/PCMM Open Closed Wait Entry")\2,"Scheduling/PCMM Open Closed Wait List Entry",!!
  • Line Location: HD+0
Routine Call
  • DIC
  • Line Location:
    • PAT+2
Routine Call
  • DIE
  • Line Location:
    • EDITC+12
    • EDITC+13
    • EDITC+14
    • EDITC+15
Routine Call
  • DIR
  • Line Location:
    • EN+5
    • EN1+8
    • EDITC+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^SDWL(409.3 - [#409.3] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SDWL(409.3 - [#409.3] EN1+2, ENO+8, ENO+11, EDITC+1, HD+1
^TMP("SDWLD" EN+6!, EN1+11, EN1+13, ENO+4

Label References

Name Line Occurrences
DIS EN1+1
EDITC ENO+11
EN ENO
EN1 EN+5, EN1+10, EN1+12, ENO
END EN+5, EN+7, EN1+9, EN1+10, EN1+12, ENO+14
ENO EN1+4
HD EN+5, EN+6
OPT EN+2
PAT EN+7, PAT+3
PAT1 PAT+2
SB1 EN+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN+1~
DA ENO+4~*, EDITC+11~, EDITC+12*
DFN EN+3, EN+5, EN+7, OPT+2, EN1+2, EN1+11, EN1+13, ENO+2!, ENO+4, PAT+2*
, PAT+3, DIS+3, SB1, HD+1
DIC PAT+2~*
DIC(0 PAT+2*
DIE EDITC+11~, EDITC+12*
>> DILOCKTM ENO+8
DIR EN1+8!, EDITC+5~
DIR("?" EN1+5*, EN1+6*
DIR("A" EN1+5*, EN1+6*, EN1+7*, EDITC+6*
DIR("B" EDITC+6*
DIR(0 EN+5*, EN1+5*, EN1+6*, EN1+7*, EDITC+6*
DR EDITC+11~, EDITC+12*, EDITC+13*, EDITC+14*, EDITC+15*
DTOUT EN+1~, EN1+9
>> DUOUT EN+5, EN1+9, EN1+13, ENO+1, ENO+8*, ENO+9, SB1*
IOF HD
SDCAN ENO+3~, ENO+11, ENO+12, EDITC~, EDITC+1*, EDITC+5*, EDITC+9*
SDCLR EDITC+1~*, EDITC+2
SDWLCM EDITC+10~*
SDWLCN OPT+1~, EN1*, EN1+2, EN1+3, EN1+5
SDWLDA ENO+4*, ENO+8, ENO+11, EDITC~, EDITC+1, EDITC+12
SDWLDFN EN+4~, EN+5*, OPT+1~, OPT+2*, PAT+2*
SDWLEDIT ENO+4*, ENO+11!
SDWLERR OPT+1~, EN1*, EN1+10, EN1+11*, EN1+12, EN1+13*, ENO, ENO+1*, ENO+2, ENO+11*
SDWLHDR EN+1~, DIS+2*
SDWLLIST EN+3!, EN+5, HD+1
SDWLNAM EN+1~, PAT+4*
SDWLNEW OPT+1~, EN1*
>> SDWLOPT EN+2, EN1+4
SDWLPOS EN+1~, EN+5*, OPT+4*
SDWLPS EN+1~, OPT+1~, EN1+3*, EN1+4, EN1+5, EN1+6, EN1+7, EN1+10, EN1+12, ENO
, ENO+3
SDWLSSN EN+1~, PAT+4*
SDWLTEM EN+1~, EN+5*, OPT+4*
SDWLWTE OPT+1~, EN1*
U PAT+2, EDITC+1
VA EN+1~, PAT1!
VA("PID" EN+5, EN1+2, PAT+4, DIS+3, HD+2
VA(1 PAT+4
VADM EN+1~, PAT1!
VADM(1 EN+5, EN1+2, DIS+3, HD+2
VAERR PAT1!
VAIN PAT1!
X EN+1~, EN1+4*, EN1+11, EN1+13, ENO+1, ENO+3, ENO+4, PAT+3*, EDITC+8, SB1*
Y PAT+2, EDITC+5~*, EDITC+6, EDITC+7, EDITC+9, EDITC+10
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