Ta članek je zrcalni članek strojnega prevajanja, kliknite tukaj za skok na izvirni članek.

Pogled: 15555|Odgovoriti: 0

[Komunikacija] Napiši PL/SQL blok za zamenjavo plač katerihkoli dveh zaposlenih

[Kopiraj povezavo]
Objavljeno na 22. 03. 2015 11:17:17 | | |
Nasvet: Lahko določite dve spremenljivki in na tipkovnici vnesete številki obeh zaposlenih; če sta številki enaki, vržete prilagojeno izjemo, sicer se plača zamenja.

  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;
Kopiraj kodo






Prejšnji:Wusoft intranet 1433 šibek IP gesla, lahko poveča nadzor gostitelja in priloži orodje za skeniranje
Naslednji:ORA-01008:并非所有的变量都已绑定
Disclaimer:
Vsa programska oprema, programski materiali ali članki, ki jih izdaja Code Farmer Network, so namenjeni zgolj učnim in raziskovalnim namenom; Zgornja vsebina ne sme biti uporabljena v komercialne ali nezakonite namene, sicer uporabniki nosijo vse posledice. Informacije na tej strani prihajajo z interneta, spori glede avtorskih pravic pa nimajo nobene zveze s to stranjo. Zgornjo vsebino morate popolnoma izbrisati z računalnika v 24 urah po prenosu. Če vam je program všeč, podprite pristno programsko opremo, kupite registracijo in pridobite boljše pristne storitve. Če pride do kakršne koli kršitve, nas prosimo kontaktirajte po elektronski pošti.

Mail To:help@itsvse.com