IBJDF11 ;ALB/CPM - THIRD PARTY FOLLOW-UP REPORT (COMPILE) ;09-JAN-97
Source file <IBJDF11.m>
| 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 |
