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 |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: DVBCUTL8

Package: Automated Medical Information Exchange

Routine: DVBCUTL8


Information

DVBCUTL8 ;ALB/GTS-AMIE C&P APPT LINK FILE MNT RTNS 2 ; 10/20/94 3:30 PM

Source Information

Source file <DVBCUTL8.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Automated Medical Information Exchange 5 MSG^DVBAB1C  NOLNK^DVBCLKT2  $$GETDTE^DVBCMKLK  LINKDISP^DVBCUTA1  LNKARY^DVBCUTA3  
VA FileMan 4 FILE^DICN  ^DIE  $$EXTERNAL^DILFD  ^DIR  
Kernel 1 $$NOW^XLFDT  
Registration 1 $$SITE^VASITE  

Caller Graph

Caller Graph Total: 36

Package Total Caller Graph
Automated Medical Information Exchange 36 DVBA CAPRI GET DIV COMMENT  DVBA CAPRI GET DIV EXAM  DVBA CAPRI GET DIVISION  DVBA CAPRI GET REROUTE  DVBA CAPRI GET REROUTE CODE  DVBA CAPRI REROUTE INFO  DVBA CAPRI REROUTE STATUS  DVBAB2  
DVBAB5  DVBAB6  DVBAB70  DVBAB82  DVBABEBD  DVBARSBD  DVBCADEX  DVBCBULL  
DVBCCHKR  DVBCCNC1  DVBCCNCL  DVBCEDIT  DVBCENQ1  DVBCHS0  DVBCLABR  DVBCLKTL  
DVBCMKL2  DVBCNTSC  DVBCPND1  DVBCREDT  DVBCRELS  DVBCREQP  DVBCROPN  DVBCRPON  
DVBCSCHD  DVBCTRN1  DVBCUTL5  DVBCXFR2  

Entry Points

