SDCED1 ;ALB/JCH - VSE ENCOUNTER XREF ; 19 Oct 14 04:11PM
Source file <SDCED1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(SDRPTAR,SDBEGRNG,SDENDRNG,SDNODE) | ;
|
|
| PROVIDER(SDBEGRNG,SDENDRNG,DTRANGE,SDNODE) | ; aggregate daily encounters by provider
|
|
| ENCOUNTR(SDACTDT,SDRPTYP,SDFAC,SDIV,SDCL,SDDT,SDPR,DTRANGE,SDNODE) | ; Get encounters from ^XTMP("SDVSE","DT"
|
|
| APPT(SDACTDT,SDRPTYP,SDFAC,SDIV,SDCL,SDDT,SDPAT,DTRANGE,SDNODE) | ; Get appointments from ^XTMP("SDVSE","DT"
|
|
| APPTG | ; Add data to groups "All" and SDGRP
|
|
| CLEAN(SDNODE) | ; Clean up
|
|
| CHKEST(DFN,BDATE,ENC,CLSTOP) | ; Was Patient DFN's encounter on date DATE considered Established or New?
|
|
| GETSCAT(SDLOC,SDSGNM,SDSGAR) | ||
| CLSTOP(SDLOC,CSTOP) | ; Get Clinic Stop
|
|
| STOPCAT(CLSTOP,CAT,STOPAR) | ; Get stop code category (Mental Health, Specialty, Primary)
|
|
| DIV(DIVINT) | ; convert internal division to external
|
|
| WEEKS(SDDT,WEEKS) | ; Get ending dates for 52 weeks
|
|
| GETDIV(CLINIC) | ; Return CLINIC's division from file 40.8
|
|
| AGGDT(SDBEGRNG,SDENDRNG,DTRANGE,SDNODE) | ; Aggregate Facility, Divisions, Clinics, Providers by Date
|
|
| AGGSET(SDGLOB,DTNAM,PRVND) | ; Perform generic aggregation of Pn values into SDGLOB
; Encounter data stored in @SDGLOB |
|
| GRP(LOC,GROUP) | ; Get clinic groups
; Look in Clinic Group for now, until Medsphere code is available |
|
| GETWEEK(SDDT,SDWEEKS) | ; Return the week-ending date for date SDDT
|
|
| GETQUART(SDDT) | ||
| SUPPLY(SDNODE,DTINC,SDRPTYP,SDDT,SDFAC,SDIV,SDCL,SUPPLY) | ; Get Supply
|
