SCCVEGU1 ;ALB/TMP - UTILS FOR ENCNTR CNVRSN GLBL ESTMTR;20-JAN-1998
Source file <SCCVEGU1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INCRTOT(SCTOT,INCRWHAT,HOWMUCH) | ;Update local counters for estimate
; SCTOT -- The array containing the running estimate totals ; Subcripted by the piece it is stored on in the CST's node 2 ; INCRWHAT -- The piece of the CST 2-node that stores the correspnding count ; 1 = Add/edits (Default) ; 2 = Ancillaries ; 3 = Appointments ; 4 = Credit stops ; 5 = Dispositions ; 7 = Encounters and Visits ; 8 = Visits only ; 9 = # V-Providers ; 10 = # V-Diagnoses ; 11 = # V-Procedures ; HOWMUCH -- The amount to add to the existing total |
|
| UPDTOTL(PTRLOG,SCTOT) | ;UPDATE CST WITH ESTIMATE TOTALS
|
|
| ESTGROW(ARRAY) | ;RETURN ESTIMATED GLOBAL GROWTH FOR AFFECTED GLOBALS
|
|
| FACTOR() | ; -- determine block factor (1 := 1024/dsm 2 := 2048/openm)
|
|
| BLKSIZE() | ; -- determine block size
|
|
| PER(EST) | ; -- adjust 'per' record size for os
|
|
| SCE() | ; -- encounter
|
|
| SCEUPD() | ; -- encounter update only
|
|
| AUPNVSIT() | ; -- visit file
|
|
| AUPNVPRV() | ; -- providers
|
|
| AUPNVPOV() | ; -- dx
|
|
| AUPNVCPT() | ; -- cpts
|
