393: g_suarc_status := 'INVALID';
394: END IF ;
395: -- Derive Unit version if parameter is NULL.
396: IF p_suarc_dtls_rec.version_number IS NULL THEN
397: IF NOT igs_en_gen_legacy.get_unit_ver (
398: p_cal_type => l_cal_type ,
399: p_ci_sequence_number => l_ci_sequence_number ,
400: p_unit_cd => p_suarc_dtls_rec.unit_cd ,
401: p_location_cd => p_suarc_dtls_rec.location_cd ,
404: g_suarc_status := 'INVALID';
405: END IF;
406: END IF;
407: -- Derive uoo_id
408: IF NOT igs_en_gen_legacy.get_uoo_id (
409: p_cal_type => l_cal_type ,
410: p_ci_sequence_number => l_ci_sequence_number ,
411: p_unit_cd => p_suarc_dtls_rec.unit_cd ,
412: p_location_cd => p_suarc_dtls_rec.location_cd ,