DBA Data[Home] [Help]

APPS.WF_MESSAGES_VL_PUB dependencies on WF_MESSAGES_VL

Line 1: PACKAGE BODY wf_messages_vl_pub AS

1: PACKAGE BODY wf_messages_vl_pub AS
2: /* $Header: wfdefb.pls 120.1 2005/07/02 03:43:48 appldev ship $ */
3:
4: /*===========================================================================
5: PACKAGE NAME: wf_messages_vl_pub

Line 5: PACKAGE NAME: wf_messages_vl_pub

1: PACKAGE BODY wf_messages_vl_pub AS
2: /* $Header: wfdefb.pls 120.1 2005/07/02 03:43:48 appldev ship $ */
3:
4: /*===========================================================================
5: PACKAGE NAME: wf_messages_vl_pub
6:
7: DESCRIPTION:
8:
9: OWNER: GKELLNER

Line 22: into a p_wf_messages_vl_tbl table and a

18: PROCEDURE NAME: fetch_messages
19:
20: DESCRIPTION: Fetches all the messages and each message
21: associate attributes for a given item type
22: into a p_wf_messages_vl_tbl table and a
23: p_wf_message_attr_vl_tbl table based on the
24: item type internal eight character name. This
25: function can retrieve a single message
26: definition if the internal name along with the

Line 32: The p_wf_messages_vl_tbl table and the

28: useful if you wish to display the details for a
29: single message when it is referenced from some
30: drilldown mechanism.
31:
32: The p_wf_messages_vl_tbl table and the
33: p_wf_message_attr_vl_tbl table are synchronized by
34: the select order of both queries. The
35: draw_message_list and draw_message_details functions
36: take advantage of this ordering for performance reasons

Line 48: p_wf_messages_vl_tbl OUT NOCOPY wf_messages_vl_pub.wf_messages_vl_tbl_type,

44: ============================================================================*/
45: PROCEDURE fetch_messages
46: (p_item_type IN VARCHAR2,
47: p_name IN VARCHAR2,
48: p_wf_messages_vl_tbl OUT NOCOPY wf_messages_vl_pub.wf_messages_vl_tbl_type,
49: p_wf_message_attr_vl_tbl OUT NOCOPY wf_messages_vl_pub.wf_message_attr_vl_tbl_type) IS
50:
51: CURSOR fetch_messages (c_item_type IN VARCHAR2) IS
52: SELECT row_id,

Line 49: p_wf_message_attr_vl_tbl OUT NOCOPY wf_messages_vl_pub.wf_message_attr_vl_tbl_type) IS

45: PROCEDURE fetch_messages
46: (p_item_type IN VARCHAR2,
47: p_name IN VARCHAR2,
48: p_wf_messages_vl_tbl OUT NOCOPY wf_messages_vl_pub.wf_messages_vl_tbl_type,
49: p_wf_message_attr_vl_tbl OUT NOCOPY wf_messages_vl_pub.wf_message_attr_vl_tbl_type) IS
50:
51: CURSOR fetch_messages (c_item_type IN VARCHAR2) IS
52: SELECT row_id,
53: type,

Line 65: FROM wf_messages_vl

61: description,
62: subject,
63: html_body,
64: body
65: FROM wf_messages_vl
66: WHERE type = c_item_type
67: ORDER BY display_name;
68:
69: /*===========================================================================

Line 129: FROM wf_message_attributes_vl wma, wf_messages_vl wm

125: wma.number_default,
126: wma.date_default,
127: wma.display_name,
128: wma.description
129: FROM wf_message_attributes_vl wma, wf_messages_vl wm
130: WHERE wma.message_type = c_item_type
131: AND wm.type = c_item_type
132: AND wm.name = wma.message_name
133: ORDER BY wm.display_name, wma.sequence;

Line 168: INTO p_wf_messages_vl_tbl(1)

164: description,
165: subject,
166: html_body,
167: body
168: INTO p_wf_messages_vl_tbl(1)
169: FROM wf_messages_vl
170: WHERE type = p_item_type
171: AND name = p_name;
172:

Line 169: FROM wf_messages_vl

165: subject,
166: html_body,
167: body
168: INTO p_wf_messages_vl_tbl(1)
169: FROM wf_messages_vl
170: WHERE type = p_item_type
171: AND name = p_name;
172:
173: ELSE

Line 179: ** filling in the p_wf_messages_vl_tbl

175: OPEN fetch_messages (p_item_type);
176:
177: /*
178: ** Loop through all the lookup_code rows for the given message
179: ** filling in the p_wf_messages_vl_tbl
180: */
181: LOOP
182:
183: l_record_num := l_record_num + 1;

