ERP Nedir? | Türkiye'nin ERP Forum Platformu : bu kod daha kisa yazilamaz mi http://www.erpne.org/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Wed, 10 Jun 2026 01:42:19 +0000 Wed, 25 Feb 2009 11:19:17 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 11.10 360 www.erpne.org/RSS_post_feed.asp?TID=1440 <![CDATA[ERP Nedir? | Türkiye'nin ERP Forum Platformu]]> http://www.erpne.org/forum_images/logotype.png http://www.erpne.org/ <![CDATA[bu kod daha kisa yazilamaz mi : ilk mesajimda kod&#039;da hata...]]> http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8138.html#8138 Yazar: mbaykan
Konu: 1440
Gönderim Zamanı: 25 Şubat 2009 Saat 11:19

ilk mesajimda kod'da hata vardi KALAN dogru hesaplanmiyordu. ayni mesaji düzelttim, soruyu soran da özet bir rapor istegini söylemis. Ama mevcut prosedür degistirilerek (yani 2 adet select'e -biri devir için GROUP BY'li, digeri grupsuz- detay raporu da listeleneblir.
tabi istenen sütunlari da ilave etmek gerek açiklama v.s. gibi
kolay gelsin
]]> Wed, 25 Feb 2009 11:19:17 +0000 http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8138.html#8138 <![CDATA[bu kod daha kisa yazilamaz mi : Selam, arkadastan önce ben baktim...]]> http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8133.html#8133 Yazar: Conari
Konu: 1440
Gönderim Zamanı: 24 Şubat 2009 Saat 14:37

Selam, arkadastan önce ben baktim gelen bilgiler detaysiz arkadas detayli istiyor sanirim birde devirlere devir yerine kasabakiye-devir tutarini getirtmissiniz.
 
Yanlis degerlendirdi isem pardon.
]]> Tue, 24 Feb 2009 14:37:46 +0000 http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8133.html#8133 <![CDATA[bu kod daha kisa yazilamaz mi : Asagidaki prosedürü olusturup, CREATE...]]> http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8132.html#8132 Yazar: mbaykan
Konu: 1440
Gönderim Zamanı: 24 Şubat 2009 Saat 13:31

Asagidaki prosedürü olusturup,
CREATE PROCEDURE MSP_KASAOZET (@TARIH VARCHAR(12)) AS
BEGIN
DECLARE @KMT VARCHAR(2000)
SET @KMT=
'SELECT AA.KSMAS_KOD,AA.KSMAS_NAME,AA.DOVIZTIPI,SUM(DEVIR) DEVIR,SUM(GIRIS) GIRIS,SUM(CIKIS) CIKIS,SUM(DEVIR)+SUM(GIRIS)-SUM(CIKIS) KALAN FROM
(select a.KSMAS_KOD,b.KSMAS_NAME,B.DOVIZTIPI,
SUM(case when IO=''G'' THEN CASE WHEN DOVIZTIPI=0 THEN TUTAR ELSE DOVIZTUT END ELSE CASE WHEN DOVIZTIPI=0 THEN -TUTAR ELSE -DOVIZTUT END END) DEVIR,
0 GIRIS,0 CIKIS
--,0 KALAN
from tblkasa a (nolock),tblkasamas b(nolock)
where a.KSMAS_KOD=b.KSMAS_KOD AND TARIH<'''+@TARIH+'''
GROUP BY a.KSMAS_KOD,b.KSMAS_NAME,B.DOVIZTIPI
UNION ALL
select a.KSMAS_KOD,b.KSMAS_NAME,B.DOVIZTIPI,
0,
SUM(case when IO=''G'' THEN CASE WHEN DOVIZTIPI=0 THEN TUTAR ELSE DOVIZTUT END ELSE 0 END),
SUM(case when IO=''C'' THEN CASE WHEN DOVIZTIPI=0 THEN TUTAR ELSE DOVIZTUT END ELSE 0 END)
--SUM(case when IO=''G'' THEN CASE WHEN DOVIZTIPI=0 THEN TUTAR ELSE DOVIZTUT END ELSE CASE WHEN DOVIZTIPI=0 THEN -TUTAR ELSE -DOVIZTUT END END)

from tblkasa a (nolock),tblkasamas b(nolock)
where a.KSMAS_KOD=b.KSMAS_KOD AND TARIH='''+@TARIH+'''
GROUP BY a.KSMAS_KOD,b.KSMAS_NAME,B.DOVIZTIPI) AA
GROUP BY AA.KSMAS_KOD,AA.KSMAS_NAME,AA.DOVIZTIPI'
--PRINT @KMT
EXEC(@KMT)
END
EXEC MSP_KASAOZET '2009-02-11'
Seklinde çalistirirsaniz sonuç verir.
kolay gelsin

