`Program.GetKur` her zaman alış; birim yoksa `1`

Etki: VB · Öncelik: P1 · Doğrulama: VERIFIED

Kaynak: KB-docs quality/technical-debt.md (tam kod taraması, 2026-09-10). Alanlar: Risk · Evidence · Impact · Recommendation · Priority — KB-docs metninde gömülü; aşağıda korunmuştur.

• Nerede: ERPPRO/Class/Module/Program.vb:260-268 (Return K.Alis / Else Return 1). Kullanım: Class/Dao/Islem/Cari.Islem.vb:506-531, Controls/Islem Ekranı/Ekran/FrmEFaturaBas.vb:298, Form/Doviz/FrmDovFaturaEkranı.vb:201-202, GiseEkrani.vb:19, ParakendeSatis.vb — toplam 19 sınıf (scan globals).
• Etki: VB — satış yönünde alış kuru → marj kaybı (kabul edilmiş hata, AS-DOCUMENTED §10 soru 4); listede olmayan birim için 1 dönmesi sessiz yanlış tutar. Mimari referans §9-6 "kur bulunamazsa 0 akıyor" → Program.GetKur için 1 döner (CONTRADICTS; 0 senaryosu Set_Alis ile boş kur satırında olabilir, Sistem.KurListesi.vb:106).
• Kanıt: satırlar yukarıda.
• Öneri: GetKur(Birim, Yon As Alis|Satis); bulunamazsa istisna/uyarı, 1 yerine Nothing.
• Öncelik: P1.