Memory release is not taken into account (for example, the FREE statement).
     DCL 1 DATA1,	          
                              2 B FIXED; 
     DCL 1 DATA2 LIKE DATA1; 
     DCL 1 A1 BASED(P),	 
                              2 B FIXED; 
     DCL 1 A2 BASED(P),	 
                              2 B FLOAT; 
     DCL 1 A3 BASED(Q),	 
                              2 B FIXED; 
     P = ADDR(DATA1); 
     Q = ADDR(DATA2); 
     A1.B = 1;           /* 1 */ 
     Q->A1.B = 1;        /* 2 */ 
     P = Q;              /* 3 */
Entities for which memory is not allocated are still included in the Data View.
Fetch and Pointer Add are not currently supported. DataView will be as follows:
| DATA1 | B | A1 | B | A2 | B | ||
| DATA2 | B | A1 | B | A2 | B | A3 | B |