24: x_msg_data OUT NOCOPY VARCHAR2,
25: p_cimv_rec IN cimv_rec_type,
26: x_cimv_rec OUT NOCOPY cimv_rec_type) is
27: --V
28: l_cvmv_rec OKC_CVM_PVT.cvmv_rec_type;
29: x_out_rec OKC_CVM_PVT.cvmv_rec_type;
30: --V
31: begin
32: okc_cim_pvt.insert_row(p_api_version => p_api_version,
25: p_cimv_rec IN cimv_rec_type,
26: x_cimv_rec OUT NOCOPY cimv_rec_type) is
27: --V
28: l_cvmv_rec OKC_CVM_PVT.cvmv_rec_type;
29: x_out_rec OKC_CVM_PVT.cvmv_rec_type;
30: --V
31: begin
32: okc_cim_pvt.insert_row(p_api_version => p_api_version,
33: p_init_msg_list => p_init_msg_list,
40: if (x_return_status <> OKC_API.G_RET_STS_SUCCESS) then
41: return;
42: end if;
43: l_cvmv_rec.chr_id := p_cimv_rec.DNZ_CHR_ID;
44: OKC_CVM_PVT.update_contract_version(
45: p_api_version => p_api_version,
46: p_init_msg_list => OKC_API.G_FALSE,
47: x_return_status => x_return_status,
48: x_msg_count => x_msg_count,
67: x_msg_data OUT NOCOPY VARCHAR2,
68: p_cimv_rec IN cimv_rec_type,
69: x_cimv_rec OUT NOCOPY cimv_rec_type) is
70: --V
71: l_cvmv_rec OKC_CVM_PVT.cvmv_rec_type;
72: x_out_rec OKC_CVM_PVT.cvmv_rec_type;
73: cursor dnz_csr is
74: select dnz_chr_id
75: from OKC_K_ITEMS_V
68: p_cimv_rec IN cimv_rec_type,
69: x_cimv_rec OUT NOCOPY cimv_rec_type) is
70: --V
71: l_cvmv_rec OKC_CVM_PVT.cvmv_rec_type;
72: x_out_rec OKC_CVM_PVT.cvmv_rec_type;
73: cursor dnz_csr is
74: select dnz_chr_id
75: from OKC_K_ITEMS_V
76: where id = p_cimv_rec.id;
89: end if;
90: open dnz_csr;
91: fetch dnz_csr into l_cvmv_rec.chr_id;
92: close dnz_csr;
93: OKC_CVM_PVT.update_contract_version(
94: p_api_version => p_api_version,
95: p_init_msg_list => OKC_API.G_FALSE,
96: x_return_status => x_return_status,
97: x_msg_count => x_msg_count,
116: x_msg_data OUT NOCOPY VARCHAR2,
117: p_cimv_rec IN cimv_rec_type) is
118: i NUMBER :=0;
119: --V
120: l_cvmv_rec OKC_CVM_PVT.cvmv_rec_type;
121: x_out_rec OKC_CVM_PVT.cvmv_rec_type;
122: cursor dnz_csr is
123: select dnz_chr_id
124: from OKC_K_ITEMS_V
117: p_cimv_rec IN cimv_rec_type) is
118: i NUMBER :=0;
119: --V
120: l_cvmv_rec OKC_CVM_PVT.cvmv_rec_type;
121: x_out_rec OKC_CVM_PVT.cvmv_rec_type;
122: cursor dnz_csr is
123: select dnz_chr_id
124: from OKC_K_ITEMS_V
125: where id = p_cimv_rec.id;
144: --V
145: if (x_return_status <> OKC_API.G_RET_STS_SUCCESS) then
146: return;
147: end if;
148: OKC_CVM_PVT.update_contract_version(
149: p_api_version => p_api_version,
150: p_init_msg_list => OKC_API.G_FALSE,
151: x_return_status => x_return_status,
152: x_msg_count => x_msg_count,