DBA Data[Home] [Help]

APPS.GL_AUTO_ALLOC_WF_PKG dependencies on GL_AUTO_ALLOC_WF_PKG

Line 1: PACKAGE BODY GL_AUTO_ALLOC_WF_PKG AS

1: PACKAGE BODY GL_AUTO_ALLOC_WF_PKG AS
2: /* $Header: glwfalcb.pls 120.15.12010000.2 2009/01/30 08:46:12 akhanapu ship $ */
3:
4:
5:

Line 9: GL_AUTO_ALLOC_WF_PKG.p_item_key := to_char(p_request_Id);

5:
6: PROCEDURE Start_AutoAllocation_Workflow( p_request_Id IN NUMBER) IS
7: Begin
8: -- generate item key
9: GL_AUTO_ALLOC_WF_PKG.p_item_key := to_char(p_request_Id);
10: If (diagn_debug_msg_flag) AND
11: G_DIR is NOT NULL then
12: initialize_debug;
13: -- dbms_output.put_line('Log Directory:='||G_DIR);

Line 518: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

514:
515: Begin
516:
517: If p_funcmode = 'RUN' THEN
518: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
519: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
520: diagn_debug_msg('Executing: Next_Step_Type');
521: END IF;
522: l_step := WF_ENGINE.GetItemAttrNumber

Line 688: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Next_Step_Type', p_item_type, p_item_key);

684: End If;
685:
686: EXCEPTION
687: WHEN OTHERS THEN
688: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Next_Step_Type', p_item_type, p_item_key);
689: Wf_Core.Get_Error(err_name,err_msg,err_stack);
690: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
691: diagn_debug_msg('Next_Step_Type: ' || err_msg ||'*'||err_stack);
692: END IF;

Line 712: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

708: l_step_number Number;
709:
710: Begin
711: If ( p_funcmode = 'RUN' ) THEN
712: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
713: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
714: diagn_debug_msg('Started Find_Je_Batch_Type');
715: END IF;
716:

Line 766: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Find_Je_Batch_Type', p_item_type, p_item_key);

762: End If;
763:
764: EXCEPTION
765: WHEN OTHERS THEN
766: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Find_Je_Batch_Type', p_item_type, p_item_key);
767: Wf_Core.Get_Error(err_name,err_msg,err_stack);
768: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
769: diagn_debug_msg('Find_Je_Batch_Type: ' || err_msg ||'*'||err_stack);
770: END IF;

Line 792: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

788: l_message_Name Varchar2(150);
789:
790: Begin
791: If ( p_funcmode = 'RUN' ) THEN
792: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
793: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
794: diagn_debug_msg('Started Is_Review_Required');
795: END IF;
796: l_step_number := WF_ENGINE.GetItemAttrNumber

Line 852: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Review_Required', p_item_type, p_item_key);

848: NULL;
849: End If;
850: EXCEPTION
851: WHEN OTHERS THEN
852: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Review_Required', p_item_type, p_item_key);
853: Wf_Core.Get_Error(err_name,err_msg,err_stack);
854: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
855: diagn_debug_msg('Is_Review_Required: ' || err_msg ||'*'||err_stack);
856: END IF;

Line 886: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

882: AND jb.je_batch_id = bh.generated_je_batch_id;
883:
884: Begin
885: If ( p_funcmode = 'RUN' ) THEN
886: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
887: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
888: diagn_debug_msg('Started Is_Approval_Required');
889: END IF;
890: --l_gen_batch_id := WF_ENGINE.GetItemAttrNumber

Line 945: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Approval_Required', p_item_type, p_item_key);

941: NULL;
942: End If;
943: EXCEPTION
944: WHEN OTHERS THEN
945: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Approval_Required', p_item_type, p_item_key);
946: Wf_Core.Get_Error(err_name,err_msg,err_stack);
947: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
948: diagn_debug_msg('Is_Approval_Required: ' || err_msg ||'*'||err_stack);
949: END IF;

Line 985: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

981: AND jb.je_batch_id = bh.generated_je_batch_id;
982:
983: Begin
984: If ( p_funcmode = 'RUN' ) THEN
985: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
986: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
987: diagn_debug_msg('Started Launch_JE_Approval');
988: END IF;
989:

Line 1062: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Launch_JE_Approval', p_item_type, p_item_key);

1058: NULL;
1059: End If;
1060: EXCEPTION
1061: WHEN OTHERS THEN
1062: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Launch_JE_Approval', p_item_type, p_item_key);
1063: Wf_Core.Get_Error(err_name,err_msg,err_stack);
1064: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1065: diagn_debug_msg('Launch_JE_Approval: ' || err_msg ||'*'||err_stack);
1066: END IF;

