IBCSC4E ;ALB/ARH - ADD/ENTER PTF/OE DIAGNOSIS ;3/2/94
Source file <IBCSC4E.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DXINPT(IBIFN) | ; display and ask user to select PTF diagnosis
 | 
|
| PTFASK | ;
 | 
|
| PTFASK1 | ||
| PTF | ;
 | 
|
| ITPTF | ;
 | 
|
| PTFADD(IBIFN,LIST) | ;
 | 
|
| PTFDSP(IBIFN) | ; display PTF diagnosis within date range of the bill
 ; Output: ^TMP($J,"IBDX") as defined by PTFDXDT^IBCSC4F and ; ^TMP($J,"IBDX","S",x) = DIAGNOSIS w/x=selection identifer for a dx  | 
|
| DELALL(IBIFN) | ; ask/delete all diagnosis on a bill, including all CPT associated Diagnosis
 | 
|
| POAASK | ; POA edit
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^IBA(362.3 - [#362.3] | Classic Fileman Calls, GET1^DIQ |