Tema: Recursividad
Ver Mensaje Individual
  #1 (permalink)  
Antiguo 10/02/2012, 11:42
mrprogman
 
Fecha de Ingreso: junio-2011
Mensajes: 329
Antigüedad: 12 años, 10 meses
Puntos: 2
Recursividad

saludos a todos..tengo un drop down list con una serie de ordenes de trabajo, dependiendo

este query me selecciona los ultimos 5 digitos de un dropdown list
SELECT RIGHT(parte, LEN(parte)-3) FROM [ocrastreodos] where parte='05-91657'

una vez que yo tengo este valor, con ese valor me voy a otra tabla y me selecciona un valor este es mi 2do query

select SUM(origqty) from openorder where onum='91657'

el problema q tengo es como puedo hacer esto en un solo codigo....estos son mis codigos:

codigo 1--------------------------
Dim DS As DataSet
Dim MyConnection As SqlConnection
Dim MyCommand As SqlDataAdapter
MyConnection = New SqlConnection("Data Source=192.168.10.20;Initial Catalog=compras;Persist Security Info=True;User ID=sa;Password=stm01")
MyCommand = New SqlDataAdapter("SELECT RIGHT(parte, LEN(parte)-3) FROM [ocrastreodos] where oc= '" & DropDownList2.Text & "' ", MyConnection)

DS = New DataSet()
MyCommand.Fill(DS, "ocrastreodos")
DropDownList96.DataSource = DS.Tables("ocrastreodos").DefaultView
DropDownList96.DataBind()
DropDownList96.DataBind()
codigo 2-------------------------------------------------------

Dim DS As DataSet
Dim MyConnection As SqlConnection
Dim MyCommand As SqlDataAdapter
MyConnection = New SqlConnection("Data Source=192.168.10.20;Initial Catalog=compras;Persist Security Info=True;User ID=sa;Password=stm01")
MyCommand = New SqlDataAdapter("SELECT sum(origqty) FROM [openorder] where parte= '" & DropDownList55.Text.Trim() & "' ", MyConnection)

SELECT RIGHT(parte, LEN(parte)-3) AS [Right] FROM [OCRastreodos] where oc= '16082'

DS = New DataSet()
MyCommand.Fill(DS, "openorder")
DropDownList76.DataSource = DS.Tables("openorder").DefaultView
DropDownList76.DataBind()
DropDownList76.DataBind()