IBCNERP8 ;DAOU/BHS - IBCNE eIV STATISTICAL REPORT COMPILE ;11-JUN-2002
Source file <IBCNERP8.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(IBCNERTN,IBCNESPC) | ; Entry pt
; Init vars |
|
EXIT | ; EN Exit pt
|
|
IN(RTN,BDT,EDT,TOT) | ; Determine Incoming Data
; Input params: RTN-routine name for ^TMP($J), BDT-start dt/time, ; EDT-end dt/time, **TOT-total records searched - used only for status ; checks when the process is queued (passed by reference) ; Output vars: Set pcs of ^TMP($J,RTN,"IN") as follows: ; 1=total Resps rec'd for date/time range ; 2=Ins Buf extract subtotal ; 3=Pre-Reg extract subtotal ; 4=Non-ver extract subtotal ; 5=No Act Ins subtotal |
|
INX | ; IN exit pt
|
|
OUT(RTN,BDT,EDT,TOT) | ; Outgoing Data
|
|
OUTX | ; OUT exit pt
|
|
CUR(RTN,BDT,EDT,TOT) | ; Current Status - stats - timeframe independent
; Input params: RTN-routine name as subs in ^TMP($J), **TOT-total recs ; searched - used only for status checks when the process is queued ; passed by reference ; Output vars: Set pcs of ^TMP($J,RTN,"CUR") as follows: ; 1=total Pending Resps (Transmitted-2) ; 2=total Queued Inqs (Ready to Transmit-1/Retry-6) ; 3=total Deferred Inqs (Hold-4) ; 4=Ins Cos w/o National ID ; 5=Payers w/eIV locally enabled is NO ;/vd-IB*2*687 - Reworded the description. ; ; 6=total user action required (symbol'='*' or '#' or '!' or '?' or '-') ; 6=total user action required (symbol'='#' or '!' or '?' or '-') ;IB*737/DTG stop use of '*' verified ; 7=total Man. Ver'd Ins Buf entries (symbol='*') ;IB*737/DTG stop use of '*' verified ; 8=total eIV Processed Ver. (symbol='+') ; 9=total awaiting processing (symbol='?' or BLANK) ; 10=total Ins Buf entries w/symbol='#' ; 11=total Ins Buf entries w/symbol='!' ; 12=total Ins Buf entries w/symbol='?' ; 13=total Ins Buf entries w/symbol='-' ; ; 14=total Ins Buffer entries w/symbol not in ('*','#','!','?','-') ; 14=total Ins Buffer entries w/symbol not in ('#','!','?','-') ;IB*737/DTG stop use of '*' verified ; 15=total Ins Buffer entries w/symbol='$' ; 16=total Ins Buffet entries w/symbol= % ; IB*2.0*621 - Added 16-21 ; 17=total Insurance Buffer ; 18=Total Appointment ; 19=total Ele Ins Cov Discovery (EICD) ; 20=total EICD Triggered Einsurance Verification ; 21=total MBI Inquiry ; 22=total IIU Payer 'Received IIU Data' set to NO ;IB*2.0*687 |
|
CURM | ;
; Save data to global |
|
CURX | ; CUR exit point
|
|
GETFLAGS(PIEN,APPIEN,PDATA,BDT,EDT,APP,RPTDATA) | ;
; PIEN - Payer ien in file 365.12 ; APPIEN - Application ien in subfile 365.121 ; PDATA - 0 node of Payer file entry ; BDT - Start date/time ; EDT - End date/time ; APP - Payer Application EIV or IIU ; RPTDATA - output array, passed by reference ; |
|
PYR(RTN,BDT,EDT,TOT) | ; Determine Incoming Data
; Input params: RTN-routine name for ^TMP($J), BDT-start dt/time, ; EDT-end dt/time, **TOT-total records searched - used only for status ; checks when the process is queued (passed by reference) ; Output vars: Set ^TMP($J,RTN,"PYR",APP,PAYER NAME,IEN of file 365.12)="" ;IB*2.0*687 |
Name | Field # of Occurrence |
---|---|
$$S^%ZTLOAD | IN+24, OUT+23, CUR+48, CUR+75, CUR+86, CUR+110, CUR+162 |
$$EXTERNAL^DILFD | GETFLAGS+16 |
$$GET1^DIQ | IN+35, IN+36, IN+37, OUT+33, OUT+34, OUT+35, CUR+53, CUR+54, CUR+55, CUR+94 |
$$SYMBOL^IBCNBLL | CUR+163 |
$$ACTIVE^IBCNEUT4 | CUR+88 |
$$EXCLUDE^IBCNEUT4 | CUR+90 |
$$PYRAPP^IBCNEUT5 | CUR+132, CUR+133, PYR+15 |
$$FMDIFF^XLFDT | GETFLAGS+14 |
$$FMTE^XLFDT | GETFLAGS+18 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DIC(36 - [#36] | GET1^DIQ |
^IBCN(365.1 - [#365.1] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(36 - [#36] | CUR+84 |
^IBA(355.33 - [#355.33] | CUR+159, CUR+160 |
^IBCN(365 - [#365] | IN+15, IN+16, IN+18, IN+20, IN+22, IN+31, IN+33, OUT+18, OUT+19, OUT+21 , OUT+25, OUT+29, CUR+46, CUR+51 |
^IBCN(365.1 - [#365.1] | CUR+73 |
^IBE(365.12 - [#365.12] | CUR+108, CUR+111, CUR+139, CUR+142, CUR+146, GETFLAGS+14, GETFLAGS+15, GETFLAGS+16, PYR+11, PYR+12 , PYR+18 |
^TMP($J | EN+9!, IN+52*, OUT+49*, CURM+2*, PYR+31* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
APP | GETFLAGS~, GETFLAGS+11*, GETFLAGS+18, PYR+10~, PYR+14*, PYR+15, PYR+31 |
APPDATA | CUR+40~, CUR+131!, CUR+139*, CUR+141, CUR+146*, CUR+148, CUR+150, PYR+10~ |
APPIEN | CUR+39~, GETFLAGS~, GETFLAGS+14, GETFLAGS+15, GETFLAGS+16, PYR+10~, PYR+15*, PYR+16, PYR+18 |
BDT | IN~, IN+15, OUT~, OUT+18, CUR~, CUR+138, CUR+145, GETFLAGS~, GETFLAGS+14, PYR~ , PYR+19 |
CREATEDT | PYR+10~, PYR+18*, PYR+19 |
CT | EN+2~ |
EDT | IN~, IN+16, OUT~, OUT+19, CUR~, CUR+138, CUR+145, GETFLAGS~, GETFLAGS+14, PYR~ , PYR+19 |
FLAGS | GETFLAGS+9~ |
IBBDT | EN+2~, EN+12*, EN+15, EN+17, EN+19 |
IBCNERTN | EN~, EN+9, EN+15, EN+17, EN+19 |
IBCNESPC | EN~ |
IBCNESPC("BEGDTM" | EN+12 |
IBCNESPC("ENDDTM" | EN+12 |
IBCNESPC("SECTS" | EN+13 |
IBDT | IN+12~, IN+15*, IN+16*, IN+18, IN+20, IN+22, OUT+13~, OUT+18*, OUT+19*, OUT+21 |
IBEDT | EN+2~, EN+12*, EN+15, EN+17, EN+19 |
IBIEN | CUR+39~, CUR+158*, CUR+160*, CUR+163 |
>> IBMBI | IN+37*, OUT+35*, CUR+55* |
IBPTR | IN+12~, IN+21*, IN+22*, IN+31, IN+33, OUT+13~, OUT+20*, OUT+21*, OUT+25, OUT+29 |
>> IBQUERY | IN+36*, IN+44, IN+45, OUT+34*, OUT+42, OUT+43, CUR+54*, CUR+63, CUR+64 |
IBSCT | EN+2~, EN+13*, EN+15, EN+17, EN+19 |
IBSTS | CUR+39~, CUR+71*, CUR+73, CUR+76 |
IBSYMBOL | CUR+39~, CUR+163*, CUR+171 |
IBTOT | EN+2~, EN+6*, EN+15, EN+17, EN+19 |
IBTYP | IN+12~, IN+35*, IN+38, IN+39, IN+41, IN+42, IN+43, IN+46, OUT+13~, OUT+33* , OUT+36, OUT+37, OUT+39, OUT+40, OUT+41, OUT+44, CUR+53*, CUR+56, CUR+57, CUR+59 , CUR+60, CUR+61, CUR+62 |
ICIEN | CUR+39~, CUR+83*, CUR+84*, CUR+88, CUR+94 |
IEN | CUR+39~, GETFLAGS+9~, GETFLAGS+15*, GETFLAGS+16 |
IENEIV | CUR+130~, CUR+132*, CUR+134, CUR+143, CUR+145, CUR+146 |
IENIIU | CUR+130~, CUR+133*, CUR+134, CUR+136, CUR+138, CUR+139, CUR+142 |
IOST | EN+4 |
PATIEN | IN+12~, IN+19*, IN+20*, IN+22 |
PDATA | CUR+40~, CUR+111*, CUR+113, CUR+138, CUR+145, GETFLAGS~, GETFLAGS+10 |
PIECE | CUR+39~, CUR+171*, CUR+172, CUR+174 |
PIECES | EN+2~ |
PIEN | CUR+40~, CUR+107*, CUR+108*, CUR+111, CUR+132, CUR+133, CUR+138, CUR+139, CUR+142, CUR+145 , CUR+146, GETFLAGS~, GETFLAGS+14, GETFLAGS+15, GETFLAGS+16, PYR+10~, PYR+11*, PYR+12, PYR+15, PYR+18 , PYR+31 |
PNAME | GETFLAGS+9~, GETFLAGS+10*, GETFLAGS+18 |
PYR | PYR+10~, PYR+12*, PYR+31 |
PYRIEN | IN+12~, IN+17*, IN+18*, IN+20, IN+22 |
RIEN | CUR+39~, CUR+45*, CUR+46*, CUR+51 |
RPTDATA | IN+12~, IN+26*, IN+41*, IN+42*, IN+44*, IN+45*, IN+46*, IN+52, OUT+13~, OUT+27* , OUT+39*, OUT+40*, OUT+42*, OUT+43*, OUT+44*, OUT+49, CUR+39~, CUR+42*, CUR+49*, CUR+59* , CUR+60*, CUR+61*, CUR+63*, CUR+64*, CUR+76*, CUR+77*, CUR+83*, CUR+94*, CUR+138, CUR+142* , CUR+145, CUR+151*, CUR+172*, CUR+173*, CUR+174*, CURM+2, GETFLAGS~ |
RPTDATA("FLAGS" | GETFLAGS+18* |
RTN | IN~, IN+52, OUT~, OUT+49, CUR~, CURM+2, PYR~, PYR+31 |
TM | GETFLAGS+9~, GETFLAGS+14*, GETFLAGS+15, GETFLAGS+18 |
TMP | CUR+40~, CUR+88*, CUR+90 |
TOT | IN~, IN+23*, IN+24, OUT~, OUT+22*, OUT+23, CUR~, CUR+47*, CUR+48, CUR+74* , CUR+75, CUR+85*, CUR+86, CUR+109*, CUR+110, CUR+161*, CUR+162, PYR~, PYR+13* |
TQIEN | IN+33*, IN+34, IN+35, IN+36, IN+37, OUT+13~, OUT+29*, OUT+30, OUT+33, OUT+34 , OUT+35, CUR+39~, CUR+51*, CUR+52, CUR+53, CUR+54, CUR+55, CUR+72*, CUR+73* |
TRANSIEN | IN+12~, IN+31* |
TYP | GETFLAGS+9~, GETFLAGS+13*, GETFLAGS+14, GETFLAGS+15, GETFLAGS+16, GETFLAGS+18 |
U | IN+26, IN+31, IN+33, IN+41, IN+42, IN+44, IN+45, IN+46, OUT+25, OUT+27 , OUT+29, OUT+39, OUT+40, OUT+42, OUT+43, OUT+44, CUR+49, CUR+51, CUR+59, CUR+60 , CUR+61, CUR+63, CUR+64, CUR+76, CUR+77, CUR+83, CUR+90, CUR+94, CUR+113, CUR+141 , CUR+142, CUR+148, CUR+150, CUR+151, CUR+172, CUR+173, CUR+174, GETFLAGS+10, GETFLAGS+16, PYR+12 , PYR+18 |
VAL | GETFLAGS+9~, GETFLAGS+16*, GETFLAGS+18 |
VALUE | EN+2~ |
XDT | CUR+40~, CUR+158*, CUR+159*, CUR+160 |
Z | GETFLAGS+9~, GETFLAGS+14*, GETFLAGS+17*, GETFLAGS+18 |
>> ZTQUEUED | EN+4, IN+24, OUT+23, CUR+48, CUR+75, CUR+86, CUR+110, CUR+162 |
>> ZTSTOP | EN+16, EN+18, IN+16, IN+18, IN+20, IN+22, IN+24*, IN+49, OUT+19, OUT+21 , OUT+23*, OUT+46, CUR+46, CUR+48*, CUR+67, CUR+71, CUR+73, CUR+75*, CUR+79, CUR+84 , CUR+86*, CUR+104, CUR+108, CUR+110*, CUR+154, CUR+159, CUR+160, CUR+162*, CUR+176 |