DMAKE Example

Example :

pDimA	DIM	^
pDimB	DIM	^
NVAR	FORM	"512"
.
	DMAKE	pDimA,1000000
	DMAKE	pDIMB,NVAR

This example attempts to create a DIM variable (pDimA) of one million bytes and a second DIM variable (pDimB) of 512 bytes. If insufficient memory exists to create either variable, the ZERO Condition Flag is set.