SCCVPCE ;ALB/TMP - Send data to PCE; [ 01/28/98 10:19 AM ]
Source file <SCCVPCE.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DATA2PCE(SDOE,SCCONS,SCCVEVT,SCOEP,SCDTM,SCDA,SCEST) | ; -- send data to pce
|
|
| DATAQ | ||
| BUILD(SDPROV,SDDX,SDCLASS,SDCPT,SDATA,SPDATA,DFN,SDVST) | ; -- bld pce data arrays
|
|
| BUILDQ | ||
| SET(SDOE,ARRAY,FILE) | ;Set-up Array for Outpatient Encounter
; Input -- SDOE Outpatient Encounter IEN ; Output -- ARRAY Provider or dx Array Subscripted by ien |
|
| PROC(SDOE,SCDTM,SCDA,SCCVEVT,SCDXARRY) | ;
; SDOE = encounter ien ; SCDTM = if estimating and no enctr, dt/tm of the new encounter [opt] ; SCDA = if estimating and no enctr, 'CS' node entry [opt] ; SCCVEVT = conversion event ; SCDXARRY = name of array to return |
|
| PROCQ | ||
| GETPROC(CNT,ENC,SDVDT,EXTREF,SCDXARRY) | ;Get procedures from Scheduling Visits file
|
|
| PRNODE(SDVDT,SUB,SCDXARRY) | ; Extract data for procs from SDV's 'PR' node
; SDVDT -- SDV entry ien ; SUB -- 'CS' node entry ien ; SCDXARRY -- the name of the array to return for the entry ; SCDXARRY(0)= the total # of procedure codes ; SCDXARRY(CPT code) = the total # of a particular CPT code |
|
| PRQ |