Line 185: FETCH fetch_messages INTO p_wf_messages_vl_tbl(l_record_num);

181: LOOP
182:
183: l_record_num := l_record_num + 1;
184:
185: FETCH fetch_messages INTO p_wf_messages_vl_tbl(l_record_num);
186:
187: EXIT WHEN fetch_messages%NOTFOUND;
188:
189: END LOOP;

Line 243: Wf_Core.Context('wf_messages_vl_pub',

239: END IF;
240:
241: EXCEPTION
242: WHEN OTHERS THEN
243: Wf_Core.Context('wf_messages_vl_pub',
244: 'fetch_messages',
245: p_item_type,
246: p_name);
247:

Line 264: l_wf_messages_vl_tbl wf_messages_vl_pub.wf_messages_vl_tbl_type;

260: p_internal_name IN VARCHAR2,
261: p_display_name OUT NOCOPY VARCHAR2) IS
262:
263: l_display_name VARCHAR2(80);
264: l_wf_messages_vl_tbl wf_messages_vl_pub.wf_messages_vl_tbl_type;
265: l_wf_message_attr_vl_tbl wf_messages_vl_pub.wf_message_attr_vl_tbl_type;
266:
267: BEGIN
268:

Line 265: l_wf_message_attr_vl_tbl wf_messages_vl_pub.wf_message_attr_vl_tbl_type;

261: p_display_name OUT NOCOPY VARCHAR2) IS
262:
263: l_display_name VARCHAR2(80);
264: l_wf_messages_vl_tbl wf_messages_vl_pub.wf_messages_vl_tbl_type;
265: l_wf_message_attr_vl_tbl wf_messages_vl_pub.wf_message_attr_vl_tbl_type;
266:
267: BEGIN
268:
269: /*

Line 274: l_wf_messages_vl_tbl,

270: ** Fetch the message record associated with this internal name
271: */
272: fetch_messages (p_item_type,
273: p_internal_name,
274: l_wf_messages_vl_tbl,
275: l_wf_message_attr_vl_tbl);
276:
277: /*
278: ** See if you found a row. If not, proide the user with feedback

Line 280: IF (l_wf_messages_vl_tbl.count < 1) THEN

276:
277: /*
278: ** See if you found a row. If not, proide the user with feedback
279: */
280: IF (l_wf_messages_vl_tbl.count < 1) THEN
281:
282: l_display_name := p_internal_name||' '||
283: ' -- '||UPPER(wf_core.translate ('WFITD_UNDEFINED'))||'';
284:

Line 287: l_display_name := l_wf_messages_vl_tbl(1).display_name;

283: ' -- '||UPPER(wf_core.translate ('WFITD_UNDEFINED'))||'';
284:
285: ELSE
286:
287: l_display_name := l_wf_messages_vl_tbl(1).display_name;
288:
289: END IF;
290:
291: p_display_name := l_display_name;

