1631: l_requestee varchar2(32000);
1632:
1633: cursor c_questions is
1634: select user_comment
1635: from wf_comments
1636: where notification_id = nid
1637: and action = 'QUESTION'
1638: order by comment_date desc ;
1639: begin
4691: is
4692:
4693: CURSOR c_ques IS
4694: SELECT user_comment
4695: FROM wf_comments
4696: WHERE notification_id = p_nid
4697: AND action = 'QUESTION'
4698: ORDER BY comment_date desc;
4699:
4735: l_get_text boolean;
4736:
4737: CURSOR c_comm IS
4738: SELECT count(1)
4739: FROM wf_comments
4740: WHERE action_type in ('REASSIGN', 'QA')
4741: AND notification_id = p_nid;
4742:
4743: begin
6849: comment := 'NULL';
6850: end if;
6851: -- validate the role before calling updateinfo
6852:
6853: -- update wf_notifications and wf_comments in QUESTION mode
6854: if (length(to_user) > 0 and length(comment) > 0) then
6855: wf_notification.UpdateInfo2(nid, to_user, from_addr, comment);
6856: end if;
6857: exception
6867:
6868: -- PutMoreInfoMessage
6869: -- Reply processor. Read body of a reply for more information
6870: -- request, parse the body for the comments from the user and
6871: -- update wf_notification and wf_comments apropriately
6872: -- Used by the notification mail response processor.
6873: -- IN
6874: -- notification id
6875: -- mailer node name
6933: end if;
6934: end if;
6935: end if;
6936: end if;
6937: -- update wf_notifications and wf_comments in ANSWER mode
6938: to_user := NULL;
6939: wf_notification.UpdateInfo2(nid, to_user, from_addr, comment);
6940: exception
6941: when no_program_unit then
7959: l_territory wf_roles.territory%TYPE;
7960:
7961: CURSOR c_ques IS
7962: SELECT from_role, to_role, user_comment
7963: FROM wf_comments
7964: WHERE notification_id = p_nid
7965: AND action = 'QUESTION'
7966: ORDER BY comment_date desc;
7967:
7971: wf_log_pkg.string(wf_log_pkg.level_procedure,
7972: 'wf.plsql.WF_MAIL.SendMoreInfoResponseWarning', 'BEGIN');
7973: END IF;
7974:
7975: -- Get details of last question asked from WF_COMMENTS table and
7976: -- Get role language, territory and codeset details.
7977:
7978: OPEN c_ques;
7979: FETCH c_ques INTO l_from_role, l_to_role, l_question;
7992: l_orig_system_id,
7993: l_installed);
7994:
7995:
7996: -- if role not exist in wf_comments or email address exist
7997: -- in wf_comments then use p_from_email to get other details .
7998: --
7999: if( l_to_role = '' OR
8000: instr(l_to_role, '@') > 0 OR
7993: l_installed);
7994:
7995:
7996: -- if role not exist in wf_comments or email address exist
7997: -- in wf_comments then use p_from_email to get other details .
7998: --
7999: if( l_to_role = '' OR
8000: instr(l_to_role, '@') > 0 OR
8001: l_to_emailaddress IS null ) then