DBA Data[Home] [Help]

APPS.FND_FLEX_WORKFLOW dependencies on FND_FLEX_WORKFLOW

Line 1: PACKAGE BODY fnd_flex_workflow AS

1: PACKAGE BODY fnd_flex_workflow AS
2: /* $Header: AFFFWKFB.pls 120.1.12010000.1 2008/07/25 14:15:06 appldev ship $ */
3:
4: -- ==================================================
5: -- CACHING

Line 36: g_debug_fnd_flex_workflow BOOLEAN := FALSE;

32:
33: --
34: -- Global variables
35: --
36: g_debug_fnd_flex_workflow BOOLEAN := FALSE;
37: g_chr_newline VARCHAR2(8);
38: g_wf_not_completed VARCHAR2(100) := 'FLEX_WF_NOT_COMPLETED';
39:
40: -- ======================================================================

Line 69: IF (g_debug_fnd_flex_workflow) THEN

65: l_vc2 VARCHAR2(32000) := p_debug || g_chr_newline;
66: l_line_size NUMBER := 75;
67: l_pos NUMBER;
68: BEGIN
69: IF (g_debug_fnd_flex_workflow) THEN
70: WHILE (l_vc2 IS NOT NULL) LOOP
71: l_pos := Instr(l_vc2, g_chr_newline, 1, 1); -- find the first new line
72: IF (l_pos >= l_line_size) THEN
73: l_pos := l_line_size;

Line 88: IF (g_debug_fnd_flex_workflow) THEN

