[Home] [Help]
1703: App_Exception.Raise_Exception;
1704: END IF;
1705: END crspl_ins_unit_assmnt_item;
1706: PROCEDURE crspl_ins_unit_off_pat_note(
1707: p_unit_cd IN IGS_PS_UNT_OFR_PAT_N.unit_cd%TYPE,
1708: p_version_number IN IGS_PS_UNT_OFR_PAT_N.version_number%TYPE,
1709: p_cal_type IN IGS_PS_UNT_OFR_PAT_N.cal_type%TYPE,
1710: p_ci_sequence_number IN IGS_PS_UNT_OFR_PAT_N.ci_sequence_number%TYPE )
1711: AS
1704: END IF;
1705: END crspl_ins_unit_assmnt_item;
1706: PROCEDURE crspl_ins_unit_off_pat_note(
1707: p_unit_cd IN IGS_PS_UNT_OFR_PAT_N.unit_cd%TYPE,
1708: p_version_number IN IGS_PS_UNT_OFR_PAT_N.version_number%TYPE,
1709: p_cal_type IN IGS_PS_UNT_OFR_PAT_N.cal_type%TYPE,
1710: p_ci_sequence_number IN IGS_PS_UNT_OFR_PAT_N.ci_sequence_number%TYPE )
1711: AS
1712: v_unit_offer_pat_note_rec IGS_PS_UNT_OFR_PAT_N%ROWTYPE;
1705: END crspl_ins_unit_assmnt_item;
1706: PROCEDURE crspl_ins_unit_off_pat_note(
1707: p_unit_cd IN IGS_PS_UNT_OFR_PAT_N.unit_cd%TYPE,
1708: p_version_number IN IGS_PS_UNT_OFR_PAT_N.version_number%TYPE,
1709: p_cal_type IN IGS_PS_UNT_OFR_PAT_N.cal_type%TYPE,
1710: p_ci_sequence_number IN IGS_PS_UNT_OFR_PAT_N.ci_sequence_number%TYPE )
1711: AS
1712: v_unit_offer_pat_note_rec IGS_PS_UNT_OFR_PAT_N%ROWTYPE;
1713: v_new_ref_number IGS_PS_UNT_OFR_PAT_N.reference_number%TYPE;
1706: PROCEDURE crspl_ins_unit_off_pat_note(
1707: p_unit_cd IN IGS_PS_UNT_OFR_PAT_N.unit_cd%TYPE,
1708: p_version_number IN IGS_PS_UNT_OFR_PAT_N.version_number%TYPE,
1709: p_cal_type IN IGS_PS_UNT_OFR_PAT_N.cal_type%TYPE,
1710: p_ci_sequence_number IN IGS_PS_UNT_OFR_PAT_N.ci_sequence_number%TYPE )
1711: AS
1712: v_unit_offer_pat_note_rec IGS_PS_UNT_OFR_PAT_N%ROWTYPE;
1713: v_new_ref_number IGS_PS_UNT_OFR_PAT_N.reference_number%TYPE;
1714: --- The following cursor excludes notes records with NULL values in the
1708: p_version_number IN IGS_PS_UNT_OFR_PAT_N.version_number%TYPE,
1709: p_cal_type IN IGS_PS_UNT_OFR_PAT_N.cal_type%TYPE,
1710: p_ci_sequence_number IN IGS_PS_UNT_OFR_PAT_N.ci_sequence_number%TYPE )
1711: AS
1712: v_unit_offer_pat_note_rec IGS_PS_UNT_OFR_PAT_N%ROWTYPE;
1713: v_new_ref_number IGS_PS_UNT_OFR_PAT_N.reference_number%TYPE;
1714: --- The following cursor excludes notes records with NULL values in the
1715: --- note_text field as this implies that it contains data in the note_ole
1716: --- field which cannot be copied with the current product limitations.
1709: p_cal_type IN IGS_PS_UNT_OFR_PAT_N.cal_type%TYPE,
1710: p_ci_sequence_number IN IGS_PS_UNT_OFR_PAT_N.ci_sequence_number%TYPE )
1711: AS
1712: v_unit_offer_pat_note_rec IGS_PS_UNT_OFR_PAT_N%ROWTYPE;
1713: v_new_ref_number IGS_PS_UNT_OFR_PAT_N.reference_number%TYPE;
1714: --- The following cursor excludes notes records with NULL values in the
1715: --- note_text field as this implies that it contains data in the note_ole
1716: --- field which cannot be copied with the current product limitations.
1717: CURSOR c_unit_off_pat_note_rec IS
1715: --- note_text field as this implies that it contains data in the note_ole
1716: --- field which cannot be copied with the current product limitations.
1717: CURSOR c_unit_off_pat_note_rec IS
1718: SELECT *
1719: FROM IGS_PS_UNT_OFR_PAT_N uopn
1720: WHERE uopn.unit_cd = p_unit_cd AND
1721: uopn.version_number = p_version_number AND
1722: uopn.cal_type = p_cal_type AND
1723: uopn.ci_sequence_number = p_ci_sequence_number AND
1732: v_unit_offer_pat_note_rec.reference_number,
1733: v_new_ref_number);
1734: BEGIN
1735: x_rowid := NULL ;
1736: IGS_PS_UNT_OFR_PAT_N_PKG.INSERT_ROW(
1737: X_ROWID => x_rowid,
1738: X_UNIT_CD => p_new_unit_cd,
1739: X_REFERENCE_NUMBER => v_new_ref_number,
1740: X_VERSION_NUMBER => p_new_version_number,