[Home] [Help]
691: into v_delete_permitted
692: from sys.dual
693: where not exists (
694: select null
695: from per_letter_request_lines r
696: where r.person_id = P_PERSON_ID
697: and r.date_from >= P_SESSION_DATE );
698:
699: select 'Y'
700: into v_delete_permitted
701: from sys.dual
702: where not exists (
703: select null
704: from per_letter_request_lines r
705: where exists (
706: select null
707: from per_assignments_f a
708: where a.person_id = P_PERSON_ID
714: into v_delete_permitted
715: from sys.dual
716: where not exists (
717: select null
718: from per_letter_request_lines r
719: where r.person_id = P_PERSON_ID
720: and r.date_from >= P_SESSION_DATE
721: or exists (
722: select null
1533: begin
1534: -- bug fix 3732129.
1535: -- Delete statement modified to improve performance.
1536:
1537: delete from per_letter_request_lines l
1538: where l.person_id = P_PERSON_ID;
1539:
1540: forall i in 1..l_assignment_id.count
1541: delete from per_letter_request_lines l
1537: delete from per_letter_request_lines l
1538: where l.person_id = P_PERSON_ID;
1539:
1540: forall i in 1..l_assignment_id.count
1541: delete from per_letter_request_lines l
1542: where l.assignment_id = l_assignment_id(i);
1543:
1544: /*
1545: delete from per_letter_request_lines l
1541: delete from per_letter_request_lines l
1542: where l.assignment_id = l_assignment_id(i);
1543:
1544: /*
1545: delete from per_letter_request_lines l
1546: where l.person_id = P_PERSON_ID
1547: or exists (
1548: select null
1549: from per_assignments_f a