TITLE | VALUE | |
---|---|---|
NAME | VIAB GETDEM | |
DESCRIPTION | CALLS VADPT WITH DFN AND RETURNS AN ARRAY WITH PATIENT DEMOGRAPHIC DATA : Using GLOBAL ARRAY with $NA returning the ^TMP global reference. See PIMS manual for details of the ^VADPT API call. | |
TAG | GETDEM | |
ROUTINE | VIABRPC3 | |
INPUT PARAMETERS | SEQUENCE NUMBER | 1 |
INPUT PARAMETER | DFN | |
DESCRIPTION | DFN = PATIENT FILE 2 IEN | |
PARAMETER TYPE | LITERAL | |
REQUIRED | YES | |
MAXIMUM DATA LENGTH | 12 | |
RETURN VALUE TYPE | GLOBAL ARRAY | |
RETURN PARAMETER DESCRIPTION | Arrayfrom VADPT that looks as such: ^TMP("VIABDEM",6379,1)="PATIENT,GETDEM" ^TMP("VIABDEM",6379,2)="SOCIALSECURITYNUMBER^SSN-NO-FOUR" ^TMP("VIABDEM",6379,3)="2440923^SEP 23,1944" ^TMP("VIABDEM",6379,4)=75 ^TMP("VIABDEM",6379,5)="M^MALE" ^TMP("VIABDEM",6379,6)="" ^TMP("VIABDEM",6379,7)="" ^TMP("VIABDEM",6379,8)="" ^TMP("VIABDEM",6379,9)="6^PRESBYTERIAN" ^TMP("VIABDEM",6379,10)="2^MARRIED" ^TMP("VIABDEM",6379,11)=1 ^TMP("VIABDEM",6379,11,1)="2^NOT HISPANIC OR LATINO" ^TMP("VIABDEM",6379,11,1,1)="1^SELF IDENTIFICATION" ^TMP("VIABDEM",6379,12)=3 ^TMP("VIABDEM",6379,12,1)="5^ASIAN" ^TMP("VIABDEM",6379,12,1,1)="2^PROXY" ^TMP("VIABDEM",6379,12,2)="11^NATIVE HAWAIIAN OR OTHER PACIFIC ISLANDER" ^TMP("VIABDEM",6379,12,2,1)="4^UNKNOWN" ^TMP("VIABDEM",6379,12,3)="13^WHITE" ^TMP("VIABDEM",6379,12,3,1)="1^SELF IDENTIFICATION" ^TMP("VIABDEM",6379,13)="" ^TMP("VIABDEM",6379,13,1)="" ^TMP("VIABDEM",6379,"BID")=FOUR ^TMP("VIABDEM",6379,"PID")="SSN-NO-FOUR" Will appear to web service as such: PATIENT,GETDEM SOCIALSECURITYNUMBER^SSN-NO-FOUR 2440923^SEP 23,1944 75 M^MALE 6^PRESBYTERIAN 2^MARRIED 1 2^NOT HISPANIC OR LATINO 1^SELF IDENTIFICATION 3 5^ASIAN 2^PROXY 11^NATIVE HAWAIIAN OR OTHER PACIFIC ISLANDER 4^UNKNOWN 13^WHITE 1^SELF IDENTIFICATION | |
AVAILABILITY | PUBLIC | |
INACTIVE | ||
CLIENT MANAGER | ||
WORD WRAP ON | TRUE | |
VERSION | ||
SUPPRESS RDV USER SETUP | ||
APP PROXY ALLOWED | Yes |