--
--  triplerock: $BS_HOME/Alex/Schema.msql
--
BEGIN TRANSACTION;
--
SET SCHEMA Alexandria;
--
CREATE FUNCTION AlexTcl ( oid )
RETURNS text
AS RETURN 'miwish -f /private/pbrown/Tcl/AlexDisp.tcl ' || $1::text;
--
GRANT USAGE ON FUNCTION AlexTcl ( oid ) TO PUBLIC;
--
END TRANSACTION;
--