CREATE PROCEDURE "informix".tl_strpos(__SubStr Char(20),__Str VarChar(255),__StartPos int)
returning int;
define __i int;
define __j int;
returning int;
define __i int;
define __j int;
if (__Str is null) or (__SubStr is null) or (__Str = '') or (__SubStr = '') then
return 0;
end if;
return 0;
end if;
let __j = length(trim(__SubStr));
for __i = __StartPos to length(__Str)
if substring(__Str from __i for __j) = trim(__SubStr) then
return __i;
end if;
end for;
return __i;
end if;
end for;
return 0;
end procedure
;
end procedure
;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/611609/viewspace-753247/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/611609/viewspace-753247/