984: raise;
985: end Activities;
986:
987: -- procedure entity_changes
988: -- Purges data from table WF_ENTITY_CHANGES as per the AGE parameter passed
989: -- to concurrent program FNDWFPRG. Introduced as per bug 9394309
990: -- IN: enddate - anything before this date is to be removed
991: --
992: procedure entity_changes(p_enddate date)
992: procedure entity_changes(p_enddate date)
993: is
994: begin
995: delete
996: from WF_ENTITY_CHANGES
997: where CHANGE_DATE <= p_enddate;
998: exception
999: when no_data_found then
1000: null;