This example demonstrates the use of the &PARATT GPA to assign a part attribute.
$$
$$ Declarations
$$
ENTITY/ENT
STRING/STR(2,20)
STR(1)='THIS IS A'
STR(2)='PART ATTRIBUTE'
ASATT/&PARATT,STR
The value of the part object identifier can also be assigned to a an object variable:
ENT=&PARATT
ASATT/ENT,STR