DBA Data[Home] [Help]

APPS.PO_LINE_LOCATIONS_DRAFT_PKG dependencies on PO_LOG

Line 5: PO_LOG.get_package_base('PO_LINE_LOCATIONS_DRAFT_PKG');

1: PACKAGE BODY PO_LINE_LOCATIONS_DRAFT_PKG AS
2: /* $Header: PO_LINE_LOCATIONS_DRAFT_PKG.plb 120.15.12020000.3 2013/02/10 22:58:17 vegajula ship $ */
3:
4: d_pkg_name CONSTANT varchar2(50) :=
5: PO_LOG.get_package_base('PO_LINE_LOCATIONS_DRAFT_PKG');
6:
7: -----------------------------------------------------------------------
8: --Start of Comments
9: --Name: delete_rows

Line 44: IF (PO_LOG.d_proc) THEN

40: po_line_location_id_tbl PO_TBL_NUMBER;
41:
42: BEGIN
43: d_position := 0;
44: IF (PO_LOG.d_proc) THEN
45: PO_LOG.proc_begin(d_module);
46: END IF;
47:
48: --Bug 13938456 - Cond Mod attachment

Line 45: PO_LOG.proc_begin(d_module);

41:
42: BEGIN
43: d_position := 0;
44: IF (PO_LOG.d_proc) THEN
45: PO_LOG.proc_begin(d_module);
46: END IF;
47:
48: --Bug 13938456 - Cond Mod attachment
49: -- If line id is null, then collect all line ids of the mod

Line 141: IF (PO_LOG.d_proc) THEN

137: l_duplicate_flag_tbl PO_TBL_VARCHAR1 := PO_TBL_VARCHAR1();
138:
139: BEGIN
140: d_position := 0;
141: IF (PO_LOG.d_proc) THEN
142: PO_LOG.proc_begin(d_module);
143: END IF;
144:
145: x_record_already_exist_tbl :=

Line 142: PO_LOG.proc_begin(d_module);

138:
139: BEGIN
140: d_position := 0;
141: IF (PO_LOG.d_proc) THEN
142: PO_LOG.proc_begin(d_module);
143: END IF;
144:
145: x_record_already_exist_tbl :=
146: PO_LINE_LOCATIONS_DRAFT_PVT.draft_changes_exist

Line 178: IF (PO_LOG.d_stmt) THEN

174: END LOOP;
175: -- bug5471513 END
176:
177: d_position := 10;
178: IF (PO_LOG.d_stmt) THEN
179: PO_LOG.stmt(d_module, d_position, 'transfer records from txn to dft');
180: END IF;
181:
182: FORALL i IN 1..p_line_location_id_tbl.COUNT

Line 179: PO_LOG.stmt(d_module, d_position, 'transfer records from txn to dft');

175: -- bug5471513 END
176:
177: d_position := 10;
178: IF (PO_LOG.d_stmt) THEN
179: PO_LOG.stmt(d_module, d_position, 'transfer records from txn to dft');
180: END IF;
181:
182: FORALL i IN 1..p_line_location_id_tbl.COUNT
183: INSERT INTO po_line_locations_draft_all

Line 554: IF (PO_LOG.d_stmt) THEN

550: AND x_record_already_exist_tbl(i) = FND_API.G_FALSE
551: AND l_duplicate_flag_tbl(i) = FND_API.G_FALSE;
552:
553: d_position := 20;
554: IF (PO_LOG.d_stmt) THEN
555: PO_LOG.stmt(d_module, d_position, 'transfer count = ' || SQL%ROWCOUNT);
556: END IF;
557:
558: FORALL i IN 1..p_line_location_id_tbl.COUNT

Line 555: PO_LOG.stmt(d_module, d_position, 'transfer count = ' || SQL%ROWCOUNT);

551: AND l_duplicate_flag_tbl(i) = FND_API.G_FALSE;
552:
553: d_position := 20;
554: IF (PO_LOG.d_stmt) THEN
555: PO_LOG.stmt(d_module, d_position, 'transfer count = ' || SQL%ROWCOUNT);
556: END IF;
557:
558: FORALL i IN 1..p_line_location_id_tbl.COUNT
559: UPDATE po_line_locations_draft_all

