Tento článek je zrcadlovým článkem o strojovém překladu, klikněte zde pro přechod na původní článek.

Pohled: 15555|Odpověď: 0

[Komunikace] Napište PL/SQL blok, který vymění platy jakýchkoli dvou zaměstnanců

[Kopírovat odkaz]
Zveřejněno 22.03.2015 11:17:17 | | |
Tip: Můžete definovat dvě proměnné a zadat čísla dvou zaměstnanců z klávesnice, pokud jsou obě čísla stejná, vyhodíte vlastní výjimku, jinak se plat prohodí.

  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;
Kopírovat kód






Předchozí:Wusoft intranet 1433 slabá IP adresa s heslem, může zvýšit kontrolu hostitele a připojit skenovací nástroj
Další:ORA-01008:并非所有的变量都已绑定
Zřeknutí se:
Veškerý software, programovací materiály nebo články publikované organizací Code Farmer Network slouží pouze k učení a výzkumu; Výše uvedený obsah nesmí být používán pro komerční ani nelegální účely, jinak nesou všechny důsledky uživatelé. Informace na tomto webu pocházejí z internetu a spory o autorská práva s tímto webem nesouvisí. Musíte výše uvedený obsah ze svého počítače zcela smazat do 24 hodin od stažení. Pokud se vám program líbí, podporujte prosím originální software, kupte si registraci a získejte lepší skutečné služby. Pokud dojde k jakémukoli porušení, kontaktujte nás prosím e-mailem.

Mail To:help@itsvse.com