Ds = DatosCliente.Consulta("SELECT ofic.sctcdesc as oficina, scclccli, scclnomb, scclcanu, sccltele, sccltelx, " & _
" esta.sctcdesc as estado" & _
" FROM scmaecli, sctabcon ofic, sctabcon esta" & _
" WHERE ofic.sctcgrup = 81 " & _
" AND scclofic = ofic.sctcgrup*1000+ofic.sctcsubg " & _
" AND esta.sctcgrup = 97 " & _
" AND scclesta = esta.sctcgrup*1000+esta.sctcsubg " & _
" AND scclofic = 81011 ORDER BY scclccli")
DataGrid1.DataSource = Ds.Tables("scmaecli")