IBDFOSG1 ;ALB/MAF/AAS - SCANNED ENCOUNTERS WITH BILLING DATA CONT. ; JUL 6 1995
Source file <IBDFOSG1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| START | ;  -- Loop thru clinics
 | 
|
| CHECK(CLIN) | ;
 ; -- Check to see if clinic has a form and its one that ; is not for future use only.  | 
|
| CK(XCL) | ;  -- Check clinic, division, form
 | 
|
| BLD | ; -- scan appts
 | 
|
| CK1 | ;  -- Check scheduling nodes, forms tracking, if scanned, 
 ; patient insured, bill entered, bill printed, ; avg time from encounter to printed bill.  | 
|
| SET | ;  -- Set counters in temp arrays
 ; Piece 1 := Number bills entered ; Piece 2 := Number bills generated ; Piece 3 := Number of forms scanned for patients with INS ; Piece 4 := Number of forms scanned ; Piece 5 := Number of days from encounter date to bill printed ; Piece 6 := amount billed (for unique bill) ; Piece 7 := amount received (for unique bills) ; Piece 8 := number of unique bills ; Piece 9 := Number of visit dates on bills in 8  | 
|
| INC(PIECE,VALUE) | ;
 ; -- increment counters,  |