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

Package: Automated Medical Information Exchange

Routine: DVBCCNCL


Information

DVBCCNCL ;ALB/GTS,LAB - 557/THM-2507 CANCEL REQUESTS, EXAMS ;05/09/2019

Source Information

Source file <DVBCCNCL.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Automated Medical Information Exchange 5 (,BULL,NOTIFY)^DVBCCNC1  (HDR,KILL)^DVBCUTIL  RQCODE^DVBCUTL2  ($$EXSRH,CONTMES)^DVBCUTL4  ($$RSTAT,$$RTSTAT)^DVBCUTL8  
VA FileMan 5 ^DIC  YN^DICN  ^DIE  GETS^DIQ  ^DIR  
Kernel 1 HOME^%ZIS  

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

Package Total Caller Graph
Automated Medical Information Exchange 2 DVBA C CANCEL REQUESTS/EXAMS  DVBCCNC1  

Entry Points

Name Comments DBIA/ICR reference
LOOK1
EN ;
LOOK
ASK
DATA
EXMSEL
EXIT
KILL
CNCLCHK
STATCHK ;Check status
CODE
CNCBY

External References

Name Field # of Occurrence
HOME^%ZIS EN+2
^DIC LOOK, EXMSEL+19
YN^DICN ASK+2, CNCBY
^DIE EXMSEL+24, CNCLCHK+4
GETS^DIQ LOOK+5
^DIR CODE+4
^DVBCCNC1 ASK+2
BULL^DVBCCNC1 EXMSEL+3, CNCBY+3
NOTIFY^DVBCCNC1 CNCLCHK+4
HDR^DVBCUTIL DATA+1
KILL^DVBCUTIL EXIT+1
RQCODE^DVBCUTL2 CODE+6
$$EXSRH^DVBCUTL4 EXMSEL
CONTMES^DVBCUTL4 CODE+5, CODE+7, CNCBY+1
$$RSTAT^DVBCUTL8 LOOK+3, STATCHK+3
$$RTSTAT^DVBCUTL8 STATCHK+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @FF,!?(IOM-$L(HD)\2),HD,!?(IOM-$L(HD2)\2),HD2,!!
  • Line Location: LOOK+0
Function Call: WRITE
  • Prompt: *7," ???"
  • Line Location: LOOK+0
Function Call: WRITE
  • Prompt: *7,!!,"Zeroth node for ^DPT record missing!",!!
  • Line Location: LOOK+8
Function Call: WRITE
  • Prompt: *7,!!,"This request cannot be cancelled entirely because",!," one or more exams have ",$S(TCNCL=2:"been transferred.",1:"been completed.")
  • Line Location: ASK+0
Function Call: READ
  • Variable: ANS
  • Timeout: 60
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !!,"Do you want to cancel the entire exam"
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !!,"Enter Y to cancel the ENTIRE exam or N to cancel ONLY selected exams",!!
  • Line Location: ASK+3
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: EXMSEL+5
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: EXMSEL+6
Function Call: WRITE
  • Prompt: " ??",!," Enter the response which best describes the reason for the cancellation."
  • Line Location: EXMSEL+19
Function Call: WRITE
  • Prompt: *7,!!,"Since all exams have been cancelled",!,"the entire request will be CANCELLED.",!!
  • Line Location: CNCLCHK+1
Function Call: WRITE
  • Prompt: !!,*7,"This request has a status of ",STNM," and can't be cancelled.",!!
  • Line Location: STATCHK+6
Function Call: WRITE
  • Prompt: @IOF,!,"Please enter cancellation code"_DVBCMSG,!
  • Line Location: CODE+0
Function Call: WRITE
  • Prompt: !!,*7,"NO '^' ALLOWED AT THIS PROMPT"
  • Line Location: CODE+5
Function Call: WRITE
  • Prompt: !,*7,"This is a required response."
  • Line Location: CODE+7
Function Call: WRITE
  • Prompt: !!,*7,"CANCELLED BY ",$S(CCODE="X":"MAS",CCODE="RX":"RO",1:"???"),", OK"
  • Line Location: CNCBY+0
Function Call: WRITE
  • Prompt: !!,*7,"NO '^' ALLOWED AT THIS PROMPT"
  • Line Location: CNCBY+1
Routine Call
  • %ZIS
  • Line Location:
    • EN+2
Routine Call
  • DIC
  • Line Location:
    • LOOK
    • EXMSEL+19
Routine Call
  • DIE
  • Line Location:
    • EXMSEL+24
    • CNCLCHK+4
