12473: p_sts_code VARCHAR2
12474: )
12475: IS
12476: SELECT stv.ste_code ste_code
12477: FROM okc_statuses_v stv
12478: WHERE stv.code = p_sts_code;
12479:
12480: -- Cursor to get the meaning of the sts_code passed
12481: CURSOR get_sts_meaning_csr (
12482: p_sts_code IN VARCHAR2
12483: )
12484: IS
12485: SELECT stv.meaning meaning
12486: FROM okc_statuses_v stv
12487: WHERE stv.code = p_sts_code;
12488:
12489: -- RMUNJULU 18-FEB-03 2805703 cursor to get active
12490: -- service or fee lines attached to contract directly
12503: l_api_name CONSTANT VARCHAR2 (30) := 'update_contract';
12504: l_api_version CONSTANT NUMBER := 1;
12505: l_id NUMBER := -9999;
12506: get_k_dtls_rec get_k_dtls_csr%ROWTYPE;
12507: l_ste_code okc_statuses_v.code%TYPE;
12508: lp_chrv_rec okc_contract_pub.chrv_rec_type;
12509: lx_chrv_rec okc_contract_pub.chrv_rec_type;
12510: l_sts_meaning VARCHAR2 (300);
12511: l_msg_tbl g_msg_tbl := px_msg_tbl;