1. SQL / Говнокод #8817

    −109

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    end;
create or replace package body "MUT_TABLE" is
type a_table is table of number index by pls_integer;
position a_table;
empty a_table;

procedure SET_INITIAL_STATE
as
begin
position:=empty;
end SET_INITIAL_STATE;

procedure BEF_TR( ID IN NUMBER, A IN NUMBER)
as

begin

position (ID):= A;

end BEF_TR;

procedure AFT_TR
is
v number;

begin
v:=position.FIRST;
while v is not null loop

update A set
A=1,
B='!!!!!!!!!'
where A = 1;
v:= position.next(v); 
end loop;

end AFT_TR;

end "MUT_TABLE";

    Запостил: kikis, 14 Декабря 2011

    Комментарии (4) RSS

    Добавить комментарий