467: PROCEDURE check_delete ( x_contact_id NUMBER )
468: IS
469: CURSOR pn_phones_cur IS
470: SELECT 1 471: FROM pn_phones_all 472: WHERE contact_id = x_contact_id;
473:
474: BEGIN
475: FOR i in pn_phones_cur
Line 498: DELETE FROM pn_phones_all
494: )
495: IS
496: BEGIN
497: 498: DELETE FROM pn_phones_all 499: WHERE contact_id = x_contact_id;
500:
501: DELETE FROM pn_contacts_all
502: WHERE contact_id = x_contact_id;