Retrieve a Data Windows por NVO

string error_syntaxfromSQL, error_create
string new_sql, new_syntax
datastore lds
lds = create datastore

new_sql =  'SELECT secuencia, cod_criterio, descripcion, cuenta ' + &
'FROM tmp_consulta_resumen_inicial ' + &
'WHERE sesion =  0'
new_syntax = SQLCA.SyntaxFromSQL(new_sql,'Style(Type=Form)', error_syntaxfromSQL)

// Generate new DataWindow
lds.Create(new_syntax, error_create)
lds.settransobject( sqlca)
lds.retrieve( )

ls_xml = lds.Object.DataWindow.Data.XML
dw_control.ImportString(XML!, ls_xml)