VPR PROCEDURE (51) ENTITY (1.5)

Name	Value
NAME	VPR PROCEDURE
DEFAULT FILE NUMBER	702
DATA MODEL	SDA
DISPLAY NAME	Procedure
ITEM	FromTime SEQUENCE: 2 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 702 FIELD NUMBER: .06 EXTENDED POINTER LKUP: 70202 RETURN INTERNAL VALUE: YES OUTPUT TRANSFORM: S VALUE=$$DATE^VPRSDA(VALUE) GET ACTION: S VALUE=$P(VPRCP,U,6) EnteredOn SEQUENCE: 12 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 702 FIELD NUMBER: .02 RETURN INTERNAL VALUE: YES OUTPUT TRANSFORM: S VALUE=$$DATE^VPRSDA(VALUE) ExternalId SEQUENCE: 13 ITEM TYPE: ID OUTPUT TRANSFORM: S VALUE=VALUE_";MD" EncounterNumber SEQUENCE: 4 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 702 FIELD NUMBER: .06 EXTENDED POINTER LKUP: .03 RETURN INTERNAL VALUE: YES OUTPUT TRANSFORM: S:'$D(^AUPNVSIT(VALUE,0)) VALUE="" GET ACTION: S VALUE=$G(VPRTIU(.03,"I")) Extension SEQUENCE: 5 ITEM TYPE: ENTITY FILE NUMBER: 702 ENTITY: VPR PROCEDURE EXTENSION GET ACTION: S VALUE=DIEN Procedure SEQUENCE: 6 ITEM TYPE: ENTITY FILE NUMBER: 702 FIELD NUMBER: .04 RETURN INTERNAL VALUE: YES ENTITY: VPR CODE TABLE GET ACTION: N X S X=$$FIND1^DIC(702.01,,"QX",$P(VPRCP,U)) S:X VALUE=X_U_$P(VPRCP,U)_"^VA702.01" Clinician SEQUENCE: 7 ITEM TYPE: ENTITY FILE NUMBER: 702 FIELD NUMBER: .06 EXTENDED POINTER LKUP: 1202 RETURN INTERNAL VALUE: YES ENTITY: VPR PROVIDER GET ACTION: S VALUE=$G(VPRTIU(1202,"I")) ProcedureTime SEQUENCE: 9 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 702 FIELD NUMBER: .06 EXTENDED POINTER LKUP: 70202 RETURN INTERNAL VALUE: YES OUTPUT TRANSFORM: S VALUE=$$DATE^VPRSDA(VALUE) GET ACTION: S VALUE=$P(VPRCP,U,6) EnteredBy SEQUENCE: 10 ITEM TYPE: ENTITY FILE NUMBER: 702 FIELD NUMBER: .03 RETURN INTERNAL VALUE: YES ENTITY: VPR USER EnteredAt SEQUENCE: 11 ITEM TYPE: ENTITY FILE NUMBER: 702 FIELD NUMBER: .06 EXTENDED POINTER LKUP: 1212 RETURN INTERNAL VALUE: YES ENTITY: VPR FACILITY GET ACTION: S VALUE=$G(VPRTIU(1212,"I")) S:'VALUE VALUE=$$SITE^VPRSDA
DESCRIPTION	This entity populated the Procedure container in HealthShare from the CP TRANSACTION (#702) file but is no longer in use. Clinical Procedures are handled via the Consult/Request package and as such are available in the Referral container; clients may filter referrals by extension properties Type and ClinicalProcedure to find them.
GET EXIT ACTION	K ^TMP("MDHSP",$J),VPRCP,VPRCN,VPRTIU
GET ID ACTION	D CP1^VPRSDAC(DIEN)
GET QUERY ROUTINE	CPQRY^VPRSDAC