Pegar Caracteres em um Campo Dentro de Uma Procedure

eu estou precisando do seguinte código em [b:d61aa3338f]delphi if copy(valor, 3, 2)=02 then {código}[/b:d61aa3338f] só q dentro do banco firebird em uma procedure estou em um loop [b:d61aa3338f]for do[/b:d61aa3338f] na procedure e preciso de um código como esse acima só q pegue os carcteres em um campo.


muito obrigado. :lol: