VPR VITAL MEASUREMENT (41) ENTITY (1.5)

Name	Value
NAME	VPR VITAL MEASUREMENT
DEFAULT FILE NUMBER	120.5
DATA MODEL	SDA
DISPLAY NAME	Observation
ITEM	EnteredAt SEQUENCE: 19 ITEM TYPE: ENTITY FILE NUMBER: 120.5 FIELD NUMBER: .05 EXTENDED POINTER LKUP: 3 RETURN INTERNAL VALUE: YES ENTITY: VPR FACILITY GET ACTION: N HLOC S HLOC=+$P($G(VPRGMV),U,5),VALUE=$$GET1^DIQ(44,HLOC,3,"I") S:'VALUE VALUE=$$SITE^VPRSDA EnteredOn SEQUENCE: 20 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 120.5 FIELD NUMBER: .04 RETURN INTERNAL VALUE: YES OUTPUT TRANSFORM: S VALUE=$$DATE^VPRSDA(VALUE) GET ACTION: S VALUE=$P($G(VPRGMV),U,4) S:VALUE="" DDEOUT=1 ExternalId SEQUENCE: 4 ITEM TYPE: ID Extension SEQUENCE: 6 ITEM TYPE: ENTITY FILE NUMBER: 120.5 ENTITY: VPR VITAL EXTENSION GET ACTION: S VALUE=DIEN ObservationTime SEQUENCE: 7 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 120.5 FIELD NUMBER: .01 RETURN INTERNAL VALUE: YES OUTPUT TRANSFORM: S VALUE=$$DATE^VPRSDA(VALUE) GET ACTION: S VALUE=$P($G(VPRGMV),U) S:VALUE="" DDEOUT=1 ObservationCode SEQUENCE: 8 ITEM TYPE: ENTITY FILE NUMBER: 120.5 FIELD NUMBER: .03 RETURN INTERNAL VALUE: YES ENTITY: VPR VITAL TYPE GET ACTION: S VALUE=$P($G(VPRGMV),U,3) S:VALUE="" DDEOUT=1 ObservationValue SEQUENCE: 9 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 120.5 FIELD NUMBER: 1.2 GET ACTION: S VALUE=$P($G(VPRGMV),U,8) S:VALUE="" DDEOUT=1 GroupId SEQUENCE: 15 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 120.5 FIELD NUMBER: .01 RETURN INTERNAL VALUE: YES GET ACTION: S VALUE=$P($G(VPRGMV),U) S:VALUE="" DDEOUT=1 ObservationMethods SEQUENCE: 16 ITEM TYPE: LIST FILE NUMBER: 120.505 ENTITY: VPR VITAL QUALIFIER LIST TYPE: ARRAY XML NAME: ObservationMethod GET ACTION: D VITQUAL^VPRSDAOB EnteredBy SEQUENCE: 18 ITEM TYPE: ENTITY FILE NUMBER: 120.5 FIELD NUMBER: .06 RETURN INTERNAL VALUE: YES ENTITY: VPR USER GET ACTION: S VALUE=$P($G(VPRGMV),U,6) S:VALUE="" DDEOUT=1
DESCRIPTION	This entity populates the Observation container in HealthShare. It is supported by routine VPRSDAOB, which uses the GMRVUT0 utility to pull vitals from both the GMRV VITAL MEASUREMENT (#120.5) and OBS (#704.117) files. Any OBS entries are converted to GMRV values except for the ExternalId, which will hold the OBS ID (#.01) string instead of the #120.5 internal entry number. Data in SDA is maintained by monitoring the AVPR index on file #120.5 and the MDC OBSERVATION UPDATE protocol event.
GET EXIT ACTION	K VPRV,VPRGMV,^TMP("VPRGMV",$J),VPRANGE,VPRTYPE,VPRPARAM
GET ID ACTION	D VIT1^VPRSDAOB(DIEN)
GET QUERY ROUTINE	VITALS^VPRSDAOB