Düzenleyen mbaykan - 24 Şubat 2009 Saat 13:49]]> Tue, 24 Feb 2009 13:31:04 +0000 http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8132.html#8132 <![CDATA[bu kod daha kisa yazilamaz mi : Selam, Programina kisaca bakmistim.simdi...]]> http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8116.html#8116 Yazar: Conari
Konu: 1440
Gönderim Zamanı: 23 Şubat 2009 Saat 12:32

Selam, Programina kisaca bakmistim.simdi dosya eklemissin onada bakayim görmemistim.
 
exec nsp_netsesguncelle 2, 'ys0001',1,0,'e','h','2',-1,'H',0,0,'H'
 
bu kod ile oturum açabilirsiniz.
]]> Mon, 23 Feb 2009 12:32:52 +0000 http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8116.html#8116 <![CDATA[bu kod daha kisa yazilamaz mi : YERLESIK VIEW LERI KULLANMAK IÇIN...]]> http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8112.html#8112 Yazar: sadettincetin
Konu: 1440
Gönderim Zamanı: 23 Şubat 2009 Saat 12:24

YERLESIK VIEW LERI KULLANMAK IÇIN OTURUM AÇMAK GEREKIYOR.
BIR ÇOK FIRMA KASA MODÜLÜNDE YENI GÜNE DEVIR YAPMIYOR.
BU KODU WEB TABANLI RAPORLAMA PROGRAMIMDA KULLANDIM.
AMACIM MEVCUT DATABASE DE HIÇ BIR DEGISIKLIK VEYA ILAVE YAPMADAN PROGRAMIN ÇALISMASI.
PROGRAM SADECE RAPORLAMA AMAÇLI OLDUGU IÇIN SQL DE OLUSTURULAN KULLANICININ READER YETKISI OLMASI YETERLI.
 
 
http://www.erpne.org/forum_posts.asp?TID=1270&get=last#8102 
 
BU LINKTE DÜN EKLEDIGIM PROGRAM VAR.
]]> Mon, 23 Feb 2009 12:24:42 +0000 http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8112.html#8112 <![CDATA[bu kod daha kisa yazilamaz mi : yerlesik viewlerden yola çikarsaniz...]]> http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8107.html#8107 Yazar: Conari
Konu: 1440
Gönderim Zamanı: 23 Şubat 2009 Saat 12:08

yerlesik viewlerden yola çikarsaniz is ve rapor daha basitlesir.
 
KASALISTE viewine istidigin önceki bakiye ve toplami ekleyebilirsin.
 
bir de bazi seyler için fonksiyon tanimlayiniz mesela;
(select ISIM  from NETSIS..kur where SIRA=t.doviztipi) bunun için bir fonksiyon yazip
kullanirken
 
dbo.DOVISIM(t.doviztipi)) Olarak kullanabilirsiniz.
]]> Mon, 23 Feb 2009 12:08:52 +0000 http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8107.html#8107 <![CDATA[bu kod daha kisa yazilamaz mi : söyle bir rapor lazim oldu: tüm...]]> http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8094.html#8094 Yazar: sadettincetin
Konu: 1440
Gönderim Zamanı: 21 Şubat 2009 Saat 11:26

söyle bir rapor lazim oldu: tüm kasa kodlari itibariyle önceki günden devir,günlük giris,günlük çikis ve gün sonu bakiyelerini çeken bir sorgu yazmaya çalistim.

 
ancak sorgu destan gibi uzadi.
 
bu sorgu daha kisa nasil yazilabilir.
 
fikri ve elestirisi olan arkadaslardan mesaj bekliyorum.
 
sorgu söyle
 
