IBJDF11 ;ALB/CPM - THIRD PARTY FOLLOW-UP REPORT (COMPILE) ;09-JAN-97
Source file <IBJDF11.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 |
Package | Total | Caller Graph |
---|---|---|
Integrated Billing | 2 | IBJDF1 IBJDF2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
DQ | ; - Tasked entry point.
|
|
CHKARNUM(IBCAT) | ; Check for Reimbursable insurance
; |
|
ENQ | ||
ENQ1 | ||
INS(X) | ; - Find the Insurance company and decide to include the claim.
; Input: X=Pointer to the claim/AR in file #399/#430 ; plus all variable input in IBS* ; Output: Y=Insurance Company name and pointer to file #36 |
|
INSC | ||
INSQ | ||
PAT(X) | ; - Find the claim patient and decide to include the claim.
; Input: X=Pointer to the claim/AR in file #399/#430 ; plus all variable input in IBS* ; Output: Y=1^2^3^4^5, where ; 1 => sort key (name or last four) ; 2 => patient name ; 3 => patient ssn ; 4 => patient age ; 5 => patient pointer to file #2 |
|
PATC | ; - Find all patient data.
|
|
PATQ | ||
OTH(DFN,INS,DS) | ; - Find a patient's other valid insurance carrier (if any).
; Input: DFN=Pointer to the patient in file #2 ; INS=Pointer to the patient's primary carrier in file #36 ; DS=Date of service for validity check ; Output: Valid insurance carrier (1st 13 chars.) or null |
|
OTHQ |
FileNo | Call Tags |
---|---|
^PRCA(430.2 - [#430.2] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(40.8 - [#40.8] | DQ+4 |
^DGCR(399 - [#399] | DQ+14, DQ+24, DQ+56, DQ+57, DQ+59, INS+7, PAT+12 |
^DIC(36 - [#36] | INS+7, OTH+9 |
^DPT - [#2] | DQ+59, PAT+12, OTH+7 |
^IBA(362.4 - [#362.4] | DQ+25 |
^PRCA(430 - [#430] | DQ+7, DQ+16, DQ+34, DQ+42 |
^PRCA(433 - [#433] | DQ+67, DQ+68, DQ+74, DQ+79 |
^TMP("IBJDF1" | DQ+1!, DQ+63*, DQ+82*, ENQ! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AGE | PAT+10~, PATC+2*, PATC+3 |
COM | DQ+73!, ENQ1+1! |
COM( | DQ+79*, DQ+81, DQ+82 |
COM(0 | DQ+73* |
COM(1 | DQ+75*, DQ+76* |
COM1 | DQ+73!, ENQ1+1! |
COM1(1 | DQ+74*, DQ+75 |
COM1(2 | DQ+74*, DQ+75 |
DAT | DQ+70*, DQ+73, ENQ1+1! |
DFN | PAT+10~, PAT+12*, PAT+15, PAT+16, PATC+3, OTH~, OTH+6, OTH+7 |
DOB | PAT+10~, PATC+1*, PATC+2 |
DS | OTH~, OTH+6, OTH+10 |
DT | DQ+31, PATC+2 |
IBA | DQ+7*, DQ+9, DQ+14, DQ+16, DQ+24, DQ+25, DQ+31, DQ+34, DQ+38, DQ+42 , DQ+46, DQ+49, DQ+53, DQ+56, DQ+57, DQ+59, DQ+67, ENQ1! |
IBAR | DQ+16*, DQ+20, DQ+26, DQ+27, DQ+54, DQ+56, DQ+58, ENQ1! |
IBARD | DQ+31*, ENQ1! |
IBARNUM | DQ+20*, DQ+21, ENQ1+1! |
IBBU | DQ+57*, ENQ1! |
IBCAT | CHKARNUM~, CHKARNUM+2, CHKARNUM+5 |
IBDIV | DQ+37*, DQ+38*, DQ+39, DQ+63, DQ+82, ENQ1! |
IBIO | ENQ1! |
>> IBPFLAG | DQ+53*, DQ+56 |
IBQ | DQ+1*, DQ+7, DQ+9*, DQ+84, ENQ1! |
>> IBSAM | DQ+34 |
>> IBSD | DQ+4, DQ+37, DQ+39 |
>> IBSDATE | DQ+31 |
>> IBSEL | DQ+28, DQ+62, DQ+81 |
>> IBSH | DQ+66 |
>> IBSI | INS+8 |
>> IBSI( | INS+8 |
>> IBSIA | INS+10, INS+12 |
>> IBSIF | INS+9, INS+13, INS+14 |
>> IBSIL | INS+13, INS+14 |
>> IBSMN | DQ+31 |
>> IBSMX | DQ+31 |
>> IBSN | PAT+13 |
>> IBSNA | PAT+16, PAT+18 |
>> IBSNF | PAT+15, PAT+19, PAT+20 |
>> IBSNL | PAT+19, PAT+20 |
>> IBSRC | DQ+42 |
IBTYP | DQ+24*, DQ+25*, DQ+26*, DQ+27*, DQ+28, DQ+62, DQ+81, ENQ1+1! |
IBWBA | DQ+34*, DQ+63, ENQ1+1! |
IBWBN | DQ+56*, DQ+63, DQ+82, ENQ1! |
IBWDP | DQ+54*, DQ+63, DQ+82, ENQ1! |
IBWFR | DQ+57*, DQ+58, DQ+63, ENQ1+1! |
IBWIN | DQ+46*, DQ+58, DQ+63, DQ+82, ENQ1! |
IBWOR | DQ+58*, DQ+63, ENQ1+1! |
IBWPT | DQ+49*, DQ+58, DQ+59, DQ+63, DQ+82, ENQ1! |
IBWRC | DQ+42*, DQ+43*, DQ+63, ENQ1! |
IBWSC | DQ+58*, DQ+63, ENQ1+1! |
IBWSI | DQ+59*, DQ+63, ENQ1+1! |
IBWTO | DQ+57*, DQ+63, ENQ1+1! |
INS | OTH~, OTH+8 |
>> J | DQ+4* |
KEY | PAT+10~, PAT+13*, PAT+17, PAT+20, PATC+3 |
U | DQ+20, DQ+24, DQ+26, DQ+27, DQ+42, DQ+43, DQ+54, DQ+56, DQ+57, DQ+58 , DQ+59, DQ+63, DQ+69, DQ+70, DQ+74, DQ+82, INS+7, PAT+12, PAT+13, PATC+1 , PATC+3, OTH+10 |
VAUTD | DQ+4, DQ+39, ENQ1+1! |
VAUTD( | DQ+4*, DQ+39 |
X | DQ+62*, DQ+63, DQ+67*, DQ+68, DQ+74, DQ+79, DQ+82, ENQ1+2!, INS~, INS+6 , INS+7, PAT~, PAT+11, PAT+12, OTH+7*, OTH+8, OTH+9, OTH+10 |
X1 | DQ+73*, DQ+76*, DQ+79, DQ+81*, DQ+82, ENQ1+2!, OTH+9*, OTH+10 |
X2 | DQ+79*, DQ+81*, DQ+82, ENQ1+2! |
Y | DQ+68*, DQ+69, DQ+70, ENQ1+2!, INS+5~*, INSC*, INSQ, PAT+10~*, PAT+17*, PATC+3* , PATQ, OTH+6~*, OTH+7, OTH+10*, OTHQ |
Z | ENQ1+2!, INS+5~, INS+7*, INS+8, INS+9, INS+10, INSC, PAT+10~, PAT+12*, PAT+13 , PATC+1, PATC+3, OTH+7* |
Z1 | INS+5~, INS+7*, INS+11*, INS+14, INSC |
>> ZTQUEUED | ENQ+1 |
>> ZTREQ | ENQ+1* |