Routine Call
  • DIR
  • Line Location:
    • CODE+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DVB(396.3 - [#396.3] Classic Fileman Calls,  GETS^DIQ
^DVB(396.4 - [#396.4] Classic Fileman Calls
^DVB(396.5 - [#396.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] LOOK+8, LOOK+9
^DVB(396.3 - [#396.3] LOOK+1, LOOK+4, LOOK+10, CNCLCHK
^DVB(396.33 - [#396.33] STATCHK+5
^DVB(396.4 - [#396.4] LOOK1, LOOK1+1, LOOK+11, EXMSEL+6, EXMSEL+7, EXMSEL+25, EXMSEL+27
^DVB(396.6 - [#396.6] LOOK1, EXMSEL+8
^TMP("DVBA" EXMSEL+27*
^TMP($J LOOK1+2*, EXMSEL+9, EXMSEL+26*, EXIT!, KILL!, CNCLCHK

Label References

Name Line Occurrences
ASK ASK+3
CNCBY CNCBY+1
CNCLCHK EXMSEL+13, EXMSEL+28
CODE EXMSEL+16, CNCLCHK+2, CODE+5, CODE+7, CNCBY
DATA ASK+1, EXMSEL+12, EXMSEL+13, EXMSEL+29
EN DVBCCNCL+3
EXIT LOOK, ASK+1, ASK+2, EXMSEL+3, EXMSEL+13, EXMSEL+16, EXMSEL+20, EXMSEL+24, EXMSEL+28
EXMSEL EXMSEL+5, EXMSEL+6
KILL LOOK, EXIT
LOOK LOOK, LOOK+4, LOOK+8, EXMSEL+3, EXMSEL+4, EXMSEL+26
LOOK1 LOOK+11
STATCHK LOOK+4, EXMSEL+12

Naked Globals

Name Field # of Occurrence
^( LOOK+9, CNCLCHK
^(0 LOOK1, LOOK+9, LOOK+10, EXMSEL+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ASK+2*, KILL!, CODE!, CNCBY*, CNCBY+1
%DT EXMSEL+29!
%Y ASK+3, KILL!
ALLCANC KILL!
ANS ASK+1*, EXIT!
CANC EXMSEL+3, EXMSEL+4, KILL!
CANC( EXMSEL+28*
CCODE EXMSEL+23, EXMSEL+27, EXIT!, CNCLCHK+3, CODE+4*, CODE+5, CNCBY
CNUM LOOK+9*, EXIT!
D0 KILL!
D1 KILL!
DA EXMSEL+24*, EXMSEL+25, KILL!, CNCLCHK+4*
DA(1 LOOK+1*, LOOK+4, LOOK+5, LOOK+6, LOOK+7, LOOK+10, LOOK+11, EXMSEL, CNCLCHK, CNCLCHK+4
DFN LOOK+1*, LOOK+8, LOOK+9, KILL!
DIC LOOK*, EXMSEL+18*, KILL!
DIC("A" LOOK*
DIC("S" EXMSEL+1!, EXMSEL+18*
DIC("W" LOOK*
DIC(0 LOOK*, EXMSEL+18*
DICW LOOK+9!
DIE EXMSEL+23*, EXMSEL+24!, KILL!, CNCLCHK+4*
DIR EXIT!
DIR("A" CODE+1*
DIR(0 CODE+2*, CODE+3*
DR EXMSEL+23*, EXMSEL+24!, KILL!, CNCLCHK+3*
DTOUT ASK+2, EXMSEL+3, EXMSEL+24, EXIT!, CODE+6, CNCBY+1, CNCBY+3
DVBACR EXMSEL+2~, EXMSEL+21*, EXMSEL+23
DVBCARY EN+1~, KILL+1!
DVBCARY( LOOK+6, LOOK+7
DVBCMSG EXMSEL+16*, EXIT!, CNCLCHK+2*, CODE*
DVBCRDAT EN+1~, LOOK+6*, KILL+1!
DVBCSITE EN+1~, LOOK+7*, KILL+1!
EXAM LOOK1*, LOOK1+2, KILL+1!
EXMCNC EXMSEL+16*, CODE+2, CODE+3, CODE+5, CODE+7, CNCBY+1, CNCBY+2!
EXMNM EXMSEL+7*, EXMSEL+8*, EXMSEL+9, EXMSEL+16, EXMSEL+26, EXMSEL+28, KILL!
EXMPTR DATA!, EXMSEL+7*, EXMSEL+24, EXMSEL+27, EXIT!
FF EN+2*, LOOK, EXIT!
HD EN+2*, LOOK, EXIT!
HD2 EN+2*, LOOK, EXIT!
I KILL+1!, CNCLCHK*
IOF EN+2, CODE
IOM LOOK
J EXIT!, CNCLCHK*
JDR KILL!
JY KILL!
JZ LOOK1, LOOK1+1, LOOK1+2, LOOK+11*, KILL!
NCN LOOK+4, DATA!, EXMSEL+12, KILL!, STATCHK+7*
NOFND EXMSEL+13, KILL!, CNCLCHK*, CNCLCHK+1
OLDEXAM KILL!
OUT EXMSEL+13, EXMSEL+16, EXMSEL+28, CODE!, CODE+6*, CNCBY+3*
PNAM LOOK+9*, KILL+1!
REASON EXMSEL+25*, EXMSEL+26, EXMSEL+28, KILL+1!
REQDA EXMSEL*, EXMSEL+1!
REQDT LOOK+4*, KILL!
REQRO LOOK+10*, KILL+1!
REQSTR LOOK+10*, KILL+1!
SSN LOOK+9*, KILL+1!
STAT LOOK1+1*, LOOK1+2, LOOK+1*, LOOK+3*, EXMSEL+9*, EXMSEL+25*, EXMSEL+26, EXMSEL+28, KILL!, STATCHK+3*
, STATCHK+4, STATCHK+5
STIEN STATCHK+2~, STATCHK+5*
STNM STATCHK+2~, STATCHK+5*, STATCHK+6
TCNCL LOOK1+2*, LOOK+11!, ASK, EXIT!, KILL!
U LOOK1, LOOK1+1, LOOK1+2, LOOK, LOOK+1, LOOK+4, LOOK+9, LOOK+10, EXMSEL+3, EXMSEL+4
, EXMSEL+6, EXMSEL+7, EXMSEL+8, EXMSEL+9, EXMSEL+25, EXMSEL+26, EXMSEL+27, EXMSEL+28, CNCLCHK, CODE+5
X LOOK, EXMSEL+3, EXMSEL+4, EXMSEL+19, KILL!, CODE+7
Y LOOK, LOOK+1, EXMSEL*, EXMSEL+5, EXMSEL+6, EXMSEL+7, EXMSEL+20, EXMSEL+21, EXMSEL+24, KILL!
, CODE+4
Z KILL!, CNCLCHK*!
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