DBA Data[Home] [Help]

APPS.PO_LINES_DRAFT_PKG dependencies on PO_LOG

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

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

Line 45: IF (PO_LOG.d_proc) THEN

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

Line 46: PO_LOG.proc_begin(d_module);

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

Line 143: IF (PO_LOG.d_proc) THEN

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

Line 144: PO_LOG.proc_begin(d_module);

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

Line 195: IF (PO_LOG.d_stmt) THEN

191: END LOOP;
192: -- End: Collect DraftTypes based on draft_ids
193:
194: d_position := 10;
195: IF (PO_LOG.d_stmt) THEN
196: PO_LOG.stmt(d_module, d_position, 'transfer records from txn to dft');
197: END IF;
198:
199: FORALL i IN 1..p_po_line_id_tbl.COUNT

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

192: -- End: Collect DraftTypes based on draft_ids
193:
194: d_position := 10;
195: IF (PO_LOG.d_stmt) THEN
196: PO_LOG.stmt(d_module, d_position, 'transfer records from txn to dft');
197: END IF;
198:
199: FORALL i IN 1..p_po_line_id_tbl.COUNT
200: INSERT INTO po_lines_draft_all

Line 597: IF (PO_LOG.d_stmt) THEN

593: AND x_record_already_exist_tbl(i) = FND_API.G_FALSE
594: AND l_duplicate_flag_tbl(i) = FND_API.G_FALSE;
595:
596: d_position := 20;
597: IF (PO_LOG.d_stmt) THEN
598: PO_LOG.stmt(d_module, d_position, 'transfer count = ' || SQL%ROWCOUNT);
599: END IF;
600:
601: FORALL i IN 1..p_po_line_id_tbl.COUNT

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

594: AND l_duplicate_flag_tbl(i) = FND_API.G_FALSE;
595:
596: d_position := 20;
597: IF (PO_LOG.d_stmt) THEN
598: PO_LOG.stmt(d_module, d_position, 'transfer count = ' || SQL%ROWCOUNT);
599: END IF;
600:
601: FORALL i IN 1..p_po_line_id_tbl.COUNT
602: UPDATE po_lines_draft_all

Line 611: IF (PO_LOG.d_stmt) THEN

607: AND x_record_already_exist_tbl(i) = FND_API.G_TRUE;
608:
609: d_position := 30;
610:
611: IF (PO_LOG.d_stmt) THEN
612: PO_LOG.stmt(d_module, d_position, 'update draft records that are already' ||
613: ' in draft table. Count = ' || SQL%ROWCOUNT);
614: END IF;
615:

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

608:
609: d_position := 30;
610:
611: IF (PO_LOG.d_stmt) THEN
612: PO_LOG.stmt(d_module, d_position, 'update draft records that are already' ||
613: ' in draft table. Count = ' || SQL%ROWCOUNT);
614: END IF;
615:
616: d_position := 40;

Line 618: IF (PO_LOG.d_proc) THEN

614: END IF;
615:
616: d_position := 40;
617:
618: IF (PO_LOG.d_proc) THEN
619: PO_LOG.proc_end(d_module);
620: END IF;
621:
622: EXCEPTION

Line 619: PO_LOG.proc_end(d_module);

615:
616: d_position := 40;
617:
618: IF (PO_LOG.d_proc) THEN
619: PO_LOG.proc_end(d_module);
620: END IF;
621:
622: EXCEPTION
623: WHEN OTHERS THEN

Line 675: IF (PO_LOG.d_proc) THEN

671: l_record_already_exist_tbl PO_TBL_VARCHAR1;
672:
673: BEGIN
674: d_position := 0;
675: IF (PO_LOG.d_proc) THEN
676: PO_LOG.proc_begin(d_module);
677: PO_LOG.proc_begin(d_module, 'p_po_line_id', p_po_line_id);
678: END IF;
679:

Line 676: PO_LOG.proc_begin(d_module);

672:
673: BEGIN
674: d_position := 0;
675: IF (PO_LOG.d_proc) THEN
676: PO_LOG.proc_begin(d_module);
677: PO_LOG.proc_begin(d_module, 'p_po_line_id', p_po_line_id);
678: END IF;
679:
680: sync_draft_from_txn

Line 677: PO_LOG.proc_begin(d_module, 'p_po_line_id', p_po_line_id);

