Este es un ejemplo de como crear
un datawindow desde una instrucción select que se tiene. Es muy últil y
muy práctico el ejemplo
string ls_select
string ls_where
string ls_dwsyntax
string ls_err
ls_select = Select id, fname, lname, address, city, state, zip from
customer
ls_where = where customer.fname like ' + is_cust + %'
ls_dwsyntax = SQLCA.SyntaxFromSQL ( ls_select, Style(Type=grid),
ls_err )
dw_1.Create ( ls_dwsyntax, ls_err )
IF ls_err <> '' THEN
MessageBox ( error - Syntax, ls_err )
ELSE
dw_1.SetTransObject ( SQLCA )
dw_1.Retrieve()
END IF
Traducido de
http://www.rgagnon.com/howto.html
Todos los derechos de copia reservados



Ultimas Versiones

