IBDFOSG ;ALB/MAF/AAS - SCANNED EF FOR OUTPATIENTS WITH BILLS GENERATED REPORT ;8/21/95
Source file <IBDFOSG.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
DATE | ; -- select date
|
|
DEV | ; -- select device, run option
|
|
DQ | ||
END | ; -- Clean up
|
|
; -- print one billing report
; Data sorted into ^tmp arrays ; := ^tmp("mccr",$j) = ; Clinic Totals := ^tmp("ctot",$j,division,clinic)= ; Division Totals := ^tmp("dtot",$j,division) = ; Grand Totals := ^tmp("gtot",$j) = |
||
PR | ||
ONECL | ; -- Print one clinics data
|
|
ONEDV | ; -- Print Division totals
|
|
LINE(NAME,IBX) | ;
; -- print detail line ; input Name := text to be printed ; ibx ;= 9 piece global node containing data |
|
HDR | ; -- Print header for billing report
|
|
QUIT | ||
DASH | ||
DIVH | ; -- Write division header
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|