IBM0701S

Explanation
 A CONTROLLED variable in the stream was accessed
by a GET FILE DATA statement, but there was no current allocation
for the variable.  DCL STR CHAR(4) INIT('X=5'),
X CONTROLLED FIXED BIN;
GET STRING(STR) DATA(X);

 The ONCODE associated
with this message is 4001.

System action
 The ERROR condition is raised.

Programmer response
 Either remove the data item from the string
or insert an ALLOCATE statement for the variable before the GET STRING
DATA statement.

Symbolic Feedback Code
 IBM0LT