The SET statement sets values of indexes associated with table
elements. It can also change the value of a conditional variable,
change the status of an external switch, and store the address of a
COBOL identifier reference at run time.
Format 5 -
SET { pointer-id } ... TO REFERENCE OF identifier
Additional Information:
explode
extract