| ITEM |
-
- Comments
- SEQUENCE: 13
- ITEM TYPE: LIST
- ENTITY: VPR COMMENT
- LIST TYPE: ARRAY
- XML NAME: Comment
- GET ACTION: I $P($G(GMPFLD(1.02)),U)'="H" D PROBCMT^VPRSDAG(DIEN) ;skip if hidden
-
- Removed
- SEQUENCE: 9
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.02
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$S(VALUE="H":"true",1:"false")
- GET ACTION: S DDEOUT=1 ;VALUE=$P($G(GMPFLD(1.02)),U)
-
- IsSc
- SEQUENCE: 10
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.1
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$S(VALUE:"true",1:"false")
- GET ACTION: S VALUE=$P($G(GMPFLD(1.1)),U)
-
- Service
- SEQUENCE: 11
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.06
- GET ACTION: S VALUE=$P($G(GMPFLD(1.06)),U,2)
-
- OnsetDate
- SEQUENCE: 12
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: .13
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: N D S D=$P(VALUE,"."),VALUE=(1700+$E(D,1,3))_"-"_$E(D,4,5)_"-"_$E(D,6,7)
- GET ACTION: S VALUE=$P($G(GMPFLD(.13)),U)
-
- LexiconId
- SEQUENCE: 14
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.01
- RETURN INTERNAL VALUE: YES
- GET ACTION: S VALUE=$P($G(GMPFLD(1.01)),U)
-
- Priority
- SEQUENCE: 15
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.14
- GET ACTION: S VALUE=$P($G(GMPFLD(1.14)),U,2)
-
- IsVerified
- SEQUENCE: 16
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.02
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$S(VALUE="P":"true",VALUE="T":"false",1:"")
- GET ACTION: S VALUE=$P($G(GMPFLD(1.02)),U)
-
- IsRemoved
- SEQUENCE: 17
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.02
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$S(VALUE="H":"true",1:"false")
- GET ACTION: S VALUE=$P($G(GMPFLD(1.02)),U)
-
- IsExposureAO
- SEQUENCE: 1
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.11
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$S(VALUE:"true",1:"false")
- GET ACTION: S VALUE=$P($G(GMPFLD(1.11)),U)
-
- IsExposureIR
- SEQUENCE: 2
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.12
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$S(VALUE:"true",1:"false")
- GET ACTION: S VALUE=$P($G(GMPFLD(1.12)),U)
-
- IsExposurePG
- SEQUENCE: 3
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.13
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$S(VALUE:"true",1:"false")
- GET ACTION: S VALUE=$P($G(GMPFLD(1.13)),U)
-
- IsExposureHNC
- SEQUENCE: 4
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.15
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$S(VALUE:"true",1:"false")
- GET ACTION: S VALUE=$P($G(GMPFLD(1.15)),U)
-
- IsExposureMST
- SEQUENCE: 5
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.16
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$S(VALUE:"true",1:"false")
- GET ACTION: S VALUE=$P($G(GMPFLD(1.16)),U)
-
- IsExposureCV
- SEQUENCE: 6
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.17
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$S(VALUE:"true",1:"false")
- GET ACTION: S VALUE=$P($G(GMPFLD(1.17)),U)
-
- IsExposureSH
- SEQUENCE: 7
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.18
- RETURN INTERNAL VALUE: YES
- OUTPUT TRANSFORM: S VALUE=$S(VALUE:"true",1:"false")
- GET ACTION: S VALUE=$P($G(GMPFLD(1.18)),U)
-
- Location
- SEQUENCE: 8
- ITEM TYPE: ENTITY
- FILE NUMBER: 9000011
- FIELD NUMBER: 1.08
- RETURN INTERNAL VALUE: YES
- ENTITY: VPR LOCATION
- GET ACTION: S VALUE=$P($G(GMPFLD(1.08)),U)
|