Line 1098: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

1094: AND jb.je_batch_id = bh.generated_je_batch_id;
1095:
1096: Begin
1097: If ( p_funcmode = 'RUN' ) THEN
1098: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
1099: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1100: diagn_debug_msg('Started Is_Batch_Approved');
1101: END IF;
1102:

Line 1175: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Approval_Required', p_item_type, p_item_key);

1171: NULL;
1172: End If;
1173: EXCEPTION
1174: WHEN OTHERS THEN
1175: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Approval_Required', p_item_type, p_item_key);
1176: Wf_Core.Get_Error(err_name,err_msg,err_stack);
1177: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1178: diagn_debug_msg('Is_Batch_Approved: ' || err_msg ||'*'||err_stack);
1179: END IF;

Line 1217: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

1213: AND A.STEP_NUMBER = l_step_number;
1214:
1215: Begin
1216: If ( p_funcmode = 'RUN' ) THEN
1217: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
1218: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1219: diagn_debug_msg('Started Is_Batch_Generated');
1220: END IF;
1221:

Line 1322: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Batch_Generated', p_item_type, p_item_key);

1318: NULL;
1319: End If;
1320: EXCEPTION
1321: WHEN OTHERS THEN
1322: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Batch_Generated', p_item_type, p_item_key);
1323: Wf_Core.Get_Error(err_name,err_msg,err_stack);
1324: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1325: diagn_debug_msg('Is_Batch_Generated: ' || err_msg ||'*'||err_stack);
1326: END IF;

Line 1360: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

1356: AND jb.status NOT IN ('P','I','S');
1357:
1358: Begin
1359: If ( p_funcmode = 'RUN' ) THEN
1360: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
1361: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1362: diagn_debug_msg('Started Select_And_Validate_Batch');
1363: END IF;
1364:

Line 1454: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Select_And_Validate_Batch', p_item_type, p_item_key);

1450: NULL;
1451: End If;
1452: EXCEPTION
1453: WHEN OTHERS THEN
1454: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Select_And_Validate_Batch', p_item_type, p_item_key);
1455: Wf_Core.Get_Error(err_name,err_msg,err_stack);
1456: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1457: diagn_debug_msg('Select_And_Validate_Batch: ' || err_msg ||'*'||err_stack);
1458: END IF;

Line 1492: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

1488: And jb.je_batch_id = bh.generated_je_batch_id;
1489:
1490: Begin
1491: If ( p_funcmode = 'RUN' ) THEN
1492: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
1493: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1494: diagn_debug_msg('Started Is_Batch_Posted');
1495: END IF;
1496:

Line 1565: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Batch_Posted', p_item_type, p_item_key);

1561: NULL;
1562: End If;
1563: EXCEPTION
1564: WHEN OTHERS THEN
1565: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Batch_Posted', p_item_type, p_item_key);
1566: Wf_Core.Get_Error(err_name,err_msg,err_stack);
1567: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1568: diagn_debug_msg('Is_Batch_Posted: ' || err_msg ||'*'||err_stack);
1569: END IF;

Line 1619: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

1615: AND STATUS_CODE <> 'NS';
1616:
1617: Begin
1618: If ( p_funcmode = 'RUN' ) THEN
1619: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
1620: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1621: diagn_debug_msg('Rollback:Started Delete_Batch');
1622: END IF;
1623:

Line 1692: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Delete_Batch', p_item_type, p_item_key);

1688: NULL;
1689: End If;
1690: EXCEPTION
1691: WHEN OTHERS THEN
1692: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Delete_Batch', p_item_type, p_item_key);
1693: Wf_Core.Get_Error(err_name,err_msg,err_stack);
1694: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1695: diagn_debug_msg('Delete_Batch: ' || err_msg ||'*'||err_stack);
1696: END IF;

Line 1737: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

1733: AND RB.JE_HEADER_ID = JE.JE_HEADER_ID);
1734:
1735: Begin
1736: If ( p_funcmode = 'RUN' ) THEN
1737: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
1738: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1739: diagn_debug_msg('Rollback:Started Are_More_JE_Reverse');
1740: END IF;
1741: l_step_number := WF_ENGINE.GetItemAttrNumber

Line 1899: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Are_More_JE_Reverse', p_item_type, p_item_key);

