DBA Data[Home] [Help]

APPS.FND_TRANSACTION dependencies on FND_TRANSACTION

Line 1: package body fnd_transaction as

1: package body fnd_transaction as
2: /* $Header: AFCPTRNB.pls 120.9 2006/05/26 21:29:34 ckclark ship $ */
3:
4:
5: --

Line 342: debug_info('fnd_transaction.synchronous', 'Starting transaction', NULL);

338:
339: initialize_globals;
340:
341: if (debug_flag) then
342: debug_info('fnd_transaction.synchronous', 'Starting transaction', NULL);
343: end if;
344:
345: if (timeout <= 0 or timeout is null) then
346: fnd_message.set_name('FND', 'CONC-TM-Invalid timeout');

Line 347: debug_info('fnd_transaction.synchronous', 'Invalid timeout parameter', to_char(timeout));

343: end if;
344:
345: if (timeout <= 0 or timeout is null) then
346: fnd_message.set_name('FND', 'CONC-TM-Invalid timeout');
347: debug_info('fnd_transaction.synchronous', 'Invalid timeout parameter', to_char(timeout));
348: raise error;
349: end if;
350:
351: if (application is null) then

Line 353: debug_info('fnd_transaction.synchronous', 'NULL application parameter', NULL);

349: end if;
350:
351: if (application is null) then
352: fnd_message.set_name('FND', 'CONC-TM-Application null');
353: debug_info('fnd_transaction.synchronous', 'NULL application parameter', NULL);
354: raise error;
355: end if;
356:
357: if (program is null) then

Line 359: debug_info('fnd_transaction.synchronous', 'NULL program parameter', NULL);

355: end if;
356:
357: if (program is null) then
358: fnd_message.set_name('FND', 'CONC-TM-Program null');
359: debug_info('fnd_transaction.synchronous', 'NULL program parameter', NULL);
360: raise error;
361: end if;
362:
363: if (debug_flag) then

Line 364: debug_info('fnd_transaction.synchronous', 'Using transport type', p_transport_type);

360: raise error;
361: end if;
362:
363: if (debug_flag) then
364: debug_info('fnd_transaction.synchronous', 'Using transport type', p_transport_type);
365: end if;
366:
367: -- Get SQL_TRACE MULTI_ORG_CATEGORY
368: fnd_profile.get('SQL_TRACE', enable_trace_flag);

Line 383: status := fnd_transaction_pipe.get_manager(application, program, token_timeout);

379: and a.application_short_name = application;
380:
381: -- Get manager
382: if p_transport_type = 'PIPE' then
383: status := fnd_transaction_pipe.get_manager(application, program, token_timeout);
384: else
385: status := fnd_transaction_queue.get_manager(application, program, token_timeout);
386: end if;
387:

Line 385: status := fnd_transaction_queue.get_manager(application, program, token_timeout);

381: -- Get manager
382: if p_transport_type = 'PIPE' then
383: status := fnd_transaction_pipe.get_manager(application, program, token_timeout);
384: else
385: status := fnd_transaction_queue.get_manager(application, program, token_timeout);
386: end if;
387:
388: if status = E_NOMGR then -- All managers busy
389: return status;

