IBTRC3 ;ALB/AAS - CLAIMS TRAINING INS. REV DEFAULTS ; 29-SEP-93
Source file <IBTRC3.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 3 | ALL^IBCNS1 $$AP^IBTODD1 $$EXPAND^IBTRE |
| List Manager | 1 | $$SETFLD^VALM1 |
| 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 | 6 | IBJTRA1 IBT ACTION INFO IBT CONTACT INFO IBT QUICK EDIT IBTRC ^IBT(356.2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LAST(IBTRN,IBTRC) | ; -- return last insurance review
; -- Input IBTRN = claims tracking id ; IBTRC = ins. review being edited (option) ; (if hip is defined for ibtrc will use last review ; for that policy) |
|
| LASTQ | ||
| HIP(IBTRC) | ; -- compute default health insurance policy for claims tracking
; -- called by trigger on patient field (.05) of file 356.2 ; -- output pointer to subfile (2.312)^insurnace co name |
|
| HIPQ | ||
| HIPD(DA,IBTLST) | ; -- compute default health insurance policy from last review
; -- called from input templates ; input da = current entry being edited ; ibtlst = last entry for this review as determine by $$LAST |
|
| HIPDQ | ||
| PC(DA,IBTLST) | ; -- compute default person contacted from last review
; -- called from input templates ; input da = current entry being edited ; ibtlst = last entry for this review as determine by $$LAST |
|
| MC(DA,IBTLST) | ; -- compute default method of contact from last review
; -- called from input templates ; input da = current entry being edited |
|
| CP(DA,IBTLST) | ; -- compute default contact phone number from last review
; -- called from input templates ; input da = current entry being edited ; ibtlst = last entry for this review as determine by $$LAST |
|
| AN(DA,IBTLST) | ; -- compute default authorization number policy (call ref default removed with *458)
; -- called from input templates ; input da = current entry being edited ; ibtlst = last entry for this review as determine by $$LAST |
|
| APPEAL | ; -- called from IBTRC, needed more room to compute
; info if an appeal |
|
| TPE() | ; -- add appeal type to type of action
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(36 - [#36] | HIP+15, HIPDQ |
| ^DPT - [#2] | HIPDQ |
| ^IBT(356 - [#356] | HIP+7 |
| ^IBT(356.2 - [#356.2] | LAST+9, LAST+10, LAST+11, LAST+12, HIP+5, HIP+7, HIPD+6, HIPD+8, PC+5, MC+7 , CP+5, AN+5, APPEAL+4 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | HIP+7, HIPD+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | HIPD~, HIPD+6, PC~, MC~, CP~, AN~ |
| DAYS | APPEAL+2~*, APPEAL+4*, APPEAL+5 |
| DFN | HIP+3~, HIP+5*, HIP+6, HIP+8, HIPD+5~, HIPD+8*, HIPDQ |
| DT | HIP+7 |
| IBDD | HIP+3~ |
| IBDD( | HIP+14, HIP+15 |
| IBDD(0 | HIP+9, HIP+12 |
| >> IBETYP | TPE+2 |
| IBHIP | LAST+6~, LAST+9*, LAST+11, LAST+12 |
| IBINDT | HIP+3~, HIP+7*, HIP+8 |
| IBQUIT | LAST+6~, LAST+7*, LAST+10, LAST+11, LAST+12* |
| IBTLST | HIPD~, HIPD+7, HIPD+8, PC~, PC+5, MC~, MC+7, CP~, CP+5, AN~ , AN+5 |
| IBTRC | LAST~, LAST+9, LAST+10, HIP~, HIP+5, HIP+7, APPEAL+4 |
| >> IBTRCD | APPEAL+3, APPEAL+4, TPE+3 |
| IBTRN | LAST~, LAST+8, LAST+10, LAST+11 |
| >> IBX | HIP+13*, HIP+14* |
| U | HIP+7 |
| X | LAST+6~, LAST+10*, LAST+11, HIP+3~, HIP+4*, HIP+9*, HIP+12, HIP+14*, HIP+15*, HIPQ , HIPD+5~, HIPD+6*, HIPD+8*, HIPDQ, MC+6~, MC+7*, MC+8, APPEAL+3*, APPEAL+5*, APPEAL+6* , TPE+1~, TPE+2*, TPE+3*, TPE+4 |
| Y | LAST+6~, LAST+7*, LAST+11*, LAST+12, LASTQ |