1895: EXCEPTION
1896: WHEN NO_DATA_FOUND Then
1897: Null;
1898: WHEN OTHERS THEN
1899: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Are_More_JE_Reverse', p_item_type, p_item_key);
1900: Wf_Core.Get_Error(err_name,err_msg,err_stack);
1901: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1902: diagn_debug_msg('Are_More_JE_Reverse: ' || err_msg ||'*'||err_stack);
1903: END IF;

Line 1931: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

1927: AND R.PARENT_REQUEST_ID = to_number(p_item_key);
1928:
1929: Begin
1930: If ( p_funcmode = 'RUN' ) THEN
1931: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
1932: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1933: diagn_debug_msg('Started Is_Posting_Required');
1934: END IF;
1935: Open verify_rev_batch_C;

Line 1972: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Posting_Required', p_item_type, p_item_key);

1968: NULL;
1969: End If;
1970: EXCEPTION
1971: WHEN OTHERS THEN
1972: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Posting_Required', p_item_type, p_item_key);
1973: Wf_Core.Get_Error(err_name,err_msg,err_stack);
1974: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
1975: diagn_debug_msg('Is_Posting_Required: ' || err_msg ||'*'||err_stack);
1976: END IF;

Line 2003: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

1999: Where JE_HEADER_ID = l_je_header_id;
2000:
2001: Begin
2002: If ( p_funcmode = 'RUN' ) THEN
2003: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
2004: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2005: diagn_debug_msg('Started Is_Jrnl_Reversed');
2006: END IF;
2007: l_je_header_id := WF_ENGINE.GetItemAttrNumber

Line 2056: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Jrnl_Reversed', p_item_type, p_item_key);

2052: NULL;
2053: End If;
2054: EXCEPTION
2055: WHEN OTHERS THEN
2056: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Jrnl_Reversed', p_item_type, p_item_key);
2057: Wf_Core.Get_Error(err_name,err_msg,err_stack);
2058: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2059: diagn_debug_msg('Is_Jrnl_Reversed: ' || err_msg ||'*'||err_stack);
2060: END IF;

Line 2097: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

2093: AND GLAARV.PARENT_REQUEST_ID = to_number(p_item_key);
2094:
2095: Begin
2096: If ( p_funcmode = 'RUN' ) THEN
2097: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
2098: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2099: diagn_debug_msg('Rollback:Started Select_And_Validate_AllBatches');
2100: END IF;
2101: Open get_all_rev_batches_C;

Line 2178: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Select_And_Validate_AllBatches', p_item_type, p_item_key);

2174: NULL;
2175: End If;
2176: EXCEPTION
2177: WHEN OTHERS THEN
2178: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Select_And_Validate_AllBatches', p_item_type, p_item_key);
2179: Wf_Core.Get_Error(err_name,err_msg,err_stack);
2180: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2181: diagn_debug_msg('Select_And_Validate_AllBatches: ' || err_msg ||'*'||err_stack);
2182: END IF;

Line 2218: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

2214: And RB.PARENT_REQUEST_ID = to_number(p_item_key);
2215:
2216: Begin
2217: If ( p_funcmode = 'RUN' ) THEN
2218: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
2219: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2220: diagn_debug_msg('Rollback:Started Are_All_Batches_Posted');
2221: END IF;
2222: open check_JE_batch_status_C;

Line 2281: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Are_All_Batches_Posted', p_item_type, p_item_key);

2277: NULL;
2278: End If;
2279: EXCEPTION
2280: WHEN OTHERS THEN
2281: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Are_All_Batches_Posted', p_item_type, p_item_key);
2282: Wf_Core.Get_Error(err_name,err_msg,err_stack);
2283: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2284: diagn_debug_msg('Are_All_Batches_Posted: ' || err_msg ||'*'||err_stack);
2285: END IF;

Line 2306: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

2302: l_message_Name Varchar2(150);
2303:
2304: Begin
2305: If ( p_funcmode = 'RUN' ) THEN
2306: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
2307: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2308: diagn_debug_msg('Started Is_Rollback_Allowed');
2309: END IF;
2310: l_Rollback_Allowed := WF_ENGINE.GetItemAttrText

Line 2329: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Rollback_Allowed', p_item_type, p_item_key);

2325: NULL;
2326: End If;
2327: EXCEPTION
2328: WHEN OTHERS THEN
2329: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Is_Rollback_Allowed', p_item_type, p_item_key);
2330: Wf_Core.Get_Error(err_name,err_msg,err_stack);
2331: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2332: diagn_debug_msg('Is_Rollback_Allowed: ' || err_msg ||'*'||err_stack);
2333: END IF;

