APPS.OPIMPDAT dependencies on OPIMPDAT

Line 1: Package Body OPIMPDAT AS

1: Package Body OPIMPDAT AS
2: /*$Header: OPIMDATB.pls 120.1 2005/06/10 12:10:44 appldev $ */
3:
4:
5: procedure get_push_dates(

Line 376: EDW_LOG.PUT_LINE('OPIMPDAT.get_push_dates - '

372:
373: if (l_push_inv_start_txn_id = 0 or
374: l_push_inv_start_txn_id is null) then
375: l_txn_flag := 2; -- set flag to process WT only
376: EDW_LOG.PUT_LINE('OPIMPDAT.get_push_dates - '
377: || 'No INV transactions for date range');
378: if l_first_push = 1 then
379: l_first_push := 2;
380: else

Line 404: EDW_LOG.PUT_LINE('OPIMPDAT.get_push_dates - no INV transactions to process ');

400: if (o_push_start_inv_txn_date > trunc (i_to_date)) -- Dinkar 10/11/02
401: or (o_push_start_inv_txn_date is null) then
402: o_push_start_inv_txn_date := trunc (l_from_date);
403:
404: EDW_LOG.PUT_LINE('OPIMPDAT.get_push_dates - no INV transactions to process ');
405: EDW_LOG.PUT_LINE('Org id: ' || to_char(i_org_id));
406: EDW_LOG.PUT_LINE('Start INV Push Date :'
407: || to_char(o_push_start_inv_txn_date,
408: 'DD-MON-YYYY HH24:MI:SS'));

Line 586: EDW_LOG.PUT_LINE('OPIMPDAT.get_push_dates - '

582:
583: if (l_push_wip_start_txn_id = 0 or
584: l_push_wip_start_txn_id is null) then
585: o_push_last_wip_txn_id := l_prev_push_wip_txn_id;
586: EDW_LOG.PUT_LINE('OPIMPDAT.get_push_dates - '
587: || 'No WIP transactions for date range');
588: if o_txn_flag = 0 then -- reset flag to process MMT only
589: o_txn_flag := 1;
590: end if;

Line 601: EDW_LOG.PUT_LINE('OPIMPDAT.get_push_dates - no WIP transactions to process');

597: if (o_push_start_wip_txn_date > trunc (i_to_date)) -- Dinkar 10/11/02
598: or (o_push_start_wip_txn_date is null) then
599: o_push_start_wip_txn_date := trunc (l_from_date); -- Dinkar 10/11/02
600:
601: EDW_LOG.PUT_LINE('OPIMPDAT.get_push_dates - no WIP transactions to process');
602: EDW_LOG.PUT_LINE('Org id: ' || to_char(i_org_id));
603: EDW_LOG.PUT_LINE('Start WIP Push Date :'
604: || to_char(o_push_start_wip_txn_date,
605: 'DD-MON-YYYY HH24:MI:SS'));

Line 611: EDW_LOG.PUT_LINE('OPIMPDAT.get_push_dates-');

607: || to_char(o_push_end_txn_date,
608: 'DD-MON-YYYY HH24:MI:SS'));
609: end if;
610:
611: EDW_LOG.PUT_LINE('OPIMPDAT.get_push_dates-');
612: EDW_LOG.PUT_LINE('Org id: ' || to_char(i_org_id));
613: EDW_LOG.PUT_LINE('Start Push Date for INV:'
614: || to_char(o_push_start_inv_txn_date,
615: 'DD-MON-YYYY HH24:MI:SS'));

Line 631: o_err_msg := 'OPIMPDAT.get_push_dates ('

627: o_err_msg := l_err_msg;
628:
629: when no_from_date then
630: o_err_num := 9999;
631: o_err_msg := 'OPIMPDAT.get_push_dates ('
632: || to_char(l_stmt_num)
633: || ')';
634: EDW_LOG.PUT_LINE('No user-entered from date for initial push');
635: EDW_LOG.PUT_LINE('Org id: ' ||to_char(i_org_id));

Line 639: o_err_msg := 'OPIMPDAT.get_push_dates ('

635: EDW_LOG.PUT_LINE('Org id: ' ||to_char(i_org_id));
636:
637: WHEN no_date_range THEN
638: o_err_num := 9999;
639: o_err_msg := 'OPIMPDAT.get_push_dates ('
640: || to_char(l_stmt_num)
641: || ')';
642: EDW_LOG.PUT_LINE('Not a valid date range since push from date is later than push to date');
643: EDW_LOG.PUT_LINE('INV push start date ' || l_push_inv_start_date );

Line 649: o_err_msg := 'OPIMPDAT.get_push_dates - ('

645: EDW_LOG.PUT_LINE('Org id: ' ||to_char(i_org_id));
646:
647: when others then
648: o_err_num := SQLCODE;
649: o_err_msg := 'OPIMPDAT.get_push_dates - ('
650: || to_char(l_stmt_num)
651: || '): '
652: || substr(SQLERRM, 1,200);
653: END get_push_dates;

Line 766: o_err_msg := 'OPIMPDAT.calc_from_date - ('

762:
763: EXCEPTION
764: when others then
765: o_err_num := SQLCODE;
766: o_err_msg := 'OPIMPDAT.calc_from_date - ('
767: || to_char(l_stmt_num)
768: || '): '
769: || substr(SQLERRM, 1,200);
770: END calc_from_date;

Line 772: END OPIMPDAT;

768: || '): '
769: || substr(SQLERRM, 1,200);
770: END calc_from_date;
771:
772: END OPIMPDAT;