IBCRLI ;ALB/ARH - RATES: DISPLAY CHARGE ITEMS ; 16-MAY-1996
Source file <IBCRLI.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN | ; -- main entry point for IBCR CHARGE ITEM
 | 
|
| HDR | ; -- header code
 | 
|
| INIT | ; -- init variables and list array  IBCSFN required
 | 
|
| HELP | ; -- help code
 | 
|
| EXIT | ; -- exit code
 | 
|
| BLD | ; build array for display for Charge Item display: charge set required
 | 
|
| DATE(X) | ; date in external format
 | 
|
| SET(X) | ; set up list manager screen array
 | 
|
| SORTCI(IBCSFN,IBITM,IBDT1,IBDT2) | ; sort a charge sets items by item name and inverse effective date
 ; if ITEM is not defined than dates should be, if ITEM or dates not defined then assumes all should be included ; ^TMP("IBCRCI",$J, item name, - effective date, ITEM IFN)=""  | 
|
| GET(IBCSFN) | ; get item to display on screen for specific charge set, set up general variables required
 ; (returns 0 if error, -1 if ^) all active bedsections or all entries for a specific CPT or NDC #  | 
|
| GETQ | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  |