| ITEM | 
- 
- AdministeringProvider
 
- SEQUENCE:    5
 
- ITEM TYPE:    ENTITY
 
- FILE NUMBER:    9000010.23
 
- FIELD NUMBER:    1204
 
- RETURN INTERNAL VALUE:    YES
 
- ENTITY:    VPR PROVIDER
 
- GET ACTION:    S VALUE=$P($G(VPRHF("ENCOUNTER PROVIDER")),U)
 
 
- 
- AdministeredAtLocation
 
- SEQUENCE:    6
 
- ITEM TYPE:    ENTITY
 
- FILE NUMBER:    9000010.23
 
- FIELD NUMBER:    .03
 
- EXTENDED POINTER LKUP:    .22
 
- RETURN INTERNAL VALUE:    YES
 
- ENTITY:    VPR LOCATION
 
- GET ACTION:    S VALUE=$P(VPRVST0,U,22)
 
 
- 
- AdministrationStatus
 
- SEQUENCE:    7
 
- ITEM TYPE:    ENTITY
 
- FILE NUMBER:    9000010.23
 
- ENTITY:    VPR CODE TABLE
 
- GET ACTION:    S VALUE="R^REFUSED"
 
 
- 
- RefusalReason
 
- SEQUENCE:    13
 
- ITEM TYPE:    ENTITY
 
- FILE NUMBER:    9000010.23
 
- FIELD NUMBER:    81101
 
- ENTITY:    VPR TEXT ONLY
 
- GET ACTION:    S VALUE=$G(VPRHF("COMMENTS"))
 
 
 
 |