VPR OTHER ORDER (35)    ENTITY (1.5)

Name Value
NAME VPR OTHER ORDER
DEFAULT FILE NUMBER 100
DATA MODEL SDA
DISPLAY NAME OtherOrder
ITEM
  • EnteredAt
    SEQUENCE:   35
    ITEM TYPE:   ENTITY
    FILE NUMBER:   100
    FIELD NUMBER:   6
    RETURN INTERNAL VALUE:   YES
    ENTITY:   VPR FACILITY
    GET ACTION:   N X S X=$P($G(OR0),U,10) S:X VALUE=$$GET1^DIQ(44,+X,3,"I") S:'VALUE VALUE=$$SITE^VPRSDA ;#4 ien
  • ResultCopiesTo
    SEQUENCE:   29
    ITEM TYPE:   LIST
    FILE NUMBER:   100
    FIELD NUMBER:   35
    RETURN INTERNAL VALUE:   YES
    ENTITY:   VPR PROVIDER
    LIST TYPE:   ARRAY
    XML NAME:   CareProvider
    GET ACTION:   N X S X=$P($G(OR3),U,10) S:X DLIST(1)=X I X="" S DDEOUT=1
  • Status
    SEQUENCE:   18
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   100
    FIELD NUMBER:   5
    EXTENDED POINTER LKUP:   .02
    OUTPUT TRANSFORM:   N X S X=VALUE,VALUE=$S(X="dc":"D",X="canc":"C",X="laps":"C",X="dc/e":"R",X="comp":"E",X="exp":"E",X="hold":"H",X="part":"A",1:"IP")
  • PlacerId
    SEQUENCE:   1
    ITEM TYPE:   ID
  • EnteringOrganization
    SEQUENCE:   9
    ITEM TYPE:   ENTITY
    FILE NUMBER:   100
    FIELD NUMBER:   6
    RETURN INTERNAL VALUE:   YES
    ENTITY:   VPR LOCATION
    OUTPUT TRANSFORM:   S VALUE=+VALUE
    GET ACTION:   S VALUE=$P($G(OR0),U,10) S:VALUE<1 DDEOUT=1
  • FromTime
    SEQUENCE:   37
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   100
    FIELD NUMBER:   21
    RETURN INTERNAL VALUE:   YES
    OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
    GET ACTION:   S VALUE=$P($G(OR0),U,8)
  • ToTime
    SEQUENCE:   38
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   100
    FIELD NUMBER:   22
    RETURN INTERNAL VALUE:   YES
    OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
    GET ACTION:   S VALUE=$P($G(OR0),U,9)
  • UpdatedOn
    SEQUENCE:   50
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   100
    FIELD NUMBER:   31
    RETURN INTERNAL VALUE:   YES
    OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
    GET ACTION:   S VALUE=$P($G(OR3),U)
  • EnteredBy
    SEQUENCE:   34
    ITEM TYPE:   ENTITY
    FILE NUMBER:   100
    FIELD NUMBER:   3
    RETURN INTERNAL VALUE:   YES
    ENTITY:   VPR USER
    GET ACTION:   S VALUE=$P($G(OR0),U,6)
  • AuthorizationTime
    SEQUENCE:   26
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   100.008
    FIELD NUMBER:   6
    RETURN INTERNAL VALUE:   YES
    OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
    GET ACTION:   S VALUE=$P($G(ORSIG),U,3),IEN="1,"_DIEN
  • Extension
    SEQUENCE:   53
    ITEM TYPE:   ENTITY
    FILE NUMBER:   100
    ENTITY:   VPR ORDER EXTENSION
    GET ACTION:   S VALUE=DIEN
  • ExternalId
    SEQUENCE:   51
    ITEM TYPE:   ID
  • OrderItem
    SEQUENCE:   5.1
    ITEM TYPE:   ENTITY
    FILE NUMBER:   100
    ENTITY:   VPR RELEASE EVENT
    GET ACTION:   I '$O(^OR(100,DIEN,.1,"B",0)) S VALUE=$$VALUE^ORX8(DIEN,"EVENT") S:VALUE<1 DDEOUT=1
  • EnteredOn
    SEQUENCE:   36
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   100
    FIELD NUMBER:   4
    RETURN INTERNAL VALUE:   YES
    OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
    GET ACTION:   S VALUE=$P($G(OR0),U,7)
  • FillerId
    SEQUENCE:   3
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   100
    FIELD NUMBER:   33
    GET ACTION:   S VALUE=$$PKGID^ORX8(DIEN)
  • OrderCategory
    SEQUENCE:   6
    ITEM TYPE:   ENTITY
    FILE NUMBER:   100
    FIELD NUMBER:   23
    RETURN INTERNAL VALUE:   YES
    ENTITY:   VPR DISPLAY GROUP
    GET ACTION:   S VALUE=$P($G(OR0),U,11)
  • OrderItem
    SEQUENCE:   5
    ITEM TYPE:   ENTITY
    FILE NUMBER:   100.001
    FIELD NUMBER:   .01
    RETURN INTERNAL VALUE:   YES
    ENTITY:   VPR ORDERABLE ITEM
    GET ACTION:   S VALUE=$O(^OR(100,DIEN,.1,"B",0)),IEN="1,"_DIEN S:VALUE<1 DDEOUT=1 ;first/only
  • OrderedBy
    SEQUENCE:   8
    ITEM TYPE:   ENTITY
    FILE NUMBER:   100
    FIELD NUMBER:   1
    RETURN INTERNAL VALUE:   YES
    ENTITY:   VPR PROVIDER
    GET ACTION:   S VALUE=$P($G(OR0),U,4)
  • Priority
    SEQUENCE:   19
    ITEM TYPE:   ENTITY
    FILE NUMBER:   100.045
    FIELD NUMBER:   1
    ENTITY:   VPR ORDER URGENCY
    GET ACTION:   S VALUE=$$VALUE^ORX8(DIEN,"URGENCY") S:VALUE="" DDEOUT=1
DESCRIPTION
This entity populates the Other Order container in HealthShare. It 
expects the ORDER (#100) file ien as its ID.
GET EXIT ACTION K OR0,OR3,OR6,OR8,ORDAD,ORSIG
GET ID ACTION D OR1^VPRSDA(DIEN)
GET QUERY ROUTINE NONORD^VPRSDAQ