35: END;
36:
37: END corp_val_slo_closed;
38: --
39: -- Validate if the IGS_CO_TYPE is a system generated type.
40: FUNCTION corp_val_cort_sysgen(
41: p_correspondence_type IN VARCHAR2 ,
42: p_message_name OUT NOCOPY VARCHAR2 )
43: RETURN BOOLEAN AS
42: p_message_name OUT NOCOPY VARCHAR2 )
43: RETURN BOOLEAN AS
44:
45: BEGIN -- corp_val_cort_sysgen
46: -- Validate if the IGS_CO_TYPE is a system generated type.
47: DECLARE
48: v_sys_generated_ind IGS_CO_TYPE.sys_generated_ind%TYPE DEFAULT NULL;
49: CURSOR c_cort IS
50: SELECT sys_generated_ind
44:
45: BEGIN -- corp_val_cort_sysgen
46: -- Validate if the IGS_CO_TYPE is a system generated type.
47: DECLARE
48: v_sys_generated_ind IGS_CO_TYPE.sys_generated_ind%TYPE DEFAULT NULL;
49: CURSOR c_cort IS
50: SELECT sys_generated_ind
51: FROM IGS_CO_TYPE
52: WHERE correspondence_type = p_correspondence_type;
47: DECLARE
48: v_sys_generated_ind IGS_CO_TYPE.sys_generated_ind%TYPE DEFAULT NULL;
49: CURSOR c_cort IS
50: SELECT sys_generated_ind
51: FROM IGS_CO_TYPE
52: WHERE correspondence_type = p_correspondence_type;
53: BEGIN
54: p_message_name := null;
55: OPEN c_cort;