673: BEGIN
674: d_position := 0;
675: IF (PO_LOG.d_proc) THEN
676: PO_LOG.proc_begin(d_module);
677: PO_LOG.proc_begin(d_module, 'p_po_line_id', p_po_line_id);
678: END IF;
679:
680: sync_draft_from_txn
681: ( p_po_line_id_tbl => PO_TBL_NUMBER(p_po_line_id),

Line 690: IF (PO_LOG.d_proc) THEN

686:
687: x_record_already_exist := l_record_already_exist_tbl(1);
688:
689: d_position := 10;
690: IF (PO_LOG.d_proc) THEN
691: PO_LOG.proc_end(d_module);
692: PO_LOG.proc_end(d_module, 'x_record_already_exist', x_record_already_exist);
693: END IF;
694:

Line 691: PO_LOG.proc_end(d_module);

687: x_record_already_exist := l_record_already_exist_tbl(1);
688:
689: d_position := 10;
690: IF (PO_LOG.d_proc) THEN
691: PO_LOG.proc_end(d_module);
692: PO_LOG.proc_end(d_module, 'x_record_already_exist', x_record_already_exist);
693: END IF;
694:
695: EXCEPTION

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

688:
689: d_position := 10;
690: IF (PO_LOG.d_proc) THEN
691: PO_LOG.proc_end(d_module);
692: PO_LOG.proc_end(d_module, 'x_record_already_exist', x_record_already_exist);
693: END IF;
694:
695: EXCEPTION
696: WHEN OTHERS THEN

Line 740: IF (PO_LOG.d_proc) THEN

736: d_position NUMBER;
737:
738: BEGIN
739: d_position := 0;
740: IF (PO_LOG.d_proc) THEN
741: PO_LOG.proc_begin(d_module);
742: END IF;
743:
744: -- Since putting DELETE within MERGE statement is causing database

Line 741: PO_LOG.proc_begin(d_module);

737:
738: BEGIN
739: d_position := 0;
740: IF (PO_LOG.d_proc) THEN
741: PO_LOG.proc_begin(d_module);
742: END IF;
743:
744: -- Since putting DELETE within MERGE statement is causing database
745: -- to thrown internal error, for now we just separate the DELETE statement.

Line 787: IF (PO_LOG.d_proc) THEN

783: DELETE FROM po_lines_all_ext_tl
784: WHERE po_line_id = l_line_id_tbl(i);
785:
786: d_position := 10;
787: IF (PO_LOG.d_proc) THEN
788: PO_LOG.stmt(d_module, d_position, 'Deleted Line ids: ', l_line_id_tbl);
789: END IF;
790: -- Merge PO Line changes
791: -- For update case, the following columns will be skipped:

Line 788: PO_LOG.stmt(d_module, d_position, 'Deleted Line ids: ', l_line_id_tbl);

784: WHERE po_line_id = l_line_id_tbl(i);
785:
786: d_position := 10;
787: IF (PO_LOG.d_proc) THEN
788: PO_LOG.stmt(d_module, d_position, 'Deleted Line ids: ', l_line_id_tbl);
789: END IF;
790: -- Merge PO Line changes
791: -- For update case, the following columns will be skipped:
792: --PL.po_line_id

Line 1591: IF (PO_LOG.d_proc) THEN

1587: l_dummy NUMBER;
1588:
1589: BEGIN
1590: d_position := 0;
1591: IF (PO_LOG.d_proc) THEN
1592: PO_LOG.proc_begin(d_module);
1593: END IF;
1594:
1595: SELECT 1

Line 1592: PO_LOG.proc_begin(d_module);

1588:
1589: BEGIN
1590: d_position := 0;
1591: IF (PO_LOG.d_proc) THEN
1592: PO_LOG.proc_begin(d_module);
1593: END IF;
1594:
1595: SELECT 1
1596: INTO l_dummy

Line 1602: IF (PO_LOG.d_proc) THEN

1598: WHERE po_line_id = p_po_line_id
1599: AND draft_id = p_draft_id
1600: FOR UPDATE NOWAIT;
1601:
1602: IF (PO_LOG.d_proc) THEN
1603: PO_LOG.proc_end(d_module);
1604: END IF;
1605:
1606: EXCEPTION

Line 1603: PO_LOG.proc_end(d_module);

1599: AND draft_id = p_draft_id
1600: FOR UPDATE NOWAIT;
1601:
1602: IF (PO_LOG.d_proc) THEN
1603: PO_LOG.proc_end(d_module);
1604: END IF;
1605:
1606: EXCEPTION
1607: WHEN NO_DATA_FOUND THEN

Line 1635: IF (PO_LOG.d_proc) THEN

1631: l_dummy NUMBER;
1632:
1633: BEGIN
1634: d_position := 0;
1635: IF (PO_LOG.d_proc) THEN
1636: PO_LOG.proc_begin(d_module);
1637: END IF;
1638:
1639: SELECT 1

Line 1636: PO_LOG.proc_begin(d_module);

1632:
1633: BEGIN
1634: d_position := 0;
1635: IF (PO_LOG.d_proc) THEN
1636: PO_LOG.proc_begin(d_module);
1637: END IF;
1638:
1639: SELECT 1
1640: INTO l_dummy

Line 1645: IF (PO_LOG.d_proc) THEN

1641: FROM po_lines_all
1642: WHERE po_line_id = p_po_line_id
1643: FOR UPDATE NOWAIT;
1644:
1645: IF (PO_LOG.d_proc) THEN
1646: PO_LOG.proc_end(d_module);
1647: END IF;
1648:
1649: EXCEPTION

Line 1646: PO_LOG.proc_end(d_module);

1642: WHERE po_line_id = p_po_line_id
1643: FOR UPDATE NOWAIT;
1644:
1645: IF (PO_LOG.d_proc) THEN
1646: PO_LOG.proc_end(d_module);
1647: END IF;
1648:
1649: EXCEPTION
1650: WHEN NO_DATA_FOUND THEN