DVBAB1 ;ALB/SPH - CAPRI UTILITIES ; MAY 27, 2022@11:31am
Source file <DVBAB1.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| 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 |
|
| 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 |
|
| 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. |
|
| DIVISION(Y) | ; Returns Name for an Institution
|
|
| DT(Y,X1,X2) | ; Returns date X1 minus X2 days
; change the '00:00' that could be passed so Fileman doesn't reject |
|
| DTTM(Y) | ;
|
|
| CHKCRED(Y) | ;KLB
|
|
| PTINQ(REF,DFN) | ; Return formatted pt inquiry report
|
|
| TEMPLATE(Y) | ; Returns list of CAPRI exam templates
|
|
| LABLIST(Y) | ; Returns list of LAB TEST NAMES
|
|
| INSTLIST(Y) | ; Returns full list of Institutions
|
|
| INCEXAM(ZMSG) | ;Increased exam # in file and passes back the # to user
|
|
| MSG(ERR,DUZ,XMSUB,XMTEXT,MGN,ID) | ;Generate mail message;KLB
; --rpc: DVBAB SEND MSG |
|
| FINDEXAM(ZMSG,ZIEN) | ;Returns list of exams in 396.4 that are linked to ZIEN in 396.3
|
|
| SENDMSG | ;SET UP TO SEND EMAIL/NOTIFICATION TO REQUESTOR OF 2507
|
|
| CNCLMSG | ;SEND CANCEL MESSAGE TO REQUESTOR OF THE 2507 EXAM
|
|
| RDYMSG | ;SEND EXAM COMPLETE MESSAGE TO REQUESTOR OF 2507
|
| 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+13 |
| $$FMTE^XLFDT | REQUESTS+11, SENDMSG+9 |
| $$HTE^XLFDT | DTTM+1 |
| ^XMB | MSG+24 |
| ^XMD | CNCLMSG+16, RDYMSG+18 |
| $$GOTLOCAL^XMXAPIG | MSG+20 |
| $$GET^XPAR | VERSION+23, VERSION+24, VERSION+31 |
| 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 |
| FileNo | Call Tags |
|---|---|
| ^XMB(3.8 - [#3.8] | Classic Fileman Calls |
| ^DIC(4 - [#4] | GETS^DIQ |
| ^DIC(5 - [#5] | GETS^DIQ |
| 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+8 |
| ^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+38, REQUESTS+13, SENDMSG+7, SENDMSG+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CTR | SENDMSG+2~ |
| 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+38, 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+8*, SENDMSG+9 |
| 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+20~, VERSION+36* |
| DVBABVR2 | VERSION+20~, VERSION+37* |
| DVBABVR3 | VERSION+20~, VERSION+38* |
| DVBABWHO | REQUESTS+12*, REQUESTS+13*, REQUESTS+14*, REQUESTS+18, REQUESTS+20! |
| DVBAC | SENDMSG+1~ |
| DVBADFN | SENDMSG+1~, SENDMSG+9*, CNCLMSG+4, RDYMSG+5 |
| DVBADT | SENDMSG+1~, SENDMSG+9*, CNCLMSG+4, RDYMSG+7 |
| DVBAEA | SENDMSG+1~, SENDMSG+11*, SENDMSG+12, SENDMSG+13 |
| DVBAQUIT | SENDMSG+1~, CNCLMSG+2*, CNCLMSG+3, CNCLMSG+13* |
| DVBAREQ | SENDMSG+1~, SENDMSG+9*, SENDMSG+11 |
| 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+13*, 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! |
| DVBGUIC | VERSION+19~, VERSION+29*, VERSION+30, VERSION+32 |
| DVBGUIV | VERSION~, VERSION+29, VERSION+37 |
| DVBOLD | VERSION+17~, VERSION+24*, VERSION+25 |
| 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* |
| DVBPREV | VERSION+18~, VERSION+31*, VERSION+32 |
| DVBSSN | TEAMPTS+4~, TEAMPTS+17*, TEAMPTS+18 |
| DVBVERS | VERSION+16~, VERSION+23*, VERSION+25 |
| 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+6, SENDMSG+8 |
| 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 |
| MERR | SENDMSG+2~ |
| MGN | MSG~, MSG+12, MSG+14, MSG+18, MSG+20, MSG+21, MSG+22, MSG+28, MSG+29!, SENDMSG+14 , SENDMSG+15, RDYMSG+20! |
| MSG | SENDMSG+2~ |
| NEWTMP | TEAMPTS+4~, TEAMPTS+10*, TEAMPTS+15*, TEAMPTS+16, TEAMPTS+19* |
| REF | PTINQ~, PTINQ+4* |
| RIEN | SENDMSG+2~ |
| 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+7*, 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+13* |
| 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+25*, VERSION+30, VERSION+33*, VERSION+36, INCEXAM~, INCEXAM+1*, INCEXAM+2, FINDEXAM~ |
| ZMSG( | FINDEXAM+13* |
