PROCEDURE type_example2 ()

BEGIN

  -- b is defined in Example 3 (User-Defined Type)

  DECLARE test /shared/type_example1.b;

 

  SET test.a = 123;

  SET test.b = 345;

  SET test.c = 'hello';

END