IBOVOP1 ;ALB/RLW-Report of Visits for NSC Outpatients ;12-JUN-92
Source file <IBOVOP1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| MAIN(IBQUERY) | ; perform report for day(s)
 ; IBQUERY = the query object to use to search for outpt encounters ; if not a valid #, a new QUERY will be created  | 
|
| END | ||
| IBCBK(IBENC,IBENCZ,IBCK) | ;
 | 
|
| OPTENC(IBOE,IBOE0) | ; Extract outpatient encounter
 | 
|
| CKENC(IBOE,IBOE0,IBSEQ) | ;
 | 
|
| FLD1(DFN) | ; get patient name, l-4 ssn id, classification, insured?
 | 
|
| FLD3(Y,IBMID) | ; time - convert date/time to time only, no seconds
 | 
|
| FLD5(I) | ; get appointment type name
 | 
| FileNo | Call Tags | 
|---|---|
| 2.101 | EXTERNAL^DILFD | 
| ^SCE - [#409.68] | EXTERNAL^DILFD |