90: ------------------------------------------------------------------------
91: PROCEDURE sync_draft_from_txn
92: ( p_line_location_id_tbl IN PO_TBL_NUMBER,
93: p_draft_id_tbl IN PO_TBL_NUMBER,
94: p_delete_flag_tbl IN PO_TBL_VARCHAR1,
95: x_record_already_exist_tbl OUT NOCOPY PO_TBL_VARCHAR1
96: ) IS
97:
98: d_api_name CONSTANT VARCHAR2(30) := 'sync_draft_from_txn';
91: PROCEDURE sync_draft_from_txn
92: ( p_line_location_id_tbl IN PO_TBL_NUMBER,
93: p_draft_id_tbl IN PO_TBL_NUMBER,
94: p_delete_flag_tbl IN PO_TBL_VARCHAR1,
95: x_record_already_exist_tbl OUT NOCOPY PO_TBL_VARCHAR1
96: ) IS
97:
98: d_api_name CONSTANT VARCHAR2(30) := 'sync_draft_from_txn';
99: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
99: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
100: d_position NUMBER;
101:
102: l_distinct_id_list DBMS_SQL.NUMBER_TABLE;
103: l_duplicate_flag_tbl PO_TBL_VARCHAR1 := PO_TBL_VARCHAR1();
104:
105: BEGIN
106: d_position := 0;
107: IF (PO_LOG.d_proc) THEN
563: d_api_name CONSTANT VARCHAR2(30) := 'sync_draft_from_txn';
564: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
565: d_position NUMBER;
566:
567: l_record_already_exist_tbl PO_TBL_VARCHAR1;
568:
569: BEGIN
570: d_position := 0;
571: IF (PO_LOG.d_proc) THEN
575:
576: sync_draft_from_txn
577: ( p_line_location_id_tbl => PO_TBL_NUMBER(p_line_location_id),
578: p_draft_id_tbl => PO_TBL_NUMBER(p_draft_id),
579: p_delete_flag_tbl => PO_TBL_VARCHAR1(p_delete_flag),
580: x_record_already_exist_tbl => l_record_already_exist_tbl
581: );
582:
583: x_record_already_exist := l_record_already_exist_tbl(1);