VPR AMIS (138)    ENTITY (1.5)

Name Value
NAME VPR AMIS
DEFAULT FILE NUMBER 40.7
DATA MODEL SDA
DISPLAY NAME StopCode
ITEM
  • SDACodingStandard
    SEQUENCE:   1
    ITEM TYPE:   FIXED STRING
    FIXED RESPONSE:   AMIS
  • Code
    SEQUENCE:   6
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   40.7
    FIELD NUMBER:   1
    GET ACTION:   S VALUE=$P(VPRCODE,U)
  • Description
    SEQUENCE:   7
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   40.7
    FIELD NUMBER:   .01
    GET ACTION:   S VALUE=$P(VPRCODE,U,2)
GET EXIT ACTION K VPRCODE
GET ID ACTION S VPRCODE=$$AMIS^VPRDVSIT(DIEN) S:VPRCODE="" DDEOUT=1