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 |