Line 320: (p_wf_messages_vl_tbl IN wf_messages_vl_pub.wf_messages_vl_tbl_type,

316: using the draw_message_attr_list.
317:
318: ============================================================================*/
319: PROCEDURE draw_message_list
320: (p_wf_messages_vl_tbl IN wf_messages_vl_pub.wf_messages_vl_tbl_type,
321: p_wf_message_attr_vl_tbl IN wf_messages_vl_pub.wf_message_attr_vl_tbl_type,
322: p_effective_date IN DATE,
323: p_indent_level IN NUMBER) IS
324:

Line 321: p_wf_message_attr_vl_tbl IN wf_messages_vl_pub.wf_message_attr_vl_tbl_type,

317:
318: ============================================================================*/
319: PROCEDURE draw_message_list
320: (p_wf_messages_vl_tbl IN wf_messages_vl_pub.wf_messages_vl_tbl_type,
321: p_wf_message_attr_vl_tbl IN wf_messages_vl_pub.wf_message_attr_vl_tbl_type,
322: p_effective_date IN DATE,
323: p_indent_level IN NUMBER) IS
324:
325: l_message_record_num NUMBER;

Line 329: l_wf_message_attr_vl_tbl wf_messages_vl_pub.wf_message_attr_vl_tbl_type;

325: l_message_record_num NUMBER;
326: l_attr_record_num NUMBER := 1;
327: ii NUMBER := 0;
328: l_cur_attr_record_num NUMBER := 1;
329: l_wf_message_attr_vl_tbl wf_messages_vl_pub.wf_message_attr_vl_tbl_type;
330:
331: BEGIN
332:
333: /*

Line 343: FOR l_message_record_num IN 1..p_wf_messages_vl_tbl.count LOOP

339:
340: /*
341: ** Print out all message display names in the pl*sql table
342: */
343: FOR l_message_record_num IN 1..p_wf_messages_vl_tbl.count LOOP
344:
345: /*
346: ** The creation of the anchor from the summary frame to the detail
347: ** frame was very complex so I've extracted the function into its

Line 351: p_wf_messages_vl_tbl(l_message_record_num).type,

347: ** frame was very complex so I've extracted the function into its
348: ** own routine.
349: */
350: wf_item_definition_util_pub.create_hotlink_to_details (
351: p_wf_messages_vl_tbl(l_message_record_num).type,
352: p_effective_date,
353: 'MESSAGE',
354: p_wf_messages_vl_tbl(l_message_record_num).name,
355: p_wf_messages_vl_tbl(l_message_record_num).display_name,

Line 354: p_wf_messages_vl_tbl(l_message_record_num).name,

350: wf_item_definition_util_pub.create_hotlink_to_details (
351: p_wf_messages_vl_tbl(l_message_record_num).type,
352: p_effective_date,
353: 'MESSAGE',
354: p_wf_messages_vl_tbl(l_message_record_num).name,
355: p_wf_messages_vl_tbl(l_message_record_num).display_name,
356: NULL,
357: p_indent_level+1);
358:

Line 355: p_wf_messages_vl_tbl(l_message_record_num).display_name,

351: p_wf_messages_vl_tbl(l_message_record_num).type,
352: p_effective_date,
353: 'MESSAGE',
354: p_wf_messages_vl_tbl(l_message_record_num).name,
355: p_wf_messages_vl_tbl(l_message_record_num).display_name,
356: NULL,
357: p_indent_level+1);
358:
359: /*

Line 378: p_wf_messages_vl_tbl(l_message_record_num).display_name =

374: ** will cause a 6502-PL*SQL numeric or value error exception.
375: */
376: WHILE (
377: l_attr_record_num <= p_wf_message_attr_vl_tbl.count AND
378: p_wf_messages_vl_tbl(l_message_record_num).display_name =
379: p_wf_message_attr_vl_tbl(l_attr_record_num).message_display_name
380: ) LOOP
381:
382: /*

Line 409: wf_messages_vl_pub.draw_message_attr_list (

405: ** List all the message attribute details for this message that
406: ** we found above. Add two to the current indent level so it
407: ** is pushed in past the start of the message list.
408: */
409: wf_messages_vl_pub.draw_message_attr_list (
410: l_wf_message_attr_vl_tbl,
411: p_effective_date,
412: p_indent_level + 2);
413:

Line 420: Wf_Core.Context('wf_messages_vl_pub', 'draw_message_list');

416: END LOOP;
417:
418: EXCEPTION
419: WHEN OTHERS THEN
420: Wf_Core.Context('wf_messages_vl_pub', 'draw_message_list');
421: wf_item_definition.Error;
422:
423: END draw_message_list;
424:

Line 436: (p_wf_message_attr_vl_tbl IN wf_messages_vl_pub.wf_message_attr_vl_tbl_type,

432: output.
433:
434: ============================================================================*/
435: PROCEDURE draw_message_attr_list
436: (p_wf_message_attr_vl_tbl IN wf_messages_vl_pub.wf_message_attr_vl_tbl_type,
437: p_effective_date IN DATE,
438: p_indent_level IN NUMBER) IS
439:
440: l_record_num NUMBER;

Line 480: Wf_Core.Context('wf_messages_vl_pub', 'draw_message_attr_list');

476: END LOOP;
477:
478: EXCEPTION
479: WHEN OTHERS THEN
480: Wf_Core.Context('wf_messages_vl_pub', 'draw_message_attr_list');
481: wf_item_definition.Error;
482:
483: END draw_message_attr_list;
484:

Line 505: (p_wf_messages_vl_tbl IN wf_messages_vl_pub.wf_messages_vl_tbl_type,

501: MODIFICATION LOG:
502: 06-JUN-2001 JWSMITH BUG 1819232 - added summary attr for table tag for ADA
503: ============================================================================*/
504: PROCEDURE draw_message_details
505: (p_wf_messages_vl_tbl IN wf_messages_vl_pub.wf_messages_vl_tbl_type,
506: p_wf_message_attr_vl_tbl IN wf_messages_vl_pub.wf_message_attr_vl_tbl_type,
507: p_indent_level IN NUMBER) IS
508:
509: l_message_record_num NUMBER := 1;

Line 506: p_wf_message_attr_vl_tbl IN wf_messages_vl_pub.wf_message_attr_vl_tbl_type,

502: 06-JUN-2001 JWSMITH BUG 1819232 - added summary attr for table tag for ADA
503: ============================================================================*/
504: PROCEDURE draw_message_details
505: (p_wf_messages_vl_tbl IN wf_messages_vl_pub.wf_messages_vl_tbl_type,
506: p_wf_message_attr_vl_tbl IN wf_messages_vl_pub.wf_message_attr_vl_tbl_type,
507: p_indent_level IN NUMBER) IS
508:
509: l_message_record_num NUMBER := 1;
510: l_attr_record_num NUMBER := 1;

Line 515: l_wf_message_attr_vl_tbl wf_messages_vl_pub.wf_message_attr_vl_tbl_type;

511: l_attr_marker NUMBER := 1;
512: l_cur_attr_record_num NUMBER := 1;
513: ii NUMBER := 0;
514: pri VARCHAR2(80) := NULL;
515: l_wf_message_attr_vl_tbl wf_messages_vl_pub.wf_message_attr_vl_tbl_type;
516:
517: BEGIN
518:
519: /*

Line 529: FOR l_message_record_num IN 1..p_wf_messages_vl_tbl.count LOOP

525:
526: /*
527: ** Print out all item attribute display names in the pl*sql table
528: */
529: FOR l_message_record_num IN 1..p_wf_messages_vl_tbl.count LOOP
530:
531: /*
532: ** Open a new table for each attribute so you can control the spacing
533: ** between each attribute

Line 545: p_wf_messages_vl_tbl(l_message_record_num).name,

541: ** name for the object.
542: */
543: wf_item_definition_util_pub.create_details_hotlink_target (
544: 'MESSAGE',
545: p_wf_messages_vl_tbl(l_message_record_num).name,
546: p_wf_messages_vl_tbl(l_message_record_num).display_name,
547: wf_core.translate('WFITD_MESSAGE_NAME'),
548: 0);
549:

Line 546: p_wf_messages_vl_tbl(l_message_record_num).display_name,

542: */
543: wf_item_definition_util_pub.create_details_hotlink_target (
544: 'MESSAGE',
545: p_wf_messages_vl_tbl(l_message_record_num).name,
546: p_wf_messages_vl_tbl(l_message_record_num).display_name,
547: wf_core.translate('WFITD_MESSAGE_NAME'),
548: 0);
549:
550: /*

Line 555: p_wf_messages_vl_tbl(l_message_record_num).name);

551: ** Create the internal name row in the table.
552: */
553: wf_item_definition_util_pub.draw_detail_prompt_value_pair (
554: wf_core.translate('WFITD_INTERNAL_NAME'),
555: p_wf_messages_vl_tbl(l_message_record_num).name);
556:
557: /*
558: ** Create the description row in the table
559: */

Line 562: p_wf_messages_vl_tbl(l_message_record_num).description);

558: ** Create the description row in the table
559: */
560: wf_item_definition_util_pub.draw_detail_prompt_value_pair (
561: wf_core.translate('DESCRIPTION'),
562: p_wf_messages_vl_tbl(l_message_record_num).description);
563:
564:
565: IF (p_wf_messages_vl_tbl(l_message_record_num).default_priority < 34) THEN
566: pri := wf_core.translate('HIGH');

Line 565: IF (p_wf_messages_vl_tbl(l_message_record_num).default_priority < 34) THEN

561: wf_core.translate('DESCRIPTION'),
562: p_wf_messages_vl_tbl(l_message_record_num).description);
563:
564:
565: IF (p_wf_messages_vl_tbl(l_message_record_num).default_priority < 34) THEN
566: pri := wf_core.translate('HIGH');
567:
568: ELSIF (p_wf_messages_vl_tbl(l_message_record_num).default_priority > 66) THEN
569: pri := wf_core.translate('LOW');

Line 568: ELSIF (p_wf_messages_vl_tbl(l_message_record_num).default_priority > 66) THEN

564:
565: IF (p_wf_messages_vl_tbl(l_message_record_num).default_priority < 34) THEN
566: pri := wf_core.translate('HIGH');
567:
568: ELSIF (p_wf_messages_vl_tbl(l_message_record_num).default_priority > 66) THEN
569: pri := wf_core.translate('LOW');
570:
571: ELSE
572:

Line 588: p_wf_messages_vl_tbl(l_message_record_num).subject);

