[Home] [Help]
331:
332: IF (((old_references.cal_status = new_references.cal_status)) OR
333: ((new_references.cal_status IS NULL))) THEN
334: NULL;
335: ELSIF NOT IGS_CA_STAT_PKG.Get_PK_For_Validation (
336: new_references.cal_status
337: ) THEN
338: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
339: IGS_GE_MSG_STACK.ADD;
727: -- opening different cursors depending on the System calendar status
728: CURSOR cur_get_status
729: IS
730: SELECT s.s_cal_status
731: FROM igs_ca_stat s,
732: igs_ca_inst_all ci
733: WHERE ci.cal_status = s.cal_status
734: AND ci.cal_type = x_cal_type
735: AND ci.sequence_number = x_sequence_number;
732: igs_ca_inst_all ci
733: WHERE ci.cal_status = s.cal_status
734: AND ci.cal_type = x_cal_type
735: AND ci.sequence_number = x_sequence_number;
736: l_s_cal_status igs_ca_stat.s_cal_status%TYPE;
737:
738: CURSOR cur_rowid_planned IS
739: SELECT ROWID
740: FROM igs_ca_inst_all
871: CLOSE cur_rowid;
872:
873: END GET_FK_IGS_CA_TYPE;
874:
875: PROCEDURE GET_FK_IGS_CA_STAT (
876: x_cal_status IN VARCHAR2
877: ) AS
878:
879: CURSOR cur_rowid IS
895: RETURN;
896: END IF;
897: CLOSE cur_rowid;
898:
899: END GET_FK_IGS_CA_STAT;
900:
901: PROCEDURE GET_FK_IGS_CA_INST (
902: x_cal_type IN VARCHAR2,
903: x_sequence_number IN NUMBER
1495:
1496: CURSOR cur_delete (cp_cal_type igs_ca_inst.cal_type%TYPE, cp_seq_number igs_ca_inst.sequence_number%TYPE)
1497: IS
1498: SELECT 'x'
1499: FROM igs_ca_inst i, igs_ca_stat s
1500: WHERE i.cal_status = s.cal_status
1501: AND s.s_cal_status = 'PLANNED'
1502: AND i.cal_type = cp_cal_type
1503: AND i.sequence_number = cp_seq_number;
1532: -------------------------------------------------------------------
1533: CURSOR cur_get_status (cp_cal_status igs_ca_inst.cal_status%TYPE)
1534: IS
1535: SELECT s_cal_status
1536: FROM igs_ca_stat
1537: WHERE cal_status = cp_cal_status;
1538: l_s_cal_status igs_ca_stat.s_cal_status%TYPE;
1539:
1540: CURSOR cur_check_update (cp_cal_type igs_ca_inst.cal_type%TYPE, cp_seq_number igs_ca_inst.sequence_number%TYPE)
1534: IS
1535: SELECT s_cal_status
1536: FROM igs_ca_stat
1537: WHERE cal_status = cp_cal_status;
1538: l_s_cal_status igs_ca_stat.s_cal_status%TYPE;
1539:
1540: CURSOR cur_check_update (cp_cal_type igs_ca_inst.cal_type%TYPE, cp_seq_number igs_ca_inst.sequence_number%TYPE)
1541: IS
1542: SELECT 'x'
1539:
1540: CURSOR cur_check_update (cp_cal_type igs_ca_inst.cal_type%TYPE, cp_seq_number igs_ca_inst.sequence_number%TYPE)
1541: IS
1542: SELECT 'x'
1543: FROM igs_ca_inst i, igs_ca_stat s
1544: WHERE i.cal_status = s.cal_status
1545: AND s.s_cal_status = 'ACTIVE'
1546: AND i.cal_type = cp_cal_type
1547: AND i.sequence_number = cp_seq_number;
1578: l_message_name fnd_new_messages.message_name%TYPE;
1579:
1580: CURSOR c_old_status (p_cal_status IN VARCHAR2) IS
1581: SELECT s_cal_status
1582: FROM igs_ca_stat
1583: WHERE cal_status = p_cal_status
1584: AND closed_ind = 'N';
1585:
1586: l_old_status igs_ca_stat.s_cal_status%TYPE;
1582: FROM igs_ca_stat
1583: WHERE cal_status = p_cal_status
1584: AND closed_ind = 'N';
1585:
1586: l_old_status igs_ca_stat.s_cal_status%TYPE;
1587:
1588: CURSOR c_new_status (p_cal_status IN VARCHAR2) IS
1589: SELECT s_cal_status
1590: FROM igs_ca_stat
1586: l_old_status igs_ca_stat.s_cal_status%TYPE;
1587:
1588: CURSOR c_new_status (p_cal_status IN VARCHAR2) IS
1589: SELECT s_cal_status
1590: FROM igs_ca_stat
1591: WHERE cal_status = p_cal_status
1592: AND closed_ind = 'N';
1593:
1594: l_new_status igs_ca_stat.s_cal_status%TYPE;
1590: FROM igs_ca_stat
1591: WHERE cal_status = p_cal_status
1592: AND closed_ind = 'N';
1593:
1594: l_new_status igs_ca_stat.s_cal_status%TYPE;
1595:
1596: CURSOR c_cal_type (p_cal_type IN VARCHAR2) IS
1597: SELECT s_cal_cat
1598: FROM igs_ca_type