Re: ORACLE substr in INFORMIX
Posted in 1998
Thanks to all, for the information.
I knew, that there will be a substr function in INFORMIX 7.30. But my
Problem is, I need it for 7.22, 7.23.
With help of John H. Frantz (he developed base part of code), I can show
you a fine working substr SPL:
create procedure substr (sText varchar(255), iFPos smallint, iLen
smallint)
returning varchar(255);
define i smallint;
define sReturn varchar(255);
if iFPos > 1 then
for i = 1 to iFPos - 1 step 1
let sText = sText[2,255];
end for;
end if;
let sReturn = sText[1,1];
if iLen > 1 then
let sText = sText[2,255];
for i = 2 to iLen step 1
let sReturn = sReturn || sText[1,1];
let sText = sText[2,255];
end for;
end if;
return sReturn;
end procedure;
Yours, Volker
--
Volker Fraenkle E-Mail: VFraenkle@cs-controlling.de
CS Controlling Phone: +49 7144 8144-0
Software Systeme GmbH Fax: +49 7144 8144-10
Riedbachstrasse 5
74385 Pleidelsheim