387: BEGIN
388: OKC_API.init_msg_list(p_init_msg_list);
389: x_return_status := G_RET_STS_SUCCESS;
390:
391: -- Versioning OKS_K_HEADERS_B
392: -- Inserting single record
393: INSERT INTO oks_k_headers_bh
394: (major_version,
395: id,
389: x_return_status := G_RET_STS_SUCCESS;
390:
391: -- Versioning OKS_K_HEADERS_B
392: -- Inserting single record
393: INSERT INTO oks_k_headers_bh
394: (major_version,
395: id,
396: chr_id,
397: acct_rule_id,
569: EXEMPT_REASON_CODE,
570: APPROVAL_TYPE_USED,
571: renewal_comment,
572: cc_email_address /*Added for ER 13869562*/
573: FROM oks_k_headers_b
574: WHERE chr_id = p_chr_id;
575:
576: -- Versioning OKS_K_LINES_B
577: -- Inserting multiple records
969: DELETE oks_k_lines_bh
970: WHERE dnz_chr_id = p_chr_id
971: AND major_version = - 1;
972:
973: DELETE oks_k_headers_bh
974: WHERE chr_id = p_chr_id
975: AND major_version = - 1;
976:
977: oks_coverages_pub.delete_saved_version
1030: (SELECT id FROM oks_k_lines_b
1031: WHERE dnz_chr_id = p_chr_id );
1032: DELETE oks_k_lines_b
1033: WHERE dnz_chr_id = p_chr_id;
1034: DELETE oks_k_headers_b
1035: WHERE chr_id = p_chr_id;
1036:
1037: -- Restoring OKS_K_HEADERS_B
1038: -- Inserting single record
1033: WHERE dnz_chr_id = p_chr_id;
1034: DELETE oks_k_headers_b
1035: WHERE chr_id = p_chr_id;
1036:
1037: -- Restoring OKS_K_HEADERS_B
1038: -- Inserting single record
1039: INSERT INTO oks_k_headers_b
1040: (id,
1041: chr_id,
1035: WHERE chr_id = p_chr_id;
1036:
1037: -- Restoring OKS_K_HEADERS_B
1038: -- Inserting single record
1039: INSERT INTO oks_k_headers_b
1040: (id,
1041: chr_id,
1042: acct_rule_id,
1043: payment_type,
1214: EXEMPT_REASON_CODE,
1215: APPROVAL_TYPE_USED,
1216: renewal_comment,
1217: cc_email_address /*Added for ER 13869562*/
1218: FROM oks_k_headers_bh
1219: WHERE chr_id = p_chr_id
1220: AND major_version = - 1;
1221:
1222: -- Restoring OKS_K_LINES_B
1509:
1510: DELETE oks_k_lines_bh
1511: WHERE dnz_chr_id = p_chr_id;
1512:
1513: DELETE oks_k_headers_bh
1514: WHERE chr_id = p_chr_id;
1515: -- Purging Coverage Related Tables
1516: oks_coverages_pub.delete_history
1517: (
1535: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1536: END delete_history;
1537:
1538: ---------------------------------------------------------------
1539: -- Procedure for mass insert in OKS_K_HEADERS_B table
1540: ---------------------------------------------------------------
1541: PROCEDURE INSERT_ROW_UPG(x_return_status OUT NOCOPY VARCHAR2,
1542: p_khrv_tbl IN khrv_tbl_type) IS
1543:
1730: END LOOP;
1731:
1732: FORALL i IN 1..l_tabsize
1733: INSERT
1734: INTO OKS_K_HEADERS_B
1735: (
1736: id,
1737: chr_id,
1738: acct_rule_id,
1924: --RAISE;
1925: END INSERT_ROW_UPG;
1926:
1927: ---------------------------------------------------------------
1928: -- Procedure for mass insert in OKS_K_HEADERS_BH
1929: ---------------------------------------------------------------
1930: PROCEDURE CREATE_HDR_VERSION_UPG(x_return_status OUT NOCOPY VARCHAR2,
1931: p_khrhv_tbl IN khrhv_tbl_type) IS
1932:
2123: i := p_khrhv_tbl.NEXT(i);
2124: END LOOP;
2125:
2126: FORALL i IN 1..l_tabsize
2127: INSERT INTO OKS_K_HEADERS_BH
2128: (
2129: id,
2130: major_version,
2131: chr_id,