IBOTR2 ;ALB/CPM - INSURANCE PAYMENT TREND REPORT - COMPILATION ;5-JUN-91
Source file <IBOTR2.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 |
|---|---|---|
| ENQ | ||
| COMP | ; - Compile Bill-Accounts Receivable records for report.
; IB*752/DTG - new var for insurance company range check |
|
| CANC | ; - Keep cancelled bills if CANCEL BILL? field was selected or answer
; to 'Do you want to include cancelled receivables?' prompt was YES. |
|
| PTDE | ; - Perform Printed/Treatment date edits.
|
|
| BUILD | ; - Retrieve A/R data and build sort global.
|
|
| SORT | ; - Create sort global based on amount owed/amount paid, if necessary. Add Group# w/ p447
|
|
| NAMAGE(DFN,EVT) | ; - Return patient name and age.
; Input: DFN = Pointer to patient in file #2 ; EVT = Event Date of claim ; Output: Patient name (1st 18 chars.)_"("_Age_")" ; Output after patch 447: Patient name (1st 16 chars.)_"("_Age_")" |
|
| PTIN(IBDA) | ; Retrieve Payer TIN for insurance company
|
| Name | Field # of Occurrence |
|---|---|
| ^%DTC | NAMAGE+8 |
| ^%ZISC | ENQ+2 |
| EN^DIQ1 | PTDE+9 |
| $$POLICY^IBCEF | BUILD+6 |
| E^IBJDE | IBOTR2+9 |
| $$DIV^IBJDF2 | COMP+8 |
| $$EEOB^IBOA31 | COMP+15 |
| EN^IBOTR3 | IBOTR2+17, IBOTR2+18 |
| $$STOP^IBOUTL | IBOTR2+13 |
| $$CLO^PRCAFN | COMP+19 |
| $$ORI^PRCAFN | BUILD+2 |
| $$STA^PRCAFN | COMP+21 |
| $$TPR^PRCAFN | BUILD+3 |
| $$PRIM^VASITE | COMP+8 |
| $$UP^XLFSTR | COMP+33, PTDE+15 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(40.8 - [#40.8] | IBOTR2+18 |
| ^DGCR(399 - [#399] | IBOTR2+12, COMP+4, COMP+25, CANC+9, PTDE+3 |
| ^DIC(36 - [#36] | COMP+25 |
| ^DPT - [#2] | NAMAGE+6 |
| ^IBM(361.1 - [#361.1] | PTIN+6, PTIN+8 |
| ^PRCA(430 - [#430] | COMP+12, CANC+10 |
| ^TMP($J | IBOTR2+11!, ENQ+2!, BUILD+8*, BUILD+11*, SORT+4, SORT+5, SORT+6, SORT+8* |
| Name | Field # of Occurrence |
|---|---|
| ^("S" | CANC+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | ENQ+1!, PTDE+8* |
| DFN | ENQ+1!, COMP+17*, BUILD+8, NAMAGE~, NAMAGE+6 |
| DIC | ENQ+1!, PTDE+8* |
| DIQ | ENQ+1!, PTDE+8*, PTDE+9! |
| DIQ(0 | PTDE+8* |
| DPT0 | NAMAGE+5~, NAMAGE+6*, NAMAGE+10 |
| DR | ENQ+1!, PTDE+8* |
| DT | NAMAGE+8 |
| EVT | NAMAGE~, NAMAGE+8 |
| IB | ENQ+1!, PTDE+8!, PTDE+10*, PTDE+11, PTDE+12, PTDE+15*, PTDE+16, PTDE+18 |
| IB(399 | PTDE+9*, PTDE+10 |
| >> IBAF | CANC+12, PTDE+5, PTDE+8, PTDE+9, PTDE+10, PTDE+15 |
| >> IBAFD | PTDE+8, PTDE+9 |
| >> IBAFF | PTDE+10, PTDE+13, PTDE+16, PTDE+18 |
| >> IBAFFO | PTDE+18 |
| >> IBAFL | PTDE+13, PTDE+16, PTDE+18 |
| >> IBAFLO | PTDE+18 |
| >> IBAFZ | PTDE+11, PTDE+12 |
| IBAO | ENQ+1!, BUILD+2*, BUILD+8, BUILD+11 |
| IBAP | ENQ+1!, BUILD+3*, BUILD+8, BUILD+11 |
| >> IBARST | COMP+19 |
| IBBC | ENQ+1!, COMP+17*, COMP+18, COMP+22 |
| >> IBBDT | PTDE+2, PTDE+4 |
| >> IBBN | COMP+17*, COMP+18*, COMP+20*, BUILD+8 |
| >> IBBRN | COMP+22 |
| >> IBBRT | COMP+18 |
| >> IBBRTY | COMP+22*, BUILD+8, BUILD+11 |
| >> IBCANC | CANC+11 |
| IBCFL | ENQ+2!, CANC+2*, CANC+11*, BUILD+8 |
| >> IBCNC | CANC+10*, CANC+11, CANC+12 |
| IBCNT | ENQ+1! |
| >> IBD | COMP+4*, COMP+17, COMP+21*, COMP+25*, COMP+26, COMP+27, COMP+28, CANC+7, CANC+9*, CANC+11 , CANC+12, PTDE+1, PTDE+3* |
| IBDA | IBOTR2+12*, IBOTR2+13, ENQ+1!, COMP+4, COMP+8, COMP+12, COMP+15, COMP+19, COMP+21, COMP+25 , CANC+5, CANC+9, CANC+10, PTDE+3, PTDE+8, PTDE+9, PTDE+10, BUILD+2, BUILD+3, BUILD+6 , PTIN~, PTIN+5, PTIN+6 |
| IBDBC | ENQ+1!, COMP+19*, COMP+20, COMP+21*, BUILD+8 |
| >> IBDF | PTDE+2, PTDE+4 |
| IBDIV | IBOTR2+18*, ENQ+2!, COMP+7*, COMP+8*, COMP+9, BUILD+8, BUILD+11, SORT+3*, SORT+4, SORT+5 , SORT+6, SORT+8 |
| IBDP | ENQ+1!, PTDE+1*, PTDE+2, BUILD+8 |
| >> IBEDT | PTDE+2, PTDE+4 |
| IBEVT | ENQ+2!, COMP+17*, BUILD+8 |
| IBGRP | BUILD+1~, BUILD+6*, BUILD+8, BUILD+11, SORT+1~, SORT+6*, SORT+8 |
| >> IBIC | COMP+28, COMP+30 |
| >> IBICF | COMP+27, COMP+31 |
| >> IBICFU | COMP+35 |
| >> IBICL | COMP+31 |
| >> IBICLU | COMP+35 |
| >> IBICPT | COMP+26 |
| >> IBICPT( | COMP+26 |
| IBINCKN | COMP+2~*, COMP+33*, COMP+35 |
| >> IBINRC | COMP+12 |
| >> IBINS | COMP+25*, COMP+29*, COMP+33, CANC+7*, BUILD+8, BUILD+11, SORT+5*, SORT+6, SORT+8 |
| IBPFLAG | ENQ+2!, COMP+15*, COMP+20 |
| IBPTIN | ENQ+2!, CANC+5*, CANC+6*, CANC+7 |
| IBQUIT | IBOTR2+11*, IBOTR2+12, IBOTR2+13*, IBOTR2+16, IBOTR2+18, ENQ+2! |
| >> IBRT | IBOTR2+12 |
| IBSCF | ENQ+1!, PTDE+3*, PTDE+4, BUILD+8 |
| IBSCT | ENQ+1!, PTDE+3*, PTDE+4, BUILD+8 |
| >> IBSDIV | IBOTR2+17, COMP+7, COMP+9, SORT+3 |
| >> IBSORT | IBOTR2+17, IBOTR2+18, BUILD+9, BUILD+11 |
| IBTIN | PTIN+3~, PTIN+4*, PTIN+5, PTIN+7, PTIN+9*, PTIN+10 |
| IBVAL | PTIN+3~, PTIN+8*, PTIN+9 |
| IBX | SORT+4*, SORT+5, SORT+6, SORT+8, SORT+9! |
| >> IBXTRACT | IBOTR2+9 |
| IBXX | SORT+8*, SORT+9! |
| U | COMP+12, COMP+17, COMP+21, COMP+25, CANC+10, CANC+11, CANC+12, PTDE+1, PTDE+3, BUILD+8 , NAMAGE+6, NAMAGE+10 |
| >> VAUTD | IBOTR2+18, COMP+9 |
| >> VAUTD( | IBOTR2+18, COMP+9 |
| X | NAMAGE+5~, NAMAGE+7*, NAMAGE+8*, NAMAGE+10 |
| X1 | NAMAGE+5~, NAMAGE+8* |
| X2 | NAMAGE+5~, NAMAGE+6*, NAMAGE+7 |
| Z | PTIN+3~, PTIN+4*, PTIN+6*, PTIN+7, PTIN+8 |
| >> ZTQUEUED | ENQ |
| >> ZTREQ | ENQ* |