VPR V EXAM (43) ENTITY (1.5)

Name	Value
NAME	VPR V EXAM
DEFAULT FILE NUMBER	9000010.13
DATA MODEL	SDA
DISPLAY NAME	PhysicalExam
ITEM	EncounterNumber SEQUENCE: 5 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 9000010.13 FIELD NUMBER: .03 RETURN INTERNAL VALUE: YES OUTPUT TRANSFORM: S:'$D(^AUPNVSIT(VALUE,0)) VALUE="" GET ACTION: S VALUE=$G(VPRVST) Extension SEQUENCE: 6 ITEM TYPE: ENTITY FILE NUMBER: 9000010.13 ENTITY: VPR VXAM EXTENSION GET ACTION: S VALUE=DIEN ExternalId SEQUENCE: 4 ITEM TYPE: ID PhysExamTime SEQUENCE: 7 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 9000010.13 FIELD NUMBER: 1201 RETURN INTERNAL VALUE: YES OUTPUT TRANSFORM: S VALUE=$$DATE^VPRSDA(VALUE) GET ACTION: S VALUE=$G(VPRXM("EVENT DATE AND TIME")) PhysExamCode SEQUENCE: 8 ITEM TYPE: ENTITY FILE NUMBER: 9000010.13 FIELD NUMBER: .01 RETURN INTERNAL VALUE: YES ENTITY: VPR EXAM PhysExamObsValue SEQUENCE: 11 ITEM TYPE: ENTITY FILE NUMBER: 9000010.13 FIELD NUMBER: .04 RETURN INTERNAL VALUE: YES ENTITY: VPR CODE TABLE GET ACTION: S VALUE=$G(VPRXM("VALUE")) NoteText SEQUENCE: 12 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 9000010.13 FIELD NUMBER: 81101 GET ACTION: S VALUE=$G(VPRXM("COMMENTS")) EnteredBy SEQUENCE: 14 ITEM TYPE: ENTITY FILE NUMBER: 9000010.13 FIELD NUMBER: .03 EXTENDED POINTER LKUP: .23 RETURN INTERNAL VALUE: YES ENTITY: VPR USER GET ACTION: S VALUE=$P(VPRVST0,U,23) EnteredAt SEQUENCE: 15 ITEM TYPE: ENTITY FILE NUMBER: 9000010.13 FIELD NUMBER: .03 EXTENDED POINTER LKUP: .06 RETURN INTERNAL VALUE: YES ENTITY: VPR FACILITY GET ACTION: S VALUE=$P(VPRVST0,U,6) S:'VALUE VALUE=$G(VASITE) EnteredOn SEQUENCE: 16 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 9000010.13 FIELD NUMBER: .03 EXTENDED POINTER LKUP: .01 RETURN INTERNAL VALUE: YES OUTPUT TRANSFORM: S VALUE=$$DATE^VPRSDA(VALUE) GET ACTION: S VALUE=$P(VPRVST0,U)
DESCRIPTION	This entity populates the Physical Exam container in HealthShare from the V EXAM (#9000010.13) file; it expects the record IEN as the ID (DIEN). This entity is supported by code in routine VPRSDAVF, which uses the ^PXRMINDX reminder index and VXAM^PXPXRM call to extract V POV data. Data in SDA is maintained by monitoring the PXK VISIT DATA EVENT protocol event.
GET EXIT ACTION	K VPRXM,VPRVST,VPRVST0
GET ID ACTION	D XAM1^VPRSDAVF
GET QUERY ROUTINE	EXAMS^VPRSDAVF