444: RETURN FALSE;
445: END v_qc_grade;
446:
447: FUNCTION v_reason_code
448: ( p_reason_code IN sy_reas_cds.reason_code%TYPE
449: , x_sy_reas_cds_row OUT NOCOPY sy_reas_cds%ROWTYPE
450: )
451: RETURN BOOLEAN
452: IS
445: END v_qc_grade;
446:
447: FUNCTION v_reason_code
448: ( p_reason_code IN sy_reas_cds.reason_code%TYPE
449: , x_sy_reas_cds_row OUT NOCOPY sy_reas_cds%ROWTYPE
450: )
451: RETURN BOOLEAN
452: IS
453: BEGIN
450: )
451: RETURN BOOLEAN
452: IS
453: BEGIN
454: x_sy_reas_cds_row.reason_code := p_reason_code;
455: IF GMIVDBL.sy_reas_cds_select(x_sy_reas_cds_row, x_sy_reas_cds_row)
456: THEN
457: IF x_sy_reas_cds_row.delete_mark = 0
458: THEN
451: RETURN BOOLEAN
452: IS
453: BEGIN
454: x_sy_reas_cds_row.reason_code := p_reason_code;
455: IF GMIVDBL.sy_reas_cds_select(x_sy_reas_cds_row, x_sy_reas_cds_row)
456: THEN
457: IF x_sy_reas_cds_row.delete_mark = 0
458: THEN
459: RETURN TRUE;
453: BEGIN
454: x_sy_reas_cds_row.reason_code := p_reason_code;
455: IF GMIVDBL.sy_reas_cds_select(x_sy_reas_cds_row, x_sy_reas_cds_row)
456: THEN
457: IF x_sy_reas_cds_row.delete_mark = 0
458: THEN
459: RETURN TRUE;
460: END IF;
461: END IF;