Llamar procedimiento almacenado
Publicado por Ivan (3 intervenciones) el 01/06/2017 05:55:44
Hola buen dia
Tengo un problema en una aplicación vb.net que ando realizando consta de un punto de venta que alimenta a otra aplicacion BackOffice la cual tiene un boton llamado Cerrar Dia. Lo que quiero realizar es que al momento de dar click sobre ese boton valide si ese dia tuvo venta o no, en caso de no tener no debera permitir el cierre del dia.Mi prototipo del procedimiento almacenado es el siguiente.
Si existe venta devuelve 1 y en caso contrario 0. Me gustaria saber la forma de llamarlo al momento de realizar el evento click sobre el boton de cerrar dia en el BackOffice. Uso tres capas en las cuales eh colocado codigo pero no funciona
CAPA DATOS:
Tengo un problema en una aplicación vb.net que ando realizando consta de un punto de venta que alimenta a otra aplicacion BackOffice la cual tiene un boton llamado Cerrar Dia. Lo que quiero realizar es que al momento de dar click sobre ese boton valide si ese dia tuvo venta o no, en caso de no tener no debera permitir el cierre del dia.Mi prototipo del procedimiento almacenado es el siguiente.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
USE [EclipseDB]
GO
/****** Object: StoredProcedure [dbo].[ValidarVenta_Cierre] Script Date: 31/05/2017 22:59:33 ******/SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER proc [dbo].[ValidarVenta_Cierre]
As
Set NoCount On
BEGIN TRY
If (Select Sum (Ventas_Importe) from dbo.Cajero_Asignacion
Where Fecha_Operacion = (Select (Fecha_Operacion) from dbo.Operacion where Estatus = '1')) > '0' --se obtiene fecha por subconsulta
Select 1 --As ExisteVenta
Else
Select 0 --As ExisteVenta
END TRY
BEGIN CATCH
Insert Error_Log_SQL (FechaHora, Numero, Severidad, Estado, Procedimiento, Linea, Descripcion)
Select
GetDate(),
ERROR_NUMBER() AS ErrorNumber,
ERROR_SEVERITY() AS ErrorSeverity,
ERROR_STATE() AS ErrorState,
Left(ERROR_PROCEDURE(), 50) AS ErrorProcedure,
ERROR_LINE() AS ErrorLine,
Left(ERROR_MESSAGE(), 500) AS ErrorMessage
Declare @Mensaje varchar(120)
Set @Mensaje = 'Error en: ' + Left(ERROR_PROCEDURE(), 50) + ': ' + Left(ERROR_MESSAGE(), 100)
Raiserror(@Mensaje, 16, 1)
END CATCH
Si existe venta devuelve 1 y en caso contrario 0. Me gustaria saber la forma de llamarlo al momento de realizar el evento click sobre el boton de cerrar dia en el BackOffice. Uso tres capas en las cuales eh colocado codigo pero no funciona
CAPA DATOS:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Public Function validar_VentaCierre(ByVal dts As vconfiguracion_sistema)
Try
conectado()
cmd = New SqlCommand("ValidarVenta_Cierre")
cmd.CommandType = CommandType.StoredProcedure
cmd.Connection = cnn
If cmd.ExecuteNonQuery ThenReturn True
Else
Return False
End If
Catch ex As Exception
Dim dts_error_log_sql As New verror_log_sql
Dim func As New ferror_log_sql
dts_error_log_sql.gdescripcion = ex.Message
If func.insertar_error_log_sql(dts_error_log_sql) Then
MsgBox(ex.Message)
End If
Return Nothing
Finally
desconectado()
End Try
End Function
Valora esta pregunta
0