eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.JTF_IH_PURGE dependencies on JTF_IH_PURGE

Line 1: PACKAGE BODY JTF_IH_PURGE AS

1: PACKAGE BODY JTF_IH_PURGE AS
2: /* $Header: JTFIHPRB.pls 120.5 2006/01/24 21:03:28 nchouras ship $ */
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'JTF_IH_PURGE';
4:
5: -- Program History

Line 3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'JTF_IH_PURGE';

1: PACKAGE BODY JTF_IH_PURGE AS
2: /* $Header: JTFIHPRB.pls 120.5 2006/01/24 21:03:28 nchouras ship $ */
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'JTF_IH_PURGE';
4:
5: -- Program History
6: -- 09-OCT-2002 Igor Aleshin Created.
7: -- 26-NOV-2002 Igor Aleshin Added parameters O/R/R for Interactions and

Line 307: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interaction_ID = '||nInteraction_Id||' has an error:');

303: -- Clean Up current Intraction.
304: DELETE FROM JTF_IH_INTERACTIONS WHERE INTERACTION_ID = nInteraction_Id;
305: EXCEPTION
306: WHEN OTHERS THEN
307: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interaction_ID = '||nInteraction_Id||' has an error:');
308: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: '||SQLERRM);
309: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
310: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_INTERACTION_ERROR');
311: FND_MESSAGE.SET_TOKEN('INTERACTION', to_char(nInteraction_Id));

Line 308: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: '||SQLERRM);

304: DELETE FROM JTF_IH_INTERACTIONS WHERE INTERACTION_ID = nInteraction_Id;
305: EXCEPTION
306: WHEN OTHERS THEN
307: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interaction_ID = '||nInteraction_Id||' has an error:');
308: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: '||SQLERRM);
309: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
310: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_INTERACTION_ERROR');
311: FND_MESSAGE.SET_TOKEN('INTERACTION', to_char(nInteraction_Id));
312: FND_MESSAGE.SET_TOKEN('ERRORMSG', SQLERRM);

Line 309: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');

305: EXCEPTION
306: WHEN OTHERS THEN
307: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interaction_ID = '||nInteraction_Id||' has an error:');
308: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: '||SQLERRM);
309: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
310: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_INTERACTION_ERROR');
311: FND_MESSAGE.SET_TOKEN('INTERACTION', to_char(nInteraction_Id));
312: FND_MESSAGE.SET_TOKEN('ERRORMSG', SQLERRM);
313: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);

Line 310: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_INTERACTION_ERROR');

306: WHEN OTHERS THEN
307: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interaction_ID = '||nInteraction_Id||' has an error:');
308: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: '||SQLERRM);
309: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
310: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_INTERACTION_ERROR');
311: FND_MESSAGE.SET_TOKEN('INTERACTION', to_char(nInteraction_Id));
312: FND_MESSAGE.SET_TOKEN('ERRORMSG', SQLERRM);
313: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
314: ROLLBACK TO SAVEPOINT Activities;

Line 346: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Done :');

342: COMMIT;
343: NULL;
344: END IF;
345:
346: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Done :');
347: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_DONE');
348: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
349:
350: IF nCountInteraction = 0 THEN

Line 347: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_DONE');

343: NULL;
344: END IF;
345:
346: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Done :');
347: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_DONE');
348: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
349:
350: IF nCountInteraction = 0 THEN
351: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions not found');

Line 351: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions not found');

347: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_DONE');
348: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
349:
350: IF nCountInteraction = 0 THEN
351: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions not found');
352: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_NO_INTERACTIONS');
353: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
354: ELSE
355: IF l_SafeMode = 'TRUE' THEN

Line 352: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_NO_INTERACTIONS');

348: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
349:
350: IF nCountInteraction = 0 THEN
351: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions not found');
352: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_NO_INTERACTIONS');
353: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
354: ELSE
355: IF l_SafeMode = 'TRUE' THEN
356: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: You are going to delete :');

Line 356: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: You are going to delete :');

352: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_NO_INTERACTIONS');
353: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
354: ELSE
355: IF l_SafeMode = 'TRUE' THEN
356: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: You are going to delete :');
357: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));
358: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
359: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
360: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');

