IBJTU2 ;ALB/ARH - TPI UTILITIES ;6/6/03 1:05pm
Source file <IBJTU2.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PAT() | ; select patient, only allows patient's that have bills - returns DFN^NAME if patient selected, 0 otherwise
 | 
|
| BILL() | ; select bill, returns bill IFN^BILL NUMBER or 0 if none selected
 | 
|
| PB() | ; select either a patient name (must have a bill) or bill number
 ; if patient chosen: returns "1^"_DFN, if bill chosen: returns "2^"_IBIFN, 0 otherwise  | 
|
| PB1 | ||
| PBQ | ||
| RCANC(IBIFN,ARR,WDTH) | ; if bill cancelled returns ARR = IBIFN ^ PTR TO 200 ^ INITIALS OF WHO CANCELLED IN IB
 ; ARR(X) = REASON CANCELLED with line width passed in  | 
|
| RCANCQ | ||
| DR(DB,DE) | ; get a date range from the user, DB is default begin date (FM), DE is default end date
 ; returns "begin dt ^ end dt" in FM format, or "" if two valid dates are not entered  | 
|
| DRQ | 
| Name | Line Occurrences | 
|---|---|
| Function Call: READ | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^DPT - [#2] | Classic Fileman Calls | 
| ^DGCR(399 - [#399] | Classic Fileman Calls |