| ITEM |
-
- EnteredOn
- SEQUENCE: 12
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000010.18
- 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)
-
- ExternalId
- SEQUENCE: 13
- ITEM TYPE: ID
- OUTPUT TRANSFORM: S VALUE=VALUE_";PX"
-
- FromTime
- SEQUENCE: 2
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000010.18
- FIELD NUMBER: .03
- EXTENDED POINTER LKUP: .01
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$$DATE^VPRSDA(VALUE)
- GET ACTION: S VALUE=$P($G(VPRVST0),U)
-
- EncounterNumber
- SEQUENCE: 4
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000010.18
- FIELD NUMBER: .03
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S:'$D(^AUPNVSIT(VALUE,0)) VALUE=""
- GET ACTION: S VALUE=$G(VPRVST)
-
- Extension
- SEQUENCE: 5
- ITEM TYPE: ENTITY
- FILE NUMBER: 9000010.18
- ENTITY: VPR VCPT EXTENSION
- GET ACTION: S VALUE=DIEN
-
- Procedure
- SEQUENCE: 6
- ITEM TYPE: ENTITY
- FILE NUMBER: 9000010.18
- FIELD NUMBER: .01
- RETURN INTERNAL VALUE: YES
- ENTITY: VPR CPT
- GET ACTION: N PN S VPRDT=+$G(VPRVST0),PN=+$G(VPRCPT("PROVIDER NARRATIVE")) S:PN DATA=$P($G(^AUTNPOV(PN,0)),U) ;CPT date versioning, OrigText
-
- Clinician
- SEQUENCE: 7
- ITEM TYPE: ENTITY
- FILE NUMBER: 9000010.18
- FIELD NUMBER: 1204
- RETURN INTERNAL VALUE: YES
- ENTITY: VPR PROVIDER
- GET ACTION: S VALUE=$G(VPRCPT("ENCOUNTER PROVIDER"))
-
- ProcedureTime
- SEQUENCE: 9
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000010.18
- FIELD NUMBER: 1201
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$$DATE^VPRSDA(VALUE)
- GET ACTION: S VALUE=$G(VPRCPT("EVENT DATE AND TIME")) S:VALUE<1 VALUE=$P($G(VPRVST0),U)
-
- EnteredBy
- SEQUENCE: 10
- ITEM TYPE: ENTITY
- FILE NUMBER: 9000010.18
- FIELD NUMBER: .03
- EXTENDED POINTER LKUP: .23
- RETURN INTERNAL VALUE: YES
- ENTITY: VPR USER
- GET ACTION: S VALUE=$P(VPRVST0,U,23)
-
- EnteredAt
- SEQUENCE: 11
- ITEM TYPE: ENTITY
- FILE NUMBER: 9000010.18
- FIELD NUMBER: .03
- EXTENDED POINTER LKUP: .06
- RETURN INTERNAL VALUE: YES
- ENTITY: VPR FACILITY
- GET ACTION: S VALUE=$P(VPRVST0,U,6) S:VALUE<1 VALUE=$$SITE^VPRSDA
|
| DESCRIPTION |
This entity populates the Procedure container in HealthShare from the
This entity is supported by code in routine VPRSDAVF, which uses the
^PXRMINDX reminder index and VCPT^PXPXRM call to extract V CPT data.
Data in SDA is maintained by monitoring the PXK VISIT DATA EVENT
protocol event.
V CPT (#9000010.18) file; it expects the record IEN as the ID (DIEN).
Duplicate entries are screened out:
* Surgeries from the SURGERY (#130) file
* Immunizations from V IMMUNIZATION (#9000010.11) file, also stored in
the Vaccination container
* Evaluation & Management codes (99200 - 99399) are returned as the type
of visit in the Encounter container
|