Line 357: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));

353: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
354: ELSE
355: IF l_SafeMode = 'TRUE' THEN
356: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: You are going to delete :');
357: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));
358: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
359: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
360: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
361: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_SAFEMODE_REPORT');

Line 358: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));

354: ELSE
355: IF l_SafeMode = 'TRUE' THEN
356: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: You are going to delete :');
357: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));
358: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
359: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
360: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
361: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_SAFEMODE_REPORT');
362: FND_MESSAGE.SET_TOKEN('INTERACTIONS', to_char(nCountInteraction));

Line 359: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));

355: IF l_SafeMode = 'TRUE' THEN
356: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: You are going to delete :');
357: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));
358: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
359: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
360: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
361: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_SAFEMODE_REPORT');
362: FND_MESSAGE.SET_TOKEN('INTERACTIONS', to_char(nCountInteraction));
363: FND_MESSAGE.SET_TOKEN('ACTIVITIES', to_char(nCountActivities));

Line 360: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');

356: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: You are going to delete :');
357: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));
358: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
359: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
360: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
361: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_SAFEMODE_REPORT');
362: FND_MESSAGE.SET_TOKEN('INTERACTIONS', to_char(nCountInteraction));
363: FND_MESSAGE.SET_TOKEN('ACTIVITIES', to_char(nCountActivities));
364: FND_MESSAGE.SET_TOKEN('MEDIAITEMS', to_char(nCountMediaItems));

Line 361: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_SAFEMODE_REPORT');

357: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));
358: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
359: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
360: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
361: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_SAFEMODE_REPORT');
362: FND_MESSAGE.SET_TOKEN('INTERACTIONS', to_char(nCountInteraction));
363: FND_MESSAGE.SET_TOKEN('ACTIVITIES', to_char(nCountActivities));
364: FND_MESSAGE.SET_TOKEN('MEDIAITEMS', to_char(nCountMediaItems));
365: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);

Line 367: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Deleted :');

363: FND_MESSAGE.SET_TOKEN('ACTIVITIES', to_char(nCountActivities));
364: FND_MESSAGE.SET_TOKEN('MEDIAITEMS', to_char(nCountMediaItems));
365: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
366: ELSE
367: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Deleted :');
368: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));
369: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
370: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
371: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Item LC...'||to_char(nCountMediaItemLC));

Line 368: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));

364: FND_MESSAGE.SET_TOKEN('MEDIAITEMS', to_char(nCountMediaItems));
365: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
366: ELSE
367: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Deleted :');
368: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));
369: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
370: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
371: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Item LC...'||to_char(nCountMediaItemLC));
372: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');

Line 369: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));

365: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
366: ELSE
367: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Deleted :');
368: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));
369: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
370: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
371: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Item LC...'||to_char(nCountMediaItemLC));
372: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
373: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_REPORT');

Line 370: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));

366: ELSE
367: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Deleted :');
368: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));
369: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
370: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
371: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Item LC...'||to_char(nCountMediaItemLC));
372: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
373: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_REPORT');
374: FND_MESSAGE.SET_TOKEN('INTERACTIONS', to_char(nCountInteraction));

Line 371: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Item LC...'||to_char(nCountMediaItemLC));

367: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Deleted :');
368: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));
369: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
370: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
371: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Item LC...'||to_char(nCountMediaItemLC));
372: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
373: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_REPORT');
374: FND_MESSAGE.SET_TOKEN('INTERACTIONS', to_char(nCountInteraction));
375: FND_MESSAGE.SET_TOKEN('ACTIVITIES', to_char(nCountActivities));

Line 372: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');

368: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Interactions....'||to_char(nCountInteraction));
369: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
370: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
371: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Item LC...'||to_char(nCountMediaItemLC));
372: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
373: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_REPORT');
374: FND_MESSAGE.SET_TOKEN('INTERACTIONS', to_char(nCountInteraction));
375: FND_MESSAGE.SET_TOKEN('ACTIVITIES', to_char(nCountActivities));
376: FND_MESSAGE.SET_TOKEN('MEDIAITEMS', to_char(nCountMediaItems));

