Autor Tema: problemas con una funcion que genera id (Leído 2604 veces)

blusky · « **en:** Jueves 2 de Septiembre de 2010, 03:25 »

hola a todos. estoy creando un sistema contable y cree una fucncion que me genere un codigo del tipo XXXX-xxxx pero de la siguiente manera.
los primeros 4 digitos se refieren a la cuenta mayor, luego añado el guion y despues tengo que incrementar consecutivamente el numero final.
ej:
1010:Codigo de cuenta mayor
1010-0001, 1010-0002,1010-0003 etc. :Codigo de cuenta auxiliar
xxxx:numero que se incrementara en 1 para cada una de las cuentas mayores

la funcion me genera el numero de la cuenta auxiliar incrementado pero si yo ingreso otro codigo de cuenta mayor como 1214-0000 entonces me devuelve 1214 con el ultimo codigo incrementardo. no se si me explico. espero me puedan ayudar. gracias.

create function genNumeroCuentaAux(@Num_CM nvarchar(9))
returns char(9)
begin
declare @Num_CA nvarchar(9)
declare @Numero int
declare @Numgenerado nvarchar(9)
if not exists(select Num_CA from tblCuentaAuxiliar where Num_CM=@Num_CM)
-- inner join tblCuentaMayor on tblCuentaAuxiliar.Id_CuentaMayor=tblCuentaMayor.Id_CuentaMayor )
begin
set @Numero = 0001

--set @Num_CM=(select Num_CM from tblCuentaMayor)
set @Num_CA=(SUBSTRING(@Num_CM,1,4)+@Numero)
end
else
begin
set @Num_CA=(select max(Num_CA) from tblCuentaAuxiliar where Num_CM=@Num_CM)
   --set @Num_CM=(select Num_CM from tblCuentaMayor)
set @Numero=CONVERT(INT,SUBSTRING(@Num_CA, 4, 4))
set @Num_CM=SUBSTRING(@Num_CM,1,5)
set @Numero=@Numero+1
   if @Numero <10000
   begin
   set @Numero=0
   end

set @Numgenerado=LEFT(@Num_CM,5)+'-'+RIGHT(CAST(@Numero AS NVARCHAR(4)),4)
end
return @Numgenerado
end

F_Tanori

A ver si he logrado entender, lo unico que quieres hacer es incrementar la subcuenta no?

Si es asi fijate si este codigo te sirve:

Código: SQL

CREATE FUNCTION genNumeroCuentaAux(@Num_CM VARCHAR(9))
RETURNS VARCHAR(9)
BEGIN
DECLARE @Num_CA VARCHAR(9)
DECLARE @Numero INT
DECLARE @NumSiguiente_CA VARCHAR(9)
 
    SELECT @Num_CA=MAX(Num_CA) FROM tblCuentaAuxiliar WHERE Num_CM=@Num_CM
    SELECT @Num_CA=isnull(@Num_CA,'')
    SELECT @Numero = 0
    SELECT @NumSiguiente_CA=@Num_CM
 
    IF @Num_CA<>''
        BEGIN
            SELECT @Numero=CAST(SUBSTRING(@Num_CA,6,4) AS INT)
        END
 
    SELECT @Numero = @Numero+1
    SELECT @NumSiguiente_CA=@NumSiguiente_CA+'-'+RIGHT('000'+CAST(@Numero AS VARCHAR(4)),4)
    RETURN @NumSiguiente_CA
 
END 
 
GO
SELECT dbo.genNumeroCuentaAux('1010')
 

Saludos

blusky

gracias F_Tanori. probare el codigo y te dire como me va. lo que quiero es que el numero de la subcuenta se incremente en 1.
es que la cuenta principal tiene los primeros cuatro numeros que el usuario introduce "XXXX", luego el guion "-" y despues seguido de los ultimos 4 digitos "0000"
y el de la subcuenta debe ser el numero de la cuenta principal pero con los ultimos deben irse incrementando. espero haberme explicado mejor.
Ej: Cuenta Principal 1545-0000
Cuenta Subcuenta 1545-0001

y gracias por tu codigo. te aviso si pude hacer lo que queria.

blusky

Hola F_tanori!!!!!!! saludos a todos.

ya probe con tu codigo que me mandaste eso es lo que quiero pero tengo un problem cuando quiero ejecutar el procedimiento almacenado,
por eso te mando este codigo para que talvez me lo revises y me puedas decir donde esta el error. funciona bien si ingreso la primera cuenta pero
despues me sale un error de foreign key.

gracias!!!!!

create procedure sp_IngresarCM
@Cod_CM nvarchar(9),
@Nombre_CM nvarchar(50)
as
begin
insert into tblCuentaMayor values (@Cod_CM,@Nombre_CM)
end

sp_IngresarCM '1010-0000','Efectivo'
sp_IngresarCM '1120-0000',''
go

select * from tblCuentaMayor

create procedure sp_IngresarCA
@Cod_CA nvarchar(9),
@Nombre_CA nvarchar(50),
@Cod_CM nvarchar(9)
as
begin
insert into tblCuentaAuxiliar values(dbo.genNumeroCuentaAux(@Cod_CM),@Nombre_CA,@Cod_CM)
end
go

sp_IngresarCA '1010-0000','Caja chica','1010-0000'
go
sp_IngresarCA '1010','Banco','1010-0000'

SELECT * FROM TBLCUENTAMAYOR
GO
select * from tblCuentaAuxiliar

F_Tanori

Seria bueno que nos mostraras la estructuras de tus tablas (CREATES) incluyendo PKs, FKs, IDX ...

Para poder crear un escenario mas parecido al tuyo, ya que es un poco dificil sin tener la base de datos y desconocer el sistema y la logica del mismo, ademas de que "...me sale un error de foreign key..." como que explica pero no explica es decir un error de foreing key? relacionado con la FK pero que en especifico, no existe, no la puede crear, no es valida etc

Coloca el mensaje de error que te arroja MsSQL y las estructuras de tus tablas en sql para poderlas crear

Saludos

blusky

hola. Aqui escribo la estructura de las tablas. de prueba solo pongo las 2 que interesan.

tblCuentaMayor
Cod_CM nvarchar(9) primary key not null,
Nombre_CM(50) not null

tblCuentaAuxiliar
Cod_CA nvarchar(9) primary key not null,
Nombre_CA nvarchar(50) not null,
Cod_CM nvarchar(9) not null foreign key references tblCuentaMayor(Cod_CM )

Espero te sirva mas y puedas ver mejor la sistuacion que quiero hacer.

SoloCodigo

Autor Tema: problemas con una funcion que genera id (Leído 2604 veces)

blusky

problemas con una funcion que genera id

F_Tanori

Re: problemas con una funcion que genera id

blusky

Re: problemas con una funcion que genera id

blusky

Re: problemas con una funcion que genera id

F_Tanori

Re: problemas con una funcion que genera id

blusky

Re: problemas con una funcion que genera id