[firebase-br] Alter user

[Carlos H. Cantu]

Correto, usar o execute statement é um workaround que pode funcionar
pra ele (caso esteja disposto a criar a procedure ou usar num execute
block).

[]s
Carlos H. Cantu
www.FireBase.com.br - www.firebirdnews.org
www.warmboot.com.br - blog.firebase.com.br

MAR> Boa noite Cantu,


MAR> Penso que a resposta para o grupo será mais a que segue abaixo.
MAR> Todavia, só me funciona FB25 com o XE(1) já no Delphi 7 com Fb25 está a dar problemas, 
MAR>  
MAR>      { 335544569 Invalid token  SQL error code = -104  }
MAR> ainda não percebi porquê(?!), mas se alguém do grupo tiver uma
MAR> ideia e quiser ajudar, melhor. Obrigado


MAR> Cá vai o código: 
MAR>  
MAR> CREATE PROCEDURE MUDAR_PWD(
MAR>   IN_USER VARCHAR(10) NOT NULL COLLATE PXW_INTL850,
MAR>   IN_PASSWORD VARCHAR(25) NOT NULL COLLATE PXW_INTL850)
MAR> AS
MAR> DECLARE VARIABLE STM VARCHAR(250) COLLATE PXW_INTL850; 
MAR> BEGIN


MAR>   /* Corpo do Procedimento */
MAR> STM = ' ALTER USER '||:IN_USER ||' PASSWORD ''|| :IN_PASSWORD|| '' GRANT ADMIN ROLE' ;


MAR> EXECUTE STATEMENT :STM ; 


MAR> WHEN ANY DO
MAR>  BEGIN
MAR>    EXCEPTION STOP 'Erro! Códigos GDS: '|| COALESCE(GDSCODE,0)||' / SQL: '||COALESCE(SQLCODE,0);
MAR>  END
MAR>   
MAR> END; 

MAR> Com os meus melhores cumprimentos
MAR> O Secretário Geral da ACRA
MAR> Mário Agostinho  Reis

MAR> Esta mensagem contém informação de natureza confidencial e é
MAR> exclusivamente dirigida ao(s) destinatário(s) indicado(s). Se, por engano,
MAR>  receber este email agradecemos que não o copie nem o reenvie e que nos
MAR> notifique do ocorrido através do email de resposta. 


MAR> No dia 15 de Janeiro de 2014 às 23:28, Carlos H. Cantu
MAR> <listas em warmboot.com.br> escreveu:

MAR>  Vc não pode usar parâmetros com ALTER USER.
MAR>  
MAR>  []s
MAR>  Carlos H. Cantu
MAR>  www.FireBase.com.br - www.firebirdnews.org
MAR>  www.warmboot.com.br - blog.firebase.com.br
MAR>  
 MR>> Como devo implementar este código:
 MR>> ALTER USER :IN_USER PASSWORD :IN_PWD ROLE SYSDBA
 MR>> Estou a tentar num IBQuery, porem sem sucesso
 MR>> Alguém tem um exemplo.
 MR>> Obrigado
 MR>> Mário
MAR>  
MAR>  
MAR>  ______________________________________________
MAR>  FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
MAR>  Para saber como gerenciar/excluir seu cadastro na lista, use:
MAR> http://www.firebase.com.br/fb/artigo.php?id=1107
MAR>  Para consultar mensagens antigas: http://firebase.com.br/pesquisa
MAR>