Line 373: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_REPORT');

369: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Activities......'||to_char(nCountActivities));
370: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Items.....'||to_char(nCountMediaItems));
371: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: Media Item LC...'||to_char(nCountMediaItemLC));
372: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: -----------------------------------------');
373: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_REPORT');
374: FND_MESSAGE.SET_TOKEN('INTERACTIONS', to_char(nCountInteraction));
375: FND_MESSAGE.SET_TOKEN('ACTIVITIES', to_char(nCountActivities));
376: FND_MESSAGE.SET_TOKEN('MEDIAITEMS', to_char(nCountMediaItems));
377: FND_MESSAGE.SET_TOKEN('MEDIAITEMLC', to_char(nCountMediaItemLC));

Line 384: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_INV_PARTY_TYPE');

380: END IF;
381: DBMS_SQL.CLOSE_CURSOR(n_CursorId);
382: EXCEPTION
383: WHEN ErrInvPartyType THEN
384: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_INV_PARTY_TYPE');
385: FND_MESSAGE.SET_TOKEN('PARTYTYPE', p_Party_Type);
386: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
387: --DBMS_OUTPUT.PUT_LINE(FND_MESSAGE.GET);
388: WHEN ErrNoPartyType THEN

Line 389: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_NO_PARTY_TYPE');

385: FND_MESSAGE.SET_TOKEN('PARTYTYPE', p_Party_Type);
386: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
387: --DBMS_OUTPUT.PUT_LINE(FND_MESSAGE.GET);
388: WHEN ErrNoPartyType THEN
389: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_NO_PARTY_TYPE');
390: FND_MESSAGE.SET_TOKEN('PARTYTYPE', p_Party_Type);
391: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
392: --DBMS_OUTPUT.PUT_LINE(FND_MESSAGE.GET);
393: WHEN ErrStartEndDate THEN

Line 394: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_INVALID_DATE');

390: FND_MESSAGE.SET_TOKEN('PARTYTYPE', p_Party_Type);
391: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
392: --DBMS_OUTPUT.PUT_LINE(FND_MESSAGE.GET);
393: WHEN ErrStartEndDate THEN
394: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_INVALID_DATE');
395: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
396: --DBMS_OUTPUT.PUT_LINE(FND_MESSAGE.GET);
397: -- Added for Bug# 4063673
398: WHEN ErrEndDateNull THEN

Line 399: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_DATE_TO_NOTNULL');

395: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
396: --DBMS_OUTPUT.PUT_LINE(FND_MESSAGE.GET);
397: -- Added for Bug# 4063673
398: WHEN ErrEndDateNull THEN
399: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_DATE_TO_NOTNULL');
400: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
401: --DBMS_OUTPUT.PUT_LINE(FND_MESSAGE.GET);
402: WHEN NoCriteriaSpecified THEN
403: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_NO_CRITERIA');

Line 403: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_NO_CRITERIA');

399: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_DATE_TO_NOTNULL');
400: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
401: --DBMS_OUTPUT.PUT_LINE(FND_MESSAGE.GET);
402: WHEN NoCriteriaSpecified THEN
403: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_NO_CRITERIA');
404: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
405: --DBMS_OUTPUT.PUT_LINE(FND_MESSAGE.GET);
406: WHEN ErrPatyIdsDescription THEN
407: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_WRONG_PARTY_IDS');

Line 407: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_WRONG_PARTY_IDS');

403: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_NO_CRITERIA');
404: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
405: --DBMS_OUTPUT.PUT_LINE(FND_MESSAGE.GET);
406: WHEN ErrPatyIdsDescription THEN
407: FND_MESSAGE.SET_NAME('JTF','JTF_IH_PURGE_WRONG_PARTY_IDS');
408: FND_MESSAGE.SET_TOKEN('PARTYIDS', p_Party_IDs);
409: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
410: --DBMS_OUTPUT.PUT_LINE(FND_MESSAGE.GET);
411: WHEN OTHERS THEN

Line 414: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: '||SQLERRM);

