Visual Basic.NET - Reset un contador

 
Vista:
sin imagen de perfil

Reset un contador

Publicado por Jose (23 intervenciones) el 27/09/2016 21:57:06
Hola como van .
Tengo una consulta quería saber si son tan amble y tomarse el tiempo en ayudarme

La consulta es la siguiente estoy desallorando en VB.NET ( componente en DEVEXPRES) un sistema de caja chica en el cual tengo cuatro tabla que se llama Factura , Factura detalle , Comprobante y No_Factura

y en el en la tabla factura el usuario mete un comprobante con su numero de factura y se actuliza bien pero cuando el usuario no mete el numero de factura el sistema genera un numero de factura y lo actualiza en la factura detalle y en la tabla No_Factura bien pero cuando va a meter un nueva factura a otro comprobante me tira el consecuitivo y no se me reinicia el contador

este el proceso que uso para generar el numero automatico es:

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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
ALTER  PROC [dbo].[InsertaR_Factura]
	@FacturaID AS INT OUTPUT,
	@Nosol AS NVARCHAR(20),
	@NO_COMP AS NVARCHAR(10),
	@No_Factura AS NVARCHAR(10) OUTPUT ,
	@Fecha as  DATE ,
	@Monto_Factura INT ,
	@CONCEPTOFactura AS NVARCHAR (500),
	@RUC AS NVARCHAR(20),
	@Proveedor AS NVARCHAR (20),
	@accion AS NVARCHAR(10),
	@GenerarAutomaticamente AS BIT
 
AS
 
 
if @GenerarAutomaticamente=1
BEGIN
 
	declare @no AS int
    SELECT @NO=nf.No_Factura + 1 FROM No_Factura AS nf
    SET @No_Factura=cast(@no AS NVARCHAR(10))
END
 
IF @accion ='NEW'
BEGIN
		INSERT INTO CCH_FACTURA
(
	Nosol,
	NO_COMP,
	No_Factura,
	Fecha,
	Monto_Factura,
	Concepto,
	RUC,
	Proveedor
)
VALUES
(
	@Nosol,
	@NO_COMP,
	@No_Factura,
	@Fecha,
	@Monto_Factura,
	@CONCEPTOFactura,
	@RUC,
	@Proveedor
)
 
SET @FacturaID =SCOPE_IDENTITY()
 
if @GenerarAutomaticamente=1
	BEGIN
		UPDATE no_factura SET No_Factura = @No_Factura
	END
 
END
 
IF @accion ='EDIT'
BEGIN
	UPDATE CCH_FACTURA
	SET
		No_Factura = 	@No_Factura,
		Fecha =	@Fecha,
		Monto_Factura =	@Monto_Factura,
		RUC = @RUC,
		Proveedor = @Proveedor,
		Concepto =@CONCEPTOFactura
 
	WHERE ID_Factura=@FacturaID
END

Gracias por su tiempo tomado espero atentament su respuesta
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder