The following example declares a procedure reference for a real procedure with two parameters of type integer. The second parameter is passed by value.

REAL PROCEDURE REFERENCE RPREF(A,B);
                         VALUE B;
                         INTEGER A,B;
                         NULL;