16: p_crj_rel_hdr_full_rec IN crj_rel_hdr_full_rec_type,
17: x_crj_rel_hdr_full_rec OUT NOCOPY crj_rel_hdr_full_rec_type)
18:
19: IS
20: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
21: l_api_name CONSTANT VARCHAR2(30) := 'create_k_rel_obj';
22: l_api_version_number CONSTANT NUMBER := 1.0;
23: l_crj_rel_hdr_full_rec OKC_K_REL_OBJS_PUB.crj_rel_hdr_full_rec_type;
24: l_crj_rel_line_tbl OKC_K_REL_OBJS_PUB.crj_rel_line_tbl_type;
75: x_crj_rel_hdr_full_rec => l_x_crj_rel_hdr_full_rec,
76: x_crj_rel_line_tbl => x_crj_rel_line_tbl);
77:
78:
79: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
80: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
81: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
82: raise OKC_API.G_EXCEPTION_ERROR;
83: END IF;
76: x_crj_rel_line_tbl => x_crj_rel_line_tbl);
77:
78:
79: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
80: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
81: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
82: raise OKC_API.G_EXCEPTION_ERROR;
83: END IF;
84:
77:
78:
79: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
80: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
81: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
82: raise OKC_API.G_EXCEPTION_ERROR;
83: END IF;
84:
85: x_crj_rel_hdr_full_rec.chr_id := l_x_crj_rel_hdr_full_rec.chr_id;
78:
79: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
80: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
81: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
82: raise OKC_API.G_EXCEPTION_ERROR;
83: END IF;
84:
85: x_crj_rel_hdr_full_rec.chr_id := l_x_crj_rel_hdr_full_rec.chr_id;
86: x_crj_rel_hdr_full_rec.object1_id1 := l_x_crj_rel_hdr_full_rec.object1_id1;
91:
92:
93: EXCEPTION
94:
95: WHEN OKC_API.G_EXCEPTION_ERROR THEN
96: x_return_status := OKC_API.HANDLE_EXCEPTIONS( l_api_name
97: ,G_PKG_NAME
98: ,'OKC_API.G_RET_STS_ERROR'
99: ,x_msg_count
92:
93: EXCEPTION
94:
95: WHEN OKC_API.G_EXCEPTION_ERROR THEN
96: x_return_status := OKC_API.HANDLE_EXCEPTIONS( l_api_name
97: ,G_PKG_NAME
98: ,'OKC_API.G_RET_STS_ERROR'
99: ,x_msg_count
100: ,x_msg_data
94:
95: WHEN OKC_API.G_EXCEPTION_ERROR THEN
96: x_return_status := OKC_API.HANDLE_EXCEPTIONS( l_api_name
97: ,G_PKG_NAME
98: ,'OKC_API.G_RET_STS_ERROR'
99: ,x_msg_count
100: ,x_msg_data
101: ,'_PUB');
102: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
98: ,'OKC_API.G_RET_STS_ERROR'
99: ,x_msg_count
100: ,x_msg_data
101: ,'_PUB');
102: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
103: x_return_status :=OKC_API.HANDLE_EXCEPTIONS( l_api_name
104: ,G_PKG_NAME
105: ,'OKC_API.G_RET_STS_UNEXP_ERROR'
106: ,x_msg_count
99: ,x_msg_count
100: ,x_msg_data
101: ,'_PUB');
102: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
103: x_return_status :=OKC_API.HANDLE_EXCEPTIONS( l_api_name
104: ,G_PKG_NAME
105: ,'OKC_API.G_RET_STS_UNEXP_ERROR'
106: ,x_msg_count
107: ,x_msg_data
101: ,'_PUB');
102: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
103: x_return_status :=OKC_API.HANDLE_EXCEPTIONS( l_api_name
104: ,G_PKG_NAME
105: ,'OKC_API.G_RET_STS_UNEXP_ERROR'
106: ,x_msg_count
107: ,x_msg_data
108: ,'_PUB');
109: WHEN OTHERS THEN
106: ,x_msg_count
107: ,x_msg_data
108: ,'_PUB');
109: WHEN OTHERS THEN
110: x_return_status :=OKC_API.HANDLE_EXCEPTIONS( l_api_name
111: ,G_PKG_NAME
112: ,'OTHERS'
113: ,x_msg_count
114: ,x_msg_data