410: --DBMS_OUTPUT.PUT_LINE(FND_MESSAGE.GET);
411: WHEN OTHERS THEN
412: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
413: FND_FILE.PUT_LINE(FND_FILE.LOG,FND_MESSAGE.GET);
414: --DBMS_OUTPUT.PUT_LINE('JTF_IH_PURGE: '||SQLERRM);
415: END PURGE;
416:
417: PROCEDURE P_DELETE_INTERACTIONS (
418: p_api_version IN NUMBER,

Line 477: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.begin', l_fnd_log_msg);

473: 'p_processing_set_id = '|| p_processing_set_id ||
474: 'p_object_type = '|| p_object_type;
475: --dbms_output.put_line(l_fnd_log_msg);
476: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
477: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.begin', l_fnd_log_msg);
478: END IF;
479:
480: l_obj_type_lookup := CONCAT(p_object_type,'-%');
481:

Line 520: WHERE lookup_type = 'JTF_IH_PURGE_OBJ_AI_MAP'

516: AND doc_ref = p_object_type
517: AND action_item_id
518: IN (SELECT meaning
519: FROM FND_LOOKUP_VALUES
520: WHERE lookup_type = 'JTF_IH_PURGE_OBJ_AI_MAP'
521: AND lookup_code like l_obj_type_lookup
522: AND view_application_id = 0
523: AND security_group_id = 0
524: )

Line 535: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.delete_activity',l_fnd_log_msg);

531: l_fnd_log_msg := 'No. of Activities purged = '||SQL%ROWCOUNT;
532: --dbms_output.put_line(l_fnd_log_msg);
533:
534: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
535: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.delete_activity',l_fnd_log_msg);
536: END IF;
537:
538:
539: -- Inserting the deleted activity ID into temp table

Line 576: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.activity_tmp',l_fnd_log_msg);

572: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
573: l_fnd_log_msg := 'No. of Activities Inserted into temp table = '||SQL%ROWCOUNT;
574: --dbms_output.put_line(l_fnd_log_msg);
575: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
576: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.activity_tmp',l_fnd_log_msg);
577: END IF;
578:
579: --Logging before calling Notes Purge API
580: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN

Line 582: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.begin.purge_notes', 'Calling Notes Purge API for Activities');

578:
579: --Logging before calling Notes Purge API
580: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
581: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
582: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.begin.purge_notes', 'Calling Notes Purge API for Activities');
583: END IF;
584:
585: --Delete Notes related to the activities being purged
586: CAC_NOTE_PURGE_PUB.PURGE_NOTES

Line 600: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.end.purge_notes', 'After call to Notes Purge API for Activities');

596:
597: --Logging on return from Notes Purge API
598: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
599: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
600: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.end.purge_notes', 'After call to Notes Purge API for Activities');
601: END IF;
602:
603: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
604: RAISE FND_API.G_EXC_ERROR;

Line 626: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.delink_act',l_fnd_log_msg);

622: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
623: l_fnd_log_msg := 'No. of Activities Delinked = '||SQL%ROWCOUNT;
624: --dbms_output.put_line(l_fnd_log_msg);
625: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
626: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.delink_act',l_fnd_log_msg);
627: END IF;
628:
629: --Deleting the associated Interactions
630:

Line 649: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.del_inter',l_fnd_log_msg);

645: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
646: l_fnd_log_msg := 'No. of Interactions purged = '||SQL%ROWCOUNT;
647: --dbms_output.put_line(l_fnd_log_msg);
648: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
649: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.del_inter',l_fnd_log_msg);
650: END IF;
651:
652: -- Clean Up Parent and All Child Interactions
653: --in the JTF_IH_INTERACTION_INTERS.

Line 669: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.del_inter_inter',l_fnd_log_msg);

665: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
666: l_fnd_log_msg := 'No. of Interaction Relationships purged = '||SQL%ROWCOUNT;
667: --dbms_output.put_line(l_fnd_log_msg);
668: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
669: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.del_inter_inter',l_fnd_log_msg);
670: END IF;
671:
672: -- Inserting the deleted interaction ID into temp table
673: -- with new Proc Set ID for Notes dependent object processing

Line 710: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.inter_tmp',l_fnd_log_msg);

706: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
707: l_fnd_log_msg := 'No. of Interactions inserted into temp table = '||SQL%ROWCOUNT;
708: --dbms_output.put_line(l_fnd_log_msg);
709: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
710: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.inter_tmp',l_fnd_log_msg);
711: END IF;
712:
713: --Logging before calling Notes Purge API
714: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN

Line 716: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.begin.purge_notes', 'Calling Notes Purge API for Interactions');

712:
713: --Logging before calling Notes Purge API
714: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
715: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
716: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.begin.purge_notes', 'Calling Notes Purge API for Interactions');
717: END IF;
718:
719: --Delete Notes related to the interactions being purged
720: CAC_NOTE_PURGE_PUB.PURGE_NOTES

Line 733: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.end.purge_notes', 'After call to Notes Purge API for Activities');

729: );
730: --Logging on return from Notes Purge API
731: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
732: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
733: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.end.purge_notes', 'After call to Notes Purge API for Activities');
734: END IF;
735: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
736: RAISE FND_API.G_EXC_ERROR;
737: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

