[Home] [Help]
327: is
328: --
329: -- Declare cursors and local variables
330: --
331: l_object_version_number per_phones.object_version_number%TYPE;
332: l_object_version_number_temp per_phones.object_version_number%TYPE;
333: l_proc varchar2(72) := g_package||'update_phone';
334: l_temp_ovn number := p_object_version_number;
335: --
328: --
329: -- Declare cursors and local variables
330: --
331: l_object_version_number per_phones.object_version_number%TYPE;
332: l_object_version_number_temp per_phones.object_version_number%TYPE;
333: l_proc varchar2(72) := g_package||'update_phone';
334: l_temp_ovn number := p_object_version_number;
335: --
336: begin
552: -- dparthas
553:
554: CURSOR get_person_info IS
555: select pa.person_id
556: from per_phones pp, per_all_people_f pa
557: where pa.party_id = pp.party_id
558: and phone_id = p_phone_id;
559:
560: l_person_id number := -1;