IBJDB11 ;ALB/CPM - BILLING LAG TIME REPORT (COMPILE) ; 27-DEC-96
Source file <IBJDB11.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 2 | $$DIV^IBJDF2 $$STOP^IBOUTL |
| Accounts Receivable | 1 | $$CLO^PRCAFN |
| Kernel | 1 | $$FMDIFF^XLFDT |
| Registration | 1 | $$PRIM^VASITE |
| 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 | ; - Entry point from IBJDB1.
|
|
| REV | ; - Review all claims in file #399.
|
|
| INIT(X) | ; - Initialize summary accumulators/detail division nodes.
|
|
| AUTH(IBN) | ; - Is this an authorized claim?
; Input: IBN=Pointer to the AR in file #430 ; Output: VAL=1^2^3^4^5, where: ; 1=1-Authorized claim ; 0-Not an authorized claim ; 2=Date AR was authorized ; 3=Date AR was activated ; 4=AR first payment date ; 5=Date AR was closed |
|
| FP | ; - Get first payment date, if available.
|
|
| DC | ; - Get date AR closed.
|
|
| AUTHQ | ||
| DL(X,X1) | ; - Is line item date valid for report?
; Input: X=Line item number (or 0), X1=Line item date ; Output: 1=valid, 0=invalid ; *Requires pre-defined variables IBBDT, IBEDT, and IBSEL |
|
| DLQ | ||
| PTF(X) | ; - Get most recent PTF transmission date.
; Input: X=IEN of PTF file entry. ; Output: Y=PTF date. |
|
| PTFQ | ||
| CL(IBN) | ; - Get the clinics for bill.
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(40.8 - [#40.8] | EN+5 |
| ^DGCR(399 - [#399] | REV+1, REV+24, REV+27, REV+29, REV+31, AUTH+14, CL+2, CL+3 |
| ^DGP(45.83 - [#45.83] | PTF+4, PTF+5, PTF+6 |
| ^DGPM("APTT3" | REV+40 |
| ^DGPT - [#45] | REV+39 |
| ^DPT - [#2] | REV+23, REV+24 |
| ^IBT(356 - [#356] | REV+52 |
| ^PRCA(430 - [#430] | REV+4, REV+7, AUTH+17, AUTH+18, AUTH+19, FP+1 |
| ^PRCA(433 - [#433] | FP+2, FP+3 |
| ^SCE - [#409.68] | REV+51, REV+53 |
| ^SCE("ADFN" | REV+47, REV+48 |
| ^TMP("IBJDB1" | REV+105*, INIT+1* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D | REV+64! |
| D( | REV+89, REV+90, REV+97, REV+98 |
| D(0 | REV+69*, REV+70 |
| D(1 | REV+74*, REV+76, REV+78 |
| D(2 | REV+82* |
| D(3 | REV+86* |
| D(4 | REV+94* |
| D(5 | REV+94* |
| D(6 | REV+86* |
| >> DFN | REV+23*, REV+24, REV+40, REV+47, REV+48 |
| I | PTF+3~, PTF+5*, PTF+6, PTF+7*, CL+1~, CL+2*, CL+3 |
| >> IBAUTH | REV+10*, REV+23, REV+53, PTF+6 |
| >> IBBDT | DL+5, DL+6 |
| >> IBBN | REV+103*, REV+104 |
| >> IBCHK | REV+44, REV+46*, REV+54*, REV+56 |
| IBCL | REV+44!, CL+1! |
| IBCL( | REV+51, CL+3* |
| IBCL1 | REV+44!, REV+51* |
| >> IBCT( | REV+106*, INIT+2*, INIT+3* |
| >> IBDAT | REV+23*, REV+56 |
| >> IBDCHK | REV+61*, REV+62 |
| >> IBDFN | REV+23*, REV+105 |
| >> IBDIV | REV+13*, REV+14*, REV+15, REV+105, REV+106 |
| IBDR | REV+27!, REV+32 |
| IBDR( | REV+28*, REV+30*, REV+31*, REV+35 |
| >> IBEDT | DL+5, DL+6 |
| IBN | REV+1*, REV+2, REV+4, REV+7, REV+10, REV+14, REV+24, REV+27, REV+29, REV+31 , REV+45, AUTH~, AUTH+11, AUTH+14, AUTH+17, AUTH+18, AUTH+19, FP+1, FP+2, DC+1 , CL~, CL+2, CL+3 |
| >> IBN0 | REV+1*, REV+5, REV+6, REV+17, REV+20, REV+23, REV+39, REV+103 |
| >> IBNU | REV+27*, REV+28, REV+30 |
| IBPAY | AUTH+10~, FP+2*, FP+6* |
| >> IBPOL | REV+24*, REV+57 |
| >> IBPOL1 | REV+57*, REV+76, REV+88, REV+96, REV+103 |
| >> IBPTF | REV+20*, REV+56 |
| >> IBQ | REV+1, REV+2* |
| >> IBRPT | EN+3, REV+70, REV+76, REV+78, REV+82, REV+89, REV+90, REV+97, REV+98, REV+102 , INIT+1 |
| >> IBSEL | EN+3*, DL+6 |
| >> IBSEL1 | REV+64*, REV+70*, REV+76*, REV+78*, REV+82*, REV+89*, REV+90*, REV+97*, REV+98*, REV+101 |
| >> IBSORT | EN+4, REV+13, REV+15 |
| IBT | AUTH+10~, FP+2*, FP+3 |
| IBT0 | AUTH+10~, FP+3*, FP+4 |
| IBT1 | AUTH+10~, FP+3*, FP+5, FP+6 |
| >> IBTL( | REV+106*, INIT+2*, INIT+3* |
| >> IBTY | REV+17*, REV+20, REV+28, REV+38, REV+44, REV+56, REV+69, REV+74, REV+87, REV+95 , REV+105, REV+106 |
| >> IBX | REV+35*, REV+40, REV+46, REV+47, REV+56 |
| >> IBX1 | REV+39*, REV+40*, REV+46*, REV+47*, REV+48, REV+56 |
| >> IBX2 | REV+48*, REV+51, REV+52, REV+53 |
| >> IBX3 | REV+53*, REV+54 |
| J | PTF+6*, CL+1~, CL+3* |
| K | PTF+3~ |
| K( | PTF+6*, PTF+7 |
| U | REV+4, REV+5, REV+6, REV+7, REV+17, REV+20, REV+23, REV+24, REV+28, REV+30 , REV+39, REV+51, REV+52, REV+53, REV+56, REV+61, REV+65, REV+70, REV+76, REV+78 , REV+82, REV+89, REV+90, REV+97, REV+98, REV+103, REV+104, REV+105, AUTH+14, AUTH+17 , AUTH+18, AUTH+19, FP+1, FP+4, FP+5, FP+6, DC+1, DC+4, PTF+6, CL+3 |
| VAL | AUTH+10~, AUTH+11*, AUTH+14*, AUTH+17*, AUTH+18*, AUTH+19*, FP+6*, DC+1*, DC+4*, AUTHQ |
| >> VAUTD | EN+5, REV+15 |
| >> VAUTD( | EN+5, REV+15 |
| X | EN+3*, EN+5*, REV+7*, REV+28*, REV+30*, REV+31*, REV+56*, REV+57, REV+61, REV+65 , REV+86, REV+89, REV+90, REV+94, REV+97, REV+98, INIT~, INIT+1, INIT+2, INIT+3 , AUTH+10~, AUTH+14*, AUTH+17*, AUTH+18*, AUTH+19*, FP+6*, DC+1*, DL~, DL+5, DL+6 , PTF~, PTF+4, PTF+5 |
| X1 | DL~, DL+4, DL+5, DL+6 |
| >> X2 | DL+4*, DL+5*, DL+6*, DLQ |
| Y | REV+61*, REV+64!, REV+65*, REV+68, REV+73, REV+81, REV+85, REV+101*, INIT+2*, INIT+3* , PTF+3~, PTF+4*, PTF+7*, PTFQ |
| Y( | REV+70*, REV+76*, REV+78*, REV+89*, REV+90*, REV+97*, REV+98*, REV+104*, REV+105, REV+106 |
| Y(9 | REV+82* |
| >> Y1( | REV+104*, REV+105 |
| Z | REV+64!, REV+69*, REV+70, REV+74*, REV+75, REV+76, REV+77, REV+78, REV+87*, REV+88 , REV+90, REV+95*, REV+96, REV+98, REV+101*, REV+104, REV+105, REV+106 |
| Z(1 | REV+65*, REV+69, REV+70, REV+73, REV+74, REV+76, REV+78, REV+82, REV+86, REV+89 , REV+90, REV+94, REV+97, REV+98 |
| Z(2 | REV+65*, REV+68, REV+69, REV+70, REV+74, REV+75, REV+76, REV+78, REV+81, REV+82 , REV+85, REV+86, REV+87, REV+89, REV+90, REV+93, REV+94, REV+95, REV+97, REV+98 |
| >> Z1 | REV+76*, REV+77, REV+88*, REV+89, REV+90, REV+96*, REV+97, REV+98 |
| >> Z2 | REV+78*, REV+88*, REV+89, REV+90, REV+96*, REV+97, REV+98 |
| >> Z3 | REV+90*, REV+98* |