CREATE OR REPLACE FUNCTION tbm_crt_loc(p_tbm_id text)