84: -- ======================================================================
85: PROCEDURE report_wf_error(p_func_name IN VARCHAR2)
86: IS
87: BEGIN
88: IF (g_debug_fnd_flex_workflow) THEN
89: debug('Account Generator failed in ' || p_func_name ||
90: ' with following error.' || g_chr_newline ||
91: 'ERROR_NAME : ' || wf_core.error_name || g_chr_newline ||
92: 'ERROR_MESSAGE : ' || wf_core.error_message || g_chr_newline ||

Line 157: IF (g_debug_fnd_flex_workflow) THEN

153: END IF;
154:
155: px_key_flex := g_kffcache_key_flex;
156:
157: IF (g_debug_fnd_flex_workflow) THEN
158: debug('Account Generator is running for:');
159: debug(' WF ITEM = ' || p_item_type || '/' || p_item_key);
160: debug(' APPLICATION = ' || (To_char(px_key_flex.application_id) || '/' ||
161: px_key_flex.application_short_name));

Line 174: -- FND_FLEX_WORKFLOW_PROCESSES

170: --
171: -- This function selects which process in the given item type
172: -- should be used to generate the combination for the given
173: -- structure. This information is stored in the table
174: -- FND_FLEX_WORKFLOW_PROCESSES
175: --
176: FUNCTION select_process(appl_short_name IN VARCHAR2,
177: code IN VARCHAR2,
178: num IN NUMBER,

Line 198: FROM fnd_flex_workflow_processes fwk, fnd_application app

194: ELSE
195: SELECT
196: wf_process_name
197: INTO l_pname
198: FROM fnd_flex_workflow_processes fwk, fnd_application app
199: WHERE app.application_short_name = appl_short_name
200: AND fwk.application_id = app.application_id
201: AND fwk.id_flex_code = code
202: AND fwk.id_flex_num = num

Line 250: IF (g_debug_fnd_flex_workflow) THEN

246: l_actid, l_status, l_result);
247: --
248: -- Debug
249: --
250: IF (g_debug_fnd_flex_workflow) THEN
251: debug('PROCESS ACTID IS ' || l_actid);
252: debug('PROCESS STATUS IS ' || l_status);
253: debug('PROCESS RESULT IS ' || l_result);
254: END IF;

Line 269: -- FND_FLEX_WORKFLOW_ITEMKEY_S, creates a workflow process

265: -- ======================================================================
266: -- INITIALIZE
267: --
268: -- This function generates an item key from the sequence
269: -- FND_FLEX_WORKFLOW_ITEMKEY_S, creates a workflow process
270: -- for the given item, creates/sets values for flexfield
271: -- specific item attributes.
272: --
273: FUNCTION initialize(appl_short_name IN VARCHAR2,

Line 288: IF (g_debug_fnd_flex_workflow) THEN

284: BEGIN
285: --
286: -- Debug
287: --
288: IF (g_debug_fnd_flex_workflow) THEN
289: debug('START FND_FLEX_WORKFLOW.INITIALIZE');
290: debug('APPLICATION_SHORT_NAME = ' || appl_short_name);
291: debug('CODE = ' || code);
292: debug('NUM = ' || TO_CHAR(num));

Line 289: debug('START FND_FLEX_WORKFLOW.INITIALIZE');

285: --
286: -- Debug
287: --
288: IF (g_debug_fnd_flex_workflow) THEN
289: debug('START FND_FLEX_WORKFLOW.INITIALIZE');
290: debug('APPLICATION_SHORT_NAME = ' || appl_short_name);
291: debug('CODE = ' || code);
292: debug('NUM = ' || TO_CHAR(num));
293: debug('ITEMTYPE = ' || itemtype);

Line 372: TO_CHAR(FND_FLEX_WORKFLOW_ITEMKEY_S.NEXTVAL)

368: END IF;
369:
370: IF (l_profile_debug_mode = 'Y') THEN
371: SELECT
372: TO_CHAR(FND_FLEX_WORKFLOW_ITEMKEY_S.NEXTVAL)
373: INTO l_itemkey
374: FROM DUAL;
375: ELSE -- Synch Mode, key is '#SYNCH'
376: l_itemkey := wf_engine.eng_synch;

Line 382: l_pname := fnd_flex_workflow.select_process(appl_short_name, code, num,

378:
379: --
380: -- Select the process to start for the given structure.
381: --
382: l_pname := fnd_flex_workflow.select_process(appl_short_name, code, num,
383: itemtype);
384:
385: --
386: -- Debug

Line 388: IF (g_debug_fnd_flex_workflow) THEN

384:
385: --
386: -- Debug
387: --
388: IF (g_debug_fnd_flex_workflow) THEN
389: debug('APPLICATION ID = ' || TO_CHAR(l_application_id));
390: debug('NUMBER OF SEGMENTS = ' || TO_CHAR(l_nsegments));
391: debug('ITEMKEY = ' || l_itemkey);
392: debug('PROCESS = ' || l_pname);

Line 472: IF (g_debug_fnd_flex_workflow) THEN

468:
469: --
470: -- Return the itemkey
471: --
472: IF (g_debug_fnd_flex_workflow) THEN
473: debug('END FND_FLEX_WORKFLOW.INITIALIZE');
474: END IF;
475: RETURN l_itemkey;
476:

Line 473: debug('END FND_FLEX_WORKFLOW.INITIALIZE');

469: --
470: -- Return the itemkey
471: --
472: IF (g_debug_fnd_flex_workflow) THEN
473: debug('END FND_FLEX_WORKFLOW.INITIALIZE');
474: END IF;
475: RETURN l_itemkey;
476:
477: EXCEPTION

Line 479: wf_core.context('FND_FLEX_WORKFLOW', 'INITIALIZE',

475: RETURN l_itemkey;
476:
477: EXCEPTION
478: WHEN OTHERS THEN
479: wf_core.context('FND_FLEX_WORKFLOW', 'INITIALIZE',
480: itemtype, l_itemkey);
481: report_wf_error('FND_FLEX_WORKFLOW.INITIALIZE');
482: RAISE;
483: END initialize;

Line 481: report_wf_error('FND_FLEX_WORKFLOW.INITIALIZE');

477: EXCEPTION
478: WHEN OTHERS THEN
479: wf_core.context('FND_FLEX_WORKFLOW', 'INITIALIZE',
480: itemtype, l_itemkey);
481: report_wf_error('FND_FLEX_WORKFLOW.INITIALIZE');
482: RAISE;
483: END initialize;
484:
485: -- ======================================================================

Line 540: IF (g_debug_fnd_flex_workflow) THEN

536: BEGIN
537: --
538: -- Debug
539: --
540: IF (g_debug_fnd_flex_workflow) THEN
541: debug('START FND_FLEX_WORKFLOW.GENERATE');
542: debug('ITEMTYPE = ' || itemtype);
543: debug('ITEMKEY = ' || itemkey);
544: debug('INSERT_IF_NEW = ' || bool_to_char(insert_if_new));

Line 541: debug('START FND_FLEX_WORKFLOW.GENERATE');

537: --
538: -- Debug
539: --
540: IF (g_debug_fnd_flex_workflow) THEN
541: debug('START FND_FLEX_WORKFLOW.GENERATE');
542: debug('ITEMTYPE = ' || itemtype);
543: debug('ITEMKEY = ' || itemkey);
544: debug('INSERT_IF_NEW = ' || bool_to_char(insert_if_new));
545: END IF;

Line 630: IF (g_debug_fnd_flex_workflow) THEN

626:
627: --
628: -- Debug
629: --
630: IF (g_debug_fnd_flex_workflow) THEN
631: debug('CCID IS ' || TO_CHAR(ccid));
632: debug('CONCATENATED SEGMENTS IS ' || concat_segs);
633: debug('CONCATENATED IDS IS ' || concat_ids);
634: debug('CONCATENATED DESCRIPTIONS IS ' || concat_descrs);

Line 650: IF (g_debug_fnd_flex_workflow) THEN

646: 'FND_FLEX_MESSAGE');
647: --
648: -- Debug
649: --
650: IF (g_debug_fnd_flex_workflow) THEN
651: debug('ERROR MESSAGE IS ' || error_message);
652: END IF;
653: END IF;
654:

Line 681: IF (g_debug_fnd_flex_workflow) THEN

677:
678: --
679: -- Debug
680: --
681: IF (g_debug_fnd_flex_workflow) THEN
682: IF (l_process_status = 'ERROR') THEN
683: debug('ERROR FUNCTION : '|| l_process_result);
684: END IF;
685: debug('ERROR MESSAGE IS ' || error_message);

Line 690: IF (g_debug_fnd_flex_workflow) THEN

686: END IF;
687:
688: END IF;
689:
690: IF (g_debug_fnd_flex_workflow) THEN
691: debug('END FND_FLEX_WORKFLOW.GENERATE');
692: END IF;
693: --
694: -- If the process resulted in FAILURE or the combination is invalid,

Line 691: debug('END FND_FLEX_WORKFLOW.GENERATE');

687:
688: END IF;
689:
690: IF (g_debug_fnd_flex_workflow) THEN
691: debug('END FND_FLEX_WORKFLOW.GENERATE');
692: END IF;
693: --
694: -- If the process resulted in FAILURE or the combination is invalid,
695: -- return FALSE, else return TRUE

Line 706: wf_core.context('FND_FLEX_WORKFLOW', 'GENERATE',

702: END IF;
703:
704: EXCEPTION
705: WHEN OTHERS THEN
706: wf_core.context('FND_FLEX_WORKFLOW', 'GENERATE',
707: itemtype, itemkey);
708: report_wf_error('FND_FLEX_WORKFLOW.GENERATE');
709:
710: IF (error_message IS NULL) THEN

Line 708: report_wf_error('FND_FLEX_WORKFLOW.GENERATE');

704: EXCEPTION
705: WHEN OTHERS THEN
706: wf_core.context('FND_FLEX_WORKFLOW', 'GENERATE',
707: itemtype, itemkey);
708: report_wf_error('FND_FLEX_WORKFLOW.GENERATE');
709:
710: IF (error_message IS NULL) THEN
711: error_message := Substr(dbms_utility.format_error_stack(),1,200);
712: END IF;

Line 784: IF (g_debug_fnd_flex_workflow) THEN

780: BEGIN
781: --
782: -- Debug
783: --
784: IF (g_debug_fnd_flex_workflow) THEN
785: debug('START FND_FLEX_WORKFLOW.GENERATE_PARTIAL');
786: debug('ITEMTYPE = ' || itemtype);
787: debug('ITEMKEY = ' || itemkey);
788: debug('SUBPROCESS = ' || subprocess);

Line 785: debug('START FND_FLEX_WORKFLOW.GENERATE_PARTIAL');

781: --
782: -- Debug
783: --
784: IF (g_debug_fnd_flex_workflow) THEN
785: debug('START FND_FLEX_WORKFLOW.GENERATE_PARTIAL');
786: debug('ITEMTYPE = ' || itemtype);
787: debug('ITEMKEY = ' || itemkey);
788: debug('SUBPROCESS = ' || subprocess);
789: debug('BLOCK_ACTIVITY = ' || block_activity);

Line 871: IF (g_debug_fnd_flex_workflow) THEN

867:
868: --
869: -- Debug
870: --
871: IF (g_debug_fnd_flex_workflow) THEN
872: debug('CCID IS ' || TO_CHAR(ccid));
873: debug('CONCATENATED SEGMENTS IS ' || concat_segs);
874: debug('CONCATENATED ID IS ' || concat_ids);
875: debug('CONCATENATED DESCRIPTIONS IS ' || concat_descrs);

Line 891: IF (g_debug_fnd_flex_workflow) THEN

887: 'FND_FLEX_MESSAGE');
888: --
889: -- Debug
890: --
891: IF (g_debug_fnd_flex_workflow) THEN
892: debug('ERROR MESSAGE IS ' || error_message);
893: END IF;
894: END IF;
895:

Line 930: IF (g_debug_fnd_flex_workflow) THEN

926:
927: --
928: -- Debug
929: --
930: IF (g_debug_fnd_flex_workflow) THEN
931: IF (l_process_status = 'ERROR') THEN
932: debug('ERROR FUNCTION : '|| l_process_result);
933: END IF;
934: debug('ERROR MESSAGE IS ' || error_message);

Line 971: wf_core.context('FND_FLEX_WORKFLOW', 'GENERATE_PARTIAL',

967: END IF;
968:
969: EXCEPTION
970: WHEN OTHERS THEN
971: wf_core.context('FND_FLEX_WORKFLOW', 'GENERATE_PARTIAL',
972: itemtype, itemkey);
973: report_wf_error('FND_FLEX_WORKFLOW.GENERATE_PARTIAL');
974:
975: IF (error_message IS NULL) THEN

Line 973: report_wf_error('FND_FLEX_WORKFLOW.GENERATE_PARTIAL');

969: EXCEPTION
970: WHEN OTHERS THEN
971: wf_core.context('FND_FLEX_WORKFLOW', 'GENERATE_PARTIAL',
972: itemtype, itemkey);
973: report_wf_error('FND_FLEX_WORKFLOW.GENERATE_PARTIAL');
974:
975: IF (error_message IS NULL) THEN
976: error_message := Substr(dbms_utility.format_error_stack(),1,200);
977: END IF;

Line 1000: IF (g_debug_fnd_flex_workflow) THEN

996: BEGIN
997: --
998: -- Debug
999: --
1000: IF (g_debug_fnd_flex_workflow) THEN
1001: debug('START FND_FLEX_WORKFLOW.LOAD_CONCATENATED_SEGMENTS');
1002: debug('CONCATENATED SEGMENTS = ' || concat_segs);
1003: END IF;
1004:

Line 1001: debug('START FND_FLEX_WORKFLOW.LOAD_CONCATENATED_SEGMENTS');

997: --
998: -- Debug
999: --
1000: IF (g_debug_fnd_flex_workflow) THEN
1001: debug('START FND_FLEX_WORKFLOW.LOAD_CONCATENATED_SEGMENTS');
1002: debug('CONCATENATED SEGMENTS = ' || concat_segs);
1003: END IF;
1004:
1005: --

Line 1020: IF (g_debug_fnd_flex_workflow) THEN

1016:
1017: --
1018: -- Debug
1019: --
1020: IF (g_debug_fnd_flex_workflow) THEN
1021: debug('SEGMENT DELIMITER IS ' || delim);
1022: END IF;
1023:
1024: nsegments := fnd_flex_ext.breakup_segments(concat_segs, delim,

Line 1037: IF (g_debug_fnd_flex_workflow) THEN

1033: segment_array(i));
1034: --
1035: -- Debug
1036: --
1037: IF (g_debug_fnd_flex_workflow) THEN
1038: debug('VALUE ASSIGNED TO SEGMENT ' || TO_CHAR(i) || ' IS ' ||
1039: segment_array(i));
1040: END IF;
1041: END LOOP;

Line 1074: wf_core.context('FND_FLEX_WORKFLOW', 'PURGE',

1070: -- END IF;
1071: --
1072: EXCEPTION
1073: WHEN OTHERS THEN
1074: wf_core.context('FND_FLEX_WORKFLOW', 'PURGE',
1075: itemtype, itemkey);
1076: report_wf_error('FND_FLEX_WORKFLOW.PURGE');
1077: RAISE;
1078: END purge;

Line 1076: report_wf_error('FND_FLEX_WORKFLOW.PURGE');

1072: EXCEPTION
1073: WHEN OTHERS THEN
1074: wf_core.context('FND_FLEX_WORKFLOW', 'PURGE',
1075: itemtype, itemkey);
1076: report_wf_error('FND_FLEX_WORKFLOW.PURGE');
1077: RAISE;
1078: END purge;
1079:
1080: -- ======================================================================

Line 1088: g_debug_fnd_flex_workflow := TRUE;

1084: BEGIN
1085: execute immediate ('begin dbms' ||
1086: '_output' ||
1087: '.enable(1000000); end;');
1088: g_debug_fnd_flex_workflow := TRUE;
1089: fnd_flex_workflow_apis.debug_on();
1090: END debug_on;
1091:
1092: --

Line 1089: fnd_flex_workflow_apis.debug_on();

1085: execute immediate ('begin dbms' ||
1086: '_output' ||
1087: '.enable(1000000); end;');
1088: g_debug_fnd_flex_workflow := TRUE;
1089: fnd_flex_workflow_apis.debug_on();
1090: END debug_on;
1091:
1092: --
1093: -- Set the debug mode off

Line 1097: g_debug_fnd_flex_workflow := FALSE;

1093: -- Set the debug mode off
1094: --
1095: PROCEDURE debug_off IS
1096: BEGIN
1097: g_debug_fnd_flex_workflow := FALSE;
1098: fnd_flex_workflow_apis.debug_off();
1099: END debug_off;
1100:
1101: BEGIN

Line 1098: fnd_flex_workflow_apis.debug_off();

1094: --
1095: PROCEDURE debug_off IS
1096: BEGIN
1097: g_debug_fnd_flex_workflow := FALSE;
1098: fnd_flex_workflow_apis.debug_off();
1099: END debug_off;
1100:
1101: BEGIN
1102: g_chr_newline := fnd_global.newline;

Line 1118: END fnd_flex_workflow;

1114:
1115: fnd_plsql_cache.generic_1to1_init('WKF.AID',
1116: aid_cache_controller,
1117: aid_cache_storage);
1118: END fnd_flex_workflow;