Line 568: IF (PO_LOG.d_stmt) THEN

564: AND x_record_already_exist_tbl(i) = FND_API.G_TRUE;
565:
566: d_position := 30;
567:
568: IF (PO_LOG.d_stmt) THEN
569: PO_LOG.stmt(d_module, d_position, 'update draft records that are already' ||
570: ' in draft table. Count = ' || SQL%ROWCOUNT);
571: END IF;
572:

Line 569: PO_LOG.stmt(d_module, d_position, 'update draft records that are already' ||

565:
566: d_position := 30;
567:
568: IF (PO_LOG.d_stmt) THEN
569: PO_LOG.stmt(d_module, d_position, 'update draft records that are already' ||
570: ' in draft table. Count = ' || SQL%ROWCOUNT);
571: END IF;
572:
573: d_position := 40;

Line 575: IF (PO_LOG.d_proc) THEN

571: END IF;
572:
573: d_position := 40;
574:
575: IF (PO_LOG.d_proc) THEN
576: PO_LOG.proc_end(d_module);
577: END IF;
578:
579: EXCEPTION

Line 576: PO_LOG.proc_end(d_module);

572:
573: d_position := 40;
574:
575: IF (PO_LOG.d_proc) THEN
576: PO_LOG.proc_end(d_module);
577: END IF;
578:
579: EXCEPTION
580: WHEN OTHERS THEN

Line 631: IF (PO_LOG.d_proc) THEN

627: l_record_already_exist_tbl PO_TBL_VARCHAR1;
628:
629: BEGIN
630: d_position := 0;
631: IF (PO_LOG.d_proc) THEN
632: PO_LOG.proc_begin(d_module);
633: PO_LOG.proc_begin(d_module, 'p_line_location_id', p_line_location_id);
634: END IF;
635:

Line 632: PO_LOG.proc_begin(d_module);

628:
629: BEGIN
630: d_position := 0;
631: IF (PO_LOG.d_proc) THEN
632: PO_LOG.proc_begin(d_module);
633: PO_LOG.proc_begin(d_module, 'p_line_location_id', p_line_location_id);
634: END IF;
635:
636: sync_draft_from_txn

Line 633: PO_LOG.proc_begin(d_module, 'p_line_location_id', p_line_location_id);

629: BEGIN
630: d_position := 0;
631: IF (PO_LOG.d_proc) THEN
632: PO_LOG.proc_begin(d_module);
633: PO_LOG.proc_begin(d_module, 'p_line_location_id', p_line_location_id);
634: END IF;
635:
636: sync_draft_from_txn
637: ( p_line_location_id_tbl => PO_TBL_NUMBER(p_line_location_id),

Line 646: IF (PO_LOG.d_proc) THEN

642:
643: x_record_already_exist := l_record_already_exist_tbl(1);
644:
645: d_position := 10;
646: IF (PO_LOG.d_proc) THEN
647: PO_LOG.proc_end(d_module);
648: PO_LOG.proc_end(d_module, 'x_record_already_exist', x_record_already_exist);
649: END IF;
650:

Line 647: PO_LOG.proc_end(d_module);

643: x_record_already_exist := l_record_already_exist_tbl(1);
644:
645: d_position := 10;
646: IF (PO_LOG.d_proc) THEN
647: PO_LOG.proc_end(d_module);
648: PO_LOG.proc_end(d_module, 'x_record_already_exist', x_record_already_exist);
649: END IF;
650:
651: EXCEPTION

Line 648: PO_LOG.proc_end(d_module, 'x_record_already_exist', x_record_already_exist);

644:
645: d_position := 10;
646: IF (PO_LOG.d_proc) THEN
647: PO_LOG.proc_end(d_module);
648: PO_LOG.proc_end(d_module, 'x_record_already_exist', x_record_already_exist);
649: END IF;
650:
651: EXCEPTION
652: WHEN OTHERS THEN

Line 696: IF (PO_LOG.d_proc) THEN

692:
693: BEGIN
694:
695: d_position := 0;
696: IF (PO_LOG.d_proc) THEN
697: PO_LOG.proc_begin(d_module);
698: END IF;
699:
700: -- Since putting DELETE within MERGE statement is causing database

Line 697: PO_LOG.proc_begin(d_module);

693: BEGIN
694:
695: d_position := 0;
696: IF (PO_LOG.d_proc) THEN
697: PO_LOG.proc_begin(d_module);
698: END IF;
699:
700: -- Since putting DELETE within MERGE statement is causing database
701: -- to thrown internal error, for now we just separate the DELETE statement.

Line 742: IF (PO_LOG.d_proc) THEN

738: DELETE FROM po_line_locations_all_ext_tl
739: WHERE line_location_id = l_line_loc_id_tbl(i);
740:
741: d_position := 10;
742: IF (PO_LOG.d_proc) THEN
743: PO_LOG.stmt(d_module, d_position, 'Deleted shipment ids: ', l_line_loc_id_tbl);
744: END IF;
745:
746: -- Merge PO Line Location changes

Line 743: PO_LOG.stmt(d_module, d_position, 'Deleted shipment ids: ', l_line_loc_id_tbl);

739: WHERE line_location_id = l_line_loc_id_tbl(i);
740:
741: d_position := 10;
742: IF (PO_LOG.d_proc) THEN
743: PO_LOG.stmt(d_module, d_position, 'Deleted shipment ids: ', l_line_loc_id_tbl);
744: END IF;
745:
746: -- Merge PO Line Location changes
747: -- For update case, the following columns will be skipped:

Line 1510: IF (PO_LOG.d_proc) THEN

1506: l_dummy NUMBER;
1507:
1508: BEGIN
1509: d_position := 0;
1510: IF (PO_LOG.d_proc) THEN
1511: PO_LOG.proc_begin(d_module);
1512: END IF;
1513:
1514: SELECT 1

Line 1511: PO_LOG.proc_begin(d_module);

1507:
1508: BEGIN
1509: d_position := 0;
1510: IF (PO_LOG.d_proc) THEN
1511: PO_LOG.proc_begin(d_module);
1512: END IF;
1513:
1514: SELECT 1
1515: INTO l_dummy

Line 1521: IF (PO_LOG.d_proc) THEN

1517: WHERE line_location_id = p_line_location_id
1518: AND draft_id = p_draft_id
1519: FOR UPDATE NOWAIT;
1520:
1521: IF (PO_LOG.d_proc) THEN
1522: PO_LOG.proc_end(d_module);
1523: END IF;
1524:
1525: EXCEPTION

Line 1522: PO_LOG.proc_end(d_module);

1518: AND draft_id = p_draft_id
1519: FOR UPDATE NOWAIT;
1520:
1521: IF (PO_LOG.d_proc) THEN
1522: PO_LOG.proc_end(d_module);
1523: END IF;
1524:
1525: EXCEPTION
1526: WHEN NO_DATA_FOUND THEN

Line 1554: IF (PO_LOG.d_proc) THEN

1550: l_dummy NUMBER;
1551:
1552: BEGIN
1553: d_position := 0;
1554: IF (PO_LOG.d_proc) THEN
1555: PO_LOG.proc_begin(d_module);
1556: END IF;
1557:
1558: SELECT 1

Line 1555: PO_LOG.proc_begin(d_module);

1551:
1552: BEGIN
1553: d_position := 0;
1554: IF (PO_LOG.d_proc) THEN
1555: PO_LOG.proc_begin(d_module);
1556: END IF;
1557:
1558: SELECT 1
1559: INTO l_dummy

Line 1564: IF (PO_LOG.d_proc) THEN

1560: FROM po_line_locations_all
1561: WHERE line_location_id = p_line_location_id
1562: FOR UPDATE NOWAIT;
1563:
1564: IF (PO_LOG.d_proc) THEN
1565: PO_LOG.proc_end(d_module);
1566: END IF;
1567:
1568: EXCEPTION

Line 1565: PO_LOG.proc_end(d_module);

1561: WHERE line_location_id = p_line_location_id
1562: FOR UPDATE NOWAIT;
1563:
1564: IF (PO_LOG.d_proc) THEN
1565: PO_LOG.proc_end(d_module);
1566: END IF;
1567:
1568: EXCEPTION
1569: WHEN NO_DATA_FOUND THEN