VPR SCHEDULED ADMISSION (91) ENTITY (1.5)

Name	Value
NAME	VPR SCHEDULED ADMISSION
DEFAULT FILE NUMBER	41.1
DATA MODEL	SDA
DISPLAY NAME	Appointment
ITEM	Status SEQUENCE: 4 ITEM TYPE: FIXED STRING GET ACTION: S VALUE=$S($P(VPRADM,U,13):"CANCELLED",$P(VPRADM,U,17):"ADMITTED",$P(VPRADM,U,2)>DT:"FUTURE",1:"NO ACTION TAKEN") CareProvider SEQUENCE: 12 ITEM TYPE: ENTITY FILE NUMBER: 41.1 FIELD NUMBER: 5 RETURN INTERNAL VALUE: YES ENTITY: VPR PROVIDER GET ACTION: S VALUE=$P(VPRADM,U,5) PlacerApptId SEQUENCE: 7 ITEM TYPE: FIXED STRING GET ACTION: S VALUE="H;"_DIEN FillerApptId SEQUENCE: 8 ITEM TYPE: ID Location SEQUENCE: 13 ITEM TYPE: ENTITY FILE NUMBER: 41.1 FIELD NUMBER: 8 EXTENDED POINTER LKUP: 44 RETURN INTERNAL VALUE: YES ENTITY: VPR LOCATION EnteredBy SEQUENCE: 15 ITEM TYPE: ENTITY FILE NUMBER: 41.1 FIELD NUMBER: 11 RETURN INTERNAL VALUE: YES ENTITY: VPR USER GET ACTION: S VALUE=$P(VPRADM,U,11) EnteredAt SEQUENCE: 16 ITEM TYPE: ENTITY FILE NUMBER: 41.1 FIELD NUMBER: 12 EXTENDED POINTER LKUP: .07 RETURN INTERNAL VALUE: YES ENTITY: VPR FACILITY FromTime SEQUENCE: 18 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 41.1 FIELD NUMBER: 2 RETURN INTERNAL VALUE: YES OUTPUT TRANSFORM: S VALUE=$$DATE^VPRSDA(VALUE) ToTime SEQUENCE: 19 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 41.1 FIELD NUMBER: 17 EXTENDED POINTER LKUP: .01 RETURN INTERNAL VALUE: YES OUTPUT TRANSFORM: S VALUE=$$DATE^VPRSDA(VALUE) GET ACTION: S:$P(VPRADM,U,13) VALUE=$P(VPRADM,U,13) ;cancelled instead Extension SEQUENCE: 3 ITEM TYPE: ENTITY FILE NUMBER: 41.1 ENTITY: VPR SCH ADM EXTENSION GET ACTION: S VALUE=DIEN
DESCRIPTION	This entity populates the Appointment container in HealthShare from the SCHEDULED ADMISSION (#41.1) file; it expects the record IEN as the ID (DIEN). This entity is supported by code in routine VPRSDAM, which uses VA FileMan calls to extract appointment data. Data in SDA is maintained by monitoring the DG SA FILE ENTRY NOTIFIER protocol event.
GET EXIT ACTION	K VPRADM
GET ID ACTION	S VPRADM=$G(^DGS(41.1,DIEN,0))
GET QUERY ROUTINE	SCHADMS^VPRSDAM