Comando Copy

Firebird

04/04/2003

Alguem poderia me ajudar com o comando copy?

Eu gostaria de saber como faço para inserir partes de um campo char em outro campo via instrução insert (exemplo do copy() no delphi), eu gostaria de fazer a mesma função no Interbase 7, mas nao sei como posso fazer isso...Vc poderia em dizer, caso saiba?

Agradeço pela atenção...

Cristiane


Cristiane

Cristiane

Curtidas 0

Respostas

Afarias

Afarias

04/04/2003

registre a função externa SUBSTR da IB_UDF (vem com o IB)

DECLARE EXTERNAL FUNCTION substr
CSTRING(80), SMALLINT, SMALLINT
RETURNS CSTRING(80) FREE_IT
ENTRY_POINT ´IB_UDF_substr´ MODULE_NAME ´ib_udf´;

O primeiro parâmetro é o valor ´string´, o segundo é a posição inicial e o terceiro é a posição final!

então, use-a:

insert into TABELA_1 (CAMPO_A)
select substr(CAMPO_B, 1, 3) from TABELA_2

ou

update TABELA_1 set CAMPO_A = (
select substr(CAMPO_B, 1, 3) from TABELA_2
where COMPO_CHAVE = x )


Abraço


GOSTEI 0
POSTAR