select ksmas_kod,ksmas_name
,--dünden devreden
(select isnull(sum(tutar),0)from
(select '' hartip ,x.ksmas_kod kod,doviz=(select dovizli from tblkasamas where ksmas_kod=x.ksmas_kod),tarih
,isnull(case when (select dovizli from tblkasamas where ksmas_kod=x.ksmas_kod)='H' then tutar else doviztut end,0) tutar,IO gc
,(select doviztipi from tblkasamas where ksmas_kod=x.ksmas_kod) dovtip
from tblkasa x  union all
select  'D' hartip ,ksmas_kod kod,dovizli doviz,'' tarih,case dovizli when 'H' then kssondev_t else kssondev_doviz end tutar,'G' gc,doviztipi dovtip from tblkasamas
) kasa  where tarih < '02.21.2009' and kod=t.ksmas_kod and gc='G')
-
(select isnull(sum(tutar),0)from
(select '' hartip ,x.ksmas_kod kod,doviz=(select dovizli from tblkasamas where ksmas_kod=x.ksmas_kod),tarih
,isnull(case when (select dovizli from tblkasamas where ksmas_kod=x.ksmas_kod)='H' then tutar else doviztut end,0) tutar,IO gc
,(select doviztipi from tblkasamas where ksmas_kod=x.ksmas_kod) dovtip
from tblkasa x  union all
select  'D' hartip ,ksmas_kod kod,dovizli doviz,'' tarih,case dovizli when 'H' then kssondev_t else kssondev_doviz end tutar,'G' gc,doviztipi dovtip from tblkasamas
) kasa  where tarih < '02.21.2009' and kod=t.ksmas_kod and gc='C') devir
,--bugün giren
(select isnull(sum(tutar),0) from
(select '' hartip ,x.ksmas_kod kod,doviz=(select dovizli from tblkasamas where ksmas_kod=x.ksmas_kod),tarih
,isnull(case when (select dovizli from tblkasamas where ksmas_kod=x.ksmas_kod)='H' then tutar else doviztut end,0) tutar,IO gc
,(select doviztipi from tblkasamas where ksmas_kod=x.ksmas_kod) dovtip
from tblkasa x  union all
select  'D' hartip ,ksmas_kod kod,dovizli doviz,'' tarih,case dovizli when 'H' then kssondev_t else kssondev_doviz end tutar,'G' gc,doviztipi dovtip from tblkasamas
) kasa  where tarih = '02.21.2009' and kod=t.ksmas_kod and gc='G' ) ggiris
,--bugün çikan
(select isnull(sum(tutar),0) from
(select '' hartip ,x.ksmas_kod kod,doviz=(select dovizli from tblkasamas where ksmas_kod=x.ksmas_kod),tarih
,isnull(case when (select dovizli from tblkasamas where ksmas_kod=x.ksmas_kod)='H' then tutar else doviztut end,0) tutar,IO gc
,(select doviztipi from tblkasamas where ksmas_kod=x.ksmas_kod) dovtip
from tblkasa x  union all
select  'D' hartip ,ksmas_kod kod,dovizli doviz,'' tarih,case dovizli when 'H' then kssondev_t else kssondev_doviz end tutar,'G' gc,doviztipi dovtip from tblkasamas
) kasa  where tarih = '02.21.2009' and kod=t.ksmas_kod and gc='C' ) gcikis
,--kalan
(select isnull(sum(tutar),0) from
(select '' hartip ,x.ksmas_kod kod,doviz=(select dovizli from tblkasamas where ksmas_kod=x.ksmas_kod),tarih
,isnull(case when (select dovizli from tblkasamas where ksmas_kod=x.ksmas_kod)='H' then tutar else doviztut end,0) tutar,IO gc
,(select doviztipi from tblkasamas where ksmas_kod=x.ksmas_kod) dovtip
from tblkasa x  union all
select  'D' hartip ,ksmas_kod kod,dovizli doviz,'' tarih,case dovizli when 'H' then kssondev_t else kssondev_doviz end tutar,'G' gc,doviztipi dovtip from tblkasamas
) kasa  where tarih <= '02.21.2009' and kod=t.ksmas_kod and gc='G' )
 -
 (select isnull(sum(tutar),0) from
(select '' hartip ,x.ksmas_kod kod,doviz=(select dovizli from tblkasamas where ksmas_kod=x.ksmas_kod),tarih
,isnull(case when (select dovizli from tblkasamas where ksmas_kod=x.ksmas_kod)='H' then tutar else doviztut end,0) tutar,IO gc
,(select doviztipi from tblkasamas where ksmas_kod=x.ksmas_kod) dovtip
from tblkasa x  union all
select  'D' hartip ,ksmas_kod kod,dovizli doviz,'' tarih,case dovizli when 'H' then kssondev_t else kssondev_doviz end tutar,'G' gc,doviztipi dovtip from tblkasamas
) kasa  where tarih <= '02.21.2009' and kod=t.ksmas_kod and gc='C' ) kalan
,case doviztipi when 0 then (select yedek6 from TBLPARAM where SUBE_KODU=0) else (select ISIM  from NETSIS..kur where SIRA=t.doviztipi) end dtip
from tblkasamas t
 
]]> Sat, 21 Feb 2009 11:26:44 +0000 http://www.erpne.org/bu-kod-daha-kisa-yazilamaz-mi_topic1440_post8094.html#8094