IBCNVRD0 ;ALB/BAA - SYSTEM SHARED VERIFIED INSURANCE ;25-FEB-15
Source file <IBCNVRD0.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 |
---|---|---|
EN | ; process entries in SSVI Pivot file
|
|
END | ||
PROCINS | ;
|
|
SETSTS(STATION) | ;SET STATION NUMBER IN GLOB(PTR,5)
|
|
SNDINFO | ; do all the sending processing
|
|
COMPLETE | ; NEED TO CLOSE OUT ALL THE ENTRIES.
|
|
FINISH(DFN,STATION,HNDL) | ;
|
|
DONE(DFN,STATION,HNDL) | ;
|
|
CHECK(CHK,HNDL) | ; called to check the return status of an RPC
|
|
RETURN(RTN,HNDL) | ; called to get the return data and clear the broker
|
|
CLEAR(CLR,HNDL) | ;
|
|
SEND(SND,STATION,IBICN,IBRPC) | ; called to send off query
|
|
RPC(ENBLD,IBICN) | ; This determines if SSVI is enabled.
|
|
SNDINS(SND,STATION,IBICN,GLOB,IBRPC) | ||
EXIT | ;
|
|
CYCLE | ;test if SSVI PIN/HL7 PIVOT TABLES HAVE TRANSMIISION REQUEST FLAG SET FOR A PATIENT. CONSOLIDATE REQUESTS INTO 1 REQUEST PER PATIENT
|
|
UTL | ;
|
|
GETINFO | ; Get the new fields that do not already exist.
|
|
SETUP(DFN) | ;
|
|
INCON(DFN,INSPTR) | ; SEE IF HAS INCONSISTANCIES
|
|
FRSHDT(DFN,INSPTR) | ;
|
|
EXPRD(DFN,INSPTR) | ;Is expiration date null or in future?
|
Name | Field # of Occurrence |
---|---|
NOW^%DTC | EN+21, EN+27, FINISH+3 |
^%ZISC | END |
$$GET1^DIQ | UTL+24, UTL+25, GETINFO+4, GETINFO+6, GETINFO+7, GETINFO+8, GETINFO+9, GETINFO+10, GETINFO+11, GETINFO+12 , GETINFO+14, GETINFO+15, GETINFO+16, GETINFO+17, FRSHDT+5 |
$$ICN^IBARXMU | SNDINFO+4 |
TFL^IBARXMU | UTL+15 |
DELINC^IBCNVCC1 | CYCLE+27 |
ERROR^IBCNVUT0 | DONE+14 |
FINAL^IBCNVUT0 | FINISH+12 |
INSMUL^IBCNVUT0 | PROCINS+11 |
SASK^IBCNVUT0 | UTL+50 |
TREATSIT^IBCNVUT0 | SNDINFO+14 |
TREATTRD^IBCNVUT0 | FINISH+11 |
DEM^VADPT | UTL+5 |
$$SITE^VASITE | UTL+23 |
$$FMADD^XLFDT | FRSHDT+8 |
EN1^XWB2HL7 | SEND+1, SNDINS+1 |
RPCCHK^XWB2HL7 | CHECK+1 |
CLEAR^XWBDRPC | CLEAR+1 |
RTNDATA^XWBDRPC | RETURN+2 |
RPC Name | Call Tags |
---|---|
IBCN SSVI ENABLED | RPC |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
2.312 | GET1^DIQ |
^IBE(355.1 - [#355.1] | GET1^DIQ |
^IBA(355.3 - [#355.3] | GET1^DIQ |
^DIC(36 - [#36] | GET1^DIQ |
^IBE(365.12 - [#365.12] | GET1^DIQ |
^DIC(4 - [#4] | GET1^DIQ |
^XTV(8989.3 - [#8989.3] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(10 - [#10] | GETINFO+9 |
^DIC(36 - [#36] | UTL+47 |
^DPT - [#2] | UTL+36, UTL+38, UTL+39, EXPRD+3 |
^IBA(355.3 - [#355.3] | UTL+61, UTL+62, GETINFO+13 |
^IBCN(366 - [#366] | CYCLE+5, CYCLE+9, CYCLE+12, CYCLE+14, CYCLE+22* |
^IBCN(366.1 - [#366.1] | INCON+3, INCON+5 |
^IBCN(366.2 - [#366.2] | UTL+50 |
^IBE(350.9 - [#350.9] | EN+18, EN+28*, RPC+4, FRSHDT+7 |
^TMP($J | EN+16!, EN+17!, END+2!, END+3!, PROCINS+6, PROCINS+8, PROCINS+13, PROCINS+14, PROCINS+18, PROCINS+20 , PROCINS+21!, PROCINS+25, SNDINFO+3, COMPLETE+4, COMPLETE+6, COMPLETE+8, COMPLETE+10, COMPLETE+11!, FINISH+2, DONE+15! , DONE+19*, CYCLE+16, CYCLE+26*, UTL+22*, UTL+31*, UTL+32*, UTL+51*, UTL+52*, UTL+53*, UTL+55* , UTL+56*, UTL+63*, SETUP+3, SETUP+4, SETUP+5 |
^XTMP( | PROCINS+21, COMPLETE+11 |
Name | Line Occurrences |
---|---|
$$EXPRD | UTL+40 |
$$FRSHDT | UTL+44 |
$$INCON | UTL+42 |
CHECK | SNDINFO+7, DONE+4 |
CLEAR | SNDINFO+10, SNDINFO+11 |
COMPLETE | PROCINS+28 |
CYCLE | EN+23 |
DONE | PROCINS+22, SNDINFO+18, COMPLETE+12 |
EXIT | END+4 |
FINISH | DONE+16 |
GETINFO | UTL+54 |
PROCINS | EN+25 |
RETURN | SNDINFO+8, FINISH+5, DONE+6 |
SEND | SNDINFO+5 |
SETSTS | PROCINS+15 |
SETUP | PROCINS+9 |
SNDINFO | PROCINS+16 |
SNDINS | SNDINFO+16 |
UTL | CYCLE+26 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | EN+13~, EN+21, EN+27, FINISH+3 |
BN | EN+6~, UTL+55, GETINFO+14* |
BUFF | EN+6~, FINISH+9*, FINISH+11 |
CHK | SNDINFO+2~, SNDINFO+7, DONE+4, CHECK~, CHECK+1 |
CHK(0 | SNDINFO+7, DONE+4 |
CLR | SNDINFO+10, SNDINFO+11, CLEAR~, CLEAR+1 |
CNT | PROCINS+3~, CYCLE+2~, CYCLE+4*, CYCLE+5*, CYCLE+9 |
CNT2 | CYCLE+2~, CYCLE+15*, CYCLE+16*, CYCLE+17 |
CNTHL7 | PROCINS+2~, PROCINS+8*, PROCINS+11, SNDINFO+2~, SNDINFO+3*, SNDINFO+14, FINISH+1~, FINISH+2*, FINISH+11, FINISH+12 , DONE+11*, DONE+14, CYCLE+2~, CYCLE+7*, CYCLE+9*, CYCLE+12, CYCLE+14, CYCLE+22, CYCLE+26, UTL+56 |
COMPATPO | EN+8~ |
COORDBEN | EN+7~, UTL+51 |
COUNT | PROCINS+2~ |
DAT | EXIT+1! |
DATA | DONE+2~, DONE+10*, DONE+11, DONE+12, DONE+13, RPC+1~, RPC+2*, RPC+4*, RPC+5 |
DATELVER | EN+7~, UTL+51, FRSHDT+5*, FRSHDT+9 |
DATEM14 | EN+1~ |
DEFINST | PROCINS+3~, UTL+2~, UTL+24*, UTL+25 |
DELARRY | EN+3~ |
DELAYST | EN+3~ |
DFN | EN+6~, PROCINS+2~, PROCINS+5*, PROCINS+6*, PROCINS+8, PROCINS+9, PROCINS+13, PROCINS+14, PROCINS+18, PROCINS+20 , PROCINS+21, PROCINS+22, SNDINFO+3, SNDINFO+4, SNDINFO+18, COMPLETE+5*, COMPLETE+6*, COMPLETE+8, COMPLETE+10, COMPLETE+11 , COMPLETE+12, FINISH~, FINISH+2, DONE~, DONE+15, DONE+16, DONE+19, EXIT+1!, CYCLE+26*, CYCLE+27 , UTL+15, UTL+22, UTL+31, UTL+32, UTL+36, UTL+38, UTL+39, UTL+40, UTL+42, UTL+44 , UTL+50, UTL+51, UTL+52, UTL+53, UTL+55, UTL+56, UTL+63, GETINFO+7, GETINFO+8, GETINFO+9 , SETUP~, SETUP+3, SETUP+4, SETUP+5, INCON~, INCON+3, INCON+5, FRSHDT~, FRSHDT+3, EXPRD~ , EXPRD+3 |
DGHL7END | UTL+2~, UTL+3*, UTL+50 |
DGP | UTL+1~ |
DOB | EXIT+1!, UTL+55, GETINFO+7* |
DONE | COMPLETE+1~, COMPLETE+2*, COMPLETE+3, COMPLETE+4* |
DR | FRSHDT+1~, FRSHDT+2*, FRSHDT+5 |
DSTATION | PROCINS+3~, UTL+25*, UTL+26*, UTL+31, UTL+56 |
DT | EN+19, FRSHDT+8, EXPRD+5 |
EFFCTDPO | EN+8~, UTL+52 |
ENBLD | SNDINFO+2~, SNDINFO+8, RPC~, RPC+3*, RPC+5* |
ENBLD(0 | SNDINFO+9 |
ERROR | FINISH+10*, FINISH+11, DONE+13*, DONE+14, EXIT+1! |
ESHGP | EN+9~, UTL+53 |
EXDAT | EXPRD+1~, EXPRD+3*, EXPRD+4, EXPRD+5 |
EXPRD | EN+4~, UTL+40*, UTL+41 |
FOUND | CYCLE+2~, CYCLE+10*, CYCLE+16, CYCLE+18*, CYCLE+26 |
FRESHAY | EN+10~ |
FRESHDAY | FRSHDT+1~, FRSHDT+7*, FRSHDT+8 |
FRESHDT | EN+10~, FRSHDT+1~, FRSHDT+8*, FRSHDT+9 |
FSHDT | UTL+2~, UTL+44*, UTL+45 |
FULLD | EXIT+1! |
GENDER | EN+6~, EXIT+1!, UTL+55, GETINFO+8* |
GLOB | PROCINS+3~, PROCINS+7!, SNDINFO+16, SNDINS~, SNDINS+1, EXIT+1! |
GLOB( | PROCINS+11, SETSTS+3*, SNDINFO+13, SETUP+4*, SETUP+5* |
GROUPLAN | EN+6~, UTL+51, UTL+59, UTL+61, UTL+62, GETINFO+1, GETINFO+4 |
GROUPLNM | EN+7~, UTL+55, GETINFO+2*, GETINFO+4*, GETINFO+6* |
GROUPNAM | EN+8~, UTL+52 |
GROUPNUM | EN+7~, UTL+51 |
GROUPPCM | EN+7~, UTL+57*, UTL+62*, UTL+63 |
HCOMMENT | EN+1~ |
HFLAG | EN+1~ |
HKEEPV | EN+1~ |
HL | EXIT+1! |
HL7MSGPT | PROCINS+1~ |
HLERR | EXIT+1! |
HLMTN | EXIT+1! |
HLNDAP | EXIT+1! |
HNDL | PROCINS+19*, PROCINS+20*, PROCINS+21, PROCINS+22, SNDINFO+6*, SNDINFO+7, SNDINFO+8, SNDINFO+10, SNDINFO+11, SNDINFO+17* , SNDINFO+18, COMPLETE+9*, COMPLETE+10*, COMPLETE+11, COMPLETE+12, FINISH~, FINISH+5, DONE~, DONE+4, DONE+6 , DONE+15, DONE+16, DONE+19, CHECK~, CHECK+1, RETURN~, RETURN+2, CLEAR~, CLEAR+1 |
HNDLS | PROCINS+3~ |
HVISIT | EN+1~ |
HVISITO | EN+1~ |
HVISITT | EN+1~ |
I | COMPLETE+3*, UTL+1~, UTL+50*, SETUP+1~, SETUP+4* |
IBC | UTL+10~ |
IBFT | UTL+10~ |
IBICN | SNDINFO+4*, SNDINFO+5, SNDINFO+16, SEND~, SEND+1, RPC~, SNDINS~, SNDINS+1 |
IBP | EN+5~, EN+20*, FINISH+8, FINISH+9, FINISH+10, DONE+11, DONE+12, DONE+13 |
IBRPC | SEND~, SEND+1, SNDINS~, SNDINS+1 |
IBS | UTL+10~ |
IBT1 | UTL+2~, UTL+12!, UTL+15 |
IBT1( | UTL+29, UTL+31 |
IBWAIT | SNDINFO+7*, DONE+2~, DONE+4* |
IBZ | UTL+10~ |
ICNTSTA | PROCINS+3~, UTL+1~, UTL+28*, UTL+31* |
IENL | PROCINS+1~ |
IENS | FRSHDT+1~, FRSHDT+3*, FRSHDT+4*, FRSHDT+5 |
INCON | UTL+2~, UTL+42*, UTL+43 |
INGRP | EN+5~, GETINFO+13*, GETINFO+14, GETINFO+15, GETINFO+16 |
INSCITY | EN+10~, UTL+53 |
INSEXPDT | EN+9~, UTL+53 |
INSGENDR | EN+7~, UTL+51 |
INSNAME | EN+6~, UTL+52 |
INSNAMEP | EN+11~, UTL+46*, UTL+51 |
INSPHONE | EN+10~, UTL+53 |
INSPTR | PROCINS+2~, SNDINFO+2~, SNDINFO+12*, SNDINFO+13*, SNDINFO+14, FINISH+1~, FINISH+6*, FINISH+7*, FINISH+8, FINISH+9 , FINISH+10, UTL+1~, UTL+37*, UTL+38*, UTL+39, UTL+40, UTL+42, UTL+44, UTL+50, UTL+51 , UTL+52, UTL+53, UTL+55, UTL+56, UTL+63, GETINFO+10, INCON~, INCON+6, FRSHDT~, FRSHDT+4 , EXPRD~, EXPRD+3 |
INSPTR1 | PROCINS+1~, UTL+2~, UTL+39*, UTL+46, UTL+47, UTL+56, GETINFO+11, GETINFO+13 |
INSPTR2 | PROCINS+1~ |
INSSTAD | EN+10~, UTL+53 |
INSSTAD2 | EN+10~, UTL+53 |
INSSTATE | EN+10~, UTL+53 |
INSURDOB | EN+7~, UTL+51 |
INSURNM | EN+5~, UTL+35*, UTL+36*, UTL+38 |
INSURSSN | EN+7~, UTL+51 |
INSZIP | EN+10~, UTL+53 |
ISPTR | INCON+1~, INCON+4*, INCON+5*, INCON+6 |
ITEM | EN+5~, UTL+60*, UTL+61*, UTL+62 |
ITEMC | EN+5~, UTL+58*, UTL+63 |
J | SETUP+1~, SETUP+2*, SETUP+5* |
LASTINDT | EN+13~, EN+18*, EN+19*, CYCLE+4 |
LEN | PROCINS+1~ |
LOCATION | EN+5~, PROCINS+17*, SNDINFO+3*, COMPLETE+2* |
MON | EXIT+1! |
MYOPTNS | EXIT+2! |
MYRESLT | EXIT+2! |
NAME | EN+6~, EXIT+2!, UTL+6*, UTL+51 |
NAMEINS | EN+8~, UTL+47*, UTL+51 |
NCANCNOD | PROCINS+1~ |
NO | INCON+1~, INCON+2*, INCON+6*, INCON+7, FRSHDT+1~, FRSHDT+2*, FRSHDT+9*, FRSHDT+10, EXPRD+1~, EXPRD+2* , EXPRD+6*, EXPRD+7 |
NOW | EN+1~ |
NOWDATE | EN+13~, EN+21*, EN+27*, EN+28, CYCLE+5 |
NSURGCNT | EN+4~ |
NTEARRY | EN+1~ |
NTEARRY1 | EN+1~ |
NTITEM | EN+1~ |
NTITEM1 | EN+1~ |
NTITEMC | EN+5~ |
NTITEMD | EN+3~ |
OPR | EXIT+2! |
ORGSENDT | PROCINS+1~ |
PAT | EN+2~, EN+6~, CYCLE+12*, CYCLE+17, CYCLE+26 |
PATIENTI | EN+10~, UTL+53 |
PAYER | EN+5~, UTL+55, GETINFO+11*, GETINFO+12 |
PAYERNM | EN+5~, UTL+55, GETINFO+12* |
PCN | EN+5~, UTL+55, GETINFO+15* |
PDATE | EXIT+2! |
PEND | EXIT+2! |
POLNBILL | EN+10~, UTL+53, UTL+55, GETINFO+10* |
PREOPHF | EN+2~ |
PREOPHFD | EN+2~ |
PREOPHFK | EN+2~ |
PROC | EXIT+2! |
PTR | SETSTS+1~, SETSTS+2*, SETSTS+3*, FINISH+8*, FINISH+11, DONE+2~, DONE+12*, DONE+14, SETUP+1~, SETUP+2* , SETUP+3*, SETUP+4, SETUP+5, INCON+1~, INCON+2*, INCON+3*, INCON+5 |
PTRELHIP | EN+8~, UTL+52 |
PTRELINS | EN+8~, UTL+52 |
RACE | EN+6~, EXIT+2!, UTL+55, GETINFO+9* |
RIEN | DONE+2~ |
RPCVER | PROCINS+3~, PROCINS+4*, SEND+1, SNDINS+1 |
RTN | RETURN~, RETURN+2 |
RTN(0 | RETURN+1* |
SEMPLCL2 | EN+9~, UTL+52 |
SEMPLCL3 | EN+9~, UTL+53 |
SEMPLCLA | EN+9~, UTL+52 |
SEMPLCLC | EN+9~, UTL+53 |
SEMPLCLP | EN+9~, UTL+53 |
SEMPLCLS | EN+9~, UTL+53 |
SEMPLCLZ | EN+9~, UTL+53 |
SENDBEMP | EN+8~, UTL+52 |
SITE | EN+4~, UTL+23*, UTL+26, UTL+27 |
SITPTR | EN+4~, UTL+27* |
SND | SNDINFO+2~, SNDINFO+5, SNDINFO+16, SEND~, SEND+1, SNDINS~, SNDINS+1 |
SND(0 | SNDINFO+6, SNDINFO+17 |
SRFIND | EXIT+2! |
SSN | EN+6~, EXIT+3!, UTL+6*, UTL+51 |
SSVI | SNDINFO+2~, FINISH+4*, FINISH+5, DONE+5*, DONE+6, EXIT+2! |
SSVI( | FINISH+7, FINISH+8, FINISH+9, FINISH+10, DONE+9, DONE+10 |
SSVI(1 | DONE+7, DONE+19 |
STATION | PROCINS+1~, PROCINS+3~, PROCINS+14*, PROCINS+15, PROCINS+17*, PROCINS+18*, PROCINS+20, PROCINS+21, PROCINS+22, SETSTS~ , SETSTS+3, SNDINFO+5, SNDINFO+14, SNDINFO+16, SNDINFO+18, COMPLETE+7*, COMPLETE+8*, COMPLETE+10, COMPLETE+11, COMPLETE+12 , FINISH~, FINISH+11, DONE~, DONE+14, DONE+15, DONE+16, DONE+19, SEND~, SEND+1, SNDINS~ , SNDINS+1, UTL+2~ |
STATIONS | EN+11~ |
STNCNT | PROCINS+2~, PROCINS+12*, PROCINS+13*, PROCINS+14, UTL+2~, UTL+21*, UTL+29*, UTL+31 |
STST | EN+1~, PROCINS+1~ |
SUB | PROCINS+10*, PROCINS+11*, DONE+2~, DONE+8*, DONE+9*, DONE+10 |
SUBEMPNM | EN+8~, UTL+52 |
SUBSCRID | EN+7~, UTL+51 |
SURGCNT | PROCINS+1~ |
TIME | EXIT+3! |
TIMES | EXIT+3! |
TOP | EN+4~, GETINFO+16*, GETINFO+17 |
TOPNM | EN+4~, UTL+55, GETINFO+17* |
TRANSDAT | PROCINS+1~, FINISH+1~, FINISH+3*, FINISH+11 |
U | CYCLE+14, CYCLE+22, UTL+26, UTL+27, FRSHDT+7, EXPRD+3 |
UNIT | EXIT+3! |
UPDATEDT | PROCINS+1~ |
VA | EXIT+3! |
VA("PID" | UTL+6 |
VADM | EXIT+3! |
VADM(1 | UTL+6 |
WARD | EXIT+3! |
WHOSEINS | EN+8~, UTL+52 |
X | EXIT+3! |
XMDUZ | EXIT+3! |
XMSUB | EXIT+3! |
XMTEXT | EXIT+3! |
XMY | EXIT+3! |
Y | EXIT+3!, UTL+10~ |