IBTRKR41 ;ALB/AAS - CLAIMS TRACKING - ADD/TRACK OUTPATIENT ENCOUNTERS ;13-AUG-93
Source file <IBTRKR41.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OPCHK | ; -- check and add rx
|
|
| OPCHKQ | ||
| BULL | ; -- send bulletin
|
|
| BULLQ | ||
| CL(IBOEDATA,IBR) | ; check out classification questions for encounter
; this new check will look at the V POV level then to the Visit level ; as necessary to determine if it relates or not. This will indicate ; if the WHOLE visit is not billable, otherwise it will say it is ; (even if just part is billable). ; call with the zero node of 409.68 in IBOEDATA ; assumes DFN and IBDT defined ; pass in IBR by ref to get values back |
|
| CLQ | ||
| RNB(IBDATA,IBARR) | ; find rnb's
; pass in PCE 800 data (visit or v pov) to find any reasons not billalbe ; IBARR = classifications that could apply to patient ; the RNB number returned is from the IBARR number (SDCO21 array) |
|
| REL(IBRNB) | ; kills of tmp if related and set IBRMARK
|
|
| CLDATA | ; classification data
; format is: SCDO21 array^vpov/vcpt/visit 800 piece^reason not billable |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
