DBA Data[Home] [Help]

APPS.OKS_SETUP_UTIL_PUB dependencies on OKC_API

Line 92: l_error_tbl OKC_API.ERROR_TBL_TYPE;

88:
89: get_ccr_rec get_ccr%rowtype;
90: l_khrv_tbl OKS_KHR_PVT.khrv_tbl_type;
91: x_khrv_tbl OKS_KHR_PVT.khrv_tbl_type;
92: l_error_tbl OKC_API.ERROR_TBL_TYPE;
93:
94: Begin
95: l_return_status := OKC_API.G_RET_STS_SUCCESS;
96:

Line 95: l_return_status := OKC_API.G_RET_STS_SUCCESS;

91: x_khrv_tbl OKS_KHR_PVT.khrv_tbl_type;
92: l_error_tbl OKC_API.ERROR_TBL_TYPE;
93:
94: Begin
95: l_return_status := OKC_API.G_RET_STS_SUCCESS;
96:
97: For get_ccr_rec In get_ccr(p_chr_id)
98: Loop
99:

Line 109: l_khrv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;

105: l_khrv_tbl(1).chr_id :=get_ccr_rec.chr_id;
106: l_khrv_tbl(1).CC_BANK_ACCT_ID :=NULL;
107: l_khrv_tbl(1).CC_AUTH_CODE :=NULL;
108: l_khrv_tbl(1).OBJECT_VERSION_NUMBER :=get_ccr_rec.OBJECT_VERSION_NUMBER;
109: l_khrv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
110: l_khrv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
111: l_khrv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
112: l_khrv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
113: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;

Line 110: l_khrv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;

106: l_khrv_tbl(1).CC_BANK_ACCT_ID :=NULL;
107: l_khrv_tbl(1).CC_AUTH_CODE :=NULL;
108: l_khrv_tbl(1).OBJECT_VERSION_NUMBER :=get_ccr_rec.OBJECT_VERSION_NUMBER;
109: l_khrv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
110: l_khrv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
111: l_khrv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
112: l_khrv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
113: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
114:

Line 111: l_khrv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;

