[firebase-br] Numero sequencial por item
Gladiston Santana
gladiston em vidy.com.br
Seg Jan 18 11:55:52 -03 2016
Quando a situação da query requer alguma logica é melhor usar EXECUTE BLOCK
e colocar os operadores conforme uma linguagem de programação requereiriam,
ex:
EXECUTE BLOCK
returns(
SEQ integer,
ESTADO varchar(2),
DESCRICAO varchar(40),
COMENTARIO varchar(30)
)
as
declare variable lstatus varchar(1);
begin
seq=0;
for select estado, descricao, status from estados
into :estado, :descricao, :lstatus do
begin
seq=:seq+1;
if (:lstatus='A') then comentario='Ativo';
if (:lstatus='C') then comentario='Cancelado';
suspend;
end
end
No exemplo acima, o meu select retornaria um campo virtual 'seq' sequencial
para cada linha e ao invés dum status, um comentario baseado no If.
Eu uso muito execute block, quando o select e seus comandos são
insuficientes.
Queries muito complexas podem ser resolvidas com EXECUTE BLOCK
Em 16 de janeiro de 2016 17:54, Flavio Divino <flaviodivino em gmail.com>
escreveu:
> Olá pessoal, preciso atualizar um campo (ZF4_CODBEN) de forma sequencial
> conforme o codigo do contrato vai mudando.
> Exemplo:
>
> select first 20
> zf4.zf4_contra,
> zf4.zf4_tipo,
> ZF4.zf4_codben,
> zf4.zf4_nome
> from zf4
> order by zf4.zf4_contra, zf4.zf4_tipo desc
>
> Essa consulta me retorna isso:
>
>
> +---------------------+-----------------+---------------------+----------------------------------------------------------------------------+
> | ZF4_CONTRA | ZF4_TIPO | ZF4_CODBEN | ZF4_NOME
> |
>
> +---------------------+-----------------+---------------------+----------------------------------------------------------------------------+
> | 000001 | T | | JOAO GREGORIO DA SILVA
>
> | 000001 | F | | JOSE GREGORIO DA SILVA
> | 000001 | D | | NACI DE OLIVEIRA SILVA
>
> | 000001 | D | | PEDRO DE OLIVEIRA
>
> | 000001 | D | | ALCEDINA JOSEFA DO NASCIMENTO
> | 000001 | D | | GLEICE HELEN MARTINS DUARTE SANTOS
> | 000001 | D | | ANNA LUCIA NASCIMENTO
> | 000002 | T | | JOSE LAUREANO DE SOUZA
> | 000002 | F | | CAROLINA MARIA DE JESUS
> | 000002 | F | | ANTONIO LAUREANO DE SOUZA
> | 000002 | F | | EVA PEREIRA DE ABREU
> | 000002 | D | | NILMA ABREU DE SOUZA
> | 000002 | D | | VILMA ABREU DE SOUZA
> | 000002 | D | | VILMAR ABREU DE SOUZA
> | 000002 | D | | ROSALINA ABREU DE SOUZA
> | 000003 | T | | DORALICE BORGES REIS
> | 000003 | F | | JOSE LUIZ MISCENA BORGES
> | 000003 | D | | MARINALVA MISCENA BORGES
> | 000003 | D | | MARIA DE JESUS REIS BORGES
> | 000003 | D | | MARILYA BRASILIA NASCIMENTO BORGES
>
> +---------------------+-----------------+---------------------+----------------------------------------------------------------------------+
>
> E na verdade eu precisaria disso:
>
>
> +---------------------+-----------------+---------------------+----------------------------------------------------------------------------+
> | ZF4_CONTRA | ZF4_TIPO | ZF4_CODBEN | ZF4_NOME
> |
>
> +---------------------+-----------------+---------------------+----------------------------------------------------------------------------+
> | 000001 | T | 1 | JOAO GREGORIO DA SILVA
>
> | 000001 | F | 2 | JOSE GREGORIO DA SILVA
> | 000001 | D | 3 | NACI DE OLIVEIRA SILVA
>
> | 000001 | D | 4 | PEDRO DE OLIVEIRA
>
> | 000001 | D | 5 | ALCEDINA JOSEFA DO NASCIMENTO
> | 000001 | D | 6 | GLEICE HELEN MARTINS DUARTE SANTOS
> | 000001 | D | 7 | ANNA LUCIA NASCIMENTO
> | 000002 | T | 1 | JOSE LAUREANO DE SOUZA
> | 000002 | F | 2 | CAROLINA MARIA DE JESUS
> | 000002 | F | 3 | ANTONIO LAUREANO DE SOUZA
> | 000002 | F | 4 | EVA PEREIRA DE ABREU
> | 000002 | D | 5 | NILMA ABREU DE SOUZA
> | 000002 | D | 6 | VILMA ABREU DE SOUZA
> | 000002 | D | 7 | VILMAR ABREU DE SOUZA
> | 000002 | D | 8 | ROSALINA ABREU DE SOUZA
> | 000003 | T | 1 | DORALICE BORGES REIS
> | 000003 | F | 2 | JOSE LUIZ MISCENA BORGES
> | 000003 | D | 3 | MARINALVA MISCENA BORGES
> | 000003 | D | 4 | MARIA DE JESUS REIS BORGES
> | 000003 | D | 5 | MARILYA BRASILIA NASCIMENTO BORGES
>
> +---------------------+-----------------+---------------------+----------------------------------------------------------------------------+
>
> Tentei fazer a atualização do campo zf4_codben com uma procedure, mas ela
> funciona parcialmente.
>
> BEGIN
> FOR
> select distinct
> zf4.zf4_ctrant
> from
> zf4
> order by zf4.zf4_contra, zf4.zf4_tipo desc
> INTO :ZF4_CTRANT
> DO
> BEGIN
> SQL = 'ALTER SEQUENCE CONTADOR RESTART WITH 0;';
> execute statement :SQL;
>
> UPDATE ZF4 SET
> zf4_codben = lpad(GEN_ID(CONTADOR, 1),4,'0') where zf4.zf4_ctrant =
> :ZF4_CTRANT order by zf4.zf4_contra, zf4.zf4_tipo desc;
>
> SUSPEND;
> END
> END
>
> Não sei aonde eu possa estar errando.
> Gostaria da ajuda de vocês.
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas:
> http://www.firebase.com.br/pesquisa_lista.html
>
--
--
B em B@BU iB em M@B. B em MBBO MBBMMB em B@BZLr E@@@@i r@@@BU
vB em M@O E em B@Bu BBBM em 0 G em MMM@N8MBB em ZP5r B em B@k 8B@@O
OB em B@q 2 em BBBM B em B@BO BB em B@B,.:,7B em B@@L uB em B@, OB em B@.
,@@@B@ @BBB@, @BBB em 8 M em M@@@ PB em B@B @@@BN iB em B@L
U em B@B2 LB em B@X B em MBBO MBBM em B i em BBB@. 7 em B@Bi B em B@E
B@@@BiM em M@B. @BBM em G M em MMB@ v@@M em B, G em B@Z v em B@B.
7B em B@O em B@B5 B em B@B8 BBBM em B Z@@@B@ iB@@@2 em B@Br
NB em M@B em B8 @B em B@8 M em B@B em i:i75 em B@B em r E@@B em B@Bq
. em B@@@B@: B em B@B@ @B@@@B em B@B@@@ME; .BB em MBB@
55.ANOS OMOGBS PBZGGOOMOO117, 7 em BBB@r
==============================================r@@@@F=====
Gladiston Santana 8 em B@B,
Supervisor de TI G em B@B7
Tel.:+551147873122 R:228 :@B em B0
Grupo VIDY - SGQ ISO9001 - 55 ANOS @B em B@.
Visite nosso site: www·vidy·com·br BB@@@u
Visite também : www·expolabor·com·br GB em B@N
Mais detalhes sobre a lista de discussão lista