Ler Dados e gravar em 2 Tabelas
Pessoal Bom dia,
Estou com um problema numa rotina que não consegui finalizar.
No tedit estou fazendo um select no evento on enter consultando um codigo em uma tabela X, O resultado deste codigo preciso gravar na tabela Y e Z e mostrar na grid.
O banco é Oracle, veja o select:
select a.codigo_rolo, a.panoacab_grupo, a.panoacab_subgrupo, a.panoacab_item, a.lote_acomp, a.codigo_deposito, a.qtde_quilos_acab, '+
'a.rolo_estoque, a.nota_fiscal, a.unidade_medida from pcpt_020_025 a '+
'where a.codigo_rolo = '''+edrolo.text+'''
Como gravo este resultado na tabela Y e Z?
Estou com um problema numa rotina que não consegui finalizar.
No tedit estou fazendo um select no evento on enter consultando um codigo em uma tabela X, O resultado deste codigo preciso gravar na tabela Y e Z e mostrar na grid.
O banco é Oracle, veja o select:
select a.codigo_rolo, a.panoacab_grupo, a.panoacab_subgrupo, a.panoacab_item, a.lote_acomp, a.codigo_deposito, a.qtde_quilos_acab, '+
'a.rolo_estoque, a.nota_fiscal, a.unidade_medida from pcpt_020_025 a '+
'where a.codigo_rolo = '''+edrolo.text+'''
Como gravo este resultado na tabela Y e Z?
Tarciano
Curtidas 0
Respostas
Jhonatan Pereira
28/07/2015
Grava ele em uma variável e dá um INSERT em cada tabela...
GOSTEI 0