IBOHLS1 ;ALB/BAA - IB HELD CHARGES LIST MANAGER ;08-SEP-2015
Source file <IBOHLS1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SORT | ; get the data
|
|
| CHRGS(IBN,PATS) | ; charges on hold
|
|
| INST(RF) | ; figure out where performed
|
|
| PAT | ; patient name
|
|
| BILLS | ; find bills for charges on hold
|
|
| INP | ; inpatient bills
|
|
| INPTCK | ; does bill belong to charge? returns IBOK=0 if no
|
|
| CK1 | ; for same patient?
|
|
| CK2 | ; same type- inp or opt?
|
|
| CK3 | ; overlap in date range?
|
|
| CK4 | ; insurance bill?
|
|
| OTP | ; outpatient bills
|
|
| RX | ; rx refill bills
|
|
| GETINS | ; get insurance information
|
|
| SETINS(PLNCOV,PEFDT,PCOVD,PCOM,IBCNT) | ; SET GLOBAL ENTRY
|
|
| SETCOV(PCOM) | ; SET COVERAGE WHEN MULTIPLE
|
| FileNo | Call Tags |
|---|---|
| ^IBT(356 - [#356] | GET1^DIQ |
| ^DGCR(399 - [#399] | GET1^DIQ |
| ^DIC(4 - [#4] | FIND^DIC |
| ^DG(40.8 - [#40.8] | GET1^DIQ |
| ^DGPM - [#405] | GET1^DIQ |
| ^SCE - [#409.68] | GET1^DIQ |
| ^DIC(42 - [#42] | GET1^DIQ |
| ^PRCA(430 - [#430] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
| ^DGPT - [#45] | GET1^DIQ |
| ^PSRX - [#52] | GET1^DIQ |
| ^PS(59 - [#59] | GET1^DIQ |
