|
Views 290 Downloads 10 File size 83KB
|
!
"#$ !%#
&" ' (' &
)#*+,
&# ( &
& - &
#.$#+,
&# ( &
#,"/
# 0 ! 12 23 0 ! /
' -
]
0 0 ! ,|4)#% 0 " #* "#$ !%# ,|4)#%/ )
]!%$5!%1673/
]
89# "#$ !%# )
)
89#/
8%:9# "#$ !%#
)
8%:9#/
]
2(;2 "#$ !%# ,|4)#%(;/ #,"/ /
$%#!#!) #>1
+,#*#% +,#*#% 3/ "# ##?%4>/ +,#%+,>]! |#1>]! |#16@3/
ý ý
ý
"#$ !%# ý ,|4)#%/ ,|4)#%/ )#*+, # #$ +,((?%4>:5#%# A>/ +,#%+,>]! |#1((3/ #,"/ /
$ ? +? +?BC>A5#, # +?BC6A5#, # +?BCA5#, # # #,"+?/
$ ? # "#$ !%# ,|4)#%/ ,|4)#%/ )#*+, # #$ +,((?%4>:5#%# A>/ +?;>5#, +,#%+,>]! |#1((3/ # # +,#%+,>]! |#1(=>7(=>73/ #,"+?/ #,"/ /
$ ? ( B CA &! & #," /
#.+ #.+:5#,BA/
#* "#$ !%# ,|4)#%(;>/ )#*+, +,#%+,>]! |#1((3/ (;=>/ #.+:5#, A>77/ #," / #,"/ /
$ ? :5+ # :5+ #BA B CA #," /
?% ?%B'A+,B AB A B CA #," /
"#$ !%# ,|4)#%(;>77/ )#*+, ?%+, >>7 +?4"163;75#, DD ' +,#%+, ]! |#1(E ' E3/ # # +,#%+, ]! |#1(E E3/ #,"+?/ (;=>77/ #," / $44+/ #,"/
DECLARE acct_balace NUMBER(11,2); acct
CONSTANT NUMBER(4) := 3;
debit_amt
CONSTANT NUMBER(5,2) := 500 00;
BEGIN SELECT bal INTO :acct_balace FROM accots WHERE accot_id = :acct
FOR UPDATE OF bal; IF acct_balace >= debit_amt THEN UPDATE accots SET bal = bal - :debit_amt WHERE accot_id = :acct;
ELSE INSERT INTO temp VALUES (:acct, :acct_balace, 'Isiciet ds'); -- ise t accot, c et balace, ad message
END IF; COMMIT;
END;
"#$ !%# 89#/ C 89#/ C 89#/ C $,!,,|4)#%1@3(;FG76/
)#*+, # #$ +,( (C?%4 :5#%# ;( C /
:5+ # B@777 # #$ +,( (C( C
?%4 :5#%# ;(C/
#," / +,#%+, ]! |#1,| ( ( C 3/ $44+/
#,"/
$ " $|%%>$ + # #$ ?%4> :5#%# B/
ý ý!"#$ % ý!"#$ % &' ' () * +,. $ - ý % ý/ $ & 0 ' $12 ýý 3 4 ý ,- 5 % , ' 6 0 &5 7 ý 8, 94 - ý "-3:-% ,' ý ,-1 ,- ý ; : 1 -% ý? ! ý) '%
"#$ !%# $|%%C + # #$ =,] 173 ?%4 / C C 8%:9#/
)#*+, #,C /
?#$5C +,(C / #.+ :5#, C 8,?|,"/ +? C A67775#, +,#%+, ]! |#1,| C C 3/
#,"+?/ #," / $ #C /
#,"/
DECLARE CURSOR m1_c IS SELECT m FROM m1_tab ORDER BY seqece; CURSOR m2_c IS SELECT m FROM m2_tab ORDER BY seqece; m1 m1_tab m%TYPE; m2 m2_tab m%TYPE; pai _m NUMBER := 0;
BEGIN OPEN m1_c ; OPEN m2_c ;
LOOP
-- loop th ogh the two tables ad get -- pai s o mbe s FETCH m1_c INTO :m1; FETCH m2_c INTO :m2; EXIT WHEN (m1_c %NOTFOUND) OR (m2_c %NOTFOUND); pai _m := pai _m + 1; INSERT INTO sm_tab VALUES (pai _m, m1 + m2);
END LOOP; CLOSE m1_c ; CLOSE m2_c ;
END;
"#$ !%# $|%% > # #$ ?%4 %"#%)9 "#$/DD D
C $5!%1>73/ C ,|4)#%1@3/ C ,|4)#%1F63/
)#*+, #,>/
?#$5>+,(C (C (C / #.+:5#,1>8%:$|,AH3%1>8,?|,"3/ +,#%+, ]! |#1C C C 3/ $44+/
#," / $ #>/
#,"/
"#$ !%# >C >89#/DD " '
6C 689#/DD + # #$>6/
)#*+, #,>/
?#$5>+,(>(6(8,?|,"/ DD >8,?|," '
DD %|# ?#$5
& & (;6 1>=