VPR COMBAT PERIOD (196) ENTITY (1.5)

Name	Value
NAME	VPR COMBAT PERIOD
DEFAULT FILE NUMBER	22
DATA MODEL	SDA
DISPLAY NAME	Period
ITEM	SDACodingStandard SEQUENCE: 1 ITEM TYPE: FIXED STRING FIXED RESPONSE: VA22 Code SEQUENCE: 6 ITEM TYPE: ID GET ACTION: S VALUE=$P(VPRPRD,U) Description SEQUENCE: 7 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 22 FIELD NUMBER: .01 GET ACTION: S VALUE=$P(VPRPRD,U,2)
DESCRIPTION	This entity returns an entry in the POW Period file #22 as a coded element.
GET EXIT ACTION	K VPRPRD
GET ID ACTION	S VPRPRD=$G(DIEN) S:VPRPRD="" DDEOUT=1