R regex to convert SQL queries

This post needs to be written. . .

Old function:

CREATE PROCEDURE [GetAgeTypesTable]
AS
SELECT     AgeTypeID, AgeType, Precedence, ShortAgeType
FROM         NDB.AgeTypes






GO

needs to look like:

CREATE OR REPLACE FUNCTION ti.getagetypestable()
 RETURNS SETOF ndb.agetypes
 LANGUAGE sql
  AS $function$
  SELECT ndb.agetypes.* FROM ndb.agetypes;$function$