ERP Nedir? | Türkiye'nin ERP Forum Platformu : ORTVADE fonksiyon hk.

ORTVADE fonksiyon hk. : sercanakgok Yazdı:Merhaba,gönderdiginiz...

Tue, 20 Sep 2016 19:29:56 +0000

Yazar: dbicer83
Konu: 4403
G�nderim Zaman�: 20 Eyl�l 2016 Saat 19:29

sercanakgok Yazd�:

Merhaba,
g�nderdiginiz kod bir fonksiyon tanimlama i�in.
Ancak netsis tablolari i�in hazirlanmamis. En azindan standart tablolardan degil.
Siz de o tablolar tanimli olmadigi i�in fonksiyon olusmuyor muhtemelen.

Eger olussa idi istediginiz cari ile ilgili raporda
DBO.UDF_ORTVADE(CARI_KOD)

seklinde bir alan ekleyip kullanabilirdiniz.

Ilgili tabloyu nasil yapabilirim

Tesekk�rler

ORTVADE fonksiyon hk. : Merhaba,gönderdiginiz kod bir...

Tue, 20 Sep 2016 13:19:09 +0000

Yazar: sercanakgok
Konu: 4403
G�nderim Zaman�: 20 Eyl�l 2016 Saat 13:19

Merhaba,
g�nderdiginiz kod bir fonksiyon tanimlama i�in.
Ancak netsis tablolari i�in hazirlanmamis. En azindan standart tablolardan degil.
Siz de o tablolar tanimli olmadigi i�in fonksiyon olusmuyor muhtemelen.

Eger olussa idi istediginiz cari ile ilgili raporda
DBO.UDF_ORTVADE(CARI_KOD)

seklinde bir alan ekleyip kullanabilirdiniz.

ORTVADE fonksiyon hk. : Merhabalar,Asagidaki kodu buldum...

Fri, 16 Sep 2016 14:54:54 +0000

Yazar: dbicer83
Konu: 4403
G�nderim Zaman�: 16 Eyl�l 2016 Saat 14:54

Merhabalar,

Asagidaki kodu buldum fakat �alistiramiyorum.

Nerede hata yapiyorum.

Yardimlarinizi i�in simdiden tesekk�rler.

create FUNCTION [dbo].[ORTVADE](@FIRMA_ID varchar(10), @YIL_ID int) RETURNS SMALLDATETIME

AS

BEGIN

DECLARE @REFDATE SMALLDATETIME

DECLARE @Bakiye DECIMAL(38,2)

DECLARE @xBA VARCHAR(1)

DECLARE CariOZET_Cursor CURSOR FOR

SELECT bakiye FROM Cariozet

WHERE (FIRMAKODU = @FIRMA_ID) AND (YIL = @YIL_ID)

OPEN CariOZET_Cursor

FETCH NEXT FROM CariOZET_Cursor

INTO @Bakiye

CLOSE CariOZET_Cursor

DEALLOCATE CariOZET_Cursor

IF @Bakiye >= 0 SET @xBA = 'B'

ELSE SET @xBA = 'A'

SET @REFDATE = Getdate()-2000

DECLARE @SAdat Float, @SBakiye Float, @Flag int

DECLARE @VADETAR SMALLDATETIME, @BA VARCHAR(1), @BORC Float, @ALACAK float

DECLARE CariEkstre_Cursor CURSOR FOR

SELECT Vadetar, BA, BORC, ALACAK FROM CariEkstre

WHERE (FIRMAKODU = @FIRMA_ID) AND (YIL = @YIL_ID) AND (BA = @xBA)

ORDER BY VADETAR DESC

OPEN CariEkstre_Cursor

FETCH NEXT FROM CariEkstre_Cursor

INTO @VADETAR, @BA, @BORC, @ALACAK

SET @SAdat=0

SET @SBakiye = 0

SET @FLAG = @@FETCH_STATUS

WHILE (@FLAG = 0 )

BEGIN

IF @xBA = 'B'

BEGIN

If @SBakiye + @Borc > @Bakiye

BEGIN

SET @SAdat=@SAdat + (@Bakiye - @SBakiye) * CONVERT(float, @VADETAR - @RefDate)

SET @SBakiye = @Bakiye

SET @Flag=1

END

ELSE

BEGIN

SET @SBakiye = @SBakiye + @Borc

SET @SAdat=@SAdat + @BORC * CONVERT(float, @VADETAR - @RefDate)

END

END

ELSE

BEGIN

If @SBakiye + @Alacak > @Bakiye

BEGIN

SET @SAdat=@SAdat + (@Bakiye - @SBakiye) * CONVERT(float, @VADETAR - @RefDate)

SET @SBakiye = @Bakiye

SET @Flag=1

END

ELSE

BEGIN

SET @SBakiye = @SBakiye + @Alacak

SET @SAdat=@SAdat + @Alacak * CONVERT(float, @VADETAR - @RefDate)

END

END

FETCH NEXT FROM CariEkstre_Cursor

INTO @VADETAR, @BA, @BORC, @ALACAK

IF @@FETCH_STATUS <> 0 SET @Flag=1

END

CLOSE CariEkstre_Cursor

DEALLOCATE CariEkstre_Cursor

RETURN @REFDATE + FLOOR(@SAdat / @SBakiye)

END