oracle function

create or replace function f_getbh(
  str in varchar2
)
return varchar2
as
  retv varchar2(200);
  loc  number;
begin
  loc := instr(str,'_',1,1);
  retv := substr(str,0,loc-1);
  return retv;
end;