690: END MAIN;
691:
692: FUNCTION delete_salescredit_sub (
693: p_subscription_guid IN RAW,
694: p_event IN OUT NOCOPY WF_EVENT_T)
695: RETURN VARCHAR2 IS
696: l_key VARCHAR2(240) := p_event.GetEventKey();
697: l_pos NUMBER;
698: BEGIN
717: END delete_salescredit_sub;
718:
719: FUNCTION update_salescredit_sub (
720: p_subscription_guid IN RAW,
721: p_event IN OUT NOCOPY WF_EVENT_T)
722: RETURN VARCHAR2 IS
723: l_key VARCHAR2(240) := p_event.GetEventKey();
724: l_pos NUMBER;
725: l_exists VARCHAR2(1) := 'N';