Ek Yazılımlar - Seri kaydirma

Sayfayı Yazdır | Pencereyi Kapat

Seri kaydirma

Nereden Yazdırıldığı: ERP Nedir? | Türkiye'nin ERP Forum Platformu
Kategori: ERP Genel
Forum Adı: Ek Yazılımlar
Forum Tanımlaması: Ek Yazılımlar Hakkında...
URL: http://www.erpne.org/forum_posts.asp?TID=4502
Tarih: 26 Nisan 2024 Saat 09:01
Program Versiyonu: Web Wiz Forums 11.10 - http://www.webwizforums.com

Konu: Seri kaydirma

Mesajı Yazan: tolga35
Konu: Seri kaydirma
Mesaj Tarihi: 06 Haziran 2017 Saat 23:30

Faturalarimizi toplu yazdiriyoruz ve bunun icin lazer yazici kullaniyoruz
Fakat ornek veriyorum 300 fatura yazdirirken 50. Faturayi yazici cift aliyor ve bu yuzden seri kayiyor
Geri kalan 250 fatura seri nosunu tektek elle duzeltmemiz gerekiyor
Manuel duzeltme islemi oldukca zaman aliyor bizde bunun icin ufak bir program yazacagiz
Ama sql de fatura nosu hangi bolumlere yaziliyor netsiste cunki 2-3 yerde gorduk
Acaba bunlarin tam yerini bilen varmidir

Simdiden ilgilenlere cok tesekkurler.

Cevaplar:

Mesajı Yazan: mbaykan
Mesaj Tarihi: 07 Haziran 2017 Saat 07:14

tblfatuirs FATIRS_NO,FTIRSIP,GIBFATIRSNO

tblsthar FISNO,STHAR_FTIRSIP

tblfatuek FATIRSNO,FKOD

aşağıdaki tablolarda da fatura no'su vardır

tblcahar BELGE_NO ve ENT_REF_KEY kolonunun içinde de fatura no'su var

Entegre; havuz olarak kullanılıyorsa TBLMUHAGEC tablosunda ENTEGREFKEY ve ACIKLAMA da var

Muhasebe'de TBLMUHFIS tablosunda ENTEGREFKEY ve ACIKLAMA da var

no olarak. Özel programlarda FATURA OKU/YAZ 'ı temin edip çalıştırırsanız cari,entegre'ye ve muhasebe'ye kayıtları oluşturacak veya güncelleyecektir

-------------
Mehmet Baykan

Mesajı Yazan: rhan
Mesaj Tarihi: 07 Haziran 2017 Saat 08:36

tarihler aynıysa son numarayı araya gelecek şekilde değiştirin.

DECLARE @FATURANO NVARCHAR(15), @CARI NVARCHAR(35), @FTIP NVARCHAR(1), @YENI_FATURANO NVARCHAR(15), @ENT NVARCHAR(250), @YENI_ENT NVARCHAR(250) , @SUBE INT

DECLARE CRS_FATURAGUNCELLE CURSOR FOR

SELECT SUBE_KODU, FATIRS_NO, CARI_KODU, FTIRSIP, '01'+FTIRSIP + FATIRS_NO + CARI_KODU FROM TBLFATUIRS FT
WHERE FT.FATIRS_NO LIKE 'd%'
AND FATIRS_NO BETWEEN 'D00000000490552' AND 'D00000000490596'
and sube_KODU = 10
ORDER BY FATIRS_NO

OPEN CRS_FATURAGUNCELLE

FETCH NEXT FROM CRS_FATURAGUNCELLE INTO @SUBE, @FATURANO,@CARI, @FTIP, @ENT

WHILE @@FETCH_STATUS =0
    BEGIN
        SET @YENI_FATURANO    = LEFT(@FATURANO, 9) + CAST( CAST(RIGHT(@FATURANO, 6) AS INT) - 1 AS NVARCHAR)
        SET @YENI_ENT        = REPLACE(@ENT, @FATURANO, @YENI_FATURANO )

            UPDATE TBLFATUIRS SET FATIRS_NO = @YENI_FATURANO WHERE FATIRS_NO = @FATURANO AND CARI_KODU = @CARI AND FTIRSIP = @FTIP
            UPDATE TBLSTHAR SET FISNO = @YENI_FATURANO WHERE FISNO = @FATURANO AND STHAR_ACIKLAMA = @CARI AND STHAR_FTIRSIP = @FTIP
            UPDATE TBLCAHAR SET BELGE_NO = @YENI_FATURANO, ENT_REF_KEY = @YENI_ENT WHERE BELGE_NO = @FATURANO AND CARI_KOD = @CARI AND ENT_REF_KEY = @ENT
            UPDATE TBLMUHAGEC SET ACIKLAMA = REPLACE(ACIKLAMA, @FATURANO, @YENI_FATURANO), ENTEGREFKEY = @YENI_ENT WHERE ENTEGREFKEY = @ENT

        PRINT @YENI_FATURANO
        FETCH NEXT FROM CRS_FATURAGUNCELLE INTO @SUBE, @FATURANO,@CARI, @FTIP, @ENT

    END

CLOSE CRS_FATURAGUNCELLE

DEALLOCATE CRS_FATURAGUNCELLE

-------------
İnnova Antalya Proje Danışmanlık
Orhan ÇÖPÜROĞLU

0544 241 45 55
0242 311 45 56