DBA Data[Home] [Help]

APPS.XDP_Q_ADMIN_PKG dependencies on XDP_Q_ADMIN_PKG

Line 1: PACKAGE BODY XDP_Q_ADMIN_PKG AS

1: PACKAGE BODY XDP_Q_ADMIN_PKG AS
2: /* $Header: XDPQADMB.pls 120.4 2006/04/10 23:21:23 dputhiye ship $ */
3:
4: /********** Commented out - START - sacsharm - 11.5.6 **************
5:

Line 74: XDP_Q_ADMIN_PKG.START_Q (

70:
71: if (p_action_code = 'STARTUP') then
72: if (l_CurrentState = 'SHUTDOWN') then
73:
74: XDP_Q_ADMIN_PKG.START_Q (
75: p_q_name,
76: l_ResourceName,
77: l_CurrentState,
78: l_CurrentCount,

Line 139: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.UPDATE_Q_STATUS. Invalid action code :'

135: END IF;
136: else
137: -- Development time error message, no translation required
138: p_sql_code := -20001;
139: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.UPDATE_Q_STATUS. Invalid action code :'
140: ||p_action_code||': passed';
141: ROLLBACK;
142: return;
143: END IF;

Line 181: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.UPDATE_Q_STATUS, Error Desc.: '||

177:
178: WHEN OTHERS THEN
179: if SQLCODE <> 0 then
180: p_sql_code := SQLCODE;
181: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.UPDATE_Q_STATUS, Error Desc.: '||
182: SQLERRM, 1, 2000);
183: else
184: p_sql_code := -20001;
185: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.UPDATE_Q_STATUS, Other non-SQL error';

Line 185: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.UPDATE_Q_STATUS, Other non-SQL error';

181: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.UPDATE_Q_STATUS, Error Desc.: '||
182: SQLERRM, 1, 2000);
183: else
184: p_sql_code := -20001;
185: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.UPDATE_Q_STATUS, Other non-SQL error';
186: END IF;
187:
188: FND_MESSAGE.CLEAR;
189: FND_MESSAGE.SET_NAME ('XDP', 'INTERNAL_ERROR');

Line 211: -- * XDP_Q_ADMIN_PKG.UPDATE_Q_STATUS

207: -- * This procedure checks whether the DQers processes associated with a queue have
208: -- * shutdown, if yes, it enables the queue and starts the DQer processes associated with it.
209: -- *
210: -- * Called by: Administration utilities
211: -- * XDP_Q_ADMIN_PKG.UPDATE_Q_STATUS
212: -- * Calls :
213: -- * XDP_ADAPTER_ADMIN.LockVerifyController;
214: -- * XDP_AQ_UTILITIES.ENABLE_SDP_AQ
215: -- * XDP_RECOVERY.CHECKNSTARTDQPROCESSES

Line 467: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.START_Q, Error Desc.: '

463:
464: WHEN OTHERS THEN
465: if SQLCODE <> 0 then
466: p_sql_code := SQLCODE;
467: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.START_Q, Error Desc.: '
468: || SQLERRM, 1, 2000);
469: else
470: p_sql_code := -20001;
471: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.START_Q, Other non-SQL error';

Line 471: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.START_Q, Other non-SQL error';

467: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.START_Q, Error Desc.: '
468: || SQLERRM, 1, 2000);
469: else
470: p_sql_code := -20001;
471: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.START_Q, Other non-SQL error';
472: END IF;
473:
474: FND_MESSAGE.CLEAR;
475: FND_MESSAGE.SET_NAME ('XDP', 'INTERNAL_ERROR');

Line 570: XDP_Q_ADMIN_PKG.START_Q (

566: GOTO l_EndOfLoop;
567:
568: END;
569:
570: XDP_Q_ADMIN_PKG.START_Q (
571: v_QData.INTERNAL_Q_NAME,
572: v_QData.DISPLAY_NAME,
573: v_QData.STATE,
574: v_QData.NUM_OF_DQER,

Line 619: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.START_ALL_QS, Error Desc.: '||

615: WHEN OTHERS THEN
616:
617: if SQLCODE <> 0 then
618: p_sql_code := SQLCODE;
619: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.START_ALL_QS, Error Desc.: '||
620: SQLERRM, 1, 2000);
621: else
622: p_sql_code := -20001;
623: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.START_ALL_QS, Other non-SQL error';

Line 623: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.START_ALL_QS, Other non-SQL error';

619: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.START_ALL_QS, Error Desc.: '||
620: SQLERRM, 1, 2000);
621: else
622: p_sql_code := -20001;
623: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.START_ALL_QS, Other non-SQL error';
624: END IF;
625:
626: if c_GetQlist%ISOPEN then
627: CLOSE c_GetQList;

Line 717: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.CHECK_Q_STATUS, Error Desc.: '

713: FND_MESSAGE.SET_NAME ('XDP', 'INTERNAL_ERROR');
714:
715: if SQLCODE <> 0 then
716: p_sql_code := SQLCODE;
717: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.CHECK_Q_STATUS, Error Desc.: '
718: || SQLERRM, 1, 2000);
719: else
720: p_sql_code := -20001;
721: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.CHECK_Q_STATUS, Other non-SQL error';

Line 721: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.CHECK_Q_STATUS, Other non-SQL error';

717: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.CHECK_Q_STATUS, Error Desc.: '
718: || SQLERRM, 1, 2000);
719: else
720: p_sql_code := -20001;
721: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.CHECK_Q_STATUS, Other non-SQL error';
722: END IF;
723:
724: FND_MESSAGE.SET_TOKEN ('ERROR_CODE', p_sql_code);
725: FND_MESSAGE.SET_TOKEN ('ERROR_DESC', p_sql_desc);

Line 794: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.GET_Q_ERRORS, Error Desc.: '|| SQLERRM, 1, 2000);

790: FND_MESSAGE.CLEAR;
791: FND_MESSAGE.SET_NAME ('XDP', 'INTERNAL_ERROR');
792: if SQLCODE <> 0 then
793: p_sql_code := SQLCODE;
794: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.GET_Q_ERRORS, Error Desc.: '|| SQLERRM, 1, 2000);
795: else
796: p_sql_code := -20001;
797: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.GET_Q_ERRORS, Other non-SQL error';
798: END IF;

Line 797: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.GET_Q_ERRORS, Other non-SQL error';

793: p_sql_code := SQLCODE;
794: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.GET_Q_ERRORS, Error Desc.: '|| SQLERRM, 1, 2000);
795: else
796: p_sql_code := -20001;
797: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.GET_Q_ERRORS, Other non-SQL error';
798: END IF;
799:
800: FND_MESSAGE.SET_TOKEN ('ERROR_CODE', p_sql_code);
801: FND_MESSAGE.SET_TOKEN ('ERROR_DESC', p_sql_desc);

Line 875: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.VerifyDQProcesses, Error Desc.: '||

871:
872: WHEN OTHERS THEN
873: if SQLCODE <> 0 then
874: p_sql_code := SQLCODE;
875: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.VerifyDQProcesses, Error Desc.: '||
876: SQLERRM, 1, 2000);
877: else
878: p_sql_code := -20001;
879: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.VerifyDQProcesses, Other non-SQL error';

Line 879: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.VerifyDQProcesses, Other non-SQL error';

875: p_sql_desc := SUBSTR ('Location: XDP_Q_ADMIN_PKG.VerifyDQProcesses, Error Desc.: '||
876: SQLERRM, 1, 2000);
877: else
878: p_sql_code := -20001;
879: p_sql_desc := 'Location: XDP_Q_ADMIN_PKG.VerifyDQProcesses, Other non-SQL error';
880: END IF;
881:
882: IF c_GetDQPIDsForQ%ISOPEN THEN
883: CLOSE c_GetDQPIDsForQ;

Line 895: END XDP_Q_ADMIN_PKG;

891: END VerifyDQProcesses;
892:
893: *********** Commented out - END - sacsharm - 11.5.6 *************/
894:
895: END XDP_Q_ADMIN_PKG;