[firebase-br] Select em 2 bancos

[Levy Moreira]

 Trate a exceção no aplicativo, disconheço uma forma de fazer o tratamento
de exceções no sql...

2010/10/7 DanielN <danieln.desenvol em supersoft.com.br>

> Levy vc saberia me dizer se existe alguma maneira de fazer um tratamento
> caso o fdb não exista?
>
> Grato
> Daniel Nicoletti
>
>
> Em 07/10/2010 10:38, Levy Moreira escreveu:
>
>  É sim senhor aki esta um exemplo meu:
>>
>> --SELECT * FROM FAT  where CLIFAT = 1 and TIPFAT = 'VP'
>>
>> execute ibeblock
>> returns(  CLINEW integer, CODF integer,CLIF  integer, TIPF varchar(5),
>> CLIANT integer, NMCLI varchar(45))
>> as
>> begin
>>         --Cria as conexoes--
>>   create connection dbNew dbname 'c:\dados1.fdb' --Banco atual
>>   password 'masterkey' user 'SYSDBA'
>>   sql_dialect 3
>>   clientlib 'fbclient.dll';
>>
>>   create connection dbAnt dbname 'c:\dados2.fdb'  --Banco antigo
>>   password 'masterkey' user 'SYSDBA'
>>   sql_dialect 3
>>   clientlib 'fbclient.dll';
>>
>>   use dbNew;
>>   for execute statement 'select CODFAT, CLIFAT, TIPFAT, CLIANT from "FAT"'
>> --Loop  ..
>>   into :CODF, :CLIF, :TIPF , :CLIANT
>>   do
>>   begin
>>     if (:CLIF = 1 and TIPF='VP') then --...verificando se a Fat perdeu o
>> Cli
>>     begin
>>        use dbAnt;
>>        select CLIFAT from fat where CODFAT = :CODF  --Verifica o codigo da
>> Fat. no bd ant
>>        into :CLIANT;
>>
>>        select NOME01 from cli where CODCLI = :CLIANT --Pega o nome do cli
>> no
>> bd ant
>>        into :NMCLI;
>>
>>        use dbNew;
>>        select CODCLI from CLI where NOME01 = :NMCLI --Pega o codigo do
>> cliente no banco atual
>>        INTO :CLINEW;
>>
>>        update FAT set CLIFAT = :CLINEW where CODFAT = :CODF ; --Seta o
>> cliente na Fat
>>        commit;
>>     end
>>
>>     suspend;
>>   end
>>
>>   close connection dbNew;
>>   close connection dbAnt;
>> end
>>
>>
>>
>
>
> ______________________________________________
> 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://firebase.com.br/pesquisa
>



-- 
Levy Moreira - Sistech Informática
Juzeiro do Norte - Ce