Power Builder - Cuestion

 
Vista:

Cuestion

Publicado por Genis (1 intervención) el 23/05/2007 08:39:56
Me gustaría saber cómo hacer para recuperar los nombres de las tablas y los nombres de sus campos de una base de datos para una aplicación pw. Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Cuestion

Publicado por Augusto (124 intervenciones) el 23/05/2007 16:00:52
Hola
Si estas usando sql server como gestor de base de datos,
crea estos procedimientos almacenados y luego
en power builder ejecutas los procedimientos almacenados y listo, tendras
los nombres de tablas y columnas de tu base de datos.

CODIGO SQL SERVER

create procedure usp_recuperarnombretablas
as
select name from sysobjects where xtype = 'U'
go
create procedure usp_recuperarnombrecolumnas
@nombretabla as varchar(50)
as
select syscolumns.name from syscolumns where
syscolumns.id = (select id from sysobjects
where id = object_id(@nombretabla))

CODIGO PARA POWER BUILDER
declare nombre_tabla procedure for usp_recuperarnombretablas;

execute nombre_tabla;
fetch nombre_tabla;

if sqlca.sqlcode <> 0 then
messagebox("Error:","Error en el procedimiento almacenado ...")
messagebox("Detalles: Codigo de error Nº "+string(sqlca.sqlcode),sqlca.sqlerrtext)
else
close nombre_tabla;
sqlca.of_commit();
end if

string ls_nomtabla

ls_nomtabla = 'Cliente'

declare nombre_columna procedure for usp_recuperarnombretablas
@nombretabla = ls_nomtabla;

execute nombre_columna
fetch nombre_columna

if sqlca.sqlcode <> 0 then
messagebox("Error:","Error en el procedimiento almacenado ...")
messagebox("Detalles: Codigo de error Nº "+string(sqlca.sqlcode),sqlca.sqlerrtext)
else
close nombre_columna
sqlca.of_commit();
end if

Bueno. cualquier duda me comunicas a mi correo, o en todo caso lo publicas aqui
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar