VPSRPC16 ;BPOIFO/EL,WOIFO/BT - Patient Demographic (continue);07/31/14 13:07
Source file <VPSRPC16.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
GETDEM(VPSARR,DFN) | ;given DFN, returns the patient demographics, insurance, and up-coming appointments.
; OUTPUT ; VPSARR - passed in by reference; this is the output array to store patient demographics ; INPUT ; DFN - patient DFN (This value must be validated before calling this procedure) |
|
DEM(VPSARR,DFN) | ; Store Patient Demographic Data
; -- Store patient DFN |
|
SENLOG(VPSARR,DFN) | ; Check Patient Sensitive Record File-38.1
|
|
ELIG(VPSARR,DFN) | ; Eligibily
|
|
INP(VPSARR,DFN) | ;
|
|
ENR(VPSARR,DFN) | ; Enrollment
|
|
ADD(VPSARR,DFN) | ; Addresses
|
|
SETPERM(VPSARR,DFN,VAPA) | ; PERM ADDRESS
|
|
SETMP(VPSARR,DFN,VAPA) | ; SET TEMP ADD
|
|
SETCONF(VPSARR,DFN,VAPA) | ;Confindential address
|
|
OAD(VPSARR,DFN) | ; Other Patient Variables
|
|
SET(VPSARR,VPSFL,VPSIEN,VPSFLD,VPSDA,VPSDS) | ;Set line item to output array
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
2.001 | GET1^DIQ |
2.011 | GET1^DIQ |
^DGEN(27.11 - [#27.11] | GET1^DIQ |
^DGMT(408.31 - [#408.31] | GET1^DIQ |
^DIC(8 - [#8] | GET1^DIQ |