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
