perm filename ITVTS2.SAI[NEW,AIL] blob sn#408291 filedate 1979-01-08 generic text, type T, neo UTF8
BEGIN
   PROCEDURE TST(REFERENCE INTEGER ITEMVAR X);
   BEGIN
   END;
   INTEGER X;
   TST(X);
END