Line 769: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.delete_MI',l_fnd_log_msg);

765: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
766: l_fnd_log_msg := 'No. of Media Items purged = '||SQL%ROWCOUNT;
767: --dbms_output.put_line(l_fnd_log_msg);
768: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
769: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.delete_MI',l_fnd_log_msg);
770: END IF;
771:
772: -- And Related to MediaID Media Item LifeCycle.
773: IF lc_media_ids.COUNT > 0 THEN

Line 789: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.delete_MLCS',l_fnd_log_msg);

785: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
786: l_fnd_log_msg := 'No. of Media Life-cycle segments purged = '||SQL%ROWCOUNT;
787: --dbms_output.put_line(l_fnd_log_msg);
788: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
789: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.delete_MLCS',l_fnd_log_msg);
790: END IF;
791:
792:
793:

Line 802: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.end', l_fnd_log_msg);

798: 'x_msg_count ='||x_msg_count;
799:
800: --dbms_output.put_line(l_fnd_log_msg);
801: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
802: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS.end', l_fnd_log_msg);
803: END IF;
804:
805: EXCEPTION
806: WHEN fnd_api.g_exc_error THEN

Line 816: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS', x_msg_data);

812: ( p_count => x_msg_count,
813: p_data => x_msg_data );
814: x_msg_data:=FND_MSG_PUB.Get(p_msg_index => x_msg_count, p_encoded=>'F');
815: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
816: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS', x_msg_data);
817: END IF;
818:
819: WHEN fnd_api.g_exc_unexpected_error THEN
820: ROLLBACK TO delete_interactions_p;

Line 829: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS', x_msg_data);

825: ( p_count => x_msg_count,
826: p_data => x_msg_data );
827: x_msg_data := FND_MSG_PUB.Get(p_msg_index=>x_msg_count, p_encoded=>'F');
828: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
829: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS', x_msg_data);
830: END IF;
831:
832: WHEN ErrNoRecFound THEN
833: ROLLBACK TO delete_interactions_p;

Line 841: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS', x_msg_data);

837: ( p_count => x_msg_count,
838: p_data => x_msg_data );
839: x_msg_data:=FND_MSG_PUB.Get(p_msg_index => x_msg_count, p_encoded=>'F');
840: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
841: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS', x_msg_data);
842: END IF;
843:
844: WHEN OTHERS THEN
845: ROLLBACK TO delete_interactions_p;

Line 857: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS', x_msg_data);

853: ( p_count => x_msg_count,
854: p_data => x_msg_data );
855: x_msg_data:=FND_MSG_PUB.Get(p_msg_index => x_msg_count, p_encoded=>'F');
856: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,
857: 'jtf.plsql.JTF_IH_PURGE.P_DELETE_INTERACTIONS', x_msg_data);
858: END IF;
859:
860: END P_DELETE_INTERACTIONS;
861:

Line 862: END JTF_IH_PURGE;

858: END IF;
859:
860: END P_DELETE_INTERACTIONS;
861:
862: END JTF_IH_PURGE;