107: l_khrv_tbl(1).CC_AUTH_CODE :=NULL;
108: l_khrv_tbl(1).OBJECT_VERSION_NUMBER :=get_ccr_rec.OBJECT_VERSION_NUMBER;
109: l_khrv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
110: l_khrv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
111: l_khrv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
112: l_khrv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
113: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
114:
115: OKS_CONTRACT_HDR_PUB.update_header (

Line 112: l_khrv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;

108: l_khrv_tbl(1).OBJECT_VERSION_NUMBER :=get_ccr_rec.OBJECT_VERSION_NUMBER;
109: l_khrv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
110: l_khrv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
111: l_khrv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
112: l_khrv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
113: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
114:
115: OKS_CONTRACT_HDR_PUB.update_header (
116: p_api_version => l_api_version,

Line 113: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;

109: l_khrv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
110: l_khrv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
111: l_khrv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
112: l_khrv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
113: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
114:
115: OKS_CONTRACT_HDR_PUB.update_header (
116: p_api_version => l_api_version,
117: p_init_msg_list => OKC_API.G_FALSE,

Line 117: p_init_msg_list => OKC_API.G_FALSE,

113: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
114:
115: OKS_CONTRACT_HDR_PUB.update_header (
116: p_api_version => l_api_version,
117: p_init_msg_list => OKC_API.G_FALSE,
118: x_return_status => l_return_status,
119: x_msg_count => l_msg_count,
120: x_msg_data => l_msg_data,
121: p_khrv_tbl => l_khrv_tbl,

Line 127: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then

123: p_validate_yn => 'N');
124:
125: END IF;
126:
127: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then
128: RAISE G_EXCEPTION_HALT_VALIDATION;
129: END IF;
130:
131: End Loop; --For get_line_id_rec In get_line_id_csr

Line 139: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

135: EXCEPTION
136: WHEN G_EXCEPTION_HALT_VALIDATION THEN
137: x_return_status := l_return_status;
138: WHEN Others THEN
139: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
140: OKC_API.set_message
141: (
142: G_APP_NAME,
143: G_UNEXPECTED_ERROR,

Line 140: OKC_API.set_message

136: WHEN G_EXCEPTION_HALT_VALIDATION THEN
137: x_return_status := l_return_status;
138: WHEN Others THEN
139: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
140: OKC_API.set_message
141: (
142: G_APP_NAME,
143: G_UNEXPECTED_ERROR,
144: G_SQLCODE_TOKEN,

Line 189: l_error_tbl OKC_API.ERROR_TBL_TYPE;

185:
186: get_ccr_rec get_ccr%rowtype;
187: l_klnv_tbl oks_kln_pvt.klnv_tbl_type;
188: x_klnv_tbl oks_kln_pvt.klnv_tbl_type;
189: l_error_tbl OKC_API.ERROR_TBL_TYPE;
190:
191: Begin
192: l_return_status := OKC_API.G_RET_STS_SUCCESS;
193:

Line 192: l_return_status := OKC_API.G_RET_STS_SUCCESS;

188: x_klnv_tbl oks_kln_pvt.klnv_tbl_type;
189: l_error_tbl OKC_API.ERROR_TBL_TYPE;
190:
191: Begin
192: l_return_status := OKC_API.G_RET_STS_SUCCESS;
193:
194: For get_ccr_rec In get_ccr(p_chr_id,p_cle_id)
195: Loop
196: IF get_ccr_rec.cc_bank_acct_id is not null then

Line 202: l_klnv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;

198: l_klnv_tbl(1).dnz_chr_id := get_ccr_rec.dnz_chr_id;
199: l_klnv_tbl(1).CC_BANK_ACCT_ID :=NULL;
200: l_klnv_tbl(1).CC_AUTH_CODE :=NULL;
201: l_klnv_tbl(1).object_version_number := get_ccr_rec.object_version_number;
202: l_klnv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
203: l_klnv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
204: l_klnv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
205: l_klnv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
206: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;

Line 203: l_klnv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;

199: l_klnv_tbl(1).CC_BANK_ACCT_ID :=NULL;
200: l_klnv_tbl(1).CC_AUTH_CODE :=NULL;
201: l_klnv_tbl(1).object_version_number := get_ccr_rec.object_version_number;
202: l_klnv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
203: l_klnv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
204: l_klnv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
205: l_klnv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
206: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
207:

Line 204: l_klnv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;

200: l_klnv_tbl(1).CC_AUTH_CODE :=NULL;
201: l_klnv_tbl(1).object_version_number := get_ccr_rec.object_version_number;
202: l_klnv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
203: l_klnv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
204: l_klnv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
205: l_klnv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
206: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
207:
208: OKS_CONTRACT_LINE_PUB.update_line (

Line 205: l_klnv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;

201: l_klnv_tbl(1).object_version_number := get_ccr_rec.object_version_number;
202: l_klnv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
203: l_klnv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
204: l_klnv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
205: l_klnv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
206: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
207:
208: OKS_CONTRACT_LINE_PUB.update_line (
209: p_api_version => l_api_version,

Line 206: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;

202: l_klnv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
203: l_klnv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
204: l_klnv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
205: l_klnv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
206: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
207:
208: OKS_CONTRACT_LINE_PUB.update_line (
209: p_api_version => l_api_version,
210: p_init_msg_list => OKC_API.G_FALSE,

Line 210: p_init_msg_list => OKC_API.G_FALSE,

206: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
207:
208: OKS_CONTRACT_LINE_PUB.update_line (
209: p_api_version => l_api_version,
210: p_init_msg_list => OKC_API.G_FALSE,
211: x_return_status => l_return_status,
212: x_msg_count => l_msg_count,
213: x_msg_data => l_msg_data,
214: p_klnv_tbl => l_klnv_tbl,

Line 219: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then

215: x_klnv_tbl => x_klnv_tbl,
216: p_validate_yn => 'N');
217: END IF;
218:
219: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then
220: RAISE G_EXCEPTION_HALT_VALIDATION;
221: END IF;
222:
223: End Loop; --For get_line_id_rec In get_line_id_csr

Line 231: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

227: EXCEPTION
228: WHEN G_EXCEPTION_HALT_VALIDATION THEN
229: x_return_status := l_return_status;
230: WHEN Others THEN
231: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
232: OKC_API.set_message
233: (
234: G_APP_NAME,
235: G_UNEXPECTED_ERROR,

Line 232: OKC_API.set_message

228: WHEN G_EXCEPTION_HALT_VALIDATION THEN
229: x_return_status := l_return_status;
230: WHEN Others THEN
231: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
232: OKC_API.set_message
233: (
234: G_APP_NAME,
235: G_UNEXPECTED_ERROR,
236: G_SQLCODE_TOKEN,

Line 325: l_return_status := OKC_API.G_RET_STS_SUCCESS;

321: -- End hkamdar R12
322:
323:
324: BEGIN
325: l_return_status := OKC_API.G_RET_STS_SUCCESS;
326: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
327: FND_LOG.string(FND_LOG.level_procedure
328: ,'OKS.plsql.OKS_COPY_CONTRACT_PVT.'||l_module_name||'.Begin'
329: ,'Entered OKS_SETUP_UTIL_PUB.copy_hdr_attr'

Line 381: l_khrv_tbl(ctr).ID :=OKC_API.G_MISS_NUM;

377:
378: --get header record and copy
379: FOR get_hdr_attr_rec IN get_hdr_attr_csr (p_chr_id)
380: LOOP
381: l_khrv_tbl(ctr).ID :=OKC_API.G_MISS_NUM;
382: l_khrv_tbl(ctr).CHR_ID :=p_new_chr_id;
383: l_khrv_tbl(ctr).ACCT_RULE_ID :=get_hdr_attr_rec.ACCT_RULE_ID;
384: l_khrv_tbl(ctr).PAYMENT_TYPE :=get_hdr_attr_rec.PAYMENT_TYPE;
385: l_khrv_tbl(ctr).CC_NO :=get_hdr_attr_rec.CC_NO;

Line 488: l_khrv_tbl(ctr).OBJECT_VERSION_NUMBER :=OKC_API.G_MISS_NUM;

484: l_khrv_tbl(ctr).SUMMARY_TRX_YN :=get_hdr_attr_rec.SUMMARY_TRX_YN;
485: l_khrv_tbl(ctr).SERVICE_PO_NUMBER :=get_hdr_attr_rec.SERVICE_PO_NUMBER;
486: l_khrv_tbl(ctr).SERVICE_PO_REQUIRED :=get_hdr_attr_rec.SERVICE_PO_REQUIRED;
487: l_khrv_tbl(ctr).BILLING_SCHEDULE_TYPE :=get_hdr_attr_rec.BILLING_SCHEDULE_TYPE;
488: l_khrv_tbl(ctr).OBJECT_VERSION_NUMBER :=OKC_API.G_MISS_NUM;
489: l_khrv_tbl(ctr).SECURITY_GROUP_ID :=get_hdr_attr_rec.SECURITY_GROUP_ID;
490: l_khrv_tbl(ctr).REQUEST_ID :=get_hdr_attr_rec.REQUEST_ID;
491: l_khrv_tbl(ctr).CREATED_BY :=OKC_API.G_MISS_NUM;
492: l_khrv_tbl(ctr).CREATION_DATE :=OKC_API.G_MISS_DATE;

Line 491: l_khrv_tbl(ctr).CREATED_BY :=OKC_API.G_MISS_NUM;

487: l_khrv_tbl(ctr).BILLING_SCHEDULE_TYPE :=get_hdr_attr_rec.BILLING_SCHEDULE_TYPE;
488: l_khrv_tbl(ctr).OBJECT_VERSION_NUMBER :=OKC_API.G_MISS_NUM;
489: l_khrv_tbl(ctr).SECURITY_GROUP_ID :=get_hdr_attr_rec.SECURITY_GROUP_ID;
490: l_khrv_tbl(ctr).REQUEST_ID :=get_hdr_attr_rec.REQUEST_ID;
491: l_khrv_tbl(ctr).CREATED_BY :=OKC_API.G_MISS_NUM;
492: l_khrv_tbl(ctr).CREATION_DATE :=OKC_API.G_MISS_DATE;
493: l_khrv_tbl(ctr).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
494: l_khrv_tbl(ctr).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
495: l_khrv_tbl(ctr).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;

Line 492: l_khrv_tbl(ctr).CREATION_DATE :=OKC_API.G_MISS_DATE;

488: l_khrv_tbl(ctr).OBJECT_VERSION_NUMBER :=OKC_API.G_MISS_NUM;
489: l_khrv_tbl(ctr).SECURITY_GROUP_ID :=get_hdr_attr_rec.SECURITY_GROUP_ID;
490: l_khrv_tbl(ctr).REQUEST_ID :=get_hdr_attr_rec.REQUEST_ID;
491: l_khrv_tbl(ctr).CREATED_BY :=OKC_API.G_MISS_NUM;
492: l_khrv_tbl(ctr).CREATION_DATE :=OKC_API.G_MISS_DATE;
493: l_khrv_tbl(ctr).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
494: l_khrv_tbl(ctr).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
495: l_khrv_tbl(ctr).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
496:

Line 493: l_khrv_tbl(ctr).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;

489: l_khrv_tbl(ctr).SECURITY_GROUP_ID :=get_hdr_attr_rec.SECURITY_GROUP_ID;
490: l_khrv_tbl(ctr).REQUEST_ID :=get_hdr_attr_rec.REQUEST_ID;
491: l_khrv_tbl(ctr).CREATED_BY :=OKC_API.G_MISS_NUM;
492: l_khrv_tbl(ctr).CREATION_DATE :=OKC_API.G_MISS_DATE;
493: l_khrv_tbl(ctr).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
494: l_khrv_tbl(ctr).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
495: l_khrv_tbl(ctr).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
496:
497: ----New columns added in R12-------

Line 494: l_khrv_tbl(ctr).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;

490: l_khrv_tbl(ctr).REQUEST_ID :=get_hdr_attr_rec.REQUEST_ID;
491: l_khrv_tbl(ctr).CREATED_BY :=OKC_API.G_MISS_NUM;
492: l_khrv_tbl(ctr).CREATION_DATE :=OKC_API.G_MISS_DATE;
493: l_khrv_tbl(ctr).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
494: l_khrv_tbl(ctr).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
495: l_khrv_tbl(ctr).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
496:
497: ----New columns added in R12-------
498: l_khrv_tbl(ctr).CC_NO:= get_hdr_attr_rec.CC_NO;

Line 495: l_khrv_tbl(ctr).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;

491: l_khrv_tbl(ctr).CREATED_BY :=OKC_API.G_MISS_NUM;
492: l_khrv_tbl(ctr).CREATION_DATE :=OKC_API.G_MISS_DATE;
493: l_khrv_tbl(ctr).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
494: l_khrv_tbl(ctr).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
495: l_khrv_tbl(ctr).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
496:
497: ----New columns added in R12-------
498: l_khrv_tbl(ctr).CC_NO:= get_hdr_attr_rec.CC_NO;
499: l_khrv_tbl(ctr).CC_EXPIRY_DATE:= get_hdr_attr_rec.CC_EXPIRY_DATE;

Line 562: p_init_msg_list => OKC_API.G_FALSE,

558: END IF;
559:
560: OKS_CONTRACT_HDR_PUB.create_header (
561: p_api_version => l_api_version,
562: p_init_msg_list => OKC_API.G_FALSE,
563: x_return_status => l_return_status,
564: x_msg_count => l_msg_count,
565: x_msg_data => l_msg_data,
566: p_khrv_tbl => l_khrv_tbl,

Line 580: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then

576: END IF;
577:
578: END IF;
579:
580: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then
581: RAISE G_EXCEPTION_HALT_VALIDATION;
582: END IF;
583:
584: x_return_status := l_return_status;

Line 590: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

586: EXCEPTION
587: WHEN G_EXCEPTION_HALT_VALIDATION THEN
588: x_return_status := l_return_status;
589: WHEN Others THEN
590: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
591: OKC_API.set_message
592: (
593: G_APP_NAME,
594: G_UNEXPECTED_ERROR,

Line 591: OKC_API.set_message

587: WHEN G_EXCEPTION_HALT_VALIDATION THEN
588: x_return_status := l_return_status;
589: WHEN Others THEN
590: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
591: OKC_API.set_message
592: (
593: G_APP_NAME,
594: G_UNEXPECTED_ERROR,
595: G_SQLCODE_TOKEN,

Line 657: l_return_status := OKC_API.G_RET_STS_SUCCESS;

653: --- End added for price lock
654: l_date_terminated Date;
655:
656: BEGIN
657: l_return_status := OKC_API.G_RET_STS_SUCCESS;
658: l_klnv_tbl.DELETE;
659: x_klnv_tbl.DELETE;
660:
661: FOR get_lines_attr_rec IN get_lines_attr_csr (p_cle_id)

Line 667: l_klnv_tbl(ctr).ID :=OKC_API.G_MISS_NUM;

663: OPEN get_lines_details_csr(P_CLE_ID);
664: FETCH get_lines_details_csr INTO l_date_terminated, l_old_price_list_id;
665: CLOSE get_lines_details_csr;
666:
667: l_klnv_tbl(ctr).ID :=OKC_API.G_MISS_NUM;
668: l_klnv_tbl(ctr).CLE_ID :=p_new_cle_id;
669: l_klnv_tbl(ctr).DNZ_CHR_ID :=p_new_chr_id;
670: l_klnv_tbl(ctr).DISCOUNT_LIST :=get_lines_attr_rec.DISCOUNT_LIST ;
671: l_klnv_tbl(ctr).ACCT_RULE_ID :=get_lines_attr_rec.ACCT_RULE_ID;

Line 706: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then

702: x_return_status => l_return_status,
703: x_msg_count => l_msg_count,
704: x_msg_data => l_msg_data);
705:
706: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then
707: RAISE G_EXCEPTION_HALT_VALIDATION;
708: END IF;
709: */
710: l_klnv_tbl(ctr).LOCKED_PRICE_LIST_ID:= l_locked_price_list_id;

Line 833: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then

829: p_validate_yn => 'N' );
830:
831: END IF; --IF l_rev_tbl.COUNT >0
832:
833: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then
834: RAISE G_EXCEPTION_HALT_VALIDATION;
835: END IF;
836:
837: x_return_status := l_return_status;

Line 843: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

839: EXCEPTION
840: WHEN G_EXCEPTION_HALT_VALIDATION THEN
841: x_return_status := l_return_status;
842: WHEN Others THEN
843: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
844: OKC_API.set_message
845: (
846: G_APP_NAME,
847: G_UNEXPECTED_ERROR,

Line 844: OKC_API.set_message

840: WHEN G_EXCEPTION_HALT_VALIDATION THEN
841: x_return_status := l_return_status;
842: WHEN Others THEN
843: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
844: OKC_API.set_message
845: (
846: G_APP_NAME,
847: G_UNEXPECTED_ERROR,
848: G_SQLCODE_TOKEN,

Line 876: l_return_status Varchar2(1) := OKC_API.G_RET_STS_SUCCESS;

872: x_msg_data OUT NOCOPY Varchar2
873: )
874: IS
875:
876: l_return_status Varchar2(1) := OKC_API.G_RET_STS_SUCCESS;
877: l_api_name CONSTANT VARCHAR2(30) := 'Update_Hdr_Amount';
878: l_api_version Number := 1.0;
879:
880: --Contract Header

Line 894: l_return_status := OKC_API.START_ACTIVITY(l_api_name

890: l_hdr_amount Number;
891:
892: BEGIN
893:
894: l_return_status := OKC_API.START_ACTIVITY(l_api_name
895: ,p_init_msg_list
896: ,'_PUB'
897: ,x_return_status
898: );

Line 899: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

895: ,p_init_msg_list
896: ,'_PUB'
897: ,x_return_status
898: );
899: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
900: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
901: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
902: RAISE OKC_API.G_EXCEPTION_ERROR;
903: END IF;

Line 900: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

896: ,'_PUB'
897: ,x_return_status
898: );
899: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
900: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
901: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
902: RAISE OKC_API.G_EXCEPTION_ERROR;
903: END IF;
904:

Line 901: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

897: ,x_return_status
898: );
899: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
900: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
901: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
902: RAISE OKC_API.G_EXCEPTION_ERROR;
903: END IF;
904:
905: Open l_line_csr;

Line 902: RAISE OKC_API.G_EXCEPTION_ERROR;

898: );
899: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
900: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
901: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
902: RAISE OKC_API.G_EXCEPTION_ERROR;
903: END IF;
904:
905: Open l_line_csr;
906: Fetch l_line_csr into l_hdr_amount;

Line 924: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

920: p_chrv_tbl => l_chrv_tbl_in,
921: x_chrv_tbl => l_chrv_tbl_out
922: );
923:
924: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
925: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
926: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
927: RAISE OKC_API.G_EXCEPTION_ERROR;
928: END IF;

Line 925: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

921: x_chrv_tbl => l_chrv_tbl_out
922: );
923:
924: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
925: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
926: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
927: RAISE OKC_API.G_EXCEPTION_ERROR;
928: END IF;
929:

Line 926: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

922: );
923:
924: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
925: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
926: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
927: RAISE OKC_API.G_EXCEPTION_ERROR;
928: END IF;
929:
930: OKC_API.END_ACTIVITY(x_msg_count,x_msg_data);

Line 927: RAISE OKC_API.G_EXCEPTION_ERROR;

923:
924: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
925: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
926: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
927: RAISE OKC_API.G_EXCEPTION_ERROR;
928: END IF;
929:
930: OKC_API.END_ACTIVITY(x_msg_count,x_msg_data);
931:

Line 930: OKC_API.END_ACTIVITY(x_msg_count,x_msg_data);

926: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
927: RAISE OKC_API.G_EXCEPTION_ERROR;
928: END IF;
929:
930: OKC_API.END_ACTIVITY(x_msg_count,x_msg_data);
931:
932: x_return_status := l_return_status;
933:
934: EXCEPTION

Line 935: WHEN OKC_API.G_EXCEPTION_ERROR THEN

931:
932: x_return_status := l_return_status;
933:
934: EXCEPTION
935: WHEN OKC_API.G_EXCEPTION_ERROR THEN
936: x_return_status := OKC_API.HANDLE_EXCEPTIONS
937: (l_api_name,
938: G_PKG_NAME,
939: 'OKC_API.G_RET_STS_ERROR',

Line 936: x_return_status := OKC_API.HANDLE_EXCEPTIONS

932: x_return_status := l_return_status;
933:
934: EXCEPTION
935: WHEN OKC_API.G_EXCEPTION_ERROR THEN
936: x_return_status := OKC_API.HANDLE_EXCEPTIONS
937: (l_api_name,
938: G_PKG_NAME,
939: 'OKC_API.G_RET_STS_ERROR',
940: x_msg_count,

Line 939: 'OKC_API.G_RET_STS_ERROR',

935: WHEN OKC_API.G_EXCEPTION_ERROR THEN
936: x_return_status := OKC_API.HANDLE_EXCEPTIONS
937: (l_api_name,
938: G_PKG_NAME,
939: 'OKC_API.G_RET_STS_ERROR',
940: x_msg_count,
941: x_msg_data,
942: '_PUB');
943: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 943: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

939: 'OKC_API.G_RET_STS_ERROR',
940: x_msg_count,
941: x_msg_data,
942: '_PUB');
943: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
944: x_return_status := OKC_API.HANDLE_EXCEPTIONS
945: (l_api_name,
946: G_PKG_NAME,
947: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 944: x_return_status := OKC_API.HANDLE_EXCEPTIONS

940: x_msg_count,
941: x_msg_data,
942: '_PUB');
943: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
944: x_return_status := OKC_API.HANDLE_EXCEPTIONS
945: (l_api_name,
946: G_PKG_NAME,
947: 'OKC_API.G_RET_STS_UNEXP_ERROR',
948: x_msg_count,

Line 947: 'OKC_API.G_RET_STS_UNEXP_ERROR',

943: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
944: x_return_status := OKC_API.HANDLE_EXCEPTIONS
945: (l_api_name,
946: G_PKG_NAME,
947: 'OKC_API.G_RET_STS_UNEXP_ERROR',
948: x_msg_count,
949: x_msg_data,
950: '_PUB');
951: WHEN OTHERS THEN

Line 952: x_return_status := OKC_API.HANDLE_EXCEPTIONS

948: x_msg_count,
949: x_msg_data,
950: '_PUB');
951: WHEN OTHERS THEN
952: x_return_status := OKC_API.HANDLE_EXCEPTIONS
953: (l_api_name,
954: G_PKG_NAME,
955: 'OTHERS',
956: x_msg_count,

Line 992: l_error_tbl OKC_API.ERROR_TBL_TYPE;

988: l_sll_exist boolean := false;
989: l_slh_exist boolean := false;
990: l_strlvl_tbl OKS_SLL_PVT.sllv_tbl_type;
991: x_strlvl_tbl OKS_SLL_PVT.sllv_tbl_type;
992: l_error_tbl OKC_API.ERROR_TBL_TYPE;
993:
994: CURSOR strlvl_csr (p_chr_id NUMBER) IS
995: SELECT ID
996: ,CHR_ID

Line 1024: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1020: WHERE id = p_chr_id;
1021:
1022:
1023: Begin
1024: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1025: l_tbl_ctr := 0;
1026: Open hdr_csr(p_chr_id);
1027: Fetch hdr_csr into l_start_date;
1028: Close hdr_csr;

Line 1036: l_strlvl_tbl(l_tbl_ctr).ID :=OKC_API.G_MISS_NUM;

1032:
1033: For strlvl_rec in strlvl_csr (p_chr_id)
1034: Loop
1035: l_tbl_ctr := l_tbl_ctr + 1;
1036: l_strlvl_tbl(l_tbl_ctr).ID :=OKC_API.G_MISS_NUM;
1037: l_strlvl_tbl(l_tbl_ctr).CHR_ID :=p_new_chr_id;
1038: l_strlvl_tbl(l_tbl_ctr).CLE_ID :=NULL;
1039: l_strlvl_tbl(l_tbl_ctr).DNZ_CHR_ID :=p_new_chr_id;
1040: l_strlvl_tbl(l_tbl_ctr).SEQUENCE_NO :=strlvl_rec.SEQUENCE_NO;

Line 1060: p_init_msg_list => OKC_API.G_FALSE,

1056: If l_strlvl_tbl.count > 0 Then
1057:
1058: oks_contract_sll_pub.create_sll (
1059: p_api_version => l_api_version,
1060: p_init_msg_list => OKC_API.G_FALSE,
1061: x_return_status => l_return_status,
1062: x_msg_count => l_msg_count,
1063: x_msg_data => l_msg_data,
1064: p_sllv_tbl => l_strlvl_tbl,

Line 1070: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS Then

1066: p_validate_yn => 'N');
1067:
1068: x_return_status := l_return_status;
1069:
1070: IF x_return_status <> OKC_API.G_RET_STS_SUCCESS Then
1071: RAISE G_EXCEPTION_HALT_VALIDATION;
1072: END IF;
1073:
1074:

Line 1081: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then

1077: x_return_status => l_return_status,
1078: x_msg_count => l_msg_count,
1079: x_msg_data => l_msg_data);
1080:
1081: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then
1082: RAISE G_EXCEPTION_HALT_VALIDATION;
1083: END IF;
1084:
1085: x_return_status := l_return_status;

Line 1097: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1093: x_return_status := l_return_status;
1094: Null;
1095:
1096: WHEN OTHERS THEN
1097: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1098: OKC_API.set_message
1099: (G_APP_NAME,
1100: G_UNEXPECTED_ERROR,
1101: G_SQLCODE_TOKEN,

Line 1098: OKC_API.set_message

1094: Null;
1095:
1096: WHEN OTHERS THEN
1097: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1098: OKC_API.set_message
1099: (G_APP_NAME,
1100: G_UNEXPECTED_ERROR,
1101: G_SQLCODE_TOKEN,
1102: SQLCODE,

Line 1149: l_return_status := OKC_API.G_RET_STS_SUCCESS;

1145: FROM oks_rev_distributions
1146: WHERE cle_id = cleId and chr_id = chrId;
1147:
1148: BEGIN
1149: l_return_status := OKC_API.G_RET_STS_SUCCESS;
1150: l_rev_tbl.DELETE;
1151: --get revenue distribution record and copy
1152: FOR get_revenue_dist_rule_rec IN get_revenue_dist_rule_csr (p_cle_id)
1153: LOOP

Line 1159: l_rev_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;

1155: l_rev_tbl(ctr).cle_id := p_new_cle_id;
1156: l_rev_tbl(ctr).account_class := get_revenue_dist_rule_rec.account_class;
1157: l_rev_tbl(ctr).code_combination_id := get_revenue_dist_rule_rec.code_combination_id;
1158: l_rev_tbl(ctr).percent := get_revenue_dist_rule_rec.percent;
1159: l_rev_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1160: l_rev_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1161: l_rev_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1162: l_rev_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1163: l_rev_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;

Line 1160: l_rev_tbl(ctr).created_by := OKC_API.G_MISS_NUM;

1156: l_rev_tbl(ctr).account_class := get_revenue_dist_rule_rec.account_class;
1157: l_rev_tbl(ctr).code_combination_id := get_revenue_dist_rule_rec.code_combination_id;
1158: l_rev_tbl(ctr).percent := get_revenue_dist_rule_rec.percent;
1159: l_rev_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1160: l_rev_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1161: l_rev_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1162: l_rev_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1163: l_rev_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1164: l_rev_tbl(ctr).last_update_login := OKC_API.G_MISS_NUM;

Line 1161: l_rev_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;

1157: l_rev_tbl(ctr).code_combination_id := get_revenue_dist_rule_rec.code_combination_id;
1158: l_rev_tbl(ctr).percent := get_revenue_dist_rule_rec.percent;
1159: l_rev_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1160: l_rev_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1161: l_rev_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1162: l_rev_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1163: l_rev_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1164: l_rev_tbl(ctr).last_update_login := OKC_API.G_MISS_NUM;
1165:

Line 1162: l_rev_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;

1158: l_rev_tbl(ctr).percent := get_revenue_dist_rule_rec.percent;
1159: l_rev_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1160: l_rev_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1161: l_rev_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1162: l_rev_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1163: l_rev_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1164: l_rev_tbl(ctr).last_update_login := OKC_API.G_MISS_NUM;
1165:
1166: ctr := ctr+1;

Line 1163: l_rev_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;

1159: l_rev_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1160: l_rev_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1161: l_rev_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1162: l_rev_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1163: l_rev_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1164: l_rev_tbl(ctr).last_update_login := OKC_API.G_MISS_NUM;
1165:
1166: ctr := ctr+1;
1167: END LOOP;

Line 1164: l_rev_tbl(ctr).last_update_login := OKC_API.G_MISS_NUM;

1160: l_rev_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1161: l_rev_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1162: l_rev_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1163: l_rev_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1164: l_rev_tbl(ctr).last_update_login := OKC_API.G_MISS_NUM;
1165:
1166: ctr := ctr+1;
1167: END LOOP;
1168:

Line 1201: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then

1197: x_rdsv_tbl => x_rev_tbl);
1198: End If;
1199: END IF; --IF l_rev_tbl.COUNT >0
1200:
1201: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then
1202: RAISE G_EXCEPTION_HALT_VALIDATION;
1203: END IF;
1204:
1205: x_return_status := l_return_status;

Line 1211: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1207: EXCEPTION
1208: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1209: x_return_status := l_return_status;
1210: WHEN Others THEN
1211: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1212: OKC_API.set_message
1213: (
1214: G_APP_NAME,
1215: G_UNEXPECTED_ERROR,

Line 1212: OKC_API.set_message

1208: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1209: x_return_status := l_return_status;
1210: WHEN Others THEN
1211: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1212: OKC_API.set_message
1213: (
1214: G_APP_NAME,
1215: G_UNEXPECTED_ERROR,
1216: G_SQLCODE_TOKEN,

Line 1260: l_return_status := OKC_API.G_RET_STS_SUCCESS;

1256: WHERE chr_id = p_chr_id
1257: AND cle_id IS NULL;
1258:
1259: BEGIN
1260: l_return_status := OKC_API.G_RET_STS_SUCCESS;
1261: l_scrv_tbl.DELETE;
1262: x_scrv_tbl.DELETE;
1263:
1264: --get sale credits record and copy

Line 1267: l_scrv_tbl(ctr).id := OKC_API.G_MISS_NUM;

1263:
1264: --get sale credits record and copy
1265: FOR get_sales_credits_rec IN get_sales_credits_csr (p_chr_id)
1266: LOOP
1267: l_scrv_tbl(ctr).id := OKC_API.G_MISS_NUM;
1268: l_scrv_tbl(ctr).chr_id := p_new_chr_id;
1269: l_scrv_tbl(ctr).cle_id := OKC_API.G_MISS_NUM;
1270: l_scrv_tbl(ctr).percent := get_sales_credits_rec.percent;
1271: l_scrv_tbl(ctr).ctc_id := get_sales_credits_rec.ctc_id;

Line 1269: l_scrv_tbl(ctr).cle_id := OKC_API.G_MISS_NUM;

1265: FOR get_sales_credits_rec IN get_sales_credits_csr (p_chr_id)
1266: LOOP
1267: l_scrv_tbl(ctr).id := OKC_API.G_MISS_NUM;
1268: l_scrv_tbl(ctr).chr_id := p_new_chr_id;
1269: l_scrv_tbl(ctr).cle_id := OKC_API.G_MISS_NUM;
1270: l_scrv_tbl(ctr).percent := get_sales_credits_rec.percent;
1271: l_scrv_tbl(ctr).ctc_id := get_sales_credits_rec.ctc_id;
1272: l_scrv_tbl(ctr).sales_group_id := get_sales_credits_rec.sales_group_id;
1273: l_scrv_tbl(ctr).sales_credit_type_id1 := get_sales_credits_rec.sales_credit_type_id1;

Line 1275: l_scrv_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;

1271: l_scrv_tbl(ctr).ctc_id := get_sales_credits_rec.ctc_id;
1272: l_scrv_tbl(ctr).sales_group_id := get_sales_credits_rec.sales_group_id;
1273: l_scrv_tbl(ctr).sales_credit_type_id1 := get_sales_credits_rec.sales_credit_type_id1;
1274: l_scrv_tbl(ctr).sales_credit_type_id2 := get_sales_credits_rec.sales_credit_type_id2;
1275: l_scrv_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1276: l_scrv_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1277: l_scrv_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1278: l_scrv_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1279: l_scrv_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;

Line 1276: l_scrv_tbl(ctr).created_by := OKC_API.G_MISS_NUM;

1272: l_scrv_tbl(ctr).sales_group_id := get_sales_credits_rec.sales_group_id;
1273: l_scrv_tbl(ctr).sales_credit_type_id1 := get_sales_credits_rec.sales_credit_type_id1;
1274: l_scrv_tbl(ctr).sales_credit_type_id2 := get_sales_credits_rec.sales_credit_type_id2;
1275: l_scrv_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1276: l_scrv_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1277: l_scrv_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1278: l_scrv_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1279: l_scrv_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1280: ctr := ctr+1;

Line 1277: l_scrv_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;

1273: l_scrv_tbl(ctr).sales_credit_type_id1 := get_sales_credits_rec.sales_credit_type_id1;
1274: l_scrv_tbl(ctr).sales_credit_type_id2 := get_sales_credits_rec.sales_credit_type_id2;
1275: l_scrv_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1276: l_scrv_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1277: l_scrv_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1278: l_scrv_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1279: l_scrv_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1280: ctr := ctr+1;
1281: END LOOP;

Line 1278: l_scrv_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;

1274: l_scrv_tbl(ctr).sales_credit_type_id2 := get_sales_credits_rec.sales_credit_type_id2;
1275: l_scrv_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1276: l_scrv_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1277: l_scrv_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1278: l_scrv_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1279: l_scrv_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1280: ctr := ctr+1;
1281: END LOOP;
1282:

Line 1279: l_scrv_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;

1275: l_scrv_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1276: l_scrv_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1277: l_scrv_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1278: l_scrv_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1279: l_scrv_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1280: ctr := ctr+1;
1281: END LOOP;
1282:
1283: IF l_scrv_tbl.COUNT >0

Line 1295: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then

1291: x_scrv_tbl => x_scrv_tbl);
1292:
1293: END IF; --IF l_rev_tbl.COUNT >0
1294:
1295: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then
1296: RAISE G_EXCEPTION_HALT_VALIDATION;
1297: END IF;
1298:
1299: x_return_status := l_return_status;

Line 1305: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1301: EXCEPTION
1302: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1303: x_return_status := l_return_status;
1304: WHEN Others THEN
1305: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1306: OKC_API.set_message
1307: (
1308: G_APP_NAME,
1309: G_UNEXPECTED_ERROR,

Line 1306: OKC_API.set_message

1302: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1303: x_return_status := l_return_status;
1304: WHEN Others THEN
1305: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1306: OKC_API.set_message
1307: (
1308: G_APP_NAME,
1309: G_UNEXPECTED_ERROR,
1310: G_SQLCODE_TOKEN,

Line 1366: l_return_status := OKC_API.G_RET_STS_SUCCESS;

1362: WHERE cle_id = p_new_cle_id;
1363: -------
1364:
1365: BEGIN
1366: l_return_status := OKC_API.G_RET_STS_SUCCESS;
1367: l_scrv_tbl.DELETE;
1368: x_scrv_tbl.DELETE;
1369:
1370: --get sales credits record and copy

Line 1377: l_scrv_tbl(ctr).id := OKC_API.G_MISS_NUM;

1373: -- Don't add sales credit to a line that already has one.
1374: Open sales_credit_exist_csr(p_new_cle_id);
1375: Fetch sales_credit_exist_csr into l_exist;
1376: If sales_credit_exist_csr%NOTFOUND Then
1377: l_scrv_tbl(ctr).id := OKC_API.G_MISS_NUM;
1378: l_scrv_tbl(ctr).chr_id := p_new_chr_id;
1379: l_scrv_tbl(ctr).cle_id := p_new_cle_id;
1380: l_scrv_tbl(ctr).percent := get_sales_credits_rec.percent;
1381: l_scrv_tbl(ctr).ctc_id := get_sales_credits_rec.ctc_id;

Line 1385: l_scrv_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;

1381: l_scrv_tbl(ctr).ctc_id := get_sales_credits_rec.ctc_id;
1382: l_scrv_tbl(ctr).sales_group_id := get_sales_credits_rec.sales_group_id;
1383: l_scrv_tbl(ctr).sales_credit_type_id1 := get_sales_credits_rec.sales_credit_type_id1;
1384: l_scrv_tbl(ctr).sales_credit_type_id2 := get_sales_credits_rec.sales_credit_type_id2;
1385: l_scrv_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1386: l_scrv_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1387: l_scrv_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1388: l_scrv_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1389: l_scrv_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;

Line 1386: l_scrv_tbl(ctr).created_by := OKC_API.G_MISS_NUM;

1382: l_scrv_tbl(ctr).sales_group_id := get_sales_credits_rec.sales_group_id;
1383: l_scrv_tbl(ctr).sales_credit_type_id1 := get_sales_credits_rec.sales_credit_type_id1;
1384: l_scrv_tbl(ctr).sales_credit_type_id2 := get_sales_credits_rec.sales_credit_type_id2;
1385: l_scrv_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1386: l_scrv_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1387: l_scrv_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1388: l_scrv_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1389: l_scrv_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1390: ctr := ctr+1;

Line 1387: l_scrv_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;

1383: l_scrv_tbl(ctr).sales_credit_type_id1 := get_sales_credits_rec.sales_credit_type_id1;
1384: l_scrv_tbl(ctr).sales_credit_type_id2 := get_sales_credits_rec.sales_credit_type_id2;
1385: l_scrv_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1386: l_scrv_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1387: l_scrv_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1388: l_scrv_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1389: l_scrv_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1390: ctr := ctr+1;
1391: End If;

Line 1388: l_scrv_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;

1384: l_scrv_tbl(ctr).sales_credit_type_id2 := get_sales_credits_rec.sales_credit_type_id2;
1385: l_scrv_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1386: l_scrv_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1387: l_scrv_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1388: l_scrv_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1389: l_scrv_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1390: ctr := ctr+1;
1391: End If;
1392: Close sales_credit_exist_csr;

Line 1389: l_scrv_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;

1385: l_scrv_tbl(ctr).object_version_number := OKC_API.G_MISS_NUM;
1386: l_scrv_tbl(ctr).created_by := OKC_API.G_MISS_NUM;
1387: l_scrv_tbl(ctr).creation_date := OKC_API.G_MISS_DATE;
1388: l_scrv_tbl(ctr).last_updated_by := OKC_API.G_MISS_NUM;
1389: l_scrv_tbl(ctr).last_update_date := OKC_API.G_MISS_DATE;
1390: ctr := ctr+1;
1391: End If;
1392: Close sales_credit_exist_csr;
1393:

Line 1409: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then

1405: x_scrv_tbl => x_scrv_tbl);
1406:
1407: END IF; --IF l_rev_tbl.COUNT >0
1408:
1409: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then
1410: RAISE G_EXCEPTION_HALT_VALIDATION;
1411: END IF;
1412:
1413: x_return_status := l_return_status;

Line 1419: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1415: EXCEPTION
1416: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1417: x_return_status := l_return_status;
1418: WHEN Others THEN
1419: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1420: OKC_API.set_message
1421: (
1422: G_APP_NAME,
1423: G_UNEXPECTED_ERROR,

Line 1420: OKC_API.set_message

1416: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1417: x_return_status := l_return_status;
1418: WHEN Others THEN
1419: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1420: OKC_API.set_message
1421: (
1422: G_APP_NAME,
1423: G_UNEXPECTED_ERROR,
1424: G_SQLCODE_TOKEN,

Line 1444: l_init_msg_list VARCHAR2(3) :=OKC_API.G_FALSE;

1440: p_intent IN VARCHAR2 DEFAULT NULL,
1441: x_return_status OUT NOCOPY VARCHAR2) IS
1442:
1443: l_api_version NUMBER := 1.0;
1444: l_init_msg_list VARCHAR2(3) :=OKC_API.G_FALSE;
1445: l_return_status VARCHAR2(1) := 'S';
1446: l_msg_count NUMBER;
1447: l_msg_data VARCHAR2(2000);
1448: l_intent VARCHAR2(90);

Line 1498: l_return_status := OKC_API.G_RET_STS_SUCCESS;

1494: WHERE b.cle_id = a.id and a.lse_id = 9 and b.object1_id1 = oldItemInst
1495: AND a.dnz_chr_id = p_new_chr_id;
1496:
1497: Begin
1498: l_return_status := OKC_API.G_RET_STS_SUCCESS;
1499: l_intent := p_intent; --'RENEW' or NULL
1500: -- Renewed contracts have a record in okc_operation_lines
1501: If p_intent is null then
1502: open got_renewed(p_new_chr_id);

Line 1525: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

1521: new_topline_rec.old_line_id,
1522: new_topline_rec.id,
1523: l_intent
1524: );
1525: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1526: RAISE G_EXCEPTION_HALT_VALIDATION;
1527: END IF;
1528: If l_intent = 'COPY' then
1529: Open get_old_chr_id;

Line 1550: if (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then

1546: l_msg_count,
1547: l_msg_data,
1548: l_cimv_rec,
1549: x_cimv_rec);
1550: if (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then
1551: RAISE G_EXCEPTION_HALT_VALIDATION;
1552: end if;
1553: End Loop;
1554:

Line 1574: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

1570: new_topline_rec.old_line_id,
1571: new_topline_rec.id,
1572: l_intent
1573: );
1574: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1575: RAISE G_EXCEPTION_HALT_VALIDATION;
1576: END IF;
1577: If l_intent = 'COPY' then
1578: Open get_old_chr_id;

Line 1599: if (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then

1595: l_msg_count,
1596: l_msg_data,
1597: l_cimv_rec,
1598: x_cimv_rec);
1599: if (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then
1600: RAISE G_EXCEPTION_HALT_VALIDATION;
1601: end if;
1602: End Loop;
1603:

Line 1616: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1612: EXCEPTION
1613: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1614: x_return_status := l_return_status;
1615: WHEN Others THEN
1616: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1617: OKC_API.set_message
1618: (
1619: G_APP_NAME,
1620: G_UNEXPECTED_ERROR,

Line 1617: OKC_API.set_message

1613: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1614: x_return_status := l_return_status;
1615: WHEN Others THEN
1616: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1617: OKC_API.set_message
1618: (
1619: G_APP_NAME,
1620: G_UNEXPECTED_ERROR,
1621: G_SQLCODE_TOKEN,

Line 1656: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;

1652: WHERE okc.id=p_cle_id
1653: AND okc.id=oks.cle_id;
1654:
1655: l_tbl_ctr NUMBER;
1656: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;
1657: l_msg_count Number;
1658: l_msg_data Varchar2(2000);
1659: l_api_version Number := 1;
1660: l_init_msg_list Varchar2(1) := 'F';

Line 1739: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;

1735: IS
1736:
1737:
1738: l_tbl_ctr NUMBER;
1739: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;
1740: l_msg_count Number;
1741: l_msg_data Varchar2(2000);
1742: l_api_version Number := 1;
1743: l_init_msg_list Varchar2(1) := 'F';

Line 1804: l_return_status := OKC_API.G_RET_STS_SUCCESS;

1800:
1801: OKS_RENEW_PVT.Debug_Log(p_program_name => 'OKSCOPY',
1802: p_perf_msg =>'Inside get_strlvls procedure ');
1803:
1804: l_return_status := OKC_API.G_RET_STS_SUCCESS;
1805:
1806: l_tbl_ctr := 0;
1807: l_strlvl_tbl.delete;
1808: l_bil_sch_out_tbl.delete;

Line 1837: l_strlvl_tbl(l_tbl_ctr).id :=OKC_API.G_MISS_NUM;

1833: FOR strlvl_rec IN strlvl_csr (l_old_cle_id)
1834: LOOP
1835: l_tbl_ctr := l_tbl_ctr + 1;
1836:
1837: l_strlvl_tbl(l_tbl_ctr).id :=OKC_API.G_MISS_NUM;
1838: l_strlvl_tbl(l_tbl_ctr).CHR_ID :=OKC_API.G_MISS_NUM;
1839: l_strlvl_tbl(l_tbl_ctr).CLE_ID :=p_cle_id;
1840: l_strlvl_tbl(l_tbl_ctr).DNZ_CHR_ID :=P_CHR_ID;
1841: l_strlvl_tbl(l_tbl_ctr).SEQUENCE_NO :=strlvl_rec.SEQUENCE_NO;

Line 1838: l_strlvl_tbl(l_tbl_ctr).CHR_ID :=OKC_API.G_MISS_NUM;

1834: LOOP
1835: l_tbl_ctr := l_tbl_ctr + 1;
1836:
1837: l_strlvl_tbl(l_tbl_ctr).id :=OKC_API.G_MISS_NUM;
1838: l_strlvl_tbl(l_tbl_ctr).CHR_ID :=OKC_API.G_MISS_NUM;
1839: l_strlvl_tbl(l_tbl_ctr).CLE_ID :=p_cle_id;
1840: l_strlvl_tbl(l_tbl_ctr).DNZ_CHR_ID :=P_CHR_ID;
1841: l_strlvl_tbl(l_tbl_ctr).SEQUENCE_NO :=strlvl_rec.SEQUENCE_NO;
1842: l_strlvl_tbl(l_tbl_ctr).UOM_CODE :=strlvl_rec.UOM_CODE;

Line 1876: l_klnv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;

1872: l_klnv_tbl(1).dnz_chr_id := get_ccr_rec.dnz_chr_id;
1873: l_klnv_tbl(1).CC_BANK_ACCT_ID :=NULL;
1874: l_klnv_tbl(1).CC_AUTH_CODE :=NULL;
1875: l_klnv_tbl(1).object_version_number := get_ccr_rec.object_version_number;
1876: l_klnv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
1877: l_klnv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
1878: l_klnv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
1879: l_klnv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
1880: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;

Line 1877: l_klnv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;

1873: l_klnv_tbl(1).CC_BANK_ACCT_ID :=NULL;
1874: l_klnv_tbl(1).CC_AUTH_CODE :=NULL;
1875: l_klnv_tbl(1).object_version_number := get_ccr_rec.object_version_number;
1876: l_klnv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
1877: l_klnv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
1878: l_klnv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
1879: l_klnv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
1880: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
1881:

Line 1878: l_klnv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;

1874: l_klnv_tbl(1).CC_AUTH_CODE :=NULL;
1875: l_klnv_tbl(1).object_version_number := get_ccr_rec.object_version_number;
1876: l_klnv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
1877: l_klnv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
1878: l_klnv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
1879: l_klnv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
1880: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
1881:
1882: OKS_CONTRACT_LINE_PUB.update_line (

Line 1879: l_klnv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;

1875: l_klnv_tbl(1).object_version_number := get_ccr_rec.object_version_number;
1876: l_klnv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
1877: l_klnv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
1878: l_klnv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
1879: l_klnv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
1880: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
1881:
1882: OKS_CONTRACT_LINE_PUB.update_line (
1883: p_api_version => l_api_version,

Line 1880: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;

1876: l_klnv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
1877: l_klnv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
1878: l_klnv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
1879: l_klnv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
1880: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
1881:
1882: OKS_CONTRACT_LINE_PUB.update_line (
1883: p_api_version => l_api_version,
1884: p_init_msg_list => OKC_API.G_FALSE,

Line 1884: p_init_msg_list => OKC_API.G_FALSE,

1880: l_klnv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
1881:
1882: OKS_CONTRACT_LINE_PUB.update_line (
1883: p_api_version => l_api_version,
1884: p_init_msg_list => OKC_API.G_FALSE,
1885: x_return_status => l_return_status,
1886: x_msg_count => l_msg_count,
1887: x_msg_data => l_msg_data,
1888: p_klnv_tbl => l_klnv_tbl,

Line 1978: l_return_status := OKC_API.G_RET_STS_SUCCESS;

1974:
1975: l_invoice_rule_id := NULL;
1976: l_time_value :=NULL;
1977:
1978: l_return_status := OKC_API.G_RET_STS_SUCCESS;
1979:
1980: FOR get_adv_arr_rec IN get_adv_arr_csr (p_cle_id)
1981: LOOP
1982: l_invoice_rule_id := get_adv_arr_rec.inv_rule_id;

Line 2024: l_return_status := OKC_API.G_RET_STS_SUCCESS;

2020: FETCH Subline_Billsch_type INTO l_subline_billsch_type;
2021: CLOSE Subline_Billsch_type;
2022:
2023: IF l_subline_billsch_type ='P' THEN
2024: l_return_status := OKC_API.G_RET_STS_SUCCESS;
2025: If p_duration_match = 'T' and p_bill_profile_flag is null Then
2026:
2027: get_strlvls
2028: (p_chr_id => p_chr_id,

Line 2218: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2214: l_old_duration NUMBER := 0;
2215: l_old_time VARCHAR2(450) ;
2216: l_renew_duration NUMBER := 0;
2217: l_renew_time VARCHAR2(450) ;
2218: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2219:
2220: BEGIN
2221: x_flag := 'T';
2222: OPEN l_chr_renew_csr (p_new_chr_id);

Line 2284: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2280: END IF;
2281: x_return_status := l_return_status;
2282: Exception
2283: WHEN Others THEN
2284: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2285: OKC_API.set_message(
2286: G_APP_NAME,
2287: G_UNEXPECTED_ERROR,
2288: G_SQLCODE_TOKEN,

Line 2285: OKC_API.set_message(

2281: x_return_status := l_return_status;
2282: Exception
2283: WHEN Others THEN
2284: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2285: OKC_API.set_message(
2286: G_APP_NAME,
2287: G_UNEXPECTED_ERROR,
2288: G_SQLCODE_TOKEN,
2289: SQLCODE,

Line 2349: l_error_tbl okc_api.error_tbl_type;

2345: --get_qto_rec get_qto%rowtype;
2346: get_cpl_rec get_cpl%rowtype;
2347: l_khrv_tbl oks_khr_pvt.khrv_tbl_type;
2348: x_khrv_tbl oks_khr_pvt.khrv_tbl_type;
2349: l_error_tbl okc_api.error_tbl_type;
2350: l_chrv_tbl_in okc_contract_pub.chrv_tbl_type;
2351: l_chrv_tbl_out okc_contract_pub.chrv_tbl_type;
2352: l_clev_rec_in okc_contract_pub.clev_rec_type;
2353: l_clev_rec_out okc_contract_pub.clev_rec_type;

Line 2362: l_return_status := OKC_API.G_RET_STS_SUCCESS;

2358: l_cpl_id NUMBER;
2359: l_contact_id NUMBER;
2360:
2361: Begin
2362: l_return_status := OKC_API.G_RET_STS_SUCCESS;
2363:
2364: l_chrv_tbl_in(1).id := p_chr_id;
2365: l_chrv_tbl_in(1).cust_acct_id := NULL;
2366: l_chrv_tbl_in(1).Bill_to_site_use_id := NULL;

Line 2381: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

2377: x_msg_data => l_msg_data,
2378: p_chrv_tbl => l_chrv_tbl_in,
2379: x_chrv_tbl => l_chrv_tbl_out
2380: );
2381: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
2382: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2383: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
2384: RAISE OKC_API.G_EXCEPTION_ERROR;
2385: END IF;

Line 2382: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2378: p_chrv_tbl => l_chrv_tbl_in,
2379: x_chrv_tbl => l_chrv_tbl_out
2380: );
2381: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
2382: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2383: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
2384: RAISE OKC_API.G_EXCEPTION_ERROR;
2385: END IF;
2386:

Line 2383: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

2379: x_chrv_tbl => l_chrv_tbl_out
2380: );
2381: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
2382: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2383: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
2384: RAISE OKC_API.G_EXCEPTION_ERROR;
2385: END IF;
2386:
2387:

Line 2384: RAISE OKC_API.G_EXCEPTION_ERROR;

2380: );
2381: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
2382: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2383: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
2384: RAISE OKC_API.G_EXCEPTION_ERROR;
2385: END IF;
2386:
2387:
2388: For get_qto_rec In get_qto(p_chr_id)

Line 2409: l_khrv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;

2405: l_khrv_tbl(1).renewal_po_number :=NULL;
2406: l_khrv_tbl(1).renewal_po_required :=NULL;
2407: l_khrv_tbl(1).renewal_po_used :=NULL;
2408: l_khrv_tbl(1).OBJECT_VERSION_NUMBER :=get_qto_rec.OBJECT_VERSION_NUMBER;
2409: l_khrv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
2410: l_khrv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
2411: l_khrv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
2412: l_khrv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
2413: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;

Line 2410: l_khrv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;

2406: l_khrv_tbl(1).renewal_po_required :=NULL;
2407: l_khrv_tbl(1).renewal_po_used :=NULL;
2408: l_khrv_tbl(1).OBJECT_VERSION_NUMBER :=get_qto_rec.OBJECT_VERSION_NUMBER;
2409: l_khrv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
2410: l_khrv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
2411: l_khrv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
2412: l_khrv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
2413: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
2414:

Line 2411: l_khrv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;

2407: l_khrv_tbl(1).renewal_po_used :=NULL;
2408: l_khrv_tbl(1).OBJECT_VERSION_NUMBER :=get_qto_rec.OBJECT_VERSION_NUMBER;
2409: l_khrv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
2410: l_khrv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
2411: l_khrv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
2412: l_khrv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
2413: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
2414:
2415: OKS_CONTRACT_HDR_PUB.update_header (

Line 2412: l_khrv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;

2408: l_khrv_tbl(1).OBJECT_VERSION_NUMBER :=get_qto_rec.OBJECT_VERSION_NUMBER;
2409: l_khrv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
2410: l_khrv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
2411: l_khrv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
2412: l_khrv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
2413: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
2414:
2415: OKS_CONTRACT_HDR_PUB.update_header (
2416: p_api_version => l_api_version,

Line 2413: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;

2409: l_khrv_tbl(1).CREATED_BY :=OKC_API.G_MISS_NUM;
2410: l_khrv_tbl(1).CREATION_DATE :=OKC_API.G_MISS_DATE;
2411: l_khrv_tbl(1).LAST_UPDATED_BY :=OKC_API.G_MISS_NUM;
2412: l_khrv_tbl(1).LAST_UPDATE_DATE :=OKC_API.G_MISS_DATE;
2413: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
2414:
2415: OKS_CONTRACT_HDR_PUB.update_header (
2416: p_api_version => l_api_version,
2417: p_init_msg_list => OKC_API.G_FALSE,

Line 2417: p_init_msg_list => OKC_API.G_FALSE,

2413: l_khrv_tbl(1).LAST_UPDATE_LOGIN :=OKC_API.G_MISS_NUM;
2414:
2415: OKS_CONTRACT_HDR_PUB.update_header (
2416: p_api_version => l_api_version,
2417: p_init_msg_list => OKC_API.G_FALSE,
2418: x_return_status => l_return_status,
2419: x_msg_count => l_msg_count,
2420: x_msg_data => l_msg_data,
2421: p_khrv_tbl => l_khrv_tbl,

Line 2425: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

2421: p_khrv_tbl => l_khrv_tbl,
2422: x_khrv_tbl => x_khrv_tbl,
2423: p_validate_yn => 'N');
2424:
2425: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
2426: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2427: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
2428: RAISE OKC_API.G_EXCEPTION_ERROR;
2429: END IF;

Line 2426: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2422: x_khrv_tbl => x_khrv_tbl,
2423: p_validate_yn => 'N');
2424:
2425: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
2426: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2427: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
2428: RAISE OKC_API.G_EXCEPTION_ERROR;
2429: END IF;
2430:

Line 2427: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

2423: p_validate_yn => 'N');
2424:
2425: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
2426: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2427: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
2428: RAISE OKC_API.G_EXCEPTION_ERROR;
2429: END IF;
2430:
2431: End Loop; --For get_qto

Line 2428: RAISE OKC_API.G_EXCEPTION_ERROR;

2424:
2425: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
2426: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2427: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
2428: RAISE OKC_API.G_EXCEPTION_ERROR;
2429: END IF;
2430:
2431: End Loop; --For get_qto
2432:

Line 2504: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2500: EXCEPTION
2501: WHEN G_EXCEPTION_HALT_VALIDATION THEN
2502: x_return_status := l_return_status;
2503: WHEN Others THEN
2504: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2505: OKC_API.set_message
2506: (
2507: G_APP_NAME,
2508: G_UNEXPECTED_ERROR,

Line 2505: OKC_API.set_message

2501: WHEN G_EXCEPTION_HALT_VALIDATION THEN
2502: x_return_status := l_return_status;
2503: WHEN Others THEN
2504: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2505: OKC_API.set_message
2506: (
2507: G_APP_NAME,
2508: G_UNEXPECTED_ERROR,
2509: G_SQLCODE_TOKEN,

Line 2539: l_return_status VARCHAR2(1) :=OKC_API.G_RET_STS_SUCCESS;

2535: p_upd_line_flag VARCHAR2,
2536: p_bill_profile_flag IN VARCHAR2 DEFAULT NULL
2537: ) IS
2538:
2539: l_return_status VARCHAR2(1) :=OKC_API.G_RET_STS_SUCCESS;
2540: l_api_version CONSTANT NUMBER := 1.0;
2541: l_init_msg_list CONSTANT VARCHAR2(1):= 'F';
2542: l_msg_count NUMBER;
2543: l_msg_data VARCHAR2(2000):=null;

Line 2743: l_return_status := OKC_API.G_RET_STS_SUCCESS;

2739: OKS_RENEW_PVT.Debug_Log
2740: (p_program_name => 'OKSCOPY'
2741: ,p_perf_msg =>'OKSCOPY: start time= '||to_char(sysdate,'HH:MI:SS'));
2742: -- initialize return status
2743: l_return_status := OKC_API.G_RET_STS_SUCCESS;
2744:
2745: -- mk start
2746: -- The reason for this logic is that okscopy gets called twice for renew
2747: -- the first time, the new start date/end date of the contract header is

Line 2796: OKC_API.set_message

2792: l_return_status
2793: );
2794:
2795: IF l_return_status <> 'S' Then
2796: OKC_API.set_message
2797: (G_APP_NAME,
2798: G_UNEXPECTED_ERROR,
2799: G_SQLCODE_TOKEN,
2800: SQLCODE,

Line 2819: If l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

2815: x_period_start => l_new_period_start,
2816: x_price_uom => l_price_uom,
2817: x_return_status => l_return_status);
2818:
2819: If l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2820:
2821: RAISE G_EXCEPTION_HALT_VALIDATION;
2822:
2823: End If;

Line 2837: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then

2833: x_period_start => l_old_period_type,
2834: x_price_uom => l_price_uom,
2835: x_return_status => l_return_status);
2836:
2837: If l_return_status <> OKC_API.G_RET_STS_SUCCESS Then
2838:
2839: RAISE G_EXCEPTION_HALT_VALIDATION;
2840:
2841: End If;

Line 2874: OKC_API.set_message

2870: x_msg_data => l_msg_data,
2871: p_commit => 'F'
2872: );
2873: IF l_return_status <> 'S' Then
2874: OKC_API.set_message
2875: (G_APP_NAME,
2876: G_UNEXPECTED_ERROR,
2877: G_SQLCODE_TOKEN,
2878: SQLCODE,

Line 2891: OKC_API.set_message

2887: x_msg_count => l_msg_count,
2888: x_msg_data => l_msg_data,
2889: p_chr_id => p_chr_id);
2890: IF l_return_status <> 'S' Then
2891: OKC_API.set_message
2892: (G_APP_NAME,
2893: G_UNEXPECTED_ERROR,
2894: G_SQLCODE_TOKEN,
2895: SQLCODE,

Line 2905: p_init_msg_list => OKC_API.G_FALSE,

2901: l_okc_hdr_tbl(1).id := p_chr_id;
2902: l_okc_hdr_tbl(1).sts_code := 'QA_HOLD';
2903: OKC_CONTRACT_PUB.update_contract_header(
2904: p_api_version => 1.0,
2905: p_init_msg_list => OKC_API.G_FALSE,
2906: x_return_status => l_return_status,
2907: x_msg_count => l_msg_count,
2908: x_msg_data => l_msg_data,
2909: p_restricted_update => 'N',

Line 2914: OKC_API.set_message

2910: p_chrv_tbl => l_okc_hdr_tbl,
2911: x_chrv_tbl => x_okc_hdr_tbl
2912: );
2913: IF l_return_status <> 'S' Then
2914: OKC_API.set_message
2915: (G_APP_NAME,
2916: G_UNEXPECTED_ERROR,
2917: G_SQLCODE_TOKEN,
2918: SQLCODE,

Line 2935: OR p_cle_id = OKC_API.G_MISS_NUM)) THEN

2931:
2932: --1. copy on header level
2933:
2934: IF (p_chr_id IS NOT NULL AND (p_cle_id IS NULL
2935: OR p_cle_id = OKC_API.G_MISS_NUM)) THEN
2936:
2937: For cur_pradj_rec in cur_pradj(p_chr_id)
2938: LOOP
2939: update okc_price_adjustments

Line 2982: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

2978: OKS_RENEW_PVT.Debug_Log
2979: (p_program_name => 'OKSCOPY'
2980: ,p_perf_msg =>'COPY_K_HDR_NOTES '||l_return_status);
2981:
2982: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2983: -- Empties the message stack and puts the error in the log file.
2984: Get_Error_Stack;
2985: -- We don't want an error in copy notes to stop everything.
2986: l_return_status := OKC_API.G_RET_STS_SUCCESS;

Line 2986: l_return_status := OKC_API.G_RET_STS_SUCCESS;

2982: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
2983: -- Empties the message stack and puts the error in the log file.
2984: Get_Error_Stack;
2985: -- We don't want an error in copy notes to stop everything.
2986: l_return_status := OKC_API.G_RET_STS_SUCCESS;
2987: End If;
2988: End If;
2989:
2990:

Line 3095: p_init_msg_list => OKC_API.G_FALSE ,

3091: if not chk_coverage_exists( check_top_line_exist_rec.id) then
3092:
3093: OKS_COVERAGES_PVT.Copy_Coverage
3094: (p_api_version => 1.0 ,
3095: p_init_msg_list => OKC_API.G_FALSE ,
3096: x_return_status => l_return_status ,
3097: x_msg_count => l_msg_count ,
3098: x_msg_data => l_msg_data ,
3099: p_contract_line_id => check_top_line_exist_rec.id );

Line 3105: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

3101: OKS_RENEW_PVT.Debug_Log
3102: (p_program_name => 'OKSCOPY'
3103: ,p_perf_msg =>'Copy Coverage Status '||l_return_status);
3104:
3105: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
3106: x_return_status := l_return_status;
3107: Raise G_EXCEPTION_HALT_VALIDATION;
3108: End If;
3109: END IF;

Line 3222: p_init_msg_list => OKC_API.G_FALSE ,

3218: IF (check_top_line_exist_rec.lse_id in (1,19) AND l_do_copy ) Then
3219:
3220: OKS_COVERAGES_PVT.Copy_Coverage
3221: (p_api_version => 1.0 ,
3222: p_init_msg_list => OKC_API.G_FALSE ,
3223: x_return_status => l_return_status ,
3224: x_msg_count => l_msg_count ,
3225: x_msg_data => l_msg_data ,
3226: p_contract_line_id => check_top_line_exist_rec.id );

Line 3232: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

3228: OKS_RENEW_PVT.Debug_Log
3229: (p_program_name => 'OKSCOPY'
3230: ,p_perf_msg =>'Copy Coverage Status '||l_return_status);
3231:
3232: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
3233: x_return_status := l_return_status;
3234: Raise G_EXCEPTION_HALT_VALIDATION;
3235: End If;
3236:

Line 3250: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

3246: OKS_RENEW_PVT.Debug_Log
3247: (p_program_name => 'OKSCOPY'
3248: ,p_perf_msg =>'Copy subscr_inst Status '||l_return_status);
3249:
3250: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
3251: x_return_status := l_return_status;
3252: Raise G_EXCEPTION_HALT_VALIDATION;
3253: End If;
3254:

Line 3278: AND p_cle_id <> OKC_API.G_MISS_NUM) THEN

3274:
3275: --2. copy on top line level
3276:
3277: ELSIF (p_chr_id IS NOT NULL AND p_cle_id IS NOT NULL
3278: AND p_cle_id <> OKC_API.G_MISS_NUM) THEN
3279:
3280: FOR cle_grp_rec IN cle_grp_csr (p_chr_id,p_cle_id)
3281: LOOP
3282: IF (l_return_status = 'S' AND p_upd_line_flag IS NULL) THEN

Line 3359: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

3355:
3356: OKS_RENEW_PVT.Debug_Log
3357: (p_program_name => 'OKSCOPY'
3358: ,p_perf_msg =>'Line Copy line_subscr_inst Status'||l_return_status);
3359: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
3360: x_return_status := l_return_status;
3361: Raise G_EXCEPTION_HALT_VALIDATION;
3362: End If;
3363:

Line 3371: p_init_msg_list => OKC_API.G_FALSE ,

3367: If (cle_grp_rec.lse_id in (1,19) AND p_upd_line_flag IS NULL) Then
3368:
3369: OKS_COVERAGES_PVT.Copy_Coverage
3370: (p_api_version => 1.0 ,
3371: p_init_msg_list => OKC_API.G_FALSE ,
3372: x_return_status => l_return_status ,
3373: x_msg_count => l_msg_count ,
3374: x_msg_data => l_msg_data ,
3375: p_contract_line_id => cle_grp_rec.id );

Line 3381: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

3377: OKS_RENEW_PVT.Debug_Log
3378: (p_program_name => 'OKSCOPY'
3379: ,p_perf_msg =>'Copy Coverage Status'||l_return_status);
3380:
3381: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
3382: x_return_status := l_return_status;
3383: Raise G_EXCEPTION_HALT_VALIDATION;
3384: End If;
3385: END IF;

Line 3407: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3403:
3404: --3. if no parameter passed
3405:
3406: ELSIF (p_chr_id IS NULL AND p_cle_id IS NULL) THEN
3407: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3408: raise G_EXCEPTION_HALT_VALIDATION;
3409:
3410: END IF;-- IF (p_chr_id IS NOT NULL AND p_cle_id IS NULL)
3411:

Line 3501: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then

3497: x_return_status => l_return_status,
3498: x_msg_count => l_msg_count,
3499: x_msg_data => l_msg_data);
3500:
3501: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) then
3502: OKS_RENEW_PVT.Debug_Log(p_program_name => 'OKSCOPY',
3503: p_perf_msg =>'QP failed.');
3504: RAISE G_EXCEPTION_HALT_VALIDATION;
3505: END IF;

Line 3538: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3534: WHEN G_EXCEPTION_HALT_VALIDATION THEN
3535: x_return_status := l_return_status;
3536:
3537: WHEN OTHERS THEN
3538: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3539: OKC_API.set_message
3540: (G_APP_NAME,
3541: G_UNEXPECTED_ERROR,
3542: G_SQLCODE_TOKEN,

Line 3539: OKC_API.set_message

3535: x_return_status := l_return_status;
3536:
3537: WHEN OTHERS THEN
3538: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3539: OKC_API.set_message
3540: (G_APP_NAME,
3541: G_UNEXPECTED_ERROR,
3542: G_SQLCODE_TOKEN,
3543: SQLCODE,

Line 3573: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;

3569: p_cle_id IN NUMBER,
3570: x_return_status OUT NOCOPY VARCHAR2
3571: )
3572: IS
3573: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;
3574: -- will select all covered levels for given cle_id
3575:
3576: CURSOR l_csr_okc_k_lines IS
3577: SELECT id

Line 3589: l_return_status := OKC_API.G_RET_STS_SUCCESS;

3585:
3586: yes_flag VARCHAR2(1);
3587:
3588: BEGIN
3589: l_return_status := OKC_API.G_RET_STS_SUCCESS;
3590: -- This code has been modified to add p_cle_id as input parameter
3591:
3592: l_line_seq_no := 0;
3593:

Line 3630: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;

3626: x_return_status OUT NOCOPY VARCHAR2
3627: )
3628: IS
3629:
3630: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;
3631:
3632: Cursor l_csr_header IS
3633: SELECT id from okc_k_headers_b
3634: WHERE scs_code in ('SERVICE','WARRANTY')

Line 3673: l_return_status := OKC_API.G_RET_STS_SUCCESS;

3669: yes_flag VARCHAR2(1);
3670:
3671: BEGIN
3672:
3673: l_return_status := OKC_API.G_RET_STS_SUCCESS;
3674: l_contract_count :=0;
3675:
3676:
3677: -- l_contract_count := l_contract_count + 1;

Line 3896: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

3892:
3893:
3894: EXCEPTION
3895: WHEN OTHERS THEN
3896: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3897: OKC_API.set_message
3898: (G_APP_NAME,
3899: G_UNEXPECTED_ERROR,
3900: G_SQLCODE_TOKEN,

Line 3897: OKC_API.set_message

3893:
3894: EXCEPTION
3895: WHEN OTHERS THEN
3896: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3897: OKC_API.set_message
3898: (G_APP_NAME,
3899: G_UNEXPECTED_ERROR,
3900: G_SQLCODE_TOKEN,
3901: SQLCODE,

Line 4007: p_init_msg_list => OKC_API.G_FALSE,

4003:
4004:
4005: OKS_CONTRACT_HDR_PUB.update_header (
4006: p_api_version => l_api_version,
4007: p_init_msg_list => OKC_API.G_FALSE,
4008: x_return_status => l_return_status,
4009: x_msg_count => l_msg_count,
4010: x_msg_data => l_msg_data,
4011: p_khrv_tbl => l_khrv_tbl,

Line 4018: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4014:
4015: End If; -- p_contact_id is not null
4016: EXCEPTION
4017: When Others Then
4018: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4019: OKC_API.set_message (G_APP_NAME,
4020: G_UNEXPECTED_ERROR,
4021: G_SQLCODE_TOKEN,
4022: SQLCODE,

Line 4019: OKC_API.set_message (G_APP_NAME,

4015: End If; -- p_contact_id is not null
4016: EXCEPTION
4017: When Others Then
4018: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4019: OKC_API.set_message (G_APP_NAME,
4020: G_UNEXPECTED_ERROR,
4021: G_SQLCODE_TOKEN,
4022: SQLCODE,
4023: G_SQLERRM_TOKEN,

Line 4070: l_return_status := OKC_API.G_RET_STS_SUCCESS;

4066: l_Commit Varchar2(3) ;
4067: l_Ctr_Grp_Rec CS_Counters_Pub.CtrGrp_Rec_Type;
4068: l_cascade_upd_to_instances Varchar2(1);
4069: BEGIN
4070: l_return_status := OKC_API.G_RET_STS_SUCCESS;
4071: FOR Cgp_Rec IN Cur_Cgp(P_KLine_Id)
4072: LOOP
4073: l_cgp_tbl(c_Cgp):=Cgp_Rec.counter_group_Id;
4074: c_Cgp:=c_Cgp+1;

Line 4095: if l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4091: p_ctr_grp_rec =>l_ctr_grp_rec,
4092: p_cascade_upd_to_instances =>l_cascade_upd_to_instances,
4093: x_object_version_number => x_object_version_number
4094: );
4095: if l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4096: OKC_API.set_message(
4097: G_APP_NAME,
4098: G_UNEXPECTED_ERROR,
4099: G_SQLCODE_TOKEN,

Line 4096: OKC_API.set_message(

4092: p_cascade_upd_to_instances =>l_cascade_upd_to_instances,
4093: x_object_version_number => x_object_version_number
4094: );
4095: if l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4096: OKC_API.set_message(
4097: G_APP_NAME,
4098: G_UNEXPECTED_ERROR,
4099: G_SQLCODE_TOKEN,
4100: SQLCODE,

Line 4115: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4111: EXCEPTION
4112: When G_EXCEPTION_HALT_VALIDATION Then
4113: x_Return_Status:=l_Return_status;
4114: WHEN OTHERS THEN
4115: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4116: OKC_API.set_message
4117: (G_APP_NAME,
4118: G_UNEXPECTED_ERROR,
4119: G_SQLCODE_TOKEN,

Line 4116: OKC_API.set_message

4112: When G_EXCEPTION_HALT_VALIDATION Then
4113: x_Return_Status:=l_Return_status;
4114: WHEN OTHERS THEN
4115: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4116: OKC_API.set_message
4117: (G_APP_NAME,
4118: G_UNEXPECTED_ERROR,
4119: G_SQLCODE_TOKEN,
4120: SQLCODE,

Line 4162: l_return_status := OKC_API.G_RET_STS_SUCCESS;

4158: cursor get_oks_line(l_cle_id number) is
4159: select id from oks_k_lines_b where cle_id = l_cle_id;
4160:
4161: Begin
4162: l_return_status := OKC_API.G_RET_STS_SUCCESS;
4163:
4164: l_temp_tbl(l_temp_counter) := p_cle_id;
4165: l_temp_counter := l_temp_counter + 1;
4166:

Line 4193: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4189: x_msg_count => l_msg_count,
4190: x_msg_data => l_msg_data,
4191: p_klnv_rec => l_klnv_rec);
4192:
4193: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4194: OKC_API.set_message(
4195: G_APP_NAME,
4196: G_UNEXPECTED_ERROR,
4197: G_SQLCODE_TOKEN,

Line 4194: OKC_API.set_message(

4190: x_msg_data => l_msg_data,
4191: p_klnv_rec => l_klnv_rec);
4192:
4193: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4194: OKC_API.set_message(
4195: G_APP_NAME,
4196: G_UNEXPECTED_ERROR,
4197: G_SQLCODE_TOKEN,
4198: SQLCODE,

Line 4215: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4211: EXCEPTION
4212: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4213: x_return_status := l_return_status;
4214: WHEN OTHERS THEN
4215: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4216: OKC_API.set_message
4217: (G_APP_NAME,
4218: G_UNEXPECTED_ERROR,
4219: G_SQLCODE_TOKEN,

Line 4216: OKC_API.set_message

4212: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4213: x_return_status := l_return_status;
4214: WHEN OTHERS THEN
4215: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4216: OKC_API.set_message
4217: (G_APP_NAME,
4218: G_UNEXPECTED_ERROR,
4219: G_SQLCODE_TOKEN,
4220: SQLCODE,

Line 4228: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

4224: End Delete_OKS_Line;
4225:
4226: PROCEDURE Delete_Contract (
4227: p_api_version IN NUMBER,
4228: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
4229: p_chr_id IN NUMBER,
4230: x_return_status OUT NOCOPY VARCHAR2,
4231: x_msg_count OUT NOCOPY NUMBER,
4232: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 4276: l_return_status := OKC_API.G_RET_STS_SUCCESS;

4272: TYPE line_Tbl_Type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
4273: l_Line_tbl line_tbl_Type;
4274: BEGIN
4275:
4276: l_return_status := OKC_API.G_RET_STS_SUCCESS;
4277:
4278: -- Input Validation
4279: IF p_chr_id IS NULL THEN
4280: OKC_API.set_message(

Line 4280: OKC_API.set_message(

4276: l_return_status := OKC_API.G_RET_STS_SUCCESS;
4277:
4278: -- Input Validation
4279: IF p_chr_id IS NULL THEN
4280: OKC_API.set_message(
4281: G_APP_NAME,
4282: G_UNEXPECTED_ERROR,
4283: G_SQLCODE_TOKEN,
4284: SQLCODE,

Line 4288: l_return_status := OKC_API.G_RET_STS_ERROR;

4284: SQLCODE,
4285: G_SQLERRM_TOKEN,
4286: 'Header id passed to Delete_Contract is Null'
4287: );
4288: l_return_status := OKC_API.G_RET_STS_ERROR;
4289: RAISE G_EXCEPTION_HALT_VALIDATION;
4290: END IF;
4291: ---------- Get all lines -------------
4292: n:=1;

Line 4310: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4306: Delete_OKS_Line(
4307: p_cle_id => topline_rec.id,
4308: x_return_status => l_return_status);
4309:
4310: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4311: OKC_API.set_message(
4312: G_APP_NAME,
4313: G_UNEXPECTED_ERROR,
4314: G_SQLCODE_TOKEN,

Line 4311: OKC_API.set_message(

4307: p_cle_id => topline_rec.id,
4308: x_return_status => l_return_status);
4309:
4310: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4311: OKC_API.set_message(
4312: G_APP_NAME,
4313: G_UNEXPECTED_ERROR,
4314: G_SQLCODE_TOKEN,
4315: SQLCODE,

Line 4334: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4330: x_return_status => l_return_status,
4331: x_msg_count => l_msg_count,
4332: x_msg_data => l_msg_data,
4333: P_Line_Id => topline_rec.id);
4334: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4335: OKC_API.set_message(
4336: G_APP_NAME,
4337: G_UNEXPECTED_ERROR,
4338: G_SQLCODE_TOKEN,

Line 4335: OKC_API.set_message(

4331: x_msg_count => l_msg_count,
4332: x_msg_data => l_msg_data,
4333: P_Line_Id => topline_rec.id);
4334: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4335: OKC_API.set_message(
4336: G_APP_NAME,
4337: G_UNEXPECTED_ERROR,
4338: G_SQLCODE_TOKEN,
4339: SQLCODE,

Line 4367: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4363: x_return_status => l_return_status,
4364: x_msg_count => l_msg_count,
4365: x_msg_data => l_msg_data,
4366: p_gvev_tbl => l_gvev_tbl_in);
4367: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4368: OKC_API.set_message(
4369: G_APP_NAME,
4370: G_UNEXPECTED_ERROR,
4371: G_SQLCODE_TOKEN,

Line 4368: OKC_API.set_message(

4364: x_msg_count => l_msg_count,
4365: x_msg_data => l_msg_data,
4366: p_gvev_tbl => l_gvev_tbl_in);
4367: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4368: OKC_API.set_message(
4369: G_APP_NAME,
4370: G_UNEXPECTED_ERROR,
4371: G_SQLCODE_TOKEN,
4372: SQLCODE,

Line 4390: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4386: l_Line_Id:=l_line_tbl(v_Index);
4387: Undo_Counters( P_KLine_Id => l_Line_Id,
4388: x_return_status => l_return_status,
4389: x_msg_data => l_msg_data);
4390: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4391: OKC_API.set_message(
4392: G_APP_NAME,
4393: G_UNEXPECTED_ERROR,
4394: G_SQLCODE_TOKEN,

Line 4391: OKC_API.set_message(

4387: Undo_Counters( P_KLine_Id => l_Line_Id,
4388: x_return_status => l_return_status,
4389: x_msg_data => l_msg_data);
4390: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4391: OKC_API.set_message(
4392: G_APP_NAME,
4393: G_UNEXPECTED_ERROR,
4394: G_SQLCODE_TOKEN,
4395: SQLCODE,

Line 4415: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4411: x_return_status => l_return_status,
4412: x_msg_count => l_msg_count,
4413: x_msg_data => l_msg_data,
4414: p_khrv_rec => l_khrv_rec);
4415: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4416: OKC_API.set_message(
4417: G_APP_NAME,
4418: G_UNEXPECTED_ERROR,
4419: G_SQLCODE_TOKEN,

Line 4416: OKC_API.set_message(

4412: x_msg_count => l_msg_count,
4413: x_msg_data => l_msg_data,
4414: p_khrv_rec => l_khrv_rec);
4415: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4416: OKC_API.set_message(
4417: G_APP_NAME,
4418: G_UNEXPECTED_ERROR,
4419: G_SQLCODE_TOKEN,
4420: SQLCODE,

Line 4434: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4430: x_return_status =>l_return_status,
4431: x_msg_count =>l_msg_count,
4432: x_msg_data =>l_msg_data,
4433: p_chr_id => p_chr_id);
4434: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4435: OKC_API.set_message(
4436: G_APP_NAME,
4437: G_UNEXPECTED_ERROR,
4438: G_SQLCODE_TOKEN,

Line 4435: OKC_API.set_message(

4431: x_msg_count =>l_msg_count,
4432: x_msg_data =>l_msg_data,
4433: p_chr_id => p_chr_id);
4434: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4435: OKC_API.set_message(
4436: G_APP_NAME,
4437: G_UNEXPECTED_ERROR,
4438: G_SQLCODE_TOKEN,
4439: SQLCODE,

Line 4455: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4451: x_return_status =>l_return_status,
4452: x_msg_count =>l_msg_count,
4453: x_msg_data =>l_msg_data,
4454: p_chrv_rec =>l_chrv_rec);
4455: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4456: OKC_API.set_message(
4457: G_APP_NAME,
4458: G_UNEXPECTED_ERROR,
4459: G_SQLCODE_TOKEN,

Line 4456: OKC_API.set_message(

4452: x_msg_count =>l_msg_count,
4453: x_msg_data =>l_msg_data,
4454: p_chrv_rec =>l_chrv_rec);
4455: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4456: OKC_API.set_message(
4457: G_APP_NAME,
4458: G_UNEXPECTED_ERROR,
4459: G_SQLCODE_TOKEN,
4460: SQLCODE,

Line 4474: OKC_API.set_message

4470: EXCEPTION
4471: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4472: x_return_status:=l_return_status;
4473: WHEN OTHERS THEN
4474: OKC_API.set_message
4475: (G_APP_NAME,
4476: G_UNEXPECTED_ERROR,
4477: G_SQLCODE_TOKEN,
4478: SQLCODE,

Line 4481: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4477: G_SQLCODE_TOKEN,
4478: SQLCODE,
4479: G_SQLERRM_TOKEN,
4480: SQLERRM);
4481: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4482:
4483: End Delete_Contract;
4484:
4485:

Line 4488: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

4484:
4485:
4486: PROCEDURE Delete_Contract_Line(
4487: p_api_version IN NUMBER,
4488: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
4489: p_line_id IN NUMBER,
4490: x_return_status OUT NOCOPY VARCHAR2,
4491: x_msg_count OUT NOCOPY NUMBER,
4492: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 4519: l_return_status := OKC_API.G_RET_STS_SUCCESS;

4515: v_Index number;
4516: l_clev_rec OKC_CLE_PVT.clev_rec_type;
4517:
4518: Begin
4519: l_return_status := OKC_API.G_RET_STS_SUCCESS;
4520:
4521: Open get_line_type(p_line_id);
4522: Fetch get_line_type into l_lse_id, l_parent_id;
4523: Close get_line_type;

Line 4537: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4533: x_msg_count => l_msg_count,
4534: x_msg_data => l_msg_data,
4535: P_service_Line_Id => p_line_id);
4536:
4537: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4538: OKC_API.set_message(
4539: G_APP_NAME,
4540: G_UNEXPECTED_ERROR,
4541: G_SQLCODE_TOKEN,

Line 4538: OKC_API.set_message(

4534: x_msg_data => l_msg_data,
4535: P_service_Line_Id => p_line_id);
4536:
4537: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4538: OKC_API.set_message(
4539: G_APP_NAME,
4540: G_UNEXPECTED_ERROR,
4541: G_SQLCODE_TOKEN,
4542: SQLCODE,

Line 4560: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4556: OKS_BILL_SCH.Del_Rul_Elements(p_top_line_id => p_line_id,
4557: x_return_status => l_return_status,
4558: x_msg_count => l_msg_count,
4559: x_msg_data => l_msg_data);
4560: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4561: OKC_API.set_message(
4562: G_APP_NAME,
4563: G_UNEXPECTED_ERROR,
4564: G_SQLCODE_TOKEN,

Line 4561: OKC_API.set_message(

4557: x_return_status => l_return_status,
4558: x_msg_count => l_msg_count,
4559: x_msg_data => l_msg_data);
4560: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4561: OKC_API.set_message(
4562: G_APP_NAME,
4563: G_UNEXPECTED_ERROR,
4564: G_SQLCODE_TOKEN,
4565: SQLCODE,

Line 4579: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4575: x_return_status => l_return_status,
4576: x_msg_count => l_msg_count,
4577: x_msg_data => l_msg_data
4578: );
4579: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4580: OKC_API.set_message(
4581: G_APP_NAME,
4582: G_UNEXPECTED_ERROR,
4583: G_SQLCODE_TOKEN,

Line 4580: OKC_API.set_message(

4576: x_msg_count => l_msg_count,
4577: x_msg_data => l_msg_data
4578: );
4579: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4580: OKC_API.set_message(
4581: G_APP_NAME,
4582: G_UNEXPECTED_ERROR,
4583: G_SQLCODE_TOKEN,
4584: SQLCODE,

Line 4600: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4596: Delete_OKS_Line(
4597: p_cle_id => p_line_id,
4598: x_return_status => l_return_status);
4599:
4600: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4601: OKC_API.set_message(
4602: G_APP_NAME,
4603: G_UNEXPECTED_ERROR,
4604: G_SQLCODE_TOKEN,

Line 4601: OKC_API.set_message(

4597: p_cle_id => p_line_id,
4598: x_return_status => l_return_status);
4599:
4600: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4601: OKC_API.set_message(
4602: G_APP_NAME,
4603: G_UNEXPECTED_ERROR,
4604: G_SQLCODE_TOKEN,
4605: SQLCODE,

Line 4621: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then

4617: x_msg_count => l_msg_count,
4618: x_msg_data => l_msg_data,
4619: --p_clev_rec => l_clev_rec);
4620: p_line_id => p_line_id);
4621: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4622: OKC_API.set_message(
4623: G_APP_NAME,
4624: G_UNEXPECTED_ERROR,
4625: G_SQLCODE_TOKEN,

Line 4622: OKC_API.set_message(

4618: x_msg_data => l_msg_data,
4619: --p_clev_rec => l_clev_rec);
4620: p_line_id => p_line_id);
4621: If l_return_status <> OKC_API.G_RET_STS_SUCCESS then
4622: OKC_API.set_message(
4623: G_APP_NAME,
4624: G_UNEXPECTED_ERROR,
4625: G_SQLCODE_TOKEN,
4626: SQLCODE,

Line 4641: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4637: EXCEPTION
4638: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4639: x_return_status := l_return_status;
4640: WHEN OTHERS THEN
4641: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4642: OKC_API.set_message
4643: (G_APP_NAME,
4644: G_UNEXPECTED_ERROR,
4645: G_SQLCODE_TOKEN,

Line 4642: OKC_API.set_message

4638: WHEN G_EXCEPTION_HALT_VALIDATION THEN
4639: x_return_status := l_return_status;
4640: WHEN OTHERS THEN
4641: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4642: OKC_API.set_message
4643: (G_APP_NAME,
4644: G_UNEXPECTED_ERROR,
4645: G_SQLCODE_TOKEN,
4646: SQLCODE,

Line 4656: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

4652: -- New procedure added to find if a contract thats going to be deleted
4653: -- has lines or covered levels that has been renewed on another contract
4654: PROCEDURE Delete_Transfer_Contract(
4655: p_api_version IN NUMBER,
4656: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
4657: p_chr_id IN NUMBER,
4658: p_cle_id IN NUMBER DEFAULT NULL,
4659: p_intent IN VARCHAR2, -- new
4660: x_contract_number OUT NOCOPY VARCHAR2,

Line 4769: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

4765: END IF; -- IF nvl(p_intent, 'X') = 'T'
4766: END IF;
4767: EXCEPTION
4768: WHEN OTHERS THEN
4769: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4770: OKC_API.set_message
4771: (G_APP_NAME,
4772: G_UNEXPECTED_ERROR,
4773: G_SQLCODE_TOKEN,

Line 4770: OKC_API.set_message

4766: END IF;
4767: EXCEPTION
4768: WHEN OTHERS THEN
4769: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4770: OKC_API.set_message
4771: (G_APP_NAME,
4772: G_UNEXPECTED_ERROR,
4773: G_SQLCODE_TOKEN,
4774: SQLCODE,

Line 5258: --call OKC API to delete all OKC lines and entities. This deletes all OKC entities and

5254: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.delete_oks_entities', 'done');
5255: END IF;
5256: END IF;
5257:
5258: --call OKC API to delete all OKC lines and entities. This deletes all OKC entities and
5259: --the OKC sublines
5260: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
5261: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.delete_okc_entities', 'calling OKC_CONTRACT_PVT.delete_contract_line, p_line_id='||p_line_id);
5262: END IF;