Denne artikel er en spejling af maskinoversættelse, klik venligst her for at springe til den oprindelige artikel.

Udsigt: 15555|Svar: 0

[Kommunikation] Skriv en PL/SQL-blok, så lønningerne for to ansatte byttes om

[Kopier link]
Opslået på 22/03/2015 11.17.17 | | |
Tip: Du kan definere to variable og indtaste numrene på de to medarbejdere fra tastaturet; hvis de to tal er ens, kan du lave en brugerdefineret undtagelse, ellers byttes lønnen om.

  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;
Kopier kode






Tidligere:Wusoft intranet 1433 svag adgangskode-IP kan øge værtens kontrol og tilslutte et scanningsværktøj
Næste:ORA-01008:并非所有的变量都已绑定
Ansvarsfraskrivelse:
Al software, programmeringsmaterialer eller artikler udgivet af Code Farmer Network er kun til lærings- og forskningsformål; Ovenstående indhold må ikke bruges til kommercielle eller ulovlige formål, ellers skal brugerne bære alle konsekvenser. Oplysningerne på dette site kommer fra internettet, og ophavsretstvister har intet med dette site at gøre. Du skal slette ovenstående indhold fuldstændigt fra din computer inden for 24 timer efter download. Hvis du kan lide programmet, så understøt venligst ægte software, køb registrering og få bedre ægte tjenester. Hvis der er nogen overtrædelse, bedes du kontakte os via e-mail.

Mail To:help@itsvse.com