359: l_action_flg varchar2(10);
360: l_date date;
361: cursor c1 is
362: select message_id
363: from iem_arch_msgdtls where
364: email_account_id=p_email_account_id and mailproc_Status=substr(p_folder,1,1)
365: and received_date
367: select message_id
364: email_account_id=p_email_account_id and mailproc_Status=substr(p_folder,1,1)
365: and received_date
367: select message_id
368: from iem_arch_msgdtls where
369: email_account_id=p_email_account_id and mailproc_Status=substr(p_folder,1,1)
370: and creation_date
372: BEGIN
381: x_arch_date:=null;
382: END;
383:
384: select count(*) into x_count
385: from iem_arch_msgdtls where
386: email_account_id=p_email_account_id and mailproc_Status=substr(p_folder,1,1);
387: if substr(p_folder,1,1)='S' then
388: open c2;
389: fetch c2 bulk collect into x_msg_table;
388: open c2;
389: fetch c2 bulk collect into x_msg_table;
390: close c2;
391: select count(*) into l_count
392: from iem_arch_msgdtls where
393: email_account_id=p_email_account_id and mailproc_Status=substr(p_folder,1,1)
394: and creation_date
396: open c1;
468: l_ret_status varchar2(10);
469: l_msg_count number;
470: l_msg_data varchar2(500);
471: l_milcs_id number;
472: cursor c1 is select a.ih_media_item_id,b.source_message_id from iem_arch_msgdtls a,iem_archived_dtls b
473: where b.request_id=p_request_id
474: and a.message_id=b.source_message_id;
475: l_type_id number;
476: begin
502: else
503: delete from iem_archived_dtls where request_id=p_request_id
504: and source_message_id=v1.source_message_id;
505: delete from iem_arch_msgs where message_id=v1.source_message_id;
506: delete from iem_arch_msgdtls where message_id=v1.source_message_id;
507: end if;
508: -- Update the MLCS with ENDDATE TIME
509: l_media_lc_rec.milcs_id:=l_milcs_id;
510: JTF_IH_PUB.Update_MediaLifeCycle( 1.0,