Merhaba, Personel Yönetim Sistemini geliştirmeye kaldığımız yerden devam ediyoruz. Bu yazımda Insert işlemiyle beraber yeni konular öğreneceğiz.
Case: Öncelikle bir kişiden referans alıp üzerinden değişiklik yapıp yeni kişi olarak kaydedeceğiz. Daha sonra tamamen sıfırdan bir kişiyi ekleyip kaydedeceğiz.
Daha önceden sisteme girince SEARCH hariç tüm butonların Enable değerini false yapmıştık. Şu anda fark ediyoruz ki aslında yeni bir kayıt eklemek istersek illa arama yapmamıza gerek kalmamalı.
O yüzden öncelikle NEW butonunun başlangıçta durumunu ENABLE olarak bırakalım.
Bunun için AFTER’a yazdığımız şu kodları açıklama satırı haline getiriyoruz.
Açıklama Satırı
Her yazılım dilinde olduğu gibi Troia’da yazdığınız kodlar içine açıklama satırları eklemenize izin vermektedir.
Açıklama satırı /* Açıklama */ şeklinde gerçekleştirilir.
SET SHOW TO DISABLE;
SET CHANGE TO DISABLE;
/* SET NEW TO DISABLE; */
SET DELETE TO DISABLE;/* SET NEW TO DISABLE; */ Bu işlemi yaparak artık kodu deaktif etmiş olduk. Bunun anlamı şudur Runner bu kodu sadece bir text olarak görür ve geçer, kod olarak değerlendirip işleme almaz.
Şimdi açılışta New Butonuna bakalım.
Şimdi Detay Dialog’unda SAVE butonuna şu kodları yazıyoruz.
BEGINTRAN;
IF MODI == 1 THEN
UPDATE PERSONELBILGISI
WHERE PERSONELNO = PERSONELBILGISI_PERSONELNO
AND PHONENUMBER = PERSONELBILGISI_PHONENUMBER
AND MAIL = PERSONELBILGISI_MAIL;
ELSE
IF MODI == 0 THEN
INSERT INTO PERSONELBILGISI;
ENDIF;
ENDIF;
IF SYS_STATUS == 1 THEN
ROLLBACKTRAN;
RETURN;
ENDIF;
COMMITTRAN;
IF MODI == 1 THEN
MSG='Güncelleme İşlemi Gerçekleşti';
MESSAGE EDU I302 WITH MSG;
ELSE
IF MODI == 0 THEN
MSG='Kayıt İşlemi Gerçekleşti';
MESSAGE EDU I302 WITH MSG;
ENDIF;
SHUTDOWN;
ENDIF;Bugünkü konumuzun odaklandığı kod şu satır
IF MODI == 0 THEN
INSERT INTO PERSONELBILGISI;
ENDIF;Tabloya veri kaydetme yani Insert işlemini gerçekleştirmek için yapmanız gereken son derece basittir.
INSERT INTO [BağlıGridİsmi];Sonuçlarımıza bakalım.
İşlemimiz yine başarılı bir şekilde gerçekleşti.
Referans alarak üzerinde değişiklik yapıp yeni kaydı oluşturmayı sizlere bırakıyorum.
Kolay gelsin.