Line 426: debug_info('fnd_transaction.synchronous',

422: -- Request expires at SYSDATE + timeout
423: expiration_time := sysdate + (timeout * DAY_PER_SEC);
424:
425: if (debug_flag) then
426: debug_info('fnd_transaction.synchronous',
427: 'REQID:SECID:TRACE:EXPIRES',
428: to_char(request_id) || ':' || to_char(secgrpid) || ':'
429: || enable_trace_flag || ':' || to_char(expiration_time, 'DD-MON-RR HH24:MI:SS'));
430: debug_info('fnd_transaction.synchronous',

Line 430: debug_info('fnd_transaction.synchronous',

426: debug_info('fnd_transaction.synchronous',
427: 'REQID:SECID:TRACE:EXPIRES',
428: to_char(request_id) || ':' || to_char(secgrpid) || ':'
429: || enable_trace_flag || ':' || to_char(expiration_time, 'DD-MON-RR HH24:MI:SS'));
430: debug_info('fnd_transaction.synchronous',
431: 'NLS_LANG:DATE_LANG:NUM_CHARS',
432: nls_lang || ':' || nls_date_lang || ':' || nls_num_chars);
433:
434:

Line 435: debug_info('fnd_transaction.synchronous',

431: 'NLS_LANG:DATE_LANG:NUM_CHARS',
432: nls_lang || ':' || nls_date_lang || ':' || nls_num_chars);
433:
434:
435: debug_info('fnd_transaction.synchronous',
436: 'Packing packet type',
437: send_type);
438: debug_info('fnd_transaction.synchronous',
439: 'Packing program application',

Line 438: debug_info('fnd_transaction.synchronous',

434:
435: debug_info('fnd_transaction.synchronous',
436: 'Packing packet type',
437: send_type);
438: debug_info('fnd_transaction.synchronous',
439: 'Packing program application',
440: application);
441: debug_info('fnd_transaction.synchronous',
442: 'Packing program',

Line 441: debug_info('fnd_transaction.synchronous',

437: send_type);
438: debug_info('fnd_transaction.synchronous',
439: 'Packing program application',
440: application);
441: debug_info('fnd_transaction.synchronous',
442: 'Packing program',
443: program);
444: debug_info('fnd_transaction.synchronous',
445: 'Packing org_type',

Line 444: debug_info('fnd_transaction.synchronous',

440: application);
441: debug_info('fnd_transaction.synchronous',
442: 'Packing program',
443: program);
444: debug_info('fnd_transaction.synchronous',
445: 'Packing org_type',
446: org_type);
447: debug_info('fnd_transaction.synchronous',
448: 'Packing org_id',

Line 447: debug_info('fnd_transaction.synchronous',

443: program);
444: debug_info('fnd_transaction.synchronous',
445: 'Packing org_type',
446: org_type);
447: debug_info('fnd_transaction.synchronous',
448: 'Packing org_id',
449: org_id);
450: if (arg_1 = CHR(0)) then goto end_dbg; end if;
451: debug_info('fnd_transaction.synchronous',

Line 451: debug_info('fnd_transaction.synchronous',

447: debug_info('fnd_transaction.synchronous',
448: 'Packing org_id',
449: org_id);
450: if (arg_1 = CHR(0)) then goto end_dbg; end if;
451: debug_info('fnd_transaction.synchronous',
452: 'Packing arg 1',
453: arg_1);
454: if (arg_2 = CHR(0)) then goto end_dbg; end if;
455: debug_info('fnd_transaction.synchronous',

Line 455: debug_info('fnd_transaction.synchronous',

451: debug_info('fnd_transaction.synchronous',
452: 'Packing arg 1',
453: arg_1);
454: if (arg_2 = CHR(0)) then goto end_dbg; end if;
455: debug_info('fnd_transaction.synchronous',
456: 'Packing arg 2',
457: arg_2);
458: if (arg_3 = CHR(0)) then goto end_dbg; end if;
459: debug_info('fnd_transaction.synchronous',

Line 459: debug_info('fnd_transaction.synchronous',

455: debug_info('fnd_transaction.synchronous',
456: 'Packing arg 2',
457: arg_2);
458: if (arg_3 = CHR(0)) then goto end_dbg; end if;
459: debug_info('fnd_transaction.synchronous',
460: 'Packing arg 3',
461: arg_3);
462: if (arg_4 = CHR(0)) then goto end_dbg; end if;
463: debug_info('fnd_transaction.synchronous',

Line 463: debug_info('fnd_transaction.synchronous',

459: debug_info('fnd_transaction.synchronous',
460: 'Packing arg 3',
461: arg_3);
462: if (arg_4 = CHR(0)) then goto end_dbg; end if;
463: debug_info('fnd_transaction.synchronous',
464: 'Packing arg 4',
465: arg_4);
466: if (arg_5 = CHR(0)) then goto end_dbg; end if;
467: debug_info('fnd_transaction.synchronous',

Line 467: debug_info('fnd_transaction.synchronous',

463: debug_info('fnd_transaction.synchronous',
464: 'Packing arg 4',
465: arg_4);
466: if (arg_5 = CHR(0)) then goto end_dbg; end if;
467: debug_info('fnd_transaction.synchronous',
468: 'Packing arg 5',
469: arg_5);
470: if (arg_6 = CHR(0)) then goto end_dbg; end if;
471: debug_info('fnd_transaction.synchronous',

Line 471: debug_info('fnd_transaction.synchronous',

467: debug_info('fnd_transaction.synchronous',
468: 'Packing arg 5',
469: arg_5);
470: if (arg_6 = CHR(0)) then goto end_dbg; end if;
471: debug_info('fnd_transaction.synchronous',
472: 'Packing arg 6',
473: arg_6);
474: if (arg_7 = CHR(0)) then goto end_dbg; end if;
475: debug_info('fnd_transaction.synchronous',

Line 475: debug_info('fnd_transaction.synchronous',

471: debug_info('fnd_transaction.synchronous',
472: 'Packing arg 6',
473: arg_6);
474: if (arg_7 = CHR(0)) then goto end_dbg; end if;
475: debug_info('fnd_transaction.synchronous',
476: 'Packing arg 7',
477: arg_7);
478: if (arg_8 = CHR(0)) then goto end_dbg; end if;
479: debug_info('fnd_transaction.synchronous',

Line 479: debug_info('fnd_transaction.synchronous',

475: debug_info('fnd_transaction.synchronous',
476: 'Packing arg 7',
477: arg_7);
478: if (arg_8 = CHR(0)) then goto end_dbg; end if;
479: debug_info('fnd_transaction.synchronous',
480: 'Packing arg 8',
481: arg_8);
482: if (arg_9 = CHR(0)) then goto end_dbg; end if;
483: debug_info('fnd_transaction.synchronous',

Line 483: debug_info('fnd_transaction.synchronous',

479: debug_info('fnd_transaction.synchronous',
480: 'Packing arg 8',
481: arg_8);
482: if (arg_9 = CHR(0)) then goto end_dbg; end if;
483: debug_info('fnd_transaction.synchronous',
484: 'Packing arg 9',
485: arg_9);
486: if (arg_10 = CHR(0)) then goto end_dbg; end if;
487: debug_info('fnd_transaction.synchronous',

Line 487: debug_info('fnd_transaction.synchronous',

483: debug_info('fnd_transaction.synchronous',
484: 'Packing arg 9',
485: arg_9);
486: if (arg_10 = CHR(0)) then goto end_dbg; end if;
487: debug_info('fnd_transaction.synchronous',
488: 'Packing arg 10',
489: arg_10);
490: if (arg_11 = CHR(0)) then goto end_dbg; end if;
491: debug_info('fnd_transaction.synchronous',

Line 491: debug_info('fnd_transaction.synchronous',

487: debug_info('fnd_transaction.synchronous',
488: 'Packing arg 10',
489: arg_10);
490: if (arg_11 = CHR(0)) then goto end_dbg; end if;
491: debug_info('fnd_transaction.synchronous',
492: 'Packing arg 11',
493: arg_11);
494: if (arg_12 = CHR(0)) then goto end_dbg; end if;
495: debug_info('fnd_transaction.synchronous',

Line 495: debug_info('fnd_transaction.synchronous',

491: debug_info('fnd_transaction.synchronous',
492: 'Packing arg 11',
493: arg_11);
494: if (arg_12 = CHR(0)) then goto end_dbg; end if;
495: debug_info('fnd_transaction.synchronous',
496: 'Packing arg 12',
497: arg_12);
498: if (arg_13 = CHR(0)) then goto end_dbg; end if;
499: debug_info('fnd_transaction.synchronous',

Line 499: debug_info('fnd_transaction.synchronous',

495: debug_info('fnd_transaction.synchronous',
496: 'Packing arg 12',
497: arg_12);
498: if (arg_13 = CHR(0)) then goto end_dbg; end if;
499: debug_info('fnd_transaction.synchronous',
500: 'Packing arg 13',
501: arg_13);
502: if (arg_14 = CHR(0)) then goto end_dbg; end if;
503: debug_info('fnd_transaction.synchronous',

Line 503: debug_info('fnd_transaction.synchronous',

499: debug_info('fnd_transaction.synchronous',
500: 'Packing arg 13',
501: arg_13);
502: if (arg_14 = CHR(0)) then goto end_dbg; end if;
503: debug_info('fnd_transaction.synchronous',
504: 'Packing arg 14',
505: arg_14);
506: if (arg_15 = CHR(0)) then goto end_dbg; end if;
507: debug_info('fnd_transaction.synchronous',

Line 507: debug_info('fnd_transaction.synchronous',

503: debug_info('fnd_transaction.synchronous',
504: 'Packing arg 14',
505: arg_14);
506: if (arg_15 = CHR(0)) then goto end_dbg; end if;
507: debug_info('fnd_transaction.synchronous',
508: 'Packing arg 15',
509: arg_15);
510: if (arg_16 = CHR(0)) then goto end_dbg; end if;
511: debug_info('fnd_transaction.synchronous',

Line 511: debug_info('fnd_transaction.synchronous',

507: debug_info('fnd_transaction.synchronous',
508: 'Packing arg 15',
509: arg_15);
510: if (arg_16 = CHR(0)) then goto end_dbg; end if;
511: debug_info('fnd_transaction.synchronous',
512: 'Packing arg 16',
513: arg_16);
514: if (arg_17 = CHR(0)) then goto end_dbg; end if;
515: debug_info('fnd_transaction.synchronous',

Line 515: debug_info('fnd_transaction.synchronous',

511: debug_info('fnd_transaction.synchronous',
512: 'Packing arg 16',
513: arg_16);
514: if (arg_17 = CHR(0)) then goto end_dbg; end if;
515: debug_info('fnd_transaction.synchronous',
516: 'Packing arg 17',
517: arg_17);
518: if (arg_18 = CHR(0)) then goto end_dbg; end if;
519: debug_info('fnd_transaction.synchronous',

Line 519: debug_info('fnd_transaction.synchronous',

515: debug_info('fnd_transaction.synchronous',
516: 'Packing arg 17',
517: arg_17);
518: if (arg_18 = CHR(0)) then goto end_dbg; end if;
519: debug_info('fnd_transaction.synchronous',
520: 'Packing arg 18',
521: arg_18);
522: if (arg_19 = CHR(0)) then goto end_dbg; end if;
523: debug_info('fnd_transaction.synchronous',

Line 523: debug_info('fnd_transaction.synchronous',

519: debug_info('fnd_transaction.synchronous',
520: 'Packing arg 18',
521: arg_18);
522: if (arg_19 = CHR(0)) then goto end_dbg; end if;
523: debug_info('fnd_transaction.synchronous',
524: 'Packing arg 19',
525: arg_19);
526: if (arg_20 = CHR(0)) then goto end_dbg; end if;
527: debug_info('fnd_transaction.synchronous',

Line 527: debug_info('fnd_transaction.synchronous',

523: debug_info('fnd_transaction.synchronous',
524: 'Packing arg 19',
525: arg_19);
526: if (arg_20 = CHR(0)) then goto end_dbg; end if;
527: debug_info('fnd_transaction.synchronous',
528: 'Packing arg 20',
529: arg_20);
530:
531: <>

Line 532: debug_info('fnd_transaction.synchronous', 'Timeout value', to_char(timeout));

528: 'Packing arg 20',
529: arg_20);
530:
531: <>
532: debug_info('fnd_transaction.synchronous', 'Timeout value', to_char(timeout));
533: end if;
534:
535:
536: if p_transport_type = 'PIPE' then

Line 537: status := fnd_transaction_pipe.send_message(timeout, send_type, expiration_time, request_id,

533: end if;
534:
535:
536: if p_transport_type = 'PIPE' then
537: status := fnd_transaction_pipe.send_message(timeout, send_type, expiration_time, request_id,
538: nls_lang, nls_num_chars, nls_date_lang,
539: secgrpid, enable_trace_flag, application, program,
540: org_type, org_id, outcome, message,
541: arg_1, arg_2, arg_3, arg_4, arg_5,

Line 547: status := fnd_transaction_queue.send_message(timeout, send_type, expiration_time, request_id,

543: arg_11, arg_12, arg_13, arg_14, arg_15,
544: arg_16, arg_17, arg_18, arg_19, arg_20);
545:
546: else
547: status := fnd_transaction_queue.send_message(timeout, send_type, expiration_time, request_id,
548: nls_lang, nls_num_chars, nls_date_lang,
549: secgrpid, enable_trace_flag, application, program,
550: org_type, org_id, outcome, message,
551: arg_1, arg_2, arg_3, arg_4, arg_5,

Line 559: debug_info('fnd_transaction.synchronous', 'Transaction complete', request_id, 'U');

555: end if;
556:
557:
558: if (debug_flag) then
559: debug_info('fnd_transaction.synchronous', 'Transaction complete', request_id, 'U');
560: end if;
561:
562: return status;
563:

Line 573: fnd_message.set_token ('ROUTINE', 'FND_TRANSACTION.SYNCHRONOUS', FALSE);

569: when OTHERS then
570: fnd_message.set_name ('FND', 'SQL-Generic error');
571: fnd_message.set_token ('ERRNO', sqlcode, FALSE);
572: fnd_message.set_token ('REASON', sqlerrm, FALSE);
573: fnd_message.set_token ('ROUTINE', 'FND_TRANSACTION.SYNCHRONOUS', FALSE);
574: debug_info('fnd_transaction.synchronous', 'Caught exception', sqlerrm);
575: return E_OTHER;
576:
577: end synchronous;

Line 574: debug_info('fnd_transaction.synchronous', 'Caught exception', sqlerrm);

570: fnd_message.set_name ('FND', 'SQL-Generic error');
571: fnd_message.set_token ('ERRNO', sqlcode, FALSE);
572: fnd_message.set_token ('REASON', sqlerrm, FALSE);
573: fnd_message.set_token ('ROUTINE', 'FND_TRANSACTION.SYNCHRONOUS', FALSE);
574: debug_info('fnd_transaction.synchronous', 'Caught exception', sqlerrm);
575: return E_OTHER;
576:
577: end synchronous;
578:

Line 644: fnd_message.set_token ('ROUTINE', 'FND_TRANSACTION.GET_VALUES', FALSE);

640: when others then
641: fnd_message.set_name ('FND', 'SQL-Generic error');
642: fnd_message.set_token ('ERRNO', sqlcode, FALSE);
643: fnd_message.set_token ('REASON', sqlerrm, FALSE);
644: fnd_message.set_token ('ROUTINE', 'FND_TRANSACTION.GET_VALUES', FALSE);
645: return E_OTHER;
646: end get_values;
647:
648:

Line 651: end fnd_transaction;

647:
648:
649:
650:
651: end fnd_transaction;