Name Comments DBIA/ICR reference
SELLNK(REQDA) ;** Return IEN from 396.95 for link to modify
CDIVC(RTN,DIV) ;AJF; Provides comments for GUI
; RPC: DVBA CAPRI GET DIV COMMENT
; RTN - Return comment
; DIV - Division IEN
RSTAT(RSP) ;**Return Request Status Code from 396.33
FIXLK ;** Re-attach unlinked appt to new appt
ARC(RTN) ;AJF ;7/15/2016 Returns all active Reroute Code
; RPC: DVBA CAPRI GET REROUTE CODE
; RTN - Return exam
;
UPRR(RIEN,RRDT) ;AJF ; 7/30/2016; Update Reroute information
STYLE(REQDA) ;** Return indication of 2507 status matching integ report type
RPRO(RTN,RIEN,RRST,RRR) ; AJF; 7/25/2016; Update Reroute Status
CDIVE(RTN,DIV) ;AJF ; Provides list of active exams
; RPC: DVBA CAPRI GET DIV EXAM
; RTN - Return exam
; DIV - Division IEN
RTSTAT(RSP) ;**Return Status (External) from 396.33
ADDLK ;** Add link from 2507 to appt
CDIV(RTN,SITE) ;AJF ; Provides list from CAPRI DIVISION EXAM (396.15
RINFO(RTN,RIEN) ;AJF; Returns reroute information for a given 2507 Request
EXSET(RIEN,EST) ;Set Exam status
UPRS(RIEN,RRIEN,RRDT,RRST,RRR) ; Update the status
REROST(RTN,RSP) ;**Returns 1 if this Request is able to be rerouted

External References

Name Field # of Occurrence
FILE^DICN ADDLK+26, UPRR+6, UPRS+8
^DIE FIXLK+35, RPRO+30, RPRO+43, EXSET+7
$$EXTERNAL^DILFD CDIVE+15, RINFO+21, RINFO+22, RINFO+23, RINFO+24, RINFO+25, RINFO+26, RINFO+28, RINFO+29
^DIR FIXLK+12, ADDLK+12, ADDLK+31
MSG^DVBAB1C RPRO+46
NOLNK^DVBCLKT2 SELLNK+5
$$GETDTE^DVBCMKLK FIXLK+8, ADDLK+8
LINKDISP^DVBCUTA1 SELLNK+12
LNKARY^DVBCUTA3 SELLNK+2
$$SITE^VASITE REROST+9, RINFO+31, RPRO+25
$$NOW^XLFDT RPRO+20

Used in RPC

RPC Name Call Tags
DVBA CAPRI GET REROUTE REROST
DVBA CAPRI GET DIVISION CDIV
DVBA CAPRI GET DIV COMMENT CDIVC
DVBA CAPRI GET DIV EXAM CDIVE
DVBA CAPRI GET REROUTE CODE ARC
DVBA CAPRI REROUTE INFO RINFO
DVBA CAPRI REROUTE STATUS RPRO

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
396.1514 EXTERNAL^DILFD
^DVB(396.3 - [#396.3] Classic Fileman Calls,  EXTERNAL^DILFD
396.34 EXTERNAL^DILFD
396.341 EXTERNAL^DILFD
^DVB(396.4 - [#396.4] Classic Fileman Calls
^DVB(396.95 - [#396.95] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" SELLNK+9
^DG(40.8 - [#40.8] CDIV+10
^DPT - [#2] ADDLK+29
^DVB(396.1 - [#396.1] STYLE+5, STYLE+6
^DVB(396.15 - [#396.15] CDIV+6, CDIV+7, CDIV+8, CDIVC+8, CDIVC+9, CDIVC+10, CDIVE+8, CDIVE+9, CDIVE+11, CDIVE+12
, CDIVE+13, CDIVE+14
^DVB(396.3 - [#396.3] STYLE+3, REROST+6, REROST+10, REROST+11, RINFO+12, RINFO+13, RINFO+15, RINFO+16, RINFO+18, RINFO+19
, RINFO+20, RINFO+27, RINFO+28, RINFO+31, RPRO+13, RPRO+14, RPRO+17, RPRO+18, RPRO+23, RPRO+24
, RPRO+26, RPRO+35*, RPRO+41*
^DVB(396.33 - [#396.33] RSTAT+4, RSTAT+5, RTSTAT+4, RTSTAT+5
^DVB(396.4 - [#396.4] EXSET+3, EXSET+4, EXSET+5
^DVB(396.55 - [#396.55] ARC+6, ARC+7
^DVB(396.95 - [#396.95] FIXLK+24
^TMP("DVBC" FIXLK+15, FIXLK+16, FIXLK+17, FIXLK+18, FIXLK+19, ADDLK+15, ADDLK+16, ADDLK+17, ADDLK+18, ADDLK+19
, ADDLK+21

Label References

Name Line Occurrences
$$RSTAT STYLE+3
$$UPRS RPRO+21
EXSET RPRO+35, RPRO+38

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APPTNODE FIXLK+13~, FIXLK+24*, FIXLK+28, FIXLK+29, FIXLK+30, FIXLK+32, ADDLK+13~
APPTSTAT FIXLK+13~, FIXLK+19*, ADDLK+13~, ADDLK+19*
C1 ARC+4~, ARC+9*, ARC+10
C2 CDIVE+4~, CDIVE+5*, CDIVE+8*, CDIVE+9, CDIVE+11, CDIVE+12, CDIVE+13, CDIVE+14
C3 CDIVE+4~, CDIVE+10*, CDIVE+11*, CDIVE+12, CDIVE+13, CDIVE+14
CNT CDIV+4~, CDIV+8*, CDIV+12, CDIVE+4~, CDIVE+5*, CDIVE+8, CDIVE+11, CDIVE+16*
CRQ RINFO+10~, RINFO+31*, RINFO+34
CSITE REROST+7~, REROST+9*, REROST+10, REROST+12, REROST+13, RINFO+31*, RINFO+32, RINFO+33, RPRO+25*, RPRO+27
, RPRO+33, RPRO+36, RPRO+39, RPRO+48
CST RINFO+10~, RINFO+34*, RINFO+36
CT ARC+4~, ARC+5*, ARC+6*, ARC+7, ARC+10
CURRAPPT FIXLK+13~, FIXLK+16*, ADDLK+13~, ADDLK+16*
DA FIXLK+20!, FIXLK+23*, FIXLK+24, FIXLK+35!, ADDLK+20!, ADDLK+32!, RPRO+11~, RPRO+28*, RPRO+31!, RPRO+42*
, UPRR+2~, UPRS+1~, EXSET+2~, EXSET+6*
DA(1 RPRO+28*, UPRR+3*, UPRS+4*
DA(2 UPRS+4*
DD ADDLK+20!
DIC ADDLK+20!, ADDLK+22*, ADDLK+32!, UPRR+2~, UPRR+3*, UPRS+1~, UPRS+3*
DIC("DR" ADDLK+22*, ADDLK+23*, ADDLK+24*, ADDLK+25*, UPRS+7*
DIC(0 ADDLK+22*, UPRR+4*, UPRS+5*
DIE FIXLK+20!, FIXLK+25*, FIXLK+35!, RPRO+11~, RPRO+28*, RPRO+31!, RPRO+42*, EXSET+2~, EXSET+6*
DIR FIXLK+12!, ADDLK+12!, ADDLK+31!
DIR("A" FIXLK+10*, FIXLK+11*, FIXLK+12*, ADDLK+10*, ADDLK+11*, ADDLK+12*, ADDLK+28*, ADDLK+29*, ADDLK+30*, ADDLK+31*
DIR(0 FIXLK+12*, ADDLK+12*, ADDLK+31*
DIV CDIVC~, CDIVC+6, CDIVC+7, CDIVC+8, CDIVC+9, CDIVC+10, CDIVE~, CDIVE+6, CDIVE+7, CDIVE+8
, CDIVE+9, CDIVE+11, CDIVE+12, CDIVE+13, CDIVE+14
DIV1 RPRO+11~, RPRO+26*, RPRO+41
DIV2 RPRO+11~, RPRO+26*, RPRO+29
DLAYGO UPRR+2~, UPRR+4*, UPRR+6!, UPRS+1~, UPRS+5*
DN CDIV+4~, CDIV+11*, CDIV+12
DO ADDLK+20!, UPRR+2~, UPRS+1~
DR FIXLK+20!, FIXLK+25*, FIXLK+29*, FIXLK+30*, FIXLK+31*, FIXLK+32*, FIXLK+33*, FIXLK+34*, FIXLK+35!, RPRO+11~
, RPRO+29*, RPRO+34*, RPRO+35*, RPRO+37*, RPRO+38*, RPRO+40*, RPRO+41*, EXSET+2~, EXSET+6*
DTOUT UPRR+2~, UPRS+1~
DUOUT UPRR+2~, UPRS+1~
DV0 CDIV+4~, CDIV+10*, CDIV+11
DVBAAPST SELLNK+11*, SELLNK+13!
DVBAAPT SELLNK+7, SELLNK+10*, SELLNK+13!
>> DVBADA FIXLK+8, ADDLK+8
>> DVBADFN ADDLK+29, SELLNK+2
>> DVBANOLK SELLNK+4*
>> DVBAOLDA FIXLK+23
DVP CDIV+4~, CDIV+8*, CDIV+9, CDIV+10
EN CDIVE+4~, CDIVE+14*, CDIVE+15*, CDIVE+16
EST EXSET~, EXSET+1, EXSET+6
FNUM CDIV+4~, CDIV+11*, CDIV+12
FSITE REROST+7~, REROST+10*, REROST+12
I CDIV+5*, CDIV+6*, CDIV+7, CDIV+8, CDIV+12, CDIVC+4~, CDIVC+5*, CDIVC+8*, CDIVC+9, CDIVC+10
INITAPPT FIXLK+13~, FIXLK+28*
J1 RINFO+9~, RINFO+15*, RINFO+16, RINFO+18, RINFO+19, RINFO+20, RINFO+27, RPRO+11~, RPRO+17*, RPRO+18
, RPRO+20, RPRO+23, RPRO+24, RPRO+28
J10 RINFO+9~, RINFO+18*, RINFO+21, RINFO+22, RINFO+23, RINFO+26, RINFO+29
J2 RINFO+9~, RINFO+16*, RINFO+17, RINFO+18, RINFO+20, RPRO+11~, RPRO+18*, RPRO+19
J20 RINFO+9~, RINFO+18*, RINFO+24, RINFO+25
J4 RINFO+9~, RINFO+19*, RINFO+32, RINFO+33
JJ EXSET+2~, EXSET+3*, EXSET+4, EXSET+5, EXSET+6
NSITE RPRO+11~, RPRO+25*, RPRO+27, RPRO+39
OIEN RPRO+11~, RPRO+25*, RPRO+50*, RPRO+51
ORIGAPPT FIXLK+13~, FIXLK+15*, ADDLK+13~, ADDLK+15*, ADDLK+29
OSITE RPRO+11~, RPRO+25*, RPRO+27, RPRO+33, RPRO+36, RPRO+39, RPRO+48, RPRO+51
PARAMDA STYLE+1~, STYLE+4*, STYLE+5*, STYLE+6
R0 ARC+4~, ARC+7*, ARC+8, ARC+10, RPRO+23*, RPRO+25, RPRO+26, RPRO+50
>> R1 RPRO+24*, RPRO+25
R2 ARC+4~, UPRS+9*
RDIV RINFO+10~
REJM RPRO+11~, RPRO+35*
REJR RINFO+10~, RINFO+20*, RINFO+38
REQDA STYLE~, STYLE+3, SELLNK~, SELLNK+2
REQDT FIXLK+6~, FIXLK+8*, FIXLK+10, ADDLK+6~, ADDLK+8*, ADDLK+10
REQSTAT STYLE+1~, STYLE+3*, STYLE+7, STYLE+8
RFDIV RINFO+10~, RINFO+29*, RINFO+36
RIEN RINFO~, RINFO+11, RINFO+12, RINFO+13, RINFO+15, RINFO+16, RINFO+18, RINFO+19, RINFO+20, RINFO+27
, RINFO+28, RINFO+31, RPRO~, RPRO+12, RPRO+13, RPRO+14, RPRO+17, RPRO+18, RPRO+21, RPRO+23
, RPRO+24, RPRO+26, RPRO+28, RPRO+35, RPRO+38, RPRO+41, RPRO+42, RPRO+46, UPRR~, UPRR+3
, UPRS~, UPRS+3, UPRS+4, EXSET~, EXSET+1, EXSET+3
RRD RINFO+9~, RINFO+27*, RINFO+37
RRDT RPRO+20*, RPRO+21, RPRO+34, RPRO+35, RPRO+38, RPRO+41, UPRR~, UPRR+5, UPRR+9, UPRS~
, UPRS+6
RRIEN RPRO+20*, RPRO+21, UPRS~, UPRS+3, UPRS+4
RRR RINFO+26*, RINFO+36, RPRO~, RPRO+16*, RPRO+21, UPRS~, UPRS+2*, UPRS+7
RRST RPRO~, RPRO+21, RPRO+27, RPRO+34, RPRO+35, RPRO+37, RPRO+38, RPRO+40, RPRO+41, RPRO+46
, UPRS~, UPRS+7
RRUP RPRO+11~, RPRO+21*
RRW1 RINFO+10~, RINFO+31*, RINFO+32*, RINFO+33
RRW2 RINFO+10~, RINFO+33*, RINFO+34
RSP RSTAT~, RSTAT+2, RSTAT+3, RSTAT+4, RSTAT+5, RTSTAT~, RTSTAT+2, RTSTAT+3, RTSTAT+4, RTSTAT+5
, REROST~, REROST+4, REROST+5, REROST+6, REROST+10, REROST+11
RSTA REROST+7~, REROST+11*, REROST+12
RTD RINFO+9~, RINFO+21*, RINFO+36
RTDIV RINFO+10~, RINFO+28*, RINFO+36
RTF RINFO+9~, RINFO+23*, RINFO+36
RTN REROST~, REROST+8*, REROST+12*, REROST+13*, CDIV~, CDIVC~, CDIVE~, ARC~, RINFO~, RINFO+11*
, RINFO+12*, RINFO+13*, RINFO+17*, RPRO~, RPRO+12*, RPRO+13*, RPRO+14*, RPRO+19*, RPRO+48*, RPRO+51*
RTN( CDIV+12*, CDIVC+10*, CDIVE+16*, ARC+10*
RTN(1 CDIV+5*, CDIVC+5*, CDIVE+5*, RINFO+36*
RTN(2 RINFO+37*
RTN(3 RINFO+38*
RTO RINFO+9~, RINFO+22*, RINFO+36
RTS RINFO+9~, RINFO+25*, RINFO+36
RTSD RINFO+9~, RINFO+24*, RINFO+36
RUSR RINFO+10~
SAVY FIXLK+6~, FIXLK+7*, FIXLK+9, ADDLK+6~, ADDLK+7*, ADDLK+9
>> SDATA SELLNK+8
SELDA SELLNK+1~, SELLNK+4*, SELLNK+15
SITE CDIV~
STATIND STYLE+1~, STYLE+2*, STYLE+7*, STYLE+8*, STYLE+9*, STYLE+10
STYLEIND STYLE+1~, STYLE+6*, STYLE+7, STYLE+8, STYLE+9
>> TMP("DVBC LIN K" , SELLNK+3, SELLNK+6
U FIXLK+28, FIXLK+29, FIXLK+30, FIXLK+32, ADDLK+29, STYLE+3, STYLE+6, SELLNK+8, EXSET+4, EXSET+5
VETCANC FIXLK+13~, FIXLK+17*, FIXLK+33, ADDLK+13~, ADDLK+17*
VETDTE FIXLK+13~, FIXLK+14*, FIXLK+18*, ADDLK+13~, ADDLK+14*, ADDLK+18*
X FIXLK+12!, ADDLK+12!, ADDLK+20!, ADDLK+21*, ADDLK+31!, ADDLK+32!, UPRR+2~, UPRR+5*, UPRS+1~, UPRS+6*
Y FIXLK+7, FIXLK+9*, FIXLK+12!, ADDLK+7, ADDLK+9*, ADDLK+12!, ADDLK+27, ADDLK+31!, ADDLK+32!, SELLNK+8*
, SELLNK+10, SELLNK+14!, UPRR+2~, UPRR+9, UPRS+1~, UPRS+9, UPRS+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All