Line 2361: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

2357: l_usage_num Number;
2358:
2359: Begin
2360: If ( p_funcmode = 'RUN' ) THEN
2361: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
2362: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2363: diagn_debug_msg('Started SUBMIT_MA_PROGRAM');
2364: END IF;
2365:

Line 2464: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'SUBMIT_MA_PROGRAM', p_item_type, p_item_key);

2460: End If;
2461:
2462: EXCEPTION
2463: WHEN OTHERS THEN
2464: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'SUBMIT_MA_PROGRAM', p_item_type, p_item_key);
2465: Wf_Core.Get_Error(err_name,err_msg,err_stack);
2466: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2467: diagn_debug_msg('SUBMIT_MA_PROGRAM: ' || err_msg ||'*'||err_stack);
2468: END IF;

Line 2505: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

2501: AND jb.je_batch_id = bh.generated_je_batch_id;
2502:
2503: Begin
2504: If ( p_funcmode = 'RUN' ) THEN
2505: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
2506: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2507: diagn_debug_msg('Started SUBMIT_POSTING_PROGRAM');
2508: END IF;
2509:

Line 2656: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'SUBMIT_POSTING_PROGRAM', p_item_type, p_item_key);

2652: NULL;
2653: End If;
2654: EXCEPTION
2655: WHEN OTHERS THEN
2656: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'SUBMIT_POSTING_PROGRAM', p_item_type, p_item_key);
2657: Wf_Core.Get_Error(err_name,err_msg,err_stack);
2658: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2659: diagn_debug_msg('SUBMIT_POSTING_PROGRAM: ' || err_msg ||'*'||err_stack);
2660: END IF;

Line 2959: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

2955: l_budget_version_id Number;
2956: l_parent_req_id Number := to_number(p_item_key);
2957: Begin
2958: If ( p_funcmode = 'RUN' ) THEN
2959: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
2960: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
2961: diagn_debug_msg('Started SUBMIT_RJE_PROGRAM');
2962: END IF;
2963:

Line 3031: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'SUBMIT_RJE_PROGRAM', p_item_type, p_item_key);

3027: NULL;
3028: End If;
3029: EXCEPTION
3030: WHEN OTHERS THEN
3031: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'SUBMIT_RJE_PROGRAM', p_item_type, p_item_key);
3032: Wf_Core.Get_Error(err_name,err_msg,err_stack);
3033: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
3034: diagn_debug_msg('SUBMIT_RJE_PROGRAM: ' || err_msg ||'*'||err_stack);
3035: END IF;

Line 3060: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

3056: l_period_name Varchar2(15);
3057: l_parent_req_id Number := to_number(p_item_key);
3058: Begin
3059: If ( p_funcmode = 'RUN' ) THEN
3060: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
3061: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
3062: diagn_debug_msg('Started SUBMIT_REV_PROGRAM');
3063: END IF;
3064:

Line 3129: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'SUBMIT_REV_PROGRAM', p_item_type, p_item_key);

3125: NULL;
3126: End If;
3127: EXCEPTION
3128: WHEN OTHERS THEN
3129: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'SUBMIT_REV_PROGRAM', p_item_type, p_item_key);
3130: Wf_Core.Get_Error(err_name,err_msg,err_stack);
3131: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
3132: diagn_debug_msg('SUBMIT_REV_PROGRAM: ' || err_msg ||'*'||err_stack);
3133: END IF;

Line 3174: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

3170: l_wait_error Varchar2(240);
3171:
3172: Begin
3173: If ( p_funcmode = 'RUN' ) THEN
3174: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
3175: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
3176: diagn_debug_msg('Started WAITING_TO_COMPLETE');
3177: END IF;
3178:

Line 3316: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'WAITING_TO_COMPLETE', p_item_type, p_item_key);

3312: NULL;
3313: End If;
3314: EXCEPTION
3315: When Others Then
3316: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'WAITING_TO_COMPLETE', p_item_type, p_item_key);
3317: Wf_Core.Get_Error(err_name,err_msg,err_stack);
3318: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
3319: diagn_debug_msg('WAITING_TO_COMPLETE: ' || err_msg ||'*'||err_stack);
3320: END IF;

Line 3377: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

3373: Order By H.STEP_NUMBER Desc;
3374:
3375: Begin
3376: If ( p_funcmode = 'RUN' ) THEN
3377: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
3378: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
3379: diagn_debug_msg('***************************************');
3380: diagn_debug_msg('Rollback Started VAL_SET_FOR_ROLLBACK');
3381: diagn_debug_msg('***************************************');

