comprobar si existe registros en dos tablas relacionadas

Question

desearía comprobar si el datos que estoy buscando se encuentra en registro cero (0) la tabla esta relacionada 

con :

tabla_inventario:                      

id_product

cantidad

 tabla_venta_tmp

id_product cantidad

Answer 1

Hola

no se entiende tu pregunta, podrías editarla y dar un mejor detalle de lo que necesitas.

---

Si se solucionó tu consulta no olvides marcar la respuesta de esta forma mantendremos el orden en el Foro.

José Carlos Barba Gutierrez
Lima - Perú
Saludos

Answer 2

buenos dias Jose Barba

bueno osea sabes si el registro en dos tablas relacionadas se encuentra en cero por lo menos la cantidad es un campo que se encuentra en dos tablas llamadas tabla_inventario y la otra es tabla_venta_detalle_tmp 

comprobar si el valor de campo en dos tabla es esta en cero para que al momento de crear un venta de tal producto si este se encuentra en la cantidad (0) que no me deje crear la venta 

Answer 3

 If cnn.State = ConnectionState.Closed Then cnn.Open()
            Dim cmd As New OleDbCommand
            cmd.Connection = cnn
            ''validamos si existe el producto
            cmd.CommandText = "SELECT COUNT(*) FROM tbl_inventarios WHERE Id_product=@Id_productos"
            cmd.Parameters.Add("@Id_productos", OleDbType.VarChar).Value = ComboBox1.Text
            'cmd.Parameters.Add("@canti_product", OleDbType.VarChar).Value = txtcantidad.Text
            RowCount = CInt(cmd.ExecuteScalar)
            cmd.Parameters.Clear() ''Limpiamos parametros
            If (RowCount = 0) Then
                Throw (New Exception("el producto no existe"))
            End If
            cmd.CommandText = "select count(*) from tbl_inventarios where Id_product=@id_product where canti_product <=0"
            cmd.Parameters.Add("@canti_product", OleDbType.VarChar).Value = txtcantidad.Text
            cmd.Parameters.Add("@Id_productos", OleDbType.VarChar).Value = ComboBox1.Text
            'RowCount = CInt(cmd.ExecuteScalar)
            'cmd.Parameters.Clear() ''Limpiamos parametros
            'If (RowCount = 0) Then
            '    Throw (New Exception("cantidad no disponible para la venta"))
            'End If