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 |
|