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

Package: Automated Medical Information Exchange

Routine: DVBCREDT


Information

DVBCREDT ;ALB/GTS/THM/LAB - EDIT STATIS C&P INFO ; Sep 23, 2019@16:41

Source Information

Source file <DVBCREDT.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Automated Medical Information Exchange 6 WR^DVBAUTL4  (CLINSF,INSUF)^DVBCLOG2  (INSUFXM,RESTLINK,XMUPDT)^DVBCUTA2  KILL^DVBCUTIL  CONTMES^DVBCUTL4  $$RSTAT^DVBCUTL8  
VA FileMan 3 ^DIC  ^DIE  ^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: 1

Package Total Caller Graph
Automated Medical Information Exchange 1 DVBA C EDIT C&P REQUEST INFO  

Entry Points

Name Comments DBIA/ICR reference
COMPARE
EN1
EDIT ;
CON
CONK
EXIT
RESTORE ;** Remove insufficient info from 2507

External References

Name Field # of Occurrence
HOME^%ZIS DVBCREDT+7
^DIC EN1
^DIE EDIT+4, EDIT+66, RESTORE+6, RESTORE+11
^DIR EDIT+13
WR^DVBAUTL4 RESTORE+15
CLINSF^DVBCLOG2 EDIT+20, RESTORE+2
INSUF^DVBCLOG2 EDIT+20, EDIT+36
INSUFXM^DVBCUTA2 EDIT+21, EDIT+28
RESTLINK^DVBCUTA2 EDIT+22
XMUPDT^DVBCUTA2 EDIT+42
KILL^DVBCUTIL EXIT
CONTMES^DVBCUTL4 RESTORE+17
$$RSTAT^DVBCUTL8 EN1+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"Your user number is invalid.",!!
  • Line Location: DVBCREDT+6
Function Call: WRITE
  • Prompt: @IOF,!?(IOM-$L(DVBLN)\2),DVBLN,!!!
  • Line Location: EN1+0
Function Call: WRITE
  • Prompt: !!,"The status of this request is not NEW or NEW RE-ROUTED or PENDING, REPORTED.",!,"It cannot, therefore, be modified.",*7,!!
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: EDIT+4
Function Call: WRITE
  • Prompt: @IOF,!!,*7,"Since you have modified the REMARKS section,",!,"a new copy of the request will be issued to the",!,"medical center tomorrow morning."
  • Line Location: EDIT+66
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: CON+0
Routine Call
  • %ZIS
  • Line Location:
    • DVBCREDT+7
Routine Call
  • DIC
  • Line Location:
    • EN1
Routine Call
  • DIE
  • Line Location:
    • EDIT+4
    • EDIT+66
    • RESTORE+6
    • RESTORE+11
Routine Call
  • DIR
  • Line Location:
    • EDIT+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DVB(396.3 - [#396.3] Classic Fileman Calls
^DVB(396.4 - [#396.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DVB(396.3 - [#396.3] COMPARE+1, EN1+1, EN1+5, EDIT+2, EDIT+8, EDIT+19, EDIT+27, EDIT+33, EDIT+51, EDIT+58
, EDIT+64, EDIT+65
^DVB(396.4 - [#396.4] EDIT+40, RESTORE+8
^TMP("DVBCEDIT" DVBCREDT+6!, COMPARE, COMPARE+1, EN1+5*, EXIT!
^TMP($J EDIT+43!

Label References

Name Line Occurrences
COMPARE EDIT+65
CON EN1+4
CONK EDIT+64
EN1 DVBCREDT+8, EN1, CONK
EXIT DVBCREDT+6, EN1, CON
RESTORE EDIT+47, EDIT+53, EDIT+61

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS CON*, EXIT!
DA COMPARE, COMPARE+1, EN1*, EN1+1, EN1+5, EDIT+2, EDIT+3, EDIT+8, EDIT+20*, EDIT+30*
, EDIT+33, EDIT+48*, EDIT+51, EDIT+54*, EDIT+58, EDIT+62*, EDIT+64, EDIT+65, CONK!, RESTORE+1!
, RESTORE+5*, RESTORE+6!, RESTORE+9!, RESTORE+10*, RESTORE+12!
DIC EN1*, CONK!
DIC("A" EN1*
DIC(0 EN1*
DIE EN1*, EDIT+63*, CONK!, RESTORE+1!, RESTORE+5*, RESTORE+6!, RESTORE+9!, RESTORE+10*, RESTORE+12!
DIR EDIT+16!, EDIT+34!
DIR("?" EDIT+13*
DIR("A" EDIT+12*
DIR("B" EDIT+13*
DIR(0 EDIT+12*
DR EDIT+4*, EDIT+66*, RESTORE+1!, RESTORE+5*, RESTORE+6!, RESTORE+9!, RESTORE+10*, RESTORE+12!
DT EDIT+64
DTIME CON
DTOUT EDIT+5, EDIT+11!, EDIT+39!, EDIT+40, EDIT+43
DUOUT EDIT+11!, EDIT+21, EDIT+22
DUZ DVBCREDT+6
DVBAOUT EDIT+21, EDIT+22, EDIT+37, EDIT+43*, EDIT+44, EXIT!
DVBARQST EDIT+1~, EDIT+2*, EDIT+8, EDIT+33, EDIT+51, EDIT+58
DVBCMOD COMPARE*, COMPARE+1*, EN1+4*, EDIT+65!, EDIT+66, CON, CONK!
DVBLN DVBCREDT+7*, EN1, EXIT!
ENTTOUT EDIT+1~, EDIT+5*, EDIT+8, EDIT+33, EDIT+57
EXMCLR EDIT+45~, EDIT+46*, EDIT+52~*, RESTORE+7
EXMNM EDIT+38~
FF DVBCREDT+7*, EXIT!
I COMPARE, COMPARE+1, EN1+5*, EDIT+65*, CONK!
IOF DVBCREDT+7, EN1, EDIT+41, EDIT+66
IOM EN1
MSG EDIT+45~, EDIT+46*, EDIT+59~, EDIT+60*, RESTORE+13
NODE5 EDIT+18*, EDIT+19*, EDIT+23!, EDIT+27*, EDIT+29!
REQDA EDIT+17~*, EDIT+19, EDIT+26~*, EDIT+27, EDIT+35~*, EDIT+40, EDIT+52~*, EDIT+59~, EDIT+60*, RESTORE+5
, RESTORE+8
RESET EDIT+45~, EDIT+46*, EDIT+59~, EDIT+60*, RESTORE+3
SAVEDA EDIT+1~, EDIT+3*, EDIT+17, EDIT+20, EDIT+26, EDIT+30, EDIT+35, EDIT+48, EDIT+52, EDIT+54
, EDIT+60, EDIT+62
STAT EN1+1*, EN1+3*, EN1+4, EXIT!
TVAR RESTORE+16!
TVAR(1 RESTORE+14*
U EN1, EN1+1, EDIT+2, EDIT+8, EDIT+33, EDIT+51, EDIT+58, EDIT+64, CON
UPDT2507 EDIT+10~, EDIT+14*, EDIT+15, EDIT+24
X EN1, CONK!
XMDA EDIT+35~, EDIT+40*, RESTORE+8*, RESTORE+10
XMEDT EDIT+29!
XMSTAT EDIT+38~
Y EN1, EDIT+14, EDIT+16!, EDIT+34!, EDIT+43!, CONK!
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