IBJTU31 ;ALB/ARH - TPI UTILITIES - INS ; 2/14/95
Source file <IBJTU31.m>
| Package | Total | Call Graph |
|---|---|---|
| Accounts Receivable | 1 | DIQ^RCJIBFN2 |
| Integrated Billing | 1 | $$ZND^IBCNS1 |
| VA FileMan | 1 | ^DIR |
| 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 |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 5 | IBCNES2 IBJTLA1 IBJTLB1 IBJTNA IBJTNB |
| Accounts Receivable | 1 | RCRCUIB |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BPP(IBIFN,ARRAY) | ; returns array of patient policy info on all of a bill's carriers
; returns PPIFN ^ p/s/t ^ policy node from patient insurance record (2,.312), also adds correct group #/name |
|
| BPPQ | ||
| PST(IBIFN) | ; called by insurance screens ACTION PROTOCOL ENTRY ACTION code, allow user to choose which policy
; to display ins screens for default will be either the primary or last viewed ; IBPOLICY used by this procedure to define last viewed, must be killed when exiting primary screen (CI) |
|
| PSTQ | ||
| DBPOL(IBINS) | ; display patient policy info for all carriers of a bill, input array from BPP
|
|
| DBPOLQ | ||
| MINS(IBIFN) | ;Called by IBJT LIST TEMPLATE screens and RCRC LIST TEMPLATES
; Return true if Bill has multiple Insurance Policies |
|
| MINSQ | ||
| REF(IBIFN) | ;Called by IBJT LIST TEMPLATE screens
|
|
| REFQ |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | BPP+3, BPP+4, MINS+3 |
| ^DIC(36 - [#36] | DBPOL+6 |
| ^DPT - [#2] | BPP+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARRAY | BPP~, BPP+2!*, BPP+6* |
| ARRAY( | BPP+6* |
| DFN | BPP+2~, BPP+3*, BPP+7, BPP+10 |
| DIR | PST+12! |
| DIR("?" | PST+10* |
| DIR("A" | PST+12* |
| DIR("B" | PST+12* |
| DIR(0 | PST+11* |
| IBCDFN | BPP+2~, BPP+6*, BPP+10*, DBPOL+2~, DBPOL+6*, DBPOL+7 |
| IBCNS0 | DBPOL+2~, DBPOL+6*, DBPOL+7 |
| IBDFN | BPP+2~, BPP+6, BPP+7*, BPP+10 |
| IBDM | BPP+2~, BPP+4*, BPP+7, MINS+2~, MINS+3*, MINS+4 |
| IBGRP | BPP+2~ |
| IBI | BPP+2~, BPP+6*, BPP+7, DBPOL+2~, DBPOL+5*, DBPOL+6, DBPOL+7 |
| IBIFN | BPP~, BPP+3, BPP+4, PST~, PST+5, MINS~, MINS+3, REF~, REF+4, REFQ |
| IBINS | DBPOL~ |
| IBINS( | DBPOL+5, DBPOL+6 |
| >> IBPOLICY | PST+8*, PST+12, PST+13* |
| IBRDT | REF+2~, REF+3*, REF+4 |
| IBRDT(430 | REFQ |
| IBX | PST+4~, PST+5, PST+6, PST+7, PST+9, PST+11 |
| IBX( | PST+7, PST+13 |
| IBX(0 | PST+7, PST+8 |
| IBY | PST+4~*, PST+6*, PST+7*, PST+13*, PSTQ, MINS+2~*, MINS+4*, MINSQ |
| U | BPP+3, BPP+6, BPP+7, DBPOL+6, DBPOL+7, MINS+4 |
| X | PST+4~, REF+2~ |
| Y | PST+4~, PST+13 |