RE:Conocer campos de una tabla
Para mostrar los nombres de todas las columnas de la tabla, primero crearemos un objeto DW dinámicamente, luego mostraremos los nombres de las columnas del DW en un listBox.
1. En una ventana pegas un control dw_1, un lb_1 y un botón.
2. Declaras una variable de instancia.
String is_codigo
3. Script en el botón:
// Crear un DW dinámicamente
string ls_select
string ls_dwsyntax
string ls_err
ls_select = "Select * from mitabla"
ls_dwsyntax = SQLCA.SyntaxFromSQL ( ls_select, "Style(Type=grid)", ls_err )
dw_1.Create ( ls_dwsyntax, ls_err )
IF ls_err <> '' THEN
MessageBox ( "error - Sintaxis", ls_err )
END IF
//Determinar Número columnas del DW
int li_ColCount
li_ColCount = integer ( dw_1.describe ( 'datawindow.column.count' ) )
//Mostrar nombres columnas del DW
int li_ColSub
string ls_ColName
FOR li_ColSub = 1 TO li_ColCount
ls_ColName = dw_1.describe ( '#' + String ( li_ColSub ) + '.name' )
//Mostrar los nombres en un ListBox
lb_1.ADdItem(ls_ColName)
NEXT
//--------------Fin---------------
Nota: Demás está decirte que el control DW, debe ser invisible.