The built-in function %LOC computes the internal address of a storage item. It takes the following form:
%LOC (arg)
The %LOC function produces an integer (INTEGER(8) on OpenVMS and Tru64 UNIX systems; INTEGER(4) on Windows NT and Windows 9* systems) value that represents the location of the given argument. You can use this integer value as an item in an arithmetic expression.
The LOC intrinsic function serves the same purpose as the %LOC built-in function.