exemplo de função `SQL`

fn_busca_valor_bloco.sql

-- based on http://pastebin.com/igga50QK

CREATE OR REPLACE FUNCTION fn_busca_valor_bloco_sql(p_blccodigo INTEGER, p_itemcodigo INTEGER, p_cadastro BIGINT)
RETURNS TEXT AS
$BODY$
      SELECT
             CASE WHEN lsicodigo IS NULL THEN lsidescricao ELSE itmconteudo END
      FROM tbblocoitem
      LEFT JOIN tblistaitem using(blccodigo ,itemcodigo ,lsicodigo)
      WHERE tbblocoitem.blccodigo = p_blccodigo
      AND tbblocoitem.itmcodigo = p_itemcodigo
      AND tbblocoitem.bcicadastro= p_cadastro
      AND itemdatahora = (SELECT MAX(a.itemdatahora)
                        FROM tbblocoitem a
                        WHERE (a.blccodigo,a.itemcodigo,a.cadastro)=(tbblocoitem.blccodigo,tbblocoitem.itemcodigo,tbblocoitem.cadastro))
$BODY$
LANGUAGE 'SQL';