Line 3507: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'VAL_SET_FOR_ROLLBACK', p_item_type, p_item_key);

3503: NULL;
3504: End If;
3505: EXCEPTION
3506: WHEN OTHERS THEN
3507: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'VAL_SET_FOR_ROLLBACK', p_item_type, p_item_key);
3508: Wf_Core.Get_Error(err_name,err_msg,err_stack);
3509: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
3510: diagn_debug_msg('VAL_SET_FOR_ROLLBACK: ' || err_msg ||'*'||err_stack);
3511: END IF;

Line 3531: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

3527: l_operating_mode Varchar2(1);
3528:
3529: Begin
3530: If ( p_funcmode = 'RUN' ) THEN
3531: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
3532: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
3533: diagn_debug_msg('Entering end_fail');
3534: END IF;
3535: l_operating_mode := WF_ENGINE.GetItemAttrText

Line 3562: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'END_FAIL', p_item_type, p_item_key);

3558: NULL;
3559: End If;
3560: EXCEPTION
3561: WHEN OTHERS THEN
3562: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'END_FAIL', p_item_type, p_item_key);
3563: Wf_Core.Get_Error(err_name,err_msg,err_stack);
3564: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
3565: diagn_debug_msg('End_Fail: ' || err_msg ||'*'||err_stack);
3566: END IF;

Line 3579: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

3575: Begin
3576: If ( p_funcmode = 'RUN' ) THEN
3577: NULL;
3578: ElsIf ( p_funcmode = 'SET_CTX') Then
3579: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
3580: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
3581: diagn_debug_msg('Entering Selector_Func');
3582: END IF;
3583: -- If diagn_debug_msg_flag Then

Line 3590: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'SELECTOR_FUNC', p_item_type, p_item_key);

3586: End If;
3587:
3588: EXCEPTION
3589: WHEN OTHERS THEN
3590: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'SELECTOR_FUNC', p_item_type, p_item_key);
3591: Wf_Core.Get_Error(err_name,err_msg,err_stack);
3592: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
3593: diagn_debug_msg('Selector_Func: ' || err_msg ||'*'||err_stack);
3594: END IF;

Line 4080: G_FILE := GL_AUTO_ALLOC_WF_PKG.p_item_key ||'.dbg';

4076: -- ****************************************************************************
4077:
4078: Procedure initialize_debug IS
4079: Begin
4080: G_FILE := GL_AUTO_ALLOC_WF_PKG.p_item_key ||'.dbg';
4081: If utl_file.Is_Open(G_FILE_PTR) Then
4082: utl_file.fclose(G_FILE_PTR);
4083: End If;
4084: G_FILE_PTR := utl_file.fopen(G_DIR, G_FILE, 'a');

Line 4099: G_FILE <> GL_AUTO_ALLOC_WF_PKG.p_item_key ||'.dbg' OR

4095: Begin
4096: If (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) then
4097: If debug_message is not null then
4098: If NOT utl_file.Is_Open(G_FILE_PTR) OR
4099: G_FILE <> GL_AUTO_ALLOC_WF_PKG.p_item_key ||'.dbg' OR
4100: G_FILE IS NULL Then
4101: initialize_debug;
4102: End If;
4103: utl_file.put_line(G_FILE_PTR, debug_message);

Line 4132: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;

4128: l_message_Name Varchar2(150);
4129:
4130: Begin
4131: If ( p_funcmode = 'RUN' ) THEN
4132: GL_AUTO_ALLOC_WF_PKG.p_item_key := p_item_key;
4133:
4134: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
4135: diagn_debug_msg('Started Continue_Next_Step');
4136: END IF;

Line 4195: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Continue_Next_Step', p_item_type, p_item_key);

4191: NULL;
4192: End If;
4193: EXCEPTION
4194: WHEN OTHERS THEN
4195: Wf_Core.Context('GL_AUTO_ALLOC_WF_PKG', 'Continue_Next_Step', p_item_type, p_item_key);
4196: Wf_Core.Get_Error(err_name,err_msg,err_stack);
4197: IF (diagn_debug_msg_flag) AND (G_DIR is NOT NULL ) THEN
4198: diagn_debug_msg('Continue_Next_Step: ' || err_msg ||'*'||err_stack);
4199: END IF;

Line 4209: End GL_AUTO_ALLOC_WF_PKG;

4205: Raise;
4206: End Continue_Next_Step;
4207:
4208:
4209: End GL_AUTO_ALLOC_WF_PKG;