Doubts in FORALL delete

Question

in below error i am getting while FORALL delete,
CURSOR c_mkt_ofer_revsn_id IS
SELECT mkt_ofer_revsn_id FROM
SELECT revsn_sg.mkt_ofer_revsn_id
FROM mkt_ofer_revsn_sg revsn_sg,gmeic_mkt_ofer_hdr_trnsmn_dtl hdr_trnsmn_dtl
WHERE revsn_sg.mkt_ofer_revsn_id=hdr_trnsmn_dtl.mkt_ofer_revsn_id
AND gmeic_trnsmn_status='SUCCESS'
AND procsed_flag='C'
AND TRUNC(txn_dt_timstm) < (
SELECT SYSDATE-vcps_gmeic_parm_value
FROM vcps_gmeic_parm
WHERE vcps_gmeic_parm_nm='XXX'
UNION
SELECT revsn_sg.mkt_ofer_revsn_id
FROM mkt_ofer_revsn_sg revsn_sg
WHERE NOT EXISTS (SELECT 1
FROM gmeic_mkt_ofer_hdr_trnsmn_dtl hdr_trnsmn_dtl
WHERE hdr_trnsmn_dtl.mkt_ofer_revsn_id=revsn_sg.mkt_ofer_revsn_id
AND procsed_flag='C'
AND TRUNC(txn_dt_timstm) < (
SELECT SYSDATE-vcps_gmeic_parm_value
FROM vcps_gmeic_parm
WHERE vcps_gmeic_parm_nm='YYY'
UNION
SELECT revsn_sg.mkt_ofer_revsn_id
FROM mkt_ofer_revsn_sg revsn_sg,gmeic_mkt_ofer_hdr_trnsmn_dtl hdr_trnsmn_dtl
WHERE revsn_sg.mkt_ofer_revsn_id=hdr_trnsmn_dtl.mkt_ofer_revsn_id
AND gmeic_trnsmn_status='FAILURE'
AND procsed_flag='C'
AND TRUNC(txn_dt_timstm) < (
SELECT SYSDATE-vcps_gmeic_parm_value
FROM vcps_gmeic_parm
WHERE vcps_gmeic_parm_nm='XXX'
TYPE ct_mkt_ofer_revsn_id IS TABLE OF c_mkt_ofer_revsn_id%ROWTYPE;
crt_mkt_ofer_revsn_id ct_mkt_ofer_revsn_id := new ct_mkt_ofer_revsn_id();
BEGIN
OPEN c_mkt_ofer_revsn_id;
FETCH c_mkt_ofer_revsn_id
BULK COLLECT INTO crt_mkt_ofer_revsn_id;
CLOSE c_mkt_ofer_revsn_id;
FORALL crt_mo_revsn_id_idx IN crt_mkt_ofer_revsn_id.FIRST..crt_mkt_ofer_revsn_id.LAST
DELETE FROM mkt_ofer_revsn_sg
WHERE mkt_ofer_revsn_id = crt_mkt_ofer_revsn_id(crt_mo_revsn_id_idx) ;
END;
Error(59,27): PLS-00382: expression is of wrong type
In case if i use
DELETE FROM mkt_ofer_revsn_sg
WHERE mkt_ofer_revsn_id = crt_mkt_ofer_revsn_id(crt_mo_revsn_id_idx).mkt_ofer_revsn_id ;
Error(58,1): PL/SQL: SQL Statement ignored
Error(59,27): PL/SQL: ORA-22806: not an object or REF
Error(59,27): PLS-00436: implementation restriction: cannot reference fields of BULK In-BIND table of records
Error(59,27): PLS-00382: expression is of wrong type
why it happening ? What is the currect way to that ?
please help...

Answer 1

CREATE OR REPLACE PROCEDURE TEST_SP is
CURSOR c_mkt_ofer_revsn_id IS
SELECT mkt_ofer_revsn_id FROM
SELECT revsn_sg.mkt_ofer_revsn_id mkt_ofer_revsn_id
FROM mkt_ofer_revsn_sg revsn_sg,gmeic_mkt_ofer_hdr_trnsmn_dtl hdr_trnsmn_dtl
WHERE revsn_sg.mkt_ofer_revsn_id=hdr_trnsmn_dtl.mkt_ofer_revsn_id
AND gmeic_trnsmn_status='SUCCESS'
AND procsed_flag='C'
AND TRUNC(txn_dt_timstm) < (
SELECT SYSDATE-vcps_gmeic_parm_value
FROM vcps_gmeic_parm
WHERE vcps_gmeic_parm_nm='XXX'
UNION
SELECT revsn_sg.mkt_ofer_revsn_id
FROM mkt_ofer_revsn_sg revsn_sg
WHERE NOT EXISTS (SELECT 1
FROM gmeic_mkt_ofer_hdr_trnsmn_dtl hdr_trnsmn_dtl
WHERE hdr_trnsmn_dtl.mkt_ofer_revsn_id=revsn_sg.mkt_ofer_revsn_id
AND procsed_flag='C'
AND TRUNC(txn_dt_timstm) < (
SELECT SYSDATE-vcps_gmeic_parm_value
FROM vcps_gmeic_parm
WHERE vcps_gmeic_parm_nm='YYY'
UNION
SELECT revsn_sg.mkt_ofer_revsn_id
FROM mkt_ofer_revsn_sg revsn_sg,gmeic_mkt_ofer_hdr_trnsmn_dtl hdr_trnsmn_dtl
WHERE revsn_sg.mkt_ofer_revsn_id=hdr_trnsmn_dtl.mkt_ofer_revsn_id
AND gmeic_trnsmn_status='FAILURE'
AND procsed_flag='C'
AND TRUNC(txn_dt_timstm) < (
SELECT SYSDATE-vcps_gmeic_parm_value
FROM vcps_gmeic_parm
WHERE vcps_gmeic_parm_nm='ZZZ'
TYPE ct_mkt_ofer_revsn_id IS TABLE OF c_mkt_ofer_revsn_id%ROWTYPE;
crt_mkt_ofer_revsn_id ct_mkt_ofer_revsn_id ;--:= new ct_mkt_ofer_revsn_id();
BEGIN
OPEN c_mkt_ofer_revsn_id;
FETCH c_mkt_ofer_revsn_id
BULK COLLECT INTO crt_mkt_ofer_revsn_id;
CLOSE c_mkt_ofer_revsn_id;
FORALL crt_mo_revsn_id_idx IN crt_mkt_ofer_revsn_id.FIRST..crt_mkt_ofer_revsn_id.LAST
DELETE FROM mkt_ofer_revsn_sg
WHERE mkt_ofer_revsn_id = crt_mkt_ofer_revsn_id(crt_mo_revsn_id_idx);
/*DELETE FROM mkt_ofer_contnt_sg
WHERE mkt_ofer_revsn_id = crt_mkt_ofer_revsn_id(crt_mo_revsn_id_idx) ;
DELETE FROM mkt_ofer_channl_desc_sg
WHERE mkt_ofer_revsn_id = crt_mkt_ofer_revsn_id(crt_mo_revsn_id_idx) ;
DELETE FROM mkt_ofer_desc_sg
WHERE mkt_ofer_revsn_id = crt_mkt_ofer_revsn_id(crt_mo_revsn_id_idx) ;
DELETE FROM mdsn_modl_desc_sg
WHERE mkt_ofer_revsn_id = crt_mkt_ofer_revsn_id(crt_mo_revsn_id_idx) ;
END TEST_SP;