Bu makale makine çevirisi ayna makalesidir, orijinal makaleye geçmek için lütfen buraya tıklayın.

Görünüm: 15555|Yanıt: 0

[İletişim] Herhangi iki çalışanın maaşlarını değiştirmek için bir PL/SQL bloğu yaz

[Bağlantıyı kopyala]
Yayınlandı 22.03.2015 11:17:17 | | |
İpucu: İki değişken tanımlayıp klavyeden iki çalışanın numaralarını girebilirsiniz, eğer iki sayı aynıysa özel bir istisna ekleyin, aksi takdirde maaş değişir.

  1. create table yuan(
  2.        y_id number,
  3.        y_maney number
  4. );
  5. commit;

  6. insert into yuan values(1,200);
  7. insert into yuan values(2,200);
  8. insert into yuan values(3,500);
  9. insert into yuan values(4,2000);

  10. select * from yuan;

  11. declare
  12.   yc exception;
  13.   a_yuan yuan.y_id%type := '&请输a入员工号';
  14.   b_yuan yuan.y_id%type := '&请输b入员工号';
  15.   a_m yuan.y_maney%type;
  16.   b_m yuan.y_maney%type;
  17. begin
  18.    select y_maney into a_m from yuan where y_id=a_yuan;
  19.    select y_maney into b_m from yuan where y_id=b_yuan;
  20. if a_yuan=b_yuan then
  21.    raise yc;
  22.    else
  23.     update yuan set y_maney=a_m where y_id=b_yuan;
  24.     update yuan set y_maney=b_m where y_id=a_yuan;
  25.    end if;
  26. exception
  27.   when yc then
  28.   dbms_output.put_line('错误,不能和自己互换');
  29. end;
Kopya kodu






Önceki:Wusoft intranet 1433 zayıf şifre IP, ana bilgisayarın kontrolünü artırabilir ve tarama aracı ekleyebilir
Önümüzdeki:ORA-01008:并非所有的变量都已绑定
Feragatname:
Code Farmer Network tarafından yayımlanan tüm yazılım, programlama materyalleri veya makaleler yalnızca öğrenme ve araştırma amaçları içindir; Yukarıdaki içerik ticari veya yasa dışı amaçlarla kullanılamaz, aksi takdirde kullanıcılar tüm sonuçları ödemelidir. Bu sitedeki bilgiler internetten alınmakta olup, telif hakkı anlaşmazlıklarının bu siteyle hiçbir ilgisi yoktur. Yukarıdaki içeriği indirmeden sonraki 24 saat içinde bilgisayarınızdan tamamen silmelisiniz. Programı beğendiyseniz, lütfen orijinal yazılımı destekleyin, kayıt satın alın ve daha iyi orijinal hizmetler alın. Herhangi bir ihlal olursa, lütfen bizimle e-posta yoluyla iletişime geçin.

Mail To:help@itsvse.com