39: begin
40: /*SRW.USER_EXIT('FND SRWINIT');*/null;
41: C_last_value:=-1;
42: IF (P_Debug_Switch = 'Y') THEN
43: /*srw.message (100, 'DEBUG: Get the report type from AR Lookups.');*/null;
44: END IF;
45: IF (get_report_type <> TRUE) THEN
46: RAISE init_failure;
47: END IF;
186: WHEN OTHERS THEN
187: RETURN (FALSE);
188: END;
189: FUNCTION get_report_type RETURN BOOLEAN IS
190: l_report_type AR_LOOKUPS.MEANING%TYPE;
191: BEGIN
192: SELECT meaning
193: INTO l_report_type
194: FROM ar_lookups
190: l_report_type AR_LOOKUPS.MEANING%TYPE;
191: BEGIN
192: SELECT meaning
193: INTO l_report_type
194: FROM ar_lookups
195: WHERE LOOKUP_TYPE = 'AUDIT_REPORT_TYPE'
196: AND LOOKUP_CODE = p_type;
197: c_report_type := l_report_type;
198: RETURN (TRUE);