435: -- -------------------------------------------------------------------------
436: procedure lock_social(
437: p_action_information_id in number,
438: p_object_version_number in number,
439: p_rec out nocopy pay_jp_isdf_social_v%rowtype)
440: is
441: l_proc varchar2(80) := c_package||'lock_social';
442: begin
443: --
446: end if;
447: --
448: select *
449: into p_rec
450: from pay_jp_isdf_social_v
451: where action_information_id = p_action_information_id
452: for update nowait;
453: --
454: if p_rec.object_version_number <> p_object_version_number then
2244: p_beneficiary_relship in varchar2,
2245: p_annual_prem in number,
2246: p_national_pens_flag in varchar2)
2247: is
2248: l_rec pay_jp_isdf_social_v%rowtype;
2249: l_proc varchar2(80) := c_package||'update_social';
2250: begin
2251: --
2252: if g_debug then
2284: procedure delete_social(
2285: p_action_information_id in number,
2286: p_object_version_number in number)
2287: is
2288: l_rec pay_jp_isdf_social_v%rowtype;
2289: l_proc varchar2(80) := c_package||'delete_social';
2290: begin
2291: --
2292: if g_debug then