VPR COMMENT (100)    ENTITY (1.5)

Name Value
NAME VPR COMMENT
DATA MODEL SDA
DISPLAY NAME Comment
ITEM
  • Id
    SEQUENCE:   1
    ITEM TYPE:   ID
  • EnteredAt
    SEQUENCE:   2
    ITEM TYPE:   ENTITY
    ENTITY:   VPR FACILITY
    GET ACTION:   S VALUE=$P(VPRCMT,U,5)
  • EnteredBy
    SEQUENCE:   3
    ITEM TYPE:   ENTITY
    ENTITY:   VPR PROVIDER
    GET ACTION:   S VALUE=$P(VPRCMT,U,3)
  • EnteredOn
    SEQUENCE:   4
    ITEM TYPE:   SIMPLE FIELD
    OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE,1)
    GET ACTION:   S VALUE=$P(VPRCMT,U,2)
  • CommentType
    SEQUENCE:   5
    ITEM TYPE:   SIMPLE FIELD
    GET ACTION:   S VALUE=$P(VPRCMT,U,4)
  • CommentText
    SEQUENCE:   6
    ITEM TYPE:   SIMPLE FIELD
    GET ACTION:   S VALUE=$P(VPRCMT,U,6)
  • EnteredOnTime
    SEQUENCE:   7
    ITEM TYPE:   SIMPLE FIELD
    OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
    GET ACTION:   S VALUE=$P(VPRCMT,U,2)
DESCRIPTION
This entity supports comments in multiple SDA containers, such as 
Allergies and Problems; it returns a single comment, and is intended to 
be used with a List property. A string in the following format is 
expected as the ID:
  id ^ date ^ user ^ type ^ facility ^ text
GET EXIT ACTION K VPRCMT
GET ID ACTION S VPRCMT=$G(DIEN),DIEN=$P(DIEN,U)