38: RETURN VARCHAR2 AS
39: BEGIN -- corp_get_let_title
40: -- This module retrieves the letter IGS_PE_TITLE for a system letter
41: DECLARE
42: v_letter_title IGS_CO_S_LTR.letter_title%TYPE;
43: CURSOR c_sl IS
44: SELECT sl.letter_title
45: FROM IGS_CO_S_LTR sl
46: WHERE sl.CORRESPONDENCE_TYPE = p_correspondence_type
41: DECLARE
42: v_letter_title IGS_CO_S_LTR.letter_title%TYPE;
43: CURSOR c_sl IS
44: SELECT sl.letter_title
45: FROM IGS_CO_S_LTR sl
46: WHERE sl.CORRESPONDENCE_TYPE = p_correspondence_type
47: AND sl.letter_reference_number = p_letter_reference_number;
48: BEGIN
49: -- Set initial value