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

Package: Automated Medical Information Exchange

Routine: DVBAB1


Information

DVBAB1 ;ALB/SPH - CAPRI UTILITIES ; 12/12/11 3:52pm

Source Information

Source file <DVBAB1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
MailMan 3 ^XMB  ^XMD  $$GOTLOCAL^XMXAPIG  
VA FileMan 2 ^DIC  GETS^DIQ  
Kernel 1 ($$FMTE,$$HTE)^XLFDT  
Order Entry Results Reporting 1 START^ORWRP  
Registration 1 $$SITE^VASITE  
Toolkit 1 $$GET^XPAR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 15

Package Total Caller Graph
Automated Medical Information Exchange 15 DVBAB CHECK CREDENTIALS  DVBAB DATETIME  DVBAB DIVISION  DVBAB FIND EXAMS  DVBAB HEALTH SUMMARY TEXT  DVBAB INCREASE EXAM COUNT  DVBAB INST LIST  DVBAB LABLIST  
DVBAB PTINQ  DVBAB REPORT LISTS  DVBAB SEND MSG  DVBAB TEAM PATIENTS  DVBAB TEMPLATE LIST  DVBAB VERSION  DVBAB1A  

Entry Points

Name Comments DBIA/ICR reference
CHKCRED(Y) ;KLB
DIVISION(Y) ; Returns Name for an Institution
VERSION(ZMSG,DVBGUIV) ;
;
; --rpc: DVBAB VERSION
;
; Must have a letter at the end of the Version for Delphi compatibility.
; 1st piece is version description
; 2nd piece can be YESOLD or NOOLD
; YESOLD --> Allow old GUI to run with new KID
; NOOLD --> Do not allow old GUI to run with newer version
FINDEXAM(ZMSG,ZIEN) ;Returns list of exams in 396.4 that are linked to ZIEN in 396.3
INSTLIST(Y) ; Returns full list of Institutions
SENDMSG ;SET UP TO SEND EMAIL/NOTIFICATION TO REQUESTOR OF 2507
DT(Y,X1,X2) ; Returns date X1 minus X2 days
; change the '00:00' that could be passed so Fileman doesn't reject
TEMPLATE(Y) ; Returns list of CAPRI exam templates
MSG(ERR,DUZ,XMSUB,XMTEXT,MGN,ID) ;Generate mail message;KLB
; --rpc: DVBAB SEND MSG
CNCLMSG ;SEND CANCEL MESSAGE TO REQUESTOR OF THE 2507 EXAM
REQUESTS(Y,TYPE) ;
; TYPE is the internal value of field 17 in file 396.3
; This relates to which status of request should be returned
INCEXAM(ZMSG) ;Increased exam # in file and passes back the # to user
LABLIST(Y) ; Returns list of LAB TEST NAMES
RDYMSG ;SEND EXAM COMPLETE MESSAGE TO REQUESTOR OF 2507
TEAMPTS(DVBORY,TEAM,TMPFLAG) ; RETURN LIST OF PATIENTS IN A TEAM
; If TMPFLAG passed and = TRUE, code expects a "^TMP(xxx"
; global root string passed in ORY, and builds the returned
; list in that global instead of to a memory array.
PTINQ(REF,DFN) ; Return formatted pt inquiry report
DTTM(Y) ;

External References

Name Field # of Occurrence
^DIC MSG+18
GETS^DIQ DIVISION+4, DIVISION+7, INSTLIST+6, INSTLIST+14, INSTLIST+18
START^ORWRP PTINQ+3
$$SITE^VASITE SENDMSG+12
$$FMTE^XLFDT REQUESTS+11, SENDMSG+8
$$HTE^XLFDT DTTM+1
^XMB MSG+24
^XMD CNCLMSG+16, RDYMSG+18
$$GOTLOCAL^XMXAPIG MSG+20
$$GET^XPAR VERSION+19, VERSION+20

Used in RPC

