115: ------------------------------------------------------------------------
116: PROCEDURE sync_draft_from_txn
117: ( p_po_header_id_tbl IN PO_TBL_NUMBER,
118: p_draft_id_tbl IN PO_TBL_NUMBER,
119: p_delete_flag_tbl IN PO_TBL_VARCHAR1,
120: x_record_already_exist_tbl OUT NOCOPY PO_TBL_VARCHAR1
121: ) IS
122:
123: d_api_name CONSTANT VARCHAR2(30) := 'sync_draft_from_txn';
116: PROCEDURE sync_draft_from_txn
117: ( p_po_header_id_tbl IN PO_TBL_NUMBER,
118: p_draft_id_tbl IN PO_TBL_NUMBER,
119: p_delete_flag_tbl IN PO_TBL_VARCHAR1,
120: x_record_already_exist_tbl OUT NOCOPY PO_TBL_VARCHAR1
121: ) IS
122:
123: d_api_name CONSTANT VARCHAR2(30) := 'sync_draft_from_txn';
124: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
124: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
125: d_position NUMBER;
126:
127: l_distinct_id_list DBMS_SQL.NUMBER_TABLE;
128: l_duplicate_flag_tbl PO_TBL_VARCHAR1 := PO_TBL_VARCHAR1();
129:
130: BEGIN
131: d_position := 0;
132: IF (PO_LOG.d_proc) THEN
642: d_api_name CONSTANT VARCHAR2(30) := 'sync_draft_from_txn';
643: d_module CONSTANT VARCHAR2(2000) := d_pkg_name || d_api_name || '.';
644: d_position NUMBER;
645:
646: l_record_already_exist_tbl PO_TBL_VARCHAR1;
647:
648: BEGIN
649: d_position := 0;
650: IF (PO_LOG.d_proc) THEN
654:
655: sync_draft_from_txn
656: ( p_po_header_id_tbl => PO_TBL_NUMBER(p_po_header_id),
657: p_draft_id_tbl => PO_TBL_NUMBER(p_draft_id),
658: p_delete_flag_tbl => PO_TBL_VARCHAR1(p_delete_flag),
659: x_record_already_exist_tbl => l_record_already_exist_tbl
660: );
661:
662: x_record_already_exist := l_record_already_exist_tbl(1);