PXRHS03 ;SLC/SBW - PCE Visit data immunization extract ;Sep 08, 2023@13:07
Source file <PXRHS03.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
IMMUN(DFN,PXFG,PXFILTER) | ;Administered immunizations
|
|
SETUP(GMTSMX,IHSDATE,PXVLST,PXOLD,PXNOINV) | ;Prepare for data extract
|
|
SCREEN(PXFILTER,PXVIMIEN,PXVCVX,PXVCNT,PXIMDT) | ;Filter entry based on criteria
|
|
GETSORT(PXFG,PXIMDT,PXIMMEXT,PXSNIMM,PXSORT,PXSORT2) | ;RETURN THE SORTING SUBSCRIPTS FOR ^TMP
|
|
GETENCLOC(PXVDATA) | ;Get encounter location data for extract
|
|
GETREM(PXSORT,PXSORT2,RNUM) | ;Get the remark data
|
|
GETVDATA(DA) | ;Get location of encounter and outside location from visit file
|
|
GETMDATA(DA) | ||
PUTIMMNAME(PXIMMIFN,PXGLOBAL) | ;Put full immunization name into output global
|
|
GETVIS(PXVI,PXVARRAY) | ;Get multiple VIS with edition date
; Input PXVI ien of IMMUNIZATION record ; Output PXVARRAY array of VIS names ^ edition dates |
|
CONREF(DFN,PXFG,PXFILTER) | ;Contraindicated and refused immunizations
|
|
FileNo | Call Tags |
---|---|
^GMT(142.1 - [#142.1] | GETS^DIQ |
^AUPNVICR - [#9000010.707] | GETS^DIQ |
^PXV(920.4 - [#920.4] | GETS^DIQ |