RPC Name Call Tags
DVBAB CHECK CREDENTIALS CHKCRED
DVBAB FIND EXAMS FINDEXAM
DVBAB SEND MSG MSG
DVBAB REPORT LISTS LIST
DVBAB PTINQ PTINQ
DVBAB INCREASE EXAM COUNT INCEXAM
DVBAB HEALTH SUMMARY TEXT RPT
DVBAB INST LIST INSTLIST
DVBAB DATETIME DTTM
DVBAB LABLIST LABLIST
DVBAB VERSION VERSION
DVBAB DIVISION DIVISION
DVBAB TEAM PATIENTS TEAMPTS
DVBAB TEMPLATE LIST TEMPLATE

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^XMB(3.8 - [#3.8] Classic Fileman Calls
^DIC(4 - [#4] GETS^DIQ
^DIC(5 - [#5] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] REQUESTS+16, INSTLIST+4
^DIC(4.1 - [#4.1] DIVISION+9, INSTLIST+21
^DPT - [#2] REQUESTS+10, TEAMPTS+16, TEAMPTS+17, TEAMPTS+18, PTINQ+3
^DVB(396.1 - [#396.1] INCEXAM+1, INCEXAM+2*
^DVB(396.18 - [#396.18] TEMPLATE+4, TEMPLATE+5, TEMPLATE+6, TEMPLATE+7, TEMPLATE+8, TEMPLATE+9
^DVB(396.3 - [#396.3] REQUESTS+5, REQUESTS+6, REQUESTS+8, REQUESTS+11, REQUESTS+12, REQUESTS+15, SENDMSG+7
^DVB(396.4 - [#396.4] FINDEXAM+3, FINDEXAM+4, FINDEXAM+5, FINDEXAM+6
^DVB(396.6 - [#396.6] FINDEXAM+5
^LAB(60 - [#60] LABLIST+4, LABLIST+5
^OR(100.21 - [#100.21] TEAMPTS+12, TEAMPTS+13
^TMP("DVBAINST" INSTLIST+2!, INSTLIST+22*, INSTLIST+24
^TMP("DVBALAB1" TEMPLATE+2!, LABLIST+2!, LABLIST+6*, LABLIST+7
^TMP("DVBAREQ" REQUESTS+18*, REQUESTS+19
^TMP("DVBATMPL" TEMPLATE+10*, TEMPLATE+11
^TMP("DVBATMPT" TEAMPTS+5!, TEAMPTS+18*, TEAMPTS+20*, TEAMPTS+21
^TMP("ORDATA" PTINQ+1!, PTINQ+4
^TMP("XMERR" MSG+20!
^TMP($J MSG+7!, MSG+16*, CNCLMSG+3, CNCLMSG+4*, CNCLMSG+5, CNCLMSG+6*, CNCLMSG+7*, CNCLMSG+8*, CNCLMSG+9*, CNCLMSG+10*
, CNCLMSG+11*, CNCLMSG+12*, CNCLMSG+14*, CNCLMSG+17!, RDYMSG+2*, RDYMSG+3*, RDYMSG+4*, RDYMSG+5*, RDYMSG+6*, RDYMSG+7*
, RDYMSG+8*, RDYMSG+9*, RDYMSG+10*, RDYMSG+11*, RDYMSG+12*, RDYMSG+13*, RDYMSG+14*, RDYMSG+15*, RDYMSG+16*, RDYMSG+19!
^VA(200 - [#200] VERSION+26, REQUESTS+13, SENDMSG+6, SENDMSG+10

Label References

Name Line Occurrences
CNCLMSG SENDMSG+13
RDYMSG SENDMSG+14
SENDMSG MSG+14, MSG+28

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN PTINQ~, PTINQ+3
DIC MSG+18*, MSG+29!
DIC(0 MSG+18*, MSG+29!
DOTMP TEAMPTS+4~, TEAMPTS+6*, TEAMPTS+8*, TEAMPTS+10, TEAMPTS+14, TEAMPTS+19
DUZ VERSION+26, REQUESTS+18, REQUESTS+19, TEAMPTS+5, TEAMPTS+18, TEAMPTS+20, TEAMPTS+21, CHKCRED+3, TEMPLATE+2, TEMPLATE+10
, TEMPLATE+11, LABLIST+2, LABLIST+6, LABLIST+7, INSTLIST+2, INSTLIST+22, INSTLIST+24, MSG~, MSG+8, MSG+9
, SENDMSG+1~
DUZ(2 DIVISION+3, DIVISION+4, DIVISION+6, DIVISION+7, DIVISION+8, CHKCRED+2, CHKCRED+4
DVBA0 SENDMSG+1~, SENDMSG+7*, SENDMSG+8
DVBABAD TEMPLATE+1~, TEMPLATE+6*, TEMPLATE+10
DVBABCNT REQUESTS+3~, REQUESTS+4*, REQUESTS+18*, REQUESTS+20!, TEMPLATE+1~, TEMPLATE+3*, TEMPLATE+10*, LABLIST+1~, LABLIST+3*, LABLIST+6*
, INSTLIST+1~, INSTLIST+3*, INSTLIST+22, INSTLIST+23*, FINDEXAM+1~, FINDEXAM+2*, FINDEXAM+13, FINDEXAM+14*, FINDEXAM+15!
DVBABD1 FINDEXAM+4*, FINDEXAM+12, FINDEXAM+15!
DVBABD2 FINDEXAM+5*, FINDEXAM+13, FINDEXAM+15!
DVBABD3 FINDEXAM+6*, FINDEXAM+7*, FINDEXAM+8*, FINDEXAM+9*, FINDEXAM+10*, FINDEXAM+11*, FINDEXAM+13, FINDEXAM+15!
DVBABDD TEMPLATE+1~, TEMPLATE+7*, TEMPLATE+10
DVBABDS INSTLIST+1~, INSTLIST+12*, INSTLIST+22
DVBABDT REQUESTS+11*, REQUESTS+18, REQUESTS+20!
DVBABIEN REQUESTS+3~, REQUESTS+4*, REQUESTS+5*, REQUESTS+6, REQUESTS+8, REQUESTS+11, REQUESTS+12, REQUESTS+15, REQUESTS+18, REQUESTS+20!
, TEMPLATE+1~, TEMPLATE+3*, TEMPLATE+4*, TEMPLATE+5, TEMPLATE+6, TEMPLATE+7, TEMPLATE+8, TEMPLATE+9, TEMPLATE+10, LABLIST+1~
, LABLIST+3*, LABLIST+4*, LABLIST+5, LABLIST+6, INSTLIST+1~, INSTLIST+3*, INSTLIST+4*, INSTLIST+6, INSTLIST+8, INSTLIST+10
, INSTLIST+12, INSTLIST+18, INSTLIST+19, INSTLIST+22, FINDEXAM+1~, FINDEXAM+2*, FINDEXAM+3*, FINDEXAM+4, FINDEXAM+5, FINDEXAM+6
, FINDEXAM+13, FINDEXAM+15!
DVBABLNM LABLIST+1~, LABLIST+5*, LABLIST+6
DVBABNM REQUESTS+8*, REQUESTS+9, REQUESTS+10*, REQUESTS+18, REQUESTS+20!, TEMPLATE+1~, TEMPLATE+5*, TEMPLATE+10, INSTLIST+1~, INSTLIST+8*
, INSTLIST+9, INSTLIST+22
DVBABOC TEMPLATE+1~, TEMPLATE+9*, TEMPLATE+10
DVBABPT REQUESTS+9*, REQUESTS+18, REQUESTS+20!
>> DVBABRO REQUESTS+15*, REQUESTS+16*, REQUESTS+17*, REQUESTS+18
DVBABSL TEMPLATE+1~, TEMPLATE+8*, TEMPLATE+10
DVBABST REQUESTS+6*, REQUESTS+7, REQUESTS+18, REQUESTS+20!, INSTLIST+1~, INSTLIST+16*, INSTLIST+22
DVBABSTN INSTLIST+1~, INSTLIST+10*, INSTLIST+11, INSTLIST+14, INSTLIST+16
>> DVBABVR1 VERSION+24*
>> DVBABVR2 VERSION+25*
>> DVBABVR3 VERSION+26*
DVBABWHO REQUESTS+12*, REQUESTS+13*, REQUESTS+14*, REQUESTS+18, REQUESTS+20!
DVBAC SENDMSG+1~
DVBADFN SENDMSG+1~, SENDMSG+8*, CNCLMSG+4, RDYMSG+5
DVBADT SENDMSG+1~, SENDMSG+8*, CNCLMSG+4, RDYMSG+7
DVBAEA SENDMSG+1~, SENDMSG+10*, SENDMSG+11, SENDMSG+12
DVBAQUIT SENDMSG+1~, CNCLMSG+2*, CNCLMSG+3, CNCLMSG+13*
DVBAREQ SENDMSG+1~, SENDMSG+8*, SENDMSG+10
DVBARR DIVISION+1~, INSTLIST+1~, INSTLIST+5!, INSTLIST+13!, INSTLIST+17!
DVBARR(4 DIVISION+6, DIVISION+8, INSTLIST+8, INSTLIST+10, INSTLIST+12, INSTLIST+19
DVBARR(5 INSTLIST+16
DVBASITE SENDMSG+1~, SENDMSG+12*, CNCLMSG+4, RDYMSG+6
DVBATP DIVISION+1~, DIVISION+8*, DIVISION+9*, DIVISION+10, INSTLIST+1~, INSTLIST+19*, INSTLIST+20, INSTLIST+21*, INSTLIST+22
DVBERR DIVISION+1~, DIVISION+5, INSTLIST+1~, INSTLIST+5!, INSTLIST+7, INSTLIST+13!, INSTLIST+15, INSTLIST+17!
DVBGUIV VERSION~, VERSION+25
DVBOLD VERSION+16~, VERSION+20*, VERSION+21
DVBORI TEAMPTS+4~, TEAMPTS+6*, TEAMPTS+12*, TEAMPTS+13
DVBORPT TEAMPTS+4~, TEAMPTS+13*, TEAMPTS+16, TEAMPTS+17, TEAMPTS+18
DVBORY TEAMPTS~, TEAMPTS+10, TEAMPTS+15, TEAMPTS+19, TEAMPTS+21*
DVBORY(1 TEAMPTS+11*
DVBSSN TEAMPTS+4~, TEAMPTS+17*, TEAMPTS+18
DVBVERS VERSION+15~, VERSION+19*, VERSION+21
ERR MSG~, MSG+9*, MSG+10*, MSG+11*, MSG+12*, MSG+19*, MSG+20*, MSG+23*, MSG+26*
I TEAMPTS+4~, TEAMPTS+6*, TEAMPTS+15*, TEAMPTS+18*, TEAMPTS+19, TEAMPTS+20
ID MSG~, SENDMSG+5, SENDMSG+7
J MSG+15*, MSG+16*, MSG+29!, CNCLMSG+2*, CNCLMSG+3*, CNCLMSG+4, CNCLMSG+5, CNCLMSG+6, CNCLMSG+7, CNCLMSG+8
, CNCLMSG+9, CNCLMSG+10, CNCLMSG+11, CNCLMSG+12, CNCLMSG+14
MGN MSG~, MSG+12, MSG+14, MSG+18, MSG+20, MSG+21, MSG+22, MSG+28, MSG+29!, SENDMSG+13
, SENDMSG+14, RDYMSG+20!
NEWTMP TEAMPTS+4~, TEAMPTS+10*, TEAMPTS+15*, TEAMPTS+16, TEAMPTS+19*
REF PTINQ~, PTINQ+4*
TEAM TEAMPTS~, TEAMPTS+9, TEAMPTS+12, TEAMPTS+13
TMPFLAG TEAMPTS~, TEAMPTS+7, TEAMPTS+8
TYPE REQUESTS~, REQUESTS+7, REQUESTS+20!
U TEAMPTS+16, TEAMPTS+17, TEAMPTS+18
>> X MSG+18*
X1 DT~
X2 DT~
XMB MSG+8*, MSG+21*, MSG+22*, MSG+23, MSG+26, MSG+29!
XMDUZ MSG+8*, MSG+29!, SENDMSG+6*, RDYMSG+20!
XMSUB MSG~, MSG+10, MSG+29!, RDYMSG+20!
XMTEXT MSG~, MSG+11, MSG+17*, MSG+29!, CNCLMSG+15*, RDYMSG+17*, RDYMSG+20!
XMTEXT( MSG+16
>> XMY( SENDMSG+12*
Y REQUESTS~, REQUESTS+19*, DIVISION~, DIVISION+2*, DIVISION+6*, DIVISION+10*, DT~, DTTM~, DTTM+1*, CHKCRED~
, CHKCRED+1*, CHKCRED+2*, CHKCRED+3*, CHKCRED+4*, TEMPLATE~, TEMPLATE+2!, TEMPLATE+11*, LABLIST~, LABLIST+2!, LABLIST+7*
, INSTLIST~, INSTLIST+2!, INSTLIST+24*, MSG+19, MSG+29!
ZIEN FINDEXAM~, FINDEXAM+3, FINDEXAM+12, FINDEXAM+15!
ZMSG VERSION~, VERSION+21*, VERSION+24, INCEXAM~, INCEXAM+1*, INCEXAM+2, FINDEXAM~
ZMSG( FINDEXAM+13*
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