Vergi Oranı Düzenleme Prosedürü

<< İçindekileri Görüntülemek İçin Tıklayın >>

Yer:  Kendi Kendine Öğrenme > Yazılım Kod Bloğu >

Vergi Oranı Düzenleme Prosedürü

Aşağıdaki prosedür kodu yeni vergi oranı eklendiği taktirde eklenen vergi oranın stok tiplerine ve kartlarına uygulanması için kullanılmak üzere yazılmıştır.

Bu işlem öncesinde yeni vergi oranlarının sistemde oluşturulmuş olması gerekmektedir.

ÖN İŞLEMLER

1. Yeni vergi oranı tanımlanır.

 

PROSEDÜRÜN EKLENMESİ

Yeni vergi oranın stok tip ve kartlarına etki etmesi için aşağıdaki adımlar takip edilerek işlem yapılır.

1.Aşağıdaki bölümdeki kod kopyalanır. Kod bölümünü açmak için tıklayınız. Kodun dosyasını indirmek için VERGI DEGISTIR-1469 ONCESI ICIN linkine tıklayınız.

CREATE OR ALTER PROCEDURE BKM_STOKKART_VUYST_DEGISTIR
(
  STOK_TIP_NO ftINT32,
  VERGI_UYST_NO ftINT32,
  YENI_VERGI_UYST_NO ftINT32
)

AS

  DECLARE VARIABLE OLD_ROLE VARCHAR(100);

BEGIN

  OLD_ROLE = CURRENT_ROLE;
 
  EXECUTE STATEMENT 'SET ROLE MAINTENANCE';
  BEGIN

    IF (CURRENT_ROLE <> 'MAINTENANCE') THEN

      EXCEPTION FLYEXCEPTION 'SET ROLE MAINTENANCE çalışmadı';
 
    UPDATE STOKKART
      SET VERGI_UYST_NO = :YENI_VERGI_UYST_NO
    WHERE (STOK_TIP_NO = :STOK_TIP_NO OR :STOK_TIP_NO IS NULL OR :STOK_TIP_NO = 0) AND

           VERGI_UYST_NO = :VERGI_UYST_NO;
    UPDATE STOKTIPI
      SET VERGI_UYST_NO = :YENI_VERGI_UYST_NO
    WHERE (STOK_TIP_NO = :STOK_TIP_NO OR :STOK_TIP_NO IS NULL OR :STOK_TIP_NO = 0) AND

           VERGI_UYST_NO = :VERGI_UYST_NO;
 
    EXECUTE STATEMENT 'SET ROLE ' || OLD_ROLE;
  WHEN ANY DO

    BEGIN

      EXECUTE STATEMENT 'SET ROLE ' || OLD_ROLE;
      EXCEPTION;
    END

  END
END 

2.İçindeki kod kopyalanarak RAPOR modülündeki SQL ÇALIŞTIR penceresindeki üst bölüme yapıştırılır (1).

3.Pencerenin sağ tarafındaki Çalıştır (2) butonuna tıklanır.

4.Kod çalışmasından sonra aşağıdaki Bilgi (3) bölümünde işlem sonucu görülmektedir.

0057_vergi_oran_prosedur1

 

PROSEDÜRÜN ÇALIŞTIRILMASI

Stok tipinin ve tipe bağlı stok kartlarının vergi oranını değiştirmek için SQL kodu çalıştırılır.

Bunun için aşağıdaki formatta kod yazılır.

 

execute procedure BKM_STOKKART_VUYST_DEGISTIR(stok_tip_no,eski vergi uygulama seti no, yeni vergi uygulama seti no)

 

 

Örneğin, aşağıdaki yapıda olan stok tip ve stok kartlarının vergi oranında değişiklik yapılmak istenmektedir.

BEBEK BEZLERİ  stok tipine ait -5 nolu (%8 KDV) vergi no'su -7 nolu (%10 KDV) vergi no'su olarak değiştirilecektir.

DETERJAN stok tipine ait -5 nolu (%8 KDV) vergi no'su - 8 nolu (&20 KDV) vergi no'su olarak değiştirilecektir.

0057_vergi_oran_prosedur2

 

Bebek Bezleri stok tipi ve kartında vergi no değişikliği:

 

 

execute procedure BKM_STOKKART_VUYST_DEGISTIR(3,-5,-7)

 

 

Yukarıdaki kod satırı çalıştırıldıktan sonra aşağıdaki resimde görüldüğü üzere Stok Tip ve Stok Kartındaki vergi oranı değişmiştir.

0057_vergi_oran_prosedur3

 

 

Deterjan stok tipi ve kartında vergi no değişikliği:

 

 

execute procedure BKM_STOKKART_VUYST_DEGISTIR(2,-5,-8)

 

 

Yukarıdaki kod satırı çalıştırıldıktan sonra aşağıdaki resimde görüldüğü üzere Stok Tip ve Stok Kartındaki vergi oranı değişmiştir.

0057_vergi_oran_prosedur4