1: package body iby_default_bep_pkg as
2: /*$Header: ibydbepb.pls 115.9 2002/10/04 20:08:15 jleybovi ship $*/
3:
4: /*
5: ** Function: modifyBep.
5: ** Function: modifyBep.
6: ** Purpose: modifies rule condition information in the database.
7: */
8: procedure modifyBep (
9: i_instrtype in iby_default_bep.instrtype%type,
10: i_bepid in iby_default_bep.bepid%type,
11: i_version in iby_default_bep.object_version_number%type)
12: is
13:
6: ** Purpose: modifies rule condition information in the database.
7: */
8: procedure modifyBep (
9: i_instrtype in iby_default_bep.instrtype%type,
10: i_bepid in iby_default_bep.bepid%type,
11: i_version in iby_default_bep.object_version_number%type)
12: is
13:
14: CURSOR c_defaultBep IS
7: */
8: procedure modifyBep (
9: i_instrtype in iby_default_bep.instrtype%type,
10: i_bepid in iby_default_bep.bepid%type,
11: i_version in iby_default_bep.object_version_number%type)
12: is
13:
14: CURSOR c_defaultBep IS
15: SELECT *
12: is
13:
14: CURSOR c_defaultBep IS
15: SELECT *
16: FROM iby_default_bep a
17: WHERE
18: i_version = a.object_version_number AND
19: i_instrtype = a.instrtype
20: FOR UPDATE;
38:
39: CLOSE c_defaultBep;
40:
41: FOR v_bepInfo IN c_defaultBep LOOP
42: UPDATE iby_default_bep
43: SET
44: instrtype = i_instrtype,
45: bepid = i_bepid,
46: last_update_date = sysdate,
59: COMMIT;
60:
61: END;
62:
63: end iby_default_bep_pkg;