PROCEDURE Main()

   USE test NEW

   LABEL FORM test

   USE

   RETURN