IMPORT util
MAIN
    DEFINE i SMALLINT
    DISPLAY "Before srand() call:"
    FOR i=1 TO 3
        DISPLAY util.Math.rand(100)
    END FOR
    CALL util.Math.srand()
    DISPLAY "After srand() call:"
  #  FOR i=1 TO 3
        DISPLAY util.Math.rand(150000)
  #  END FOR
END MAIN
{

65828
      46131
     112163

     92251
      38343
      67513
}