[firebase-br] Colocar aspa numa string no firebird
Anselmo A Meurer
aameurer em brturbo.com.br
Qui Fev 21 21:33:07 -03 2008
Ola Pessoal
Alguem poderia me ajudar, gostaria de saber se o banco de dados firebird tem alguma função tipo a do delphi para colocar aspas em uma string. Ex: QuotedStr('teste') ou seja no comando sql na base de dados tipo assim:
Exemplo em sql
vsql = vsql || ' AND V.Imprime = ' || QuotedStr('S'); ------ Aqui esta o problema
if ((:pcod_emp <> '') or (:pcod_emp is not null)) then
vsql = vsql || ' And CAST(M.cod_emp as integer) = '|| :pcod_emp;
if ((:pcod_fun <> '') or (:pcod_fun is not null)) then
vsql = vsql || ' AND CAST(M.cod_fun as integer) = ' || :pcod_fun;
if ((:pano <> '') or (:pano is not null)) then
vsql = vsql || ' AND CAST(M.ano as integer) = ' || :pano;
if ((:pmes <> '') or (:pmes is not null)) then
vsql = vsql || ' AND CAST(M.mes as integer) = ' || :pmes;
if ((:vtip_proc <> '') or (:vtip_proc is not null)) then
vsql = vsql || ' AND CAST(M.Tip_Proc as integer) in('||:vtip_proc||')';
for execute statement :vSql into .......
Obrigado
Mais detalhes sobre a lista de discussão lista