239:
240: if (l_mod = 0) then
241: l_table := l_table||'';
242: end if;
243: dbms_lob.WriteAppend(p_table, length(l_table), l_table);
244: l_table := '';
245: end loop;
246: end if;
247: l_table := '';
244: l_table := '';
245: end loop;
246: end if;
247: l_table := '';
248: dbms_lob.WriteAppend(p_table, length(l_table), l_table);
249: return;
250: exception
251: when others then
252: wf_core.context('WF_DIAGNOSTICS', 'Get_Table', 'CLOB Table');
821: and wma.message_name = wn.message_name
822: and wn.notification_id = p_nid;
823:
824: begin
825: dbms_lob.trim(l_temp, 0);
826:
827: l_cells(1) := 'WH:Notification Message Attribute Values';
828: Get_Table(l_cells, 1, 'H', l_result);
829: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
825: dbms_lob.trim(l_temp, 0);
826:
827: l_cells(1) := 'WH:Notification Message Attribute Values';
828: Get_Table(l_cells, 1, 'H', l_result);
829: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
830: l_cells.DELETE;
831:
832: l_cells(1) := '10%:Name';
833: l_cells(2) := '15%:Display Name';
851: i := i+8;
852: end loop;
853:
854: Get_Table(l_cells, 8, 'H', l_temp);
855: dbms_lob.Append(p_value, l_temp);
856: exception
857: when others then
858: l_cells.DELETE;
859: l_cells(1) := '10%:Note';
860: l_cells(2) := 'Error when generating Notification Message Attribute Values Information for nid '||p_nid;
861: l_cells(3) := '10%:Error';
862: l_cells(4) := sqlerrm;
863: Get_Table(l_cells, 2, 'V', l_result);
864: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
865: end Get_Ntf_Msg_Attrs;
866:
867: --
868: -- Get_Ntf_Attrs -
882: from wf_notification_attributes
883: where notification_id = p_nid;
884:
885: begin
886: dbms_lob.Trim(l_temp, 0);
887:
888: l_cells(1) := 'WH:Notification Attribute Values';
889: Get_Table(l_cells, 1, 'H', l_result);
890: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
886: dbms_lob.Trim(l_temp, 0);
887:
888: l_cells(1) := 'WH:Notification Attribute Values';
889: Get_Table(l_cells, 1, 'H', l_result);
890: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
891: l_cells.DELETE;
892:
893: l_cells(1) := '15%:Name';
894: l_cells(2) := '15%:Number Value';
903: l_cells(i+4) := l_attr_rec.txt_val;
904: i := i+4;
905: end loop;
906: Get_Table(l_cells, 4, 'H', l_temp);
907: dbms_lob.Append(p_value, l_temp);
908: exception
909: when others then
910: l_cells.DELETE;
911: l_cells(1) := '10%:Note';
912: l_cells(2) := 'Error when generating Notification Attributes Values Information for nid '||p_nid;
913: l_cells(3) := '10%:Error';
914: l_cells(4) := sqlerrm;
915: Get_Table(l_cells, 2, 'V', l_result);
916: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
917: end Get_Ntf_Attrs;
918:
919: --
920: -- Get_User_Comments -
936: where wc.notification_id = p_nid
937: order by comment_date;
938:
939: begin
940: dbms_lob.Trim(l_temp, 0);
941:
942: l_cells(1) := 'WH:Notification User Comments';
943: Get_Table(l_cells, 1, 'H', l_result);
944: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
940: dbms_lob.Trim(l_temp, 0);
941:
942: l_cells(1) := 'WH:Notification User Comments';
943: Get_Table(l_cells, 1, 'H', l_result);
944: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
945: l_cells.DELETE;
946:
947: l_cells(1) := '10%:From Role';
948: l_cells(2) := '10%:From User';
959: l_cells(i+5) := l_comm_rec.user_comment;
960: i := i+5;
961: end loop;
962: Get_Table(l_cells, 5, 'H', l_temp);
963: dbms_lob.Append(p_value, l_temp);
964: exception
965: when others then
966: l_cells.DELETE;
967: l_cells(1) := '10%:Note';
968: l_cells(2) := 'Error when generating Notification User Comments Information for nid '||p_nid;
969: l_cells(3) := '10%:Error';
970: l_cells(4) := sqlerrm;
971: Get_Table(l_cells, 2, 'V', l_result);
972: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
973: end Get_User_Comments;
974:
975: --
976: -- Get_Event_Queue_Status -
1387: l_cells(4) := l_tname;
1388: Get_Table(l_cells, 2, 'V', l_temp);
1389: l_result := l_result||l_temp||wf_core.newline;
1390: l_cells.DELETE;
1391: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
1392: l_result := NULL;
1393:
1394: l_result := '
1414: end if; 1415: l_result := l_result||' |
---|
1419: l_cells(1) := 'Warning';
1420: l_cells(2) := 'Unable to generate E-mail full template information. This can occur when the '||
1421: 'mail status of the notification is NULL';
1422: Get_Table(l_cells, 2, 'V', l_result);
1423: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
1424: end if;
1425:
1426: begin
1427: select subject, body, html_body
1443: l_cells(4) := l_msg_name;
1444: Get_Table(l_cells, 2, 'V', l_temp);
1445: l_result := l_result||l_temp||wf_core.newline;
1446: l_cells.DELETE;
1447: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
1448: l_result := NULL;
1449:
1450: l_result := '
1470: end if; 1471: l_result := l_result||' |
---|
1481: l_cells(2) := 'Error when generating Notification Template Information for nid '||p_nid;
1482: l_cells(3) := '10%:Error';
1483: l_cells(4) := sqlerrm;
1484: Get_Table(l_cells, 2, 'V', l_result);
1485: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
1486: end Get_Ntf_Templates;
1487:
1488:
1489:
1621: Get_Table(l_cells, 2, 'V', l_temp);
1622: l_result := l_result||l_temp||wf_core.newline;
1623: l_cells.DELETE;
1624:
1625: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
1626:
1627: l_result := NULL;
1628:
1629: l_result := '
1686: Get_Table(l_cells, 2, 'V', l_temp);
1687: l_result := l_result||l_temp||wf_core.newline;
1688: l_cells.DELETE;
1689:
1690: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
1691:
1692: l_result := NULL;
1693:
1694: l_result := '
1741: l_cells(2) := 'Error when generating Summary Notification Template for Role '||p_role;
1742: l_cells(3) := '10%:Error';
1743: l_cells(4) := sqlerrm;
1744: Get_Table(l_cells, 2, 'V', l_result);
1745: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
1746:
1747: end get_Summary_Templates;
1748:
1749:
1803: wf_event.AddParameterToList('ROLE', l_role, l_parameters);
1804: wf_event.AddParameterToList('GROUP_ID', to_char(p_nid), l_parameters);
1805: wf_event.addParameterToList('Q_CORRELATION_ID', l_msg_type, l_parameters);
1806:
1807: dbms_lob.CreateTemporary(l_doc, false, dbms_lob.Call);
1808:
1809: wf_mail.test_flag := TRUE;
1810: l_before := dbms_utility.get_time();
1811: begin
1819:
1820: l_result := l_result||'
|
|
1850: l_cells(2) := 'Error when generating Notification Message Information for nid '||p_nid;
1851: l_cells(3) := '10%:Error';
1852: l_cells(4) := sqlerrm;
1853: Get_Table(l_cells, 2, 'V', l_result);
1854: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
1855: end Get_Ntf_Message;
1856:
1857:
1858: -- Get_Summary_Ntf_Message
1904: -- Set AQs correlation id to item type i.e. 'WFMAIL'
1905: wf_event.addParameterToList('Q_CORRELATION_ID', 'WFMAIL', l_parameters);
1906:
1907: -- wf_event.AddParameterToList('GROUP_ID', to_char(0), l_parameters);
1908: dbms_lob.CreateTemporary(l_doc, false, dbms_lob.Call);
1909:
1910: wf_mail.test_flag := TRUE;
1911:
1912: l_before := dbms_utility.get_time();
1923:
1924: l_result := l_result||'
|
|
1954: l_cells(2) := 'Error when generating Summary Notification Message Information for Role '||p_role;
1955: l_cells(3) := '10%:Error';
1956: l_cells(4) := sqlerrm;
1957: Get_Table(l_cells, 2, 'V', l_result);
1958: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
1959: end Get_Summary_Ntf_Message;
1960:
1961:
1962: --
1999: begin
2000: l_cells(1) := 'WH:GSC '||p_comp_type||' Component Parameters';
2001: Get_Table(l_cells, 1, 'H', l_result);
2002: l_cells.DELETE;
2003: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
2004:
2005: for l_crec in c_comps loop
2006: l_cells(1) := '20%:Component Id';
2007: l_cells(2) := l_crec.component_id;
2020:
2021: Get_Table(l_cells, 2, 'V', l_result);
2022: l_result := l_result||wf_core.newline;
2023: l_cells.DELETE;
2024: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
2025: l_result := NULL;
2026:
2027: l_cells(1) := '25%:Parameter Name';
2028: l_cells(2) := '25%:Parameter Value';
2037: l_cells(i+4) := l_prec.default_parameter_value;
2038: i := i+4;
2039: end loop;
2040:
2041: dbms_lob.createTemporary(l_temp, TRUE, DBMS_LOB.CALL);
2042: Get_Table(l_cells, 4, 'H', l_temp);
2043: l_cells.DELETE;
2044: dbms_lob.append(dest_lob => p_value, src_lob => l_temp);
2045: l_result := NULL;
2040:
2041: dbms_lob.createTemporary(l_temp, TRUE, DBMS_LOB.CALL);
2042: Get_Table(l_cells, 4, 'H', l_temp);
2043: l_cells.DELETE;
2044: dbms_lob.append(dest_lob => p_value, src_lob => l_temp);
2045: l_result := NULL;
2046: dbms_lob.freeTemporary(l_temp);
2047: end loop;
2048: exception
2042: Get_Table(l_cells, 4, 'H', l_temp);
2043: l_cells.DELETE;
2044: dbms_lob.append(dest_lob => p_value, src_lob => l_temp);
2045: l_result := NULL;
2046: dbms_lob.freeTemporary(l_temp);
2047: end loop;
2048: exception
2049: when others then
2050: l_cells.DELETE;
2052: l_cells(2) := 'Error when generating Parameters Information for GSC Component Type '||p_comp_type;
2053: l_cells(3) := '10%:Error';
2054: l_cells(4) := sqlerrm;
2055: Get_Table(l_cells, 2, 'V', l_result);
2056: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
2057: end Get_GSC_Comp_Parameters;
2058:
2059:
2060: --
2107: begin
2108: l_cells(1) := 'WH:GSC '||p_comp_type||' Component Scheduled Events ';
2109: Get_Table(l_cells, 1, 'H', l_result);
2110: l_cells.DELETE;
2111: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
2112:
2113: for l_crec in c_comps loop
2114: l_cells(1) := '20%:Component Id';
2115: l_cells(2) := l_crec.component_id;
2121:
2122: Get_Table(l_cells, 2, 'V', l_result);
2123: l_result := l_result||wf_core.newline;
2124: l_cells.DELETE;
2125: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
2126: l_result := NULL;
2127:
2128: l_cells(1) := '12%:Request Id';
2129: l_cells(2) := '12%:Job Id';
2158: l_cells(i+6) := '';
2159: l_cells(i+7) := '';
2160: l_cells(i+8) := '';
2161:
2162: dbms_lob.createTemporary(l_temp, TRUE, DBMS_LOB.CALL);
2163: Get_Table(l_cells, 8, 'H', l_temp);
2164: l_cells.DELETE;
2165:
2166: dbms_lob.append(dest_lob => p_value, src_lob => l_temp);
2162: dbms_lob.createTemporary(l_temp, TRUE, DBMS_LOB.CALL);
2163: Get_Table(l_cells, 8, 'H', l_temp);
2164: l_cells.DELETE;
2165:
2166: dbms_lob.append(dest_lob => p_value, src_lob => l_temp);
2167: l_result := NULL;
2168: dbms_lob.freeTemporary(l_temp);
2169: end loop;
2170: exception
2164: l_cells.DELETE;
2165:
2166: dbms_lob.append(dest_lob => p_value, src_lob => l_temp);
2167: l_result := NULL;
2168: dbms_lob.freeTemporary(l_temp);
2169: end loop;
2170: exception
2171: when others then
2172: l_cells.DELETE;
2174: l_cells(2) := 'Error when generating Scheduled Events Information for GSC Component Type '||p_comp_type;
2175: l_cells(3) := '10%:Error';
2176: l_cells(4) := sqlerrm;
2177: Get_Table(l_cells, 2, 'V', l_result);
2178: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
2179: end Get_GSC_Comp_ScheduledEvents;
2180:
2181: --
2182: -- Get_Profile_Option_Values
2203: begin
2204: l_cells(1) := 'WH:Profile Option Values';
2205: Get_Table(l_cells, 1, 'H', l_result);
2206: l_cells.DELETE;
2207: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
2208:
2209: l_cells(1) := '25%:Parameter Name';
2210: l_cells(2) := '25%:Parameter Value';
2211:
2217: end loop;
2218:
2219: Get_Table(l_cells, 2, 'H', l_result);
2220: l_cells.DELETE;
2221: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
2222: exception
2223: when others then
2224: l_cells.DELETE;
2225: l_cells(1) := '10%:Note';
2226: l_cells(2) := 'Error when fetching Profile Option Values';
2227: l_cells(3) := '10%:Error';
2228: l_cells(4) := sqlerrm;
2229: Get_Table(l_cells, 2, 'V', l_result);
2230: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
2231: end Get_Profile_Option_Values;
2232:
2233:
2234:
2403: l_result := l_result||' ';
2404: end if;
2405:
2406: l_result := l_result||'
|
2443: 'from WF_NOTIFICATION_OUT for nid '||p_nid;
2444: l_cells(3) := '10%:Error';
2445: l_cells(4) := sqlerrm;
2446: Get_Table(l_cells, 2, 'V', l_result);
2447: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
2448: end Get_Ntf_Msg_From_Out;
2449:
2450: --
2451: -- Get_Ntf_Msg_From_Out
2514: exit when c_ntf_out%NOTFOUND;
2515:
2516: l_result := l_result||'
|
2559: ' WF_NOTIFICATION_OUT for role '||p_role;
2560: l_cells(3) := '10%:Error';
2561: l_cells(4) := sqlerrm;
2562: Get_Table(l_cells, 2, 'V', l_result);
2563: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
2564: end Get_Summary_Msg_From_Out;
2565:
2566: --
2567: -- Get_Ntf_Msg_From_In
2604: if (i=1) then
2605: l_result := l_result||'';
2606: end if;
2607: l_result := l_result||'
|
|
2632: end loop;
2633:
2634: if (i=1) then
2635: l_result := l_result||'
2642: l_cells(2) := 'Error when fetching Notification Message from WF_NOTIFICATION_IN for nid '||p_nid;
2643: l_cells(3) := '10%:Error';
2644: l_cells(4) := sqlerrm;
2645: Get_Table(l_cells, 2, 'V', l_result);
2646: dbms_lob.WriteAppend(p_value, length(l_result), l_result);
2647: end Get_Ntf_Msg_From_In;
2648:
2649: --
2650: -- Get_Ntf_Msg_From_In
2764: l_cells tdType;
2765: l_anchor varchar2(100);
2766: l_head varchar2(100);
2767: begin
2768: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.session);
2769: dbms_lob.CreateTemporary(l_temp, TRUE, dbms_lob.session);
2770: l_head := '
2765: l_anchor varchar2(100);
2766: l_head varchar2(100);
2767: begin
2768: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.session);
2769: dbms_lob.CreateTemporary(l_temp, TRUE, dbms_lob.session);
2770: l_head := '
2767: begin
2768: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.session);
2769: dbms_lob.CreateTemporary(l_temp, TRUE, dbms_lob.session);
2770: l_head := '
2779: when NO_DATA_FOUND then
2780: l_cells(1) := 'WH:Notification Id '||p_nid||' has been purged and is not available in the Database.';
2781: Get_Table(l_cells, 1, 'H', l_temp_result);
2782: l_cells.DELETE;
2783: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2784:
2785: -- Profile Option Values
2786: l_temp_result := '
'||wf_core.newline;
2787: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2783: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2784:
2785: -- Profile Option Values
2786: l_temp_result := '
'||wf_core.newline;
2787: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2788: Get_Profile_Option_Values(l_value);
2789:
2790: -- GSC Mailer component parameters
2791: l_temp_result := '
'||wf_core.newline;
2788: Get_Profile_Option_Values(l_value);
2789:
2790: -- GSC Mailer component parameters
2791: l_temp_result := '
'||wf_core.newline;
2792: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2793: Get_GSC_Comp_Parameters('WF_MAILER', null, l_value);
2794:
2795: -- GSC Mailer component scheduled events
2796: l_temp_result := '
'||wf_core.newline;
2793: Get_GSC_Comp_Parameters('WF_MAILER', null, l_value);
2794:
2795: -- GSC Mailer component scheduled events
2796: l_temp_result := '
'||wf_core.newline;
2797: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2798: Get_GSC_Comp_ScheduledEvents('WF_MAILER', null, l_value);
2799:
2800: -- Mailer Tags
2801: l_temp_result := '
'||Get_Mailer_Tags()||wf_core.newline;
2798: Get_GSC_Comp_ScheduledEvents('WF_MAILER', null, l_value);
2799:
2800: -- Mailer Tags
2801: l_temp_result := '
'||Get_Mailer_Tags()||wf_core.newline;
2802: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2803:
2804: -- Send the final HTML Output to the caller
2805: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
2806:
2801: l_temp_result := '
'||Get_Mailer_Tags()||wf_core.newline;
2802: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2803:
2804: -- Send the final HTML Output to the caller
2805: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
2806:
2807: p_value := l_value;
2808: return;
2809: end;
2809: end;
2810:
2811: -- Get Table of Contents
2812: l_temp_result := ''||Get_Mailer_TOC(p_nid)||wf_core.newline;
2813: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2814:
2815: -- Get Notfication Item Info
2816: l_temp_result := '
'||Get_Ntf_Item_Info(p_nid)||wf_core.newline;
2817: l_temp_result := l_temp_result||'
'||Get_Ntf_Item_Info(p_nid)||wf_core.newline;
2817: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
2819: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2820:
2821: -- Get Users belonging to the recipient Role
2822: l_temp_result := '
'||Get_Ntf_Role_Users(p_nid)||wf_core.newline;
2823: l_temp_result := l_temp_result||'
'||Get_Ntf_Role_Users(p_nid)||wf_core.newline;
2823: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
2825: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2826:
2827: -- Get the recipient Role Information
2828: l_temp_result := '
'||Get_Ntf_Role_Info(p_nid)||wf_core.newline;
2829: l_temp_result := l_temp_result||'
'||Get_Ntf_Role_Info(p_nid)||wf_core.newline;
2829: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
2831: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2832:
2833: -- Get the Recipient Role routing rules information
2834: l_temp_result := '
'||Get_Routing_Rules(p_nid)||wf_core.newline;
2835: l_temp_result := l_temp_result||'
'||Get_Routing_Rules(p_nid)||wf_core.newline;
2835: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
2837: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2838:
2839: -- Get the Nore Info Role Information
2840: l_temp_result := '
'||Get_Ntf_More_Info(p_nid)||wf_core.newline;
2841: l_temp_result := l_temp_result||'
'||Get_Ntf_More_Info(p_nid)||wf_core.newline;
2841: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
2843: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2844:
2845: l_temp_result := '
'||wf_core.newline;
2846: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2847: Get_Ntf_Msg_Attrs(p_nid, l_value);
2842: ' size='||td_fontsize||'>Go to top
'||wf_core.newline;
2843: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2844:
2845: l_temp_result := '
'||wf_core.newline;
2846: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2847: Get_Ntf_Msg_Attrs(p_nid, l_value);
2848: l_temp_result := 'Go to top
'||wf_core.newline;
2850: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2846: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2847: Get_Ntf_Msg_Attrs(p_nid, l_value);
2848: l_temp_result := 'Go to top
'||wf_core.newline;
2850: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2851:
2852: l_temp_result := '
'||wf_core.newline;
2853: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2854: Get_Ntf_Attrs(p_nid, l_value);
2849: ' size='||td_fontsize||'>Go to top
'||wf_core.newline;
2850: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2851:
2852: l_temp_result := '
'||wf_core.newline;
2853: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2854: Get_Ntf_Attrs(p_nid, l_value);
2855: l_temp_result := 'Go to top
'||wf_core.newline;
2857: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2853: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2854: Get_Ntf_Attrs(p_nid, l_value);
2855: l_temp_result := 'Go to top
'||wf_core.newline;
2857: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2858:
2859: -- Get the Notification User comments
2860: l_temp_result := '
'||wf_core.newline;
2861: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2857: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2858:
2859: -- Get the Notification User comments
2860: l_temp_result := '
'||wf_core.newline;
2861: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2862: Get_User_Comments(p_nid, l_value);
2863: l_temp_result := 'Go to top
'||wf_core.newline;
2865: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2861: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2862: Get_User_Comments(p_nid, l_value);
2863: l_temp_result := 'Go to top
'||wf_core.newline;
2865: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2866:
2867: -- Queue Statuses
2868: -- Deferred queue status
2869: l_temp_result := '
'
2872: p_event_key => to_char(p_nid))
2873: ||wf_core.newline;
2874: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
2876: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2877:
2878: -- Error Queue Status
2879: l_temp_result := '
'
2880: ||Get_Event_Queue_Status(p_queue_name => WFD_ERROR,
2882: p_event_key => to_char(p_nid))
2883: ||wf_core.newline;
2884: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
2886: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2887:
2888: -- Error Notification Details
2889: l_temp_result := '
'
2890: ||Get_Error_Ntf_Details(p_event_name => 'oracle.apps.wf.notification.%',
2891: p_event_key => p_nid)
2892: ||wf_core.newline;
2893: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
2895: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2896:
2897: -- Notification OUT Queue Status
2898: l_temp_result := '
'
2899: ||Get_JMS_Queue_Status(p_queue_name => WFD_NTF_OUT,
2901: p_event_key => to_char(p_nid))
2902: ||wf_core.newline;
2903: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
2905: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2906:
2907: -- Notification IN Queue Status
2908: l_temp_result := '
'
2909: ||Get_JMS_Queue_Status(p_queue_name => WFD_NTF_IN,
2911: p_event_key => to_char(p_nid))
2912: ||wf_core.newline;
2913: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
2915: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2916:
2917: -- Email and Notification message definition
2918: l_temp_result := '
'||wf_core.newline;
2919: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2915: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2916:
2917: -- Email and Notification message definition
2918: l_temp_result := '
'||wf_core.newline;
2919: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2920: Get_Ntf_Templates(p_nid, l_value);
2921: l_temp_result := 'Go to top
'||wf_core.newline;
2923: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2919: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2920: Get_Ntf_Templates(p_nid, l_value);
2921: l_temp_result := 'Go to top
'||wf_core.newline;
2923: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2924:
2925: -- XML Message for the notification
2926: l_temp_result := '
'||wf_core.newline;
2927: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2923: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2924:
2925: -- XML Message for the notification
2926: l_temp_result := '
'||wf_core.newline;
2927: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2928: Get_Ntf_Message(p_nid, l_value);
2929: l_temp_result := 'Go to top
'||wf_core.newline;
2931: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2927: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2928: Get_Ntf_Message(p_nid, l_value);
2929: l_temp_result := 'Go to top
'||wf_core.newline;
2931: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2932:
2933: -- XML Message for the notification from WF_NOTIFICATION_OUT
2934: l_temp_result := '
'||wf_core.newline;
2935: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2931: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2932:
2933: -- XML Message for the notification from WF_NOTIFICATION_OUT
2934: l_temp_result := '
'||wf_core.newline;
2935: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2936: Get_Ntf_Msg_From_Out(p_nid, l_value);
2937: l_temp_result := 'Go to top
'||wf_core.newline;
2939: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2935: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2936: Get_Ntf_Msg_From_Out(p_nid, l_value);
2937: l_temp_result := 'Go to top
'||wf_core.newline;
2939: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2940:
2941: -- XML Message for the notification from WF_NOTIFICATION_IN
2942: l_temp_result := '
'||wf_core.newline;
2943: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2939: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2940:
2941: -- XML Message for the notification from WF_NOTIFICATION_IN
2942: l_temp_result := '
'||wf_core.newline;
2943: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2944: Get_Ntf_Msg_From_In(p_nid, l_value);
2945: l_temp_result := 'Go to top
'||wf_core.newline;
2947: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2943: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2944: Get_Ntf_Msg_From_In(p_nid, l_value);
2945: l_temp_result := 'Go to top
'||wf_core.newline;
2947: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2948:
2949: -- Profile Option Values
2950: l_temp_result := '
'||wf_core.newline;
2951: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2947: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2948:
2949: -- Profile Option Values
2950: l_temp_result := '
'||wf_core.newline;
2951: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2952: Get_Profile_Option_Values(l_value);
2953: l_temp_result := 'Go to top
'||wf_core.newline;
2955: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2951: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2952: Get_Profile_Option_Values(l_value);
2953: l_temp_result := 'Go to top
'||wf_core.newline;
2955: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2956:
2957: -- GSC Mailer component parameters
2958: l_temp_result := '
'||wf_core.newline;
2959: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2955: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2956:
2957: -- GSC Mailer component parameters
2958: l_temp_result := '
'||wf_core.newline;
2959: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2960: Get_GSC_Comp_Parameters('WF_MAILER', null, l_value);
2961: l_temp_result := 'Go to top
'||wf_core.newline;
2963: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2959: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2960: Get_GSC_Comp_Parameters('WF_MAILER', null, l_value);
2961: l_temp_result := 'Go to top
'||wf_core.newline;
2963: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2964:
2965: -- GSC Mailer component scheduled events
2966: l_temp_result := '
'||wf_core.newline;
2967: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2963: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2964:
2965: -- GSC Mailer component scheduled events
2966: l_temp_result := '
'||wf_core.newline;
2967: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2968: Get_GSC_Comp_ScheduledEvents('WF_MAILER', null, l_value);
2969: l_temp_result := 'Go to top
'||wf_core.newline;
2971: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2967: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2968: Get_GSC_Comp_ScheduledEvents('WF_MAILER', null, l_value);
2969: l_temp_result := 'Go to top
'||wf_core.newline;
2971: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2972:
2973: -- Mailer Tags
2974: l_temp_result := '
'||Get_Mailer_Tags()||wf_core.newline;
2975: l_temp_result := l_temp_result||'
'||Get_Mailer_Tags()||wf_core.newline;
2975: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
2977: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2978:
2979:
2980: -- Send the final HTML Output to the caller
2981: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
2977: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2978:
2979:
2980: -- Send the final HTML Output to the caller
2981: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
2982: p_value := l_value;
2983: exception
2984: when others then
2985: l_temp_result := 'Error encountered while Generating Mailer Debug Information for nid '||p_nid||wf_core.newline;
2984: when others then
2985: l_temp_result := 'Error encountered while Generating Mailer Debug Information for nid '||p_nid||wf_core.newline;
2986: l_temp_result := l_temp_result||'Error Name : '||wf_core.newline||wf_core.error_name;
2987: l_temp_result := l_temp_result||'Error Stack: '||wf_core.newline||wf_core.error_stack;
2988: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2989: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
2990: p_value := l_value;
2991: end Get_Mailer_Debug;
2992:
2985: l_temp_result := 'Error encountered while Generating Mailer Debug Information for nid '||p_nid||wf_core.newline;
2986: l_temp_result := l_temp_result||'Error Name : '||wf_core.newline||wf_core.error_name;
2987: l_temp_result := l_temp_result||'Error Stack: '||wf_core.newline||wf_core.error_stack;
2988: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
2989: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
2990: p_value := l_value;
2991: end Get_Mailer_Debug;
2992:
2993: --
3008:
3009: type t_controlq is ref cursor;
3010: l_unresponded_subs_c t_controlq;
3011: begin
3012: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.Session);
3013: -- Set up Header
3014: l_temp_result := g_head ;
3015: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
3016:
3011: begin
3012: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.Session);
3013: -- Set up Header
3014: l_temp_result := g_head ;
3015: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
3016:
3017: l_temp_result := '
DBMS JOB for Control Queue cleanup is not Running |
WF Control Queue has less than 1024 active subscribers. |
3040: IF (l_subscriber_number < 1024) THEN
3041: -- return message saying that the number of subscriber is OK.
3042: l_temp_result := l_temp_result || '
3091: END;
3092: END IF;
3093:
3094: l_temp_result := l_temp_result || '';
3095: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
3096:
3097: -- Send the final HTML Output to the caller
3098: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
3099:
3094: l_temp_result := l_temp_result || '';
3095: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
3096:
3097: -- Send the final HTML Output to the caller
3098: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
3099:
3100: p_value := l_value;
3101: end Get_Control_Queue_Status;
3102:
3137: AND oa.guid(+) = sub.out_agent_guid
3138: AND oa.system_guid = oas.guid(+)
3139: ORDER BY e.name;
3140: begin
3141: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.Session);
3142: -- Set up Header
3143: l_temp_result := g_head ;
3144: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
3145:
3140: begin
3141: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.Session);
3142: -- Set up Header
3143: l_temp_result := g_head ;
3144: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
3145:
3146: l_temp_result := '
The local System Name is ' || l_sys_name || ' |
Agent Name | System Name | Status |
Event Name | Subscription Rule Function | Subscription Out Agent | Status | '|| r_sub.STATUS ||' | ';
3176: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
3177:
3178:
3179: -- Send the final HTML Output to the caller
3180: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
3181:
3182: p_value := l_value;
3183: end Get_BES_Clone_Status;
3184:
3246: l_last_gt pls_integer;
3247: l_last_sc pls_integer;
3248: l_value varchar2(32000);
3249: begin
3250: l_amount := dbms_lob.GetLength(p_value);
3251: l_chunksize := 100;
3252: l_offset := 1;
3253: l_buffer_size := 0;
3254: if (l_amount > 0) then
3254: if (l_amount > 0) then
3255: loop
3256: l_last_cr := 0;
3257: if (l_amount > l_chunksize) then
3258: dbms_lob.read(p_value, l_chunksize, l_offset, l_buffer);
3259: l_last_cr := instr(l_buffer, wf_core.newline, -1);
3260: l_last_gt := instr(l_buffer, '>', -1);
3261: l_last_sc := instr(l_buffer, ';', -1);
3262: if (l_last_cr > 1) then
3272: l_amount := l_amount - l_buffer_size;
3273: l_offset := l_offset + l_buffer_size;
3274: l_buffer := '';
3275: else
3276: dbms_lob.read(p_value, l_amount, l_offset, l_buffer);
3277: dbms_output.put_line(l_buffer);
3278: exit;
3279: end if;
3280: end loop;
3526: SELECT version
3527: INTO l_dbver
3528: FROM v$instance;
3529:
3530: dbms_lob.CreateTemporary(l_message, TRUE, dbms_lob.Call);
3531:
3532: l_cells(1) := 'WH:Workflow Agents/Queues Status report.';
3533: Get_table(l_cells, 1, 'H', l_temp);
3534: dbms_lob.WriteAppend(l_message, length(l_temp), l_temp);
3530: dbms_lob.CreateTemporary(l_message, TRUE, dbms_lob.Call);
3531:
3532: l_cells(1) := 'WH:Workflow Agents/Queues Status report.';
3533: Get_table(l_cells, 1, 'H', l_temp);
3534: dbms_lob.WriteAppend(l_message, length(l_temp), l_temp);
3535: l_cells.DELETE;
3536:
3537: p_status := 'SUCCESS';
3538:
3570: td_fontcolor := 'black';
3571:
3572: Get_table(l_cells, 7, 'H', l_temp);
3573: l_temp := '
'||l_temp;
3574: dbms_lob.WriteAppend(l_message, length(l_temp), l_temp);
3575: l_temp := '';
3576: l_cells.DELETE;
3577:
3578: if (agt_rec.name <> 'WF_CONTROL') then
3609: Get_Table(l_cells, 1, 'H', l_temp);
3610: else
3611: Get_Table(l_cells, 4, 'H', l_temp);
3612: end if;
3613: dbms_lob.WriteAppend(l_message, length(l_temp), l_temp);
3614: l_cells.DELETE;
3615:
3616: -- Get Table header for writing Subscribers Rules
3617: l_cells(1) := '30%:Rule Name';
3673: Get_Table(l_cells, 1, 'H', l_temp);
3674: else
3675: Get_Table(l_cells, 2, 'H', l_temp);
3676: end if;
3677: dbms_lob.WriteAppend(l_message, length(l_temp), l_temp);
3678: l_temp := '';
3679: l_cells.DELETE;
3680: end if;
3681: end if;
3682: close c_queue;
3683: end loop;
3684: close c_agents;
3685:
3686: -- dbms_lob.Copy(p_report, l_message, dbms_lob.GetLength(l_message), 1, 1);
3687: -- dbms_lob.FreeTemporary(l_message);
3688: p_report := l_message;
3689:
3690: end CheckAgentsAQStatus;
3683: end loop;
3684: close c_agents;
3685:
3686: -- dbms_lob.Copy(p_report, l_message, dbms_lob.GetLength(l_message), 1, 1);
3687: -- dbms_lob.FreeTemporary(l_message);
3688: p_report := l_message;
3689:
3690: end CheckAgentsAQStatus;
3691:
4026: l_cells tdType;
4027: l_head varchar2(200);
4028: begin
4029:
4030: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.session);
4031: l_head := '
4028: begin
4029:
4030: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.session);
4031: l_head := '
4040: when NO_DATA_FOUND then
4041: l_cells(1) := 'WH: Event '||p_event_name||' has been purged and is not available in the Database.';
4042: Get_Table(l_cells, 1, 'H', l_temp_result);
4043: l_cells.DELETE;
4044: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4045: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4046: p_value := l_value;
4047: return;
4048: end;
4041: l_cells(1) := 'WH: Event '||p_event_name||' has been purged and is not available in the Database.';
4042: Get_Table(l_cells, 1, 'H', l_temp_result);
4043: l_cells.DELETE;
4044: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4045: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4046: p_value := l_value;
4047: return;
4048: end;
4049:
4047: return;
4048: end;
4049:
4050: l_temp_result := ''||wf_core.newline;
4051: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4052:
4053: -- Get WF_SYSTEM_STATUS
4054: l_temp_result := '
'
4055: ||Get_Evt_Sys_Status(p_event_name => p_event_name,
4056: p_event_key => p_event_key)
4057: ||wf_core.newline;
4058: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
4060: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4061:
4062: -- Get Business Event Item Info
4063: l_temp_result := '
'||Get_Bus_Evt_Info(p_event_name)||wf_core.newline;
4064: l_temp_result := l_temp_result||'
'||Get_Bus_Evt_Info(p_event_name)||wf_core.newline;
4064: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
4066: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4067:
4068: -- Get Subscription Info using Cache API
4069: l_temp_result := '
'||Get_Evt_Subs_Cac_Info(p_event_name)||wf_core.newline;
4070: l_temp_result := l_temp_result||'
'||Get_Evt_Subs_Cac_Info(p_event_name)||wf_core.newline;
4070: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
4072: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4073:
4074: -- Get Subscription Info from DB
4075: l_temp_result := '
'||Get_Evt_Subs_Info(p_event_name)||wf_core.newline;
4076: l_temp_result := l_temp_result||'
'||Get_Evt_Subs_Info(p_event_name)||wf_core.newline;
4076: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
4078: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4079:
4080: -- Listener Statuses
4081: l_temp_result := '
'||Get_Agent_Lsnrs_Status||wf_core.newline;
4082: l_temp_result := l_temp_result||'
'||Get_Agent_Lsnrs_Status||wf_core.newline;
4082: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
4084: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4085:
4086: -- Queue Statuses
4087: -- Deferred queue status
4088: l_temp_result := '
'
4091: p_event_key => p_event_key)
4092: ||wf_core.newline;
4093: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
4095: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4096:
4097: -- Java Deferred Queue Status
4098: l_temp_result := '
'
4099: ||Get_JMS_Queue_Status(p_queue_name => WFD_JAVA_DEFERRED,
4101: p_event_key => p_event_key)
4102: ||wf_core.newline;
4103: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
4105: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4106:
4107: -- Error Queue Status
4108: l_temp_result := '
'
4109: ||Get_Event_Queue_Status(p_queue_name => WFD_ERROR,
4111: p_event_key => p_event_key)
4112: ||wf_core.newline;
4113: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
4115: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4116:
4117: -- Java Error Queue Status
4118: l_temp_result := '
'
4119: ||Get_JMS_Queue_Status(p_queue_name => WFD_JAVA_ERROR,
4121: p_event_key => p_event_key)
4122: ||wf_core.newline;
4123: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
4125: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4126:
4127: -- Error Notification Details
4128: l_temp_result := '
'
4129: ||Get_Error_Ntf_Details(p_event_name => p_event_name,
4130: p_event_key => p_event_key)
4131: ||wf_core.newline;
4132: l_temp_result := l_temp_result||'Go to top
'||wf_core.newline;
4134: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4135:
4136: -- Send the final HTML Output to the caller
4137: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4138: p_value := l_value;
4133: ' size='||td_fontsize||'>Go to top
'||wf_core.newline;
4134: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4135:
4136: -- Send the final HTML Output to the caller
4137: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4138: p_value := l_value;
4139: exception
4140: when others then
4141: l_temp_result := 'Error encountered while Generating BES Debug Information for event '||p_event_name||wf_core.newline;
4140: when others then
4141: l_temp_result := 'Error encountered while Generating BES Debug Information for event '||p_event_name||wf_core.newline;
4142: l_temp_result := l_temp_result||'Error Name : '||wf_core.newline||wf_core.error_name;
4143: l_temp_result := l_temp_result||'Error Stack: '||wf_core.newline||wf_core.error_stack;
4144: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4145: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4146: p_value := l_value;
4147: end Get_Bes_Debug;
4148:
4141: l_temp_result := 'Error encountered while Generating BES Debug Information for event '||p_event_name||wf_core.newline;
4142: l_temp_result := l_temp_result||'Error Name : '||wf_core.newline||wf_core.error_name;
4143: l_temp_result := l_temp_result||'Error Stack: '||wf_core.newline||wf_core.error_stack;
4144: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4145: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4146: p_value := l_value;
4147: end Get_Bes_Debug;
4148:
4149:
4172: l_install varchar2(1);
4173:
4174: begin
4175:
4176: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.session);
4177:
4178: dbms_lob.CreateTemporary(l_temp, TRUE, dbms_lob.session);
4179:
4180: l_head := '
4174: begin
4175:
4176: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.session);
4177:
4178: dbms_lob.CreateTemporary(l_temp, TRUE, dbms_lob.session);
4179:
4180: l_head := '
4180: l_head := '
4201: Get_Table(l_cells, 1, 'H', l_temp_result);
4202: l_cells.DELETE;
4203:
4204: -- Add to LOB
4205: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4206: --
4207: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4208:
4209: p_content := l_value;
4203:
4204: -- Add to LOB
4205: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4206: --
4207: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4208:
4209: p_content := l_value;
4210: return;
4211: end if;
4212:
4213: -- Get Users belonging to the recipient Role
4214: l_temp_result := '
' ||Get_Summary_Ntf_Role_Users(p_role)||wf_core.newline;
4215: l_temp_result := l_temp_result || '
'||wf_core.newline;
4216: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4217:
4218:
4219: -- Get the recipient Role Information
4220: l_temp_result := '
' ||Get_Summary_Ntf_Role_Info(p_role)||wf_core.newline;
4218:
4219: -- Get the recipient Role Information
4220: l_temp_result := '
' ||Get_Summary_Ntf_Role_Info(p_role)||wf_core.newline;
4221: l_temp_result := l_temp_result || '
'||wf_core.newline;
4222: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4223:
4224: -- Queue Statuses : Since summary ntf always enqued in wf_notification_out.
4225: -- If SUMHTML or SUMMARY then contents are fetched from Fwk API :
4226: -- Detail can be seen at WF_NOTIFICATION.getSummaryURL
4233: l_temp_result := '
' ||Get_JMS_Queue_Status(p_queue_name => WFD_NTF_OUT,
4234: p_event_name => 'oracle.apps.wf.notification%',
4235: p_event_key => p_role || '%')||wf_core.newline;
4236:
4237: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4238:
4239: -- Email and Notification message definition
4240: l_temp_result := '
'||wf_core.newline;
4241: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4237: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4238:
4239: -- Email and Notification message definition
4240: l_temp_result := '
'||wf_core.newline;
4241: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4242: -- Summary template : WFMAIL
4243: Get_Summary_Templates(p_role, l_npref, l_value);
4244:
4245: -- WF_XML.generate FOR an event with
4245: -- WF_XML.generate FOR an event with
4246: -- event key for summary is generated as: role_name + sysdate
4247: --
4248: l_temp_result := '
'||wf_core.newline;
4249: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4250: Get_Summary_Ntf_Message(p_role, l_value );
4251:
4252: -- XML Message for a role from WF_NOTIFICATION_OUT
4253: l_temp_result := '
'||wf_core.newline;
4250: Get_Summary_Ntf_Message(p_role, l_value );
4251:
4252: -- XML Message for a role from WF_NOTIFICATION_OUT
4253: l_temp_result := '
'||wf_core.newline;
4254: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4255: Get_Summary_Msg_From_Out(p_role, l_value);
4256:
4257: -- Profile Option Values
4258: l_temp_result := '
'||wf_core.newline;
4255: Get_Summary_Msg_From_Out(p_role, l_value);
4256:
4257: -- Profile Option Values
4258: l_temp_result := '
'||wf_core.newline;
4259: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4260: Get_Profile_Option_Values(l_value);
4261:
4262: -- GSC Mailer component parameters
4263: l_temp_result := '
'||wf_core.newline;
4260: Get_Profile_Option_Values(l_value);
4261:
4262: -- GSC Mailer component parameters
4263: l_temp_result := '
'||wf_core.newline;
4264: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4265: Get_GSC_Comp_Parameters('WF_MAILER', null, l_value);
4266:
4267: -- GSC Mailer component scheduled events
4268: l_temp_result := '
'||wf_core.newline;
4265: Get_GSC_Comp_Parameters('WF_MAILER', null, l_value);
4266:
4267: -- GSC Mailer component scheduled events
4268: l_temp_result := '
'||wf_core.newline;
4269: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4270: Get_GSC_Comp_ScheduledEvents('WF_MAILER', null, l_value);
4271:
4272: -- Mailer Tags
4273: l_temp_result := '
'||wf_core.newline;
4270: Get_GSC_Comp_ScheduledEvents('WF_MAILER', null, l_value);
4271:
4272: -- Mailer Tags
4273: l_temp_result := '
'||wf_core.newline;
4274: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4275:
4276: l_temp_result := Get_Mailer_Tags()||wf_core.newline;
4277: l_temp_result := l_temp_result || '
'||wf_core.newline;
4278: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4274: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4275:
4276: l_temp_result := Get_Mailer_Tags()||wf_core.newline;
4277: l_temp_result := l_temp_result || '
'||wf_core.newline;
4278: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4279:
4280: -- Send the final HTML Output to the caller
4281: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4282:
4277: l_temp_result := l_temp_result || '
'||wf_core.newline;
4278: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4279:
4280: -- Send the final HTML Output to the caller
4281: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4282:
4283: p_content := l_value;
4284:
4285: exception
4287: l_temp_result := 'Error encountered while Generating Summary Mailer Debug '||
4288: 'Information for role '||p_role||wf_core.newline;
4289: l_temp_result := l_temp_result||'Error Name : '||wf_core.newline||wf_core.error_name;
4290: l_temp_result := l_temp_result||'Error Stack: '||wf_core.newline||wf_core.error_stack;
4291: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4292: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4293: p_content := l_value;
4294:
4295: end Get_Summary_Mailer_Debug; -- end of Summary Mailer dbg
4288: 'Information for role '||p_role||wf_core.newline;
4289: l_temp_result := l_temp_result||'Error Name : '||wf_core.newline||wf_core.error_name;
4290: l_temp_result := l_temp_result||'Error Stack: '||wf_core.newline||wf_core.error_stack;
4291: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4292: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4293: p_content := l_value;
4294:
4295: end Get_Summary_Mailer_Debug; -- end of Summary Mailer dbg
4296:
4316:
4317: -- get session user
4318: select user into l_user from dual;
4319:
4320: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.session);
4321: dbms_lob.CreateTemporary(l_temp, TRUE, dbms_lob.session);
4322:
4323: l_head := '
4317: -- get session user
4318: select user into l_user from dual;
4319:
4320: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.session);
4321: dbms_lob.CreateTemporary(l_temp, TRUE, dbms_lob.session);
4322:
4323: l_head := '
4320: dbms_lob.CreateTemporary(l_value, TRUE, dbms_lob.session);
4321: dbms_lob.CreateTemporary(l_temp, TRUE, dbms_lob.session);
4322:
4323: l_head := '
4329: l_temp_result := '
'
4330: ||Get_Error_Ntf_Details(p_event_name => 'oracle.apps.wf.notification.%',
4331: p_event_key => p_idstring)
4332: ||wf_core.newline;
4333: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4334:
4335: -- Notification OUT Queue Status
4336: l_temp_result := '
'
4337: ||Get_JMS_Queue_Status(p_queue_name => WFD_NTF_OUT,
4339: p_event_key => to_char(p_idstring) || '%',
4340: p_corr_id => l_user || ':' || p_module || '%')
4341: ||wf_core.newline;
4342:
4343: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4344:
4345: -- Notification IN Queue Status
4346: l_temp_result := '
'
4347: ||Get_JMS_Queue_Status(p_queue_name => WFD_NTF_IN,
4349: p_event_key => to_char(p_idstring) || '%',
4350: p_corr_id => l_user || ':' || p_module || '%')
4351: ||wf_core.newline;
4352:
4353: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4354:
4355: l_temp_result := '
'||wf_core.newline;
4356: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4357:
4352:
4353: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4354:
4355: l_temp_result := '
'||wf_core.newline;
4356: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4357:
4358: -- XML Message for the alert from WF_NOTIFICATION_OUT
4359: Get_Ntf_Msg_From_Out(p_idstring, l_user || ':' || p_module || '%', l_value);
4360:
4358: -- XML Message for the alert from WF_NOTIFICATION_OUT
4359: Get_Ntf_Msg_From_Out(p_idstring, l_user || ':' || p_module || '%', l_value);
4360:
4361: l_temp_result := '
'||wf_core.newline;
4362: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4363:
4364: -- XML Message for the notification from WF_NOTIFICATION_IN
4365: Get_Ntf_Msg_From_In(p_idstring, l_user || ':' || p_module || '%', l_value);
4366:
4364: -- XML Message for the notification from WF_NOTIFICATION_IN
4365: Get_Ntf_Msg_From_In(p_idstring, l_user || ':' || p_module || '%', l_value);
4366:
4367: l_temp_result := '
'||wf_core.newline;
4368: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4369:
4370: -- Profile Option Values
4371: Get_Profile_Option_Values(l_value);
4372: l_temp_result := '
'||wf_core.newline;
4369:
4370: -- Profile Option Values
4371: Get_Profile_Option_Values(l_value);
4372: l_temp_result := '
'||wf_core.newline;
4373: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4374:
4375: -- GSC Mailer component parameters
4376: Get_GSC_Comp_Parameters('WF_MAILER', null, l_value);
4377: l_temp_result := '
'||wf_core.newline;
4374:
4375: -- GSC Mailer component parameters
4376: Get_GSC_Comp_Parameters('WF_MAILER', null, l_value);
4377: l_temp_result := '
'||wf_core.newline;
4378: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4379:
4380: -- GSC Mailer component scheduled events
4381: Get_GSC_Comp_ScheduledEvents('WF_MAILER', null, l_value);
4382: l_temp_result := '
'||wf_core.newline;
4379:
4380: -- GSC Mailer component scheduled events
4381: Get_GSC_Comp_ScheduledEvents('WF_MAILER', null, l_value);
4382: l_temp_result := '
'||wf_core.newline;
4383: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4384:
4385: -- Mailer Tags
4386: l_temp_result := '
'||Get_Mailer_Tags()||wf_core.newline;
4387: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4383: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4384:
4385: -- Mailer Tags
4386: l_temp_result := '
'||Get_Mailer_Tags()||wf_core.newline;
4387: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4388:
4389: -- Send the final HTML Output to the caller
4390: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4391:
4386: l_temp_result := '
'||Get_Mailer_Tags()||wf_core.newline;
4387: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4388:
4389: -- Send the final HTML Output to the caller
4390: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4391:
4392: p_content := l_value;
4393:
4394: exception
4397: ' Information for module '||p_module|| '
'|| wf_core.newline;
4398: l_temp_result := l_temp_result||'Error Name : '||wf_core.error_name || '
' || wf_core.newline;
4399: l_temp_result := l_temp_result||'Error Stack: '||wf_core.newline||wf_core.error_stack;
4400:
4401: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4402: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4403:
4404: p_content := l_value;
4405:
4398: l_temp_result := l_temp_result||'Error Name : '||wf_core.error_name || '
' || wf_core.newline;
4399: l_temp_result := l_temp_result||'Error Stack: '||wf_core.newline||wf_core.error_stack;
4400:
4401: dbms_lob.WriteAppend(l_value, length(l_temp_result), l_temp_result);
4402: dbms_lob.WriteAppend(l_value, length(g_end), g_end);
4403:
4404: p_content := l_value;
4405:
4406: end Get_Mailer_Alert_Debug;