584: ** Create the Subject row in the table
585: */
586: wf_item_definition_util_pub.draw_detail_prompt_value_pair (
587: wf_core.translate('SUBJECT'),
588: p_wf_messages_vl_tbl(l_message_record_num).subject);
589:
590: /*
591: ** Create the html body row in the table
592: */

Line 595: p_wf_messages_vl_tbl(l_message_record_num).html_body);

591: ** Create the html body row in the table
592: */
593: wf_item_definition_util_pub.draw_detail_prompt_value_pair (
594: wf_core.translate('WFITD_HTML_BODY'),
595: p_wf_messages_vl_tbl(l_message_record_num).html_body);
596:
597: /*
598: ** Create the text body row in the table
599: */

Line 602: p_wf_messages_vl_tbl(l_message_record_num).body);

598: ** Create the text body row in the table
599: */
600: wf_item_definition_util_pub.draw_detail_prompt_value_pair (
601: wf_core.translate('WFITD_TEXT_BODY'),
602: p_wf_messages_vl_tbl(l_message_record_num).body);
603:
604: /*
605: ** Call function to print the read/write/execute roles
606: */

Line 608: p_wf_messages_vl_tbl(l_message_record_num).read_role,

604: /*
605: ** Call function to print the read/write/execute roles
606: */
607: wf_item_definition_util_pub.draw_read_write_exe_details(
608: p_wf_messages_vl_tbl(l_message_record_num).read_role,
609: p_wf_messages_vl_tbl(l_message_record_num).write_role,
610: null,
611: FALSE);
612:

Line 609: p_wf_messages_vl_tbl(l_message_record_num).write_role,

605: ** Call function to print the read/write/execute roles
606: */
607: wf_item_definition_util_pub.draw_read_write_exe_details(
608: p_wf_messages_vl_tbl(l_message_record_num).read_role,
609: p_wf_messages_vl_tbl(l_message_record_num).write_role,
610: null,
611: FALSE);
612:
613: /*

Line 617: p_wf_messages_vl_tbl(l_message_record_num).custom_level,

613: /*
614: ** Call function to print the customization/protection levels
615: */
616: wf_item_definition_util_pub.draw_custom_protect_details(
617: p_wf_messages_vl_tbl(l_message_record_num).custom_level,
618: p_wf_messages_vl_tbl(l_message_record_num).protect_level);
619:
620:
621: /*

Line 618: p_wf_messages_vl_tbl(l_message_record_num).protect_level);

614: ** Call function to print the customization/protection levels
615: */
616: wf_item_definition_util_pub.draw_custom_protect_details(
617: p_wf_messages_vl_tbl(l_message_record_num).custom_level,
618: p_wf_messages_vl_tbl(l_message_record_num).protect_level);
619:
620:
621: /*
622: ** Go find the result attribute in the list of attributes

Line 639: p_wf_messages_vl_tbl(l_message_record_num).display_name =

635: */
636: WHILE (
637: l_cur_attr_record_num = 1 AND
638: l_attr_marker <= p_wf_message_attr_vl_tbl.count AND
639: p_wf_messages_vl_tbl(l_message_record_num).display_name =
640: p_wf_message_attr_vl_tbl(l_attr_marker).message_display_name
641: ) LOOP
642:
643: /*

Line 673: wf_messages_vl_pub.draw_message_attr_details (

669: ** certain pieces of the attribute
670: */
671: IF (l_cur_attr_record_num > 1) THEN
672:
673: wf_messages_vl_pub.draw_message_attr_details (
674: l_wf_message_attr_vl_tbl,
675: -1);
676:
677: END IF;

Line 703: p_wf_messages_vl_tbl(l_message_record_num).display_name =

699: ** will cause a 6502-PL*SQL numeric or value error exception.
700: */
701: WHILE (
702: l_attr_record_num <= p_wf_message_attr_vl_tbl.count AND
703: p_wf_messages_vl_tbl(l_message_record_num).display_name =
704: p_wf_message_attr_vl_tbl(l_attr_record_num).message_display_name
705: ) LOOP
706:
707: /*

Line 745: wf_messages_vl_pub.draw_message_attr_details (

741: /*
742: ** List all the message attribute details for this message that
743: ** we found above.
744: */
745: wf_messages_vl_pub.draw_message_attr_details (
746: l_wf_message_attr_vl_tbl,
747: 1);
748:
749: /*

Line 753: IF (l_message_record_num < p_wf_messages_vl_tbl.count) THEN

749: /*
750: ** If you still have more messages to process then put in a
751: ** few blank lines and put in another Message Details Header
752: */
753: IF (l_message_record_num < p_wf_messages_vl_tbl.count) THEN
754:
755: /*
756: ** Put in a couple of blank lines between the current message
757: ** attributes and the next message

Line 778: IF (l_message_record_num < p_wf_messages_vl_tbl.count AND

774: ** Draw a line between each message definition
775: ** if this is not the last item in the list and if there
776: ** are no attributes in the attribute list for this message.
777: */
778: IF (l_message_record_num < p_wf_messages_vl_tbl.count AND
779: l_cur_attr_record_num = 1) THEN
780:
781: htp.p ('


');
782:

Line 789: Wf_Core.Context('wf_messages_vl_pub', 'draw_message_details');

785: END LOOP;
786:
787: EXCEPTION
788: WHEN OTHERS THEN
789: Wf_Core.Context('wf_messages_vl_pub', 'draw_message_details');
790: wf_item_definition.Error;
791:
792: END draw_message_details;
793:

Line 805: (p_wf_message_attr_vl_tbl IN wf_messages_vl_pub.wf_message_attr_vl_tbl_type,

801: MODIFICATION LOG:
802: 06-JUN-2001 JWSMITH BUG 1819232 - added summary attr for table tag for ADA
803: ============================================================================*/
804: PROCEDURE draw_message_attr_details
805: (p_wf_message_attr_vl_tbl IN wf_messages_vl_pub.wf_message_attr_vl_tbl_type,
806: p_indent_level IN NUMBER) IS
807:
808: l_record_num NUMBER;
809: ii NUMBER := 0;

Line 1036: Wf_Core.Context('wf_messages_vl_pub', 'draw_message_attr_details');

1032: END LOOP;
1033:
1034: EXCEPTION
1035: WHEN OTHERS THEN
1036: Wf_Core.Context('wf_messages_vl_pub', 'draw_message_attr_details');
1037: wf_item_definition.Error;
1038:
1039: END draw_message_attr_details;
1040:

Line 1041: END wf_messages_vl_pub;

1037: wf_item_definition.Error;
1038:
1039: END draw_message_attr_details;
1040:
1041: END wf_messages_vl_pub;