eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKC_STATUS_CHANGE_PVT dependencies on OKC_API

Line 98: x_return_status := OKC_API.G_RET_STS_SUCCESS;

94: l_cvmv_rec OKC_CVM_PVT.cvmv_rec_type;
95: BEGIN
96:
97: -- initialize return status
98: x_return_status := OKC_API.G_RET_STS_SUCCESS;
99:
100: -- assign/populate contract header id
101: l_cvmv_rec.chr_id := p_chr_id;
102: OKC_CVM_PVT.update_row(

Line 115: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

111: return (x_return_status);
112: EXCEPTION
113: when OTHERS then
114: -- notify caller of an error
115: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
116:
117: -- store SQL error message on message stack
118: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
119: p_msg_name => g_unexpected_error,

Line 118: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

114: -- notify caller of an error
115: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
116:
117: -- store SQL error message on message stack
118: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
119: p_msg_name => g_unexpected_error,
120: p_token1 => g_sqlcode_token,
121: p_token1_value => sqlcode,
122: p_token2 => g_sqlerrm_token,

Line 138: x_return_status := OKC_API.G_RET_STS_SUCCESS;

134: p_chrv_rec IN OKC_CHR_PVT.chrv_rec_type,
135: x_chrv_rec OUT NOCOPY OKC_CHR_PVT.chrv_rec_type) IS
136:
137: BEGIN
138: x_return_status := OKC_API.G_RET_STS_SUCCESS;
139: x_chrv_rec := p_chrv_rec;
140: UPDATE OKC_K_HEADERS_B
141: SET STS_CODE = p_chrv_rec.sts_code,
142: OBJECT_VERSION_NUMBER = OBJECT_VERSION_NUMBER + 1,

Line 180: If (x_return_status = OKC_API.G_RET_STS_SUCCESS) Then

176: p_k_pre_sts_type => p_chrv_rec.old_ste_code,
177: p_k_source_system_code => p_chrv_rec.ORIG_SYSTEM_SOURCE_CODE);
178: End If;
179: -- Update minor version
180: If (x_return_status = OKC_API.G_RET_STS_SUCCESS) Then
181: x_return_status := Update_Minor_Version(p_chrv_rec.id);
182:
183: End If;
184: exception

Line 187: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

183: End If;
184: exception
185: when OTHERS then
186: -- store SQL error message on message stack
187: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
188: p_msg_name => g_unexpected_error,
189: p_token1 => g_sqlcode_token,
190: p_token1_value => sqlcode,
191: p_token2 => g_sqlerrm_token,

Line 195: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

191: p_token2 => g_sqlerrm_token,
192: p_token2_value => sqlerrm);
193:
194: -- notify caller of an UNEXPETED error
195: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
196: END update_contract_header;
197:
198: PROCEDURE update_contract_line(
199: p_api_version IN NUMBER,

Line 214: x_return_status := OKC_API.G_RET_STS_SUCCESS;

210: l_api_name CONSTANT VARCHAR2(30) := 'Update_Contract_Line';
211:
212: BEGIN
213:
214: x_return_status := OKC_API.G_RET_STS_SUCCESS;
215: x_clev_rec := p_clev_rec;
216: UPDATE OKC_K_LINES_B
217: SET STS_CODE = p_clev_rec.sts_code,
218: OBJECT_VERSION_NUMBER = OBJECT_VERSION_NUMBER + 1,

Line 256: If (x_return_status = OKC_API.G_RET_STS_SUCCESS) Then

252: p_kl_source_system_code => p_clev_rec.ORIG_SYSTEM_SOURCE_CODE);
253: End If;
254:
255: -- Update minor version
256: If (x_return_status = OKC_API.G_RET_STS_SUCCESS) Then
257: If p_update_minor_version ='Y' Then
258: x_return_status := Update_Minor_Version(p_clev_rec.dnz_chr_id);
259:
260: End If;

Line 266: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

262: exception
263: when OTHERS then
264:
265: -- store SQL error message on message stack
266: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
267: p_msg_name => g_unexpected_error,
268: p_token1 => g_sqlcode_token,
269: p_token1_value => sqlcode,
270: p_token2 => g_sqlerrm_token,

Line 274: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

270: p_token2 => g_sqlerrm_token,
271: p_token2_value => sqlerrm);
272:
273: -- notify caller of an UNEXPETED error
274: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
275: END update_contract_line;
276: -----------------------------------------------------------------
277: -- Begin LINE Status change procedure
278: -----------------------------------------------------------------

Line 340: l_return_status VARCHAR2(1) := okc_api.g_ret_sts_success;

336: C number := 0;
337:
338: l_knum_and_mod VARCHAR2(240) := p_k_num||' '||p_k_num_mod;
339: l_line_number VARCHAR2(150);
340: l_return_status VARCHAR2(1) := okc_api.g_ret_sts_success;
341: p_init_msg_list VARCHAR2(200) := okc_api.g_true;
342: x_msg_count NUMBER := okc_api.g_miss_num;
343: x_msg_data VARCHAR2(2000) := okc_api.g_miss_char;
344:

Line 341: p_init_msg_list VARCHAR2(200) := okc_api.g_true;

337:
338: l_knum_and_mod VARCHAR2(240) := p_k_num||' '||p_k_num_mod;
339: l_line_number VARCHAR2(150);
340: l_return_status VARCHAR2(1) := okc_api.g_ret_sts_success;
341: p_init_msg_list VARCHAR2(200) := okc_api.g_true;
342: x_msg_count NUMBER := okc_api.g_miss_num;
343: x_msg_data VARCHAR2(2000) := okc_api.g_miss_char;
344:
345: l_cle_rec okc_contract_pub.clev_rec_type;

Line 342: x_msg_count NUMBER := okc_api.g_miss_num;

338: l_knum_and_mod VARCHAR2(240) := p_k_num||' '||p_k_num_mod;
339: l_line_number VARCHAR2(150);
340: l_return_status VARCHAR2(1) := okc_api.g_ret_sts_success;
341: p_init_msg_list VARCHAR2(200) := okc_api.g_true;
342: x_msg_count NUMBER := okc_api.g_miss_num;
343: x_msg_data VARCHAR2(2000) := okc_api.g_miss_char;
344:
345: l_cle_rec okc_contract_pub.clev_rec_type;
346: x_cle_rec okc_contract_pub.clev_rec_type;

Line 343: x_msg_data VARCHAR2(2000) := okc_api.g_miss_char;

339: l_line_number VARCHAR2(150);
340: l_return_status VARCHAR2(1) := okc_api.g_ret_sts_success;
341: p_init_msg_list VARCHAR2(200) := okc_api.g_true;
342: x_msg_count NUMBER := okc_api.g_miss_num;
343: x_msg_data VARCHAR2(2000) := okc_api.g_miss_char;
344:
345: l_cle_rec okc_contract_pub.clev_rec_type;
346: x_cle_rec okc_contract_pub.clev_rec_type;
347:

Line 1109: l_return_status := OKC_API.G_RET_STS_SUCCESS;

1105: c := 0;
1106: end if;
1107: savepoint H_STATUS;
1108: p_line_count:= p_line_count + 1;
1109: l_return_status := OKC_API.G_RET_STS_SUCCESS;
1110: l_knum_and_mod := p_term_line_rec.contract_number||' '||p_term_line_rec.contract_number_modifier;
1111: l_new_status := null;
1112: l_new_status_m := null;
1113: l_line_number := p_term_line_rec.line_number;

Line 1153: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1149: x_msg_count => x_msg_count,
1150: x_msg_data => x_msg_data,
1151: p_clev_rec => l_cle_rec);
1152:
1153: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1154: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1155: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1156: raise OKC_API.G_EXCEPTION_ERROR;
1157: END IF;

Line 1154: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1150: x_msg_data => x_msg_data,
1151: p_clev_rec => l_cle_rec);
1152:
1153: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1154: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1155: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1156: raise OKC_API.G_EXCEPTION_ERROR;
1157: END IF;
1158:

Line 1155: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1151: p_clev_rec => l_cle_rec);
1152:
1153: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1154: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1155: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1156: raise OKC_API.G_EXCEPTION_ERROR;
1157: END IF;
1158:
1159: update_contract_line (

Line 1156: raise OKC_API.G_EXCEPTION_ERROR;

1152:
1153: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1154: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1155: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1156: raise OKC_API.G_EXCEPTION_ERROR;
1157: END IF;
1158:
1159: update_contract_line (
1160: p_api_version => 1.0,

Line 1171: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1167: x_msg_data => x_msg_data,
1168: p_clev_rec => l_cle_rec,
1169: x_clev_rec => x_cle_rec);
1170:
1171: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1172: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1173: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1174: raise OKC_API.G_EXCEPTION_ERROR;
1175: END IF;

Line 1172: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1168: p_clev_rec => l_cle_rec,
1169: x_clev_rec => x_cle_rec);
1170:
1171: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1172: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1173: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1174: raise OKC_API.G_EXCEPTION_ERROR;
1175: END IF;
1176:

Line 1173: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1169: x_clev_rec => x_cle_rec);
1170:
1171: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1172: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1173: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1174: raise OKC_API.G_EXCEPTION_ERROR;
1175: END IF;
1176:
1177:

Line 1174: raise OKC_API.G_EXCEPTION_ERROR;

1170:
1171: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1172: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1173: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1174: raise OKC_API.G_EXCEPTION_ERROR;
1175: END IF;
1176:
1177:
1178: OKC_KL_TERM_ASMBLR_PVT.acn_assemble(

Line 1195: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1191: p_k_subclass => p_scs_code,
1192: P_KL_STATUS_CODE => p_term_line_rec.STS_CODE,
1193: p_estimated_amount => p_term_line_rec.price_negotiated );
1194: --
1195: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1196: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1197: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1198: raise OKC_API.G_EXCEPTION_ERROR;
1199: END IF;

Line 1196: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1192: P_KL_STATUS_CODE => p_term_line_rec.STS_CODE,
1193: p_estimated_amount => p_term_line_rec.price_negotiated );
1194: --
1195: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1196: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1197: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1198: raise OKC_API.G_EXCEPTION_ERROR;
1199: END IF;
1200:

Line 1197: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1193: p_estimated_amount => p_term_line_rec.price_negotiated );
1194: --
1195: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1196: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1197: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1198: raise OKC_API.G_EXCEPTION_ERROR;
1199: END IF;
1200:
1201: OKC_TIME_RES_PUB.res_time_termnt_k(

Line 1198: raise OKC_API.G_EXCEPTION_ERROR;

1194: --
1195: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1196: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1197: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1198: raise OKC_API.G_EXCEPTION_ERROR;
1199: END IF;
1200:
1201: OKC_TIME_RES_PUB.res_time_termnt_k(
1202: P_CHR_ID => NULL,

Line 1209: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1205: P_API_VERSION => 1.0 ,
1206: p_init_msg_list => p_init_msg_list,
1207: x_return_status => l_return_status
1208: );
1209: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1210: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1211: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1212: raise OKC_API.G_EXCEPTION_ERROR;
1213: END IF;

Line 1210: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1206: p_init_msg_list => p_init_msg_list,
1207: x_return_status => l_return_status
1208: );
1209: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1210: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1211: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1212: raise OKC_API.G_EXCEPTION_ERROR;
1213: END IF;
1214: --

Line 1211: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1207: x_return_status => l_return_status
1208: );
1209: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1210: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1211: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1212: raise OKC_API.G_EXCEPTION_ERROR;
1213: END IF;
1214: --
1215: if p_kid is NULL then

Line 1212: raise OKC_API.G_EXCEPTION_ERROR;

1208: );
1209: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1210: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1211: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1212: raise OKC_API.G_EXCEPTION_ERROR;
1213: END IF;
1214: --
1215: if p_kid is NULL then
1216: c := c+1;

Line 1228: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1224: end if;
1225:
1226:
1227: EXCEPTION
1228: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1229: line_message(p_knum_and_mod =>l_knum_and_mod,
1230: p_line_number=>l_line_number,
1231: p_old_status =>p_term_line_rec.meaning,
1232: p_status =>l_new_status,

Line 1236: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1232: p_status =>l_new_status,
1233: p_msg_data => x_msg_data,
1234: p_type =>'U');
1235: p_line_errors := p_line_errors +1 ;
1236: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1237: rollback to H_STATUS;
1238: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1239: line_message(p_knum_and_mod =>l_knum_and_mod,
1240: p_line_number=>l_line_number,

Line 1238: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1234: p_type =>'U');
1235: p_line_errors := p_line_errors +1 ;
1236: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1237: rollback to H_STATUS;
1238: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1239: line_message(p_knum_and_mod =>l_knum_and_mod,
1240: p_line_number=>l_line_number,
1241: p_old_status =>p_term_line_rec.meaning,
1242: p_status =>l_new_status,

Line 1246: x_return_status := OKC_API.G_RET_STS_ERROR;

1242: p_status =>l_new_status,
1243: p_msg_data => x_msg_data,
1244: p_type =>'E');
1245: p_line_errors := p_line_errors +1 ;
1246: x_return_status := OKC_API.G_RET_STS_ERROR;
1247: rollback to H_STATUS;
1248: WHEN OTHERS then
1249: line_message(p_knum_and_mod =>l_knum_and_mod,
1250: p_line_number=>l_line_number,

Line 1256: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1252: p_status =>l_new_status,
1253: p_msg_data => x_msg_data,
1254: p_type =>'U');
1255: p_line_errors := p_line_errors +1 ;
1256: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1257: rollback to H_STATUS;
1258: END line_terminate;
1259:
1260: PROCEDURE line_expire(p_exp_line_rec IN line_rec_type) IS

Line 1269: l_return_status := OKC_API.G_RET_STS_SUCCESS;

1265: c := 0;
1266: end if;
1267: savepoint H_STATUS;
1268: p_line_count:= p_line_count + 1;
1269: l_return_status := OKC_API.G_RET_STS_SUCCESS;
1270: l_knum_and_mod := p_exp_line_rec.contract_number||' '||p_exp_line_rec.contract_number_modifier;
1271: l_new_status := null;
1272: l_new_status_m := null;
1273:

Line 1315: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1311: x_msg_data => x_msg_data,
1312: p_clev_rec => l_cle_rec);
1313:
1314:
1315: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1316: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1317: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1318: raise OKC_API.G_EXCEPTION_ERROR;
1319: END IF;

Line 1316: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1312: p_clev_rec => l_cle_rec);
1313:
1314:
1315: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1316: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1317: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1318: raise OKC_API.G_EXCEPTION_ERROR;
1319: END IF;
1320: --

Line 1317: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1313:
1314:
1315: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1316: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1317: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1318: raise OKC_API.G_EXCEPTION_ERROR;
1319: END IF;
1320: --
1321:

Line 1318: raise OKC_API.G_EXCEPTION_ERROR;

1314:
1315: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1316: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1317: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1318: raise OKC_API.G_EXCEPTION_ERROR;
1319: END IF;
1320: --
1321:
1322: update_contract_line(

Line 1335: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1331: p_clev_rec => l_cle_rec,
1332: x_clev_rec => x_cle_rec);
1333:
1334:
1335: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1336: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1337: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1338: raise OKC_API.G_EXCEPTION_ERROR;
1339: END IF;

Line 1336: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1332: x_clev_rec => x_cle_rec);
1333:
1334:
1335: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1336: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1337: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1338: raise OKC_API.G_EXCEPTION_ERROR;
1339: END IF;
1340: --

Line 1337: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1333:
1334:
1335: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1336: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1337: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1338: raise OKC_API.G_EXCEPTION_ERROR;
1339: END IF;
1340: --
1341: if p_kid is NULL then

Line 1338: raise OKC_API.G_EXCEPTION_ERROR;

1334:
1335: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1336: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1337: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1338: raise OKC_API.G_EXCEPTION_ERROR;
1339: END IF;
1340: --
1341: if p_kid is NULL then
1342: c := c+1;

Line 1354: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1350: p_type =>'S');
1351: end if;
1352:
1353: EXCEPTION
1354: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1355: line_message(p_knum_and_mod =>l_knum_and_mod,
1356: p_line_number=>l_line_number,
1357: p_status =>l_new_status,
1358: p_old_status =>p_exp_line_rec.meaning,

Line 1362: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1358: p_old_status =>p_exp_line_rec.meaning,
1359: p_msg_data => x_msg_data,
1360: p_type =>'U');
1361: p_line_errors := p_line_errors +1 ;
1362: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1363: rollback to H_STATUS;
1364: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1365: line_message(p_knum_and_mod =>l_knum_and_mod,
1366: p_line_number=>l_line_number,

Line 1364: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1360: p_type =>'U');
1361: p_line_errors := p_line_errors +1 ;
1362: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1363: rollback to H_STATUS;
1364: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1365: line_message(p_knum_and_mod =>l_knum_and_mod,
1366: p_line_number=>l_line_number,
1367: p_status =>l_new_status,
1368: p_old_status =>p_exp_line_rec.meaning,

Line 1372: x_return_status := OKC_API.G_RET_STS_ERROR;

1368: p_old_status =>p_exp_line_rec.meaning,
1369: p_msg_data => x_msg_data,
1370: p_type =>'E');
1371: p_line_errors := p_line_errors +1 ;
1372: x_return_status := OKC_API.G_RET_STS_ERROR;
1373: rollback to H_STATUS;
1374: WHEN OTHERS then
1375: line_message(p_knum_and_mod =>l_knum_and_mod,
1376: p_line_number=>l_line_number,

Line 1382: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1378: p_old_status =>p_exp_line_rec.meaning,
1379: p_msg_data => x_msg_data,
1380: p_type =>'U');
1381: p_line_errors := p_line_errors +1 ;
1382: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1383: rollback to H_STATUS;
1384: END line_expire;
1385:
1386: PROCEDURE line_active(p_active_line_rec IN line_rec_type) IS

Line 1396: l_return_status := OKC_API.G_RET_STS_SUCCESS;

1392: c := 0;
1393: end if;
1394: savepoint H_STATUS;
1395: p_line_count:= p_line_count + 1;
1396: l_return_status := OKC_API.G_RET_STS_SUCCESS;
1397: l_knum_and_mod := p_active_line_rec.contract_number||' '||p_active_line_rec.contract_number_modifier;
1398: l_new_status := null;
1399: l_new_status_m := null;
1400:

Line 1442: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1438: x_msg_data => x_msg_data,
1439: p_clev_rec => l_cle_rec);
1440:
1441:
1442: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1443: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1444: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1445: raise OKC_API.G_EXCEPTION_ERROR;
1446: END IF;

Line 1443: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1439: p_clev_rec => l_cle_rec);
1440:
1441:
1442: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1443: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1444: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1445: raise OKC_API.G_EXCEPTION_ERROR;
1446: END IF;
1447: --

Line 1444: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1440:
1441:
1442: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1443: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1444: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1445: raise OKC_API.G_EXCEPTION_ERROR;
1446: END IF;
1447: --
1448:

Line 1445: raise OKC_API.G_EXCEPTION_ERROR;

1441:
1442: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1443: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1444: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1445: raise OKC_API.G_EXCEPTION_ERROR;
1446: END IF;
1447: --
1448:
1449: update_contract_line (

Line 1462: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1458: p_clev_rec => l_cle_rec,
1459: x_clev_rec => x_cle_rec);
1460:
1461:
1462: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1463: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1464: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1465: raise OKC_API.G_EXCEPTION_ERROR;
1466: END IF;

Line 1463: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1459: x_clev_rec => x_cle_rec);
1460:
1461:
1462: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1463: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1464: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1465: raise OKC_API.G_EXCEPTION_ERROR;
1466: END IF;
1467: --

Line 1464: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1460:
1461:
1462: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1463: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1464: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1465: raise OKC_API.G_EXCEPTION_ERROR;
1466: END IF;
1467: --
1468: if p_kid is NULL then

Line 1465: raise OKC_API.G_EXCEPTION_ERROR;

1461:
1462: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1463: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1464: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1465: raise OKC_API.G_EXCEPTION_ERROR;
1466: END IF;
1467: --
1468: if p_kid is NULL then
1469: c := c+1;

Line 1480: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1476: end if;
1477:
1478:
1479: EXCEPTION
1480: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1481: line_message(p_knum_and_mod =>l_knum_and_mod,
1482: p_line_number=>l_line_number,
1483: p_status =>l_new_status,
1484: p_old_status =>p_active_line_rec.meaning,

Line 1488: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1484: p_old_status =>p_active_line_rec.meaning,
1485: p_msg_data => x_msg_data,
1486: p_type =>'U');
1487: p_line_errors := p_line_errors +1 ;
1488: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1489: rollback to H_STATUS;
1490: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1491: line_message(p_knum_and_mod =>l_knum_and_mod,
1492: p_line_number=>l_line_number,

Line 1490: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1486: p_type =>'U');
1487: p_line_errors := p_line_errors +1 ;
1488: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1489: rollback to H_STATUS;
1490: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1491: line_message(p_knum_and_mod =>l_knum_and_mod,
1492: p_line_number=>l_line_number,
1493: p_status =>l_new_status,
1494: p_old_status =>p_active_line_rec.meaning,

Line 1498: x_return_status := OKC_API.G_RET_STS_ERROR;

1494: p_old_status =>p_active_line_rec.meaning,
1495: p_msg_data => x_msg_data,
1496: p_type =>'E');
1497: p_line_errors := p_line_errors +1 ;
1498: x_return_status := OKC_API.G_RET_STS_ERROR;
1499: rollback to H_STATUS;
1500: WHEN OTHERS then
1501: line_message(p_knum_and_mod =>l_knum_and_mod,
1502: p_line_number=>l_line_number,

Line 1508: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1504: p_old_status =>p_active_line_rec.meaning,
1505: p_msg_data => x_msg_data,
1506: p_type =>'U');
1507: p_line_errors := p_line_errors +1 ;
1508: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1509: rollback to H_STATUS;
1510: END line_active;
1511:
1512: --bug 5930684

Line 1523: l_return_status := OKC_API.G_RET_STS_SUCCESS;

1519: c := 0;
1520: end if;
1521: savepoint H_STATUS;
1522: p_line_count:= p_line_count + 1;
1523: l_return_status := OKC_API.G_RET_STS_SUCCESS;
1524: l_knum_and_mod := p_signed_line_rec.contract_number||' '||p_signed_line_rec.contract_number_modifier;
1525: l_new_status := null;
1526: l_new_status_m := null;
1527:

Line 1569: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1565: x_msg_data => x_msg_data,
1566: p_clev_rec => l_cle_rec);
1567:
1568:
1569: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1570: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1571: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1572: raise OKC_API.G_EXCEPTION_ERROR;
1573: END IF;

Line 1570: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1566: p_clev_rec => l_cle_rec);
1567:
1568:
1569: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1570: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1571: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1572: raise OKC_API.G_EXCEPTION_ERROR;
1573: END IF;
1574: --

Line 1571: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1567:
1568:
1569: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1570: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1571: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1572: raise OKC_API.G_EXCEPTION_ERROR;
1573: END IF;
1574: --
1575:

Line 1572: raise OKC_API.G_EXCEPTION_ERROR;

1568:
1569: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1570: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1571: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1572: raise OKC_API.G_EXCEPTION_ERROR;
1573: END IF;
1574: --
1575:
1576: update_contract_line (

Line 1589: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1585: p_clev_rec => l_cle_rec,
1586: x_clev_rec => x_cle_rec);
1587:
1588:
1589: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1590: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1591: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1592: raise OKC_API.G_EXCEPTION_ERROR;
1593: END IF;

Line 1590: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1586: x_clev_rec => x_cle_rec);
1587:
1588:
1589: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1590: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1591: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1592: raise OKC_API.G_EXCEPTION_ERROR;
1593: END IF;
1594: --

Line 1591: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1587:
1588:
1589: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1590: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1591: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1592: raise OKC_API.G_EXCEPTION_ERROR;
1593: END IF;
1594: --
1595: if p_kid is NULL then

Line 1592: raise OKC_API.G_EXCEPTION_ERROR;

1588:
1589: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1590: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1591: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1592: raise OKC_API.G_EXCEPTION_ERROR;
1593: END IF;
1594: --
1595: if p_kid is NULL then
1596: c := c+1;

Line 1607: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1603: end if;
1604:
1605:
1606: EXCEPTION
1607: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1608: line_message(p_knum_and_mod =>l_knum_and_mod,
1609: p_line_number=>l_line_number,
1610: p_status =>l_new_status,
1611: p_old_status =>p_signed_line_rec.meaning,

Line 1615: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1611: p_old_status =>p_signed_line_rec.meaning,
1612: p_msg_data => x_msg_data,
1613: p_type =>'U');
1614: p_line_errors := p_line_errors +1 ;
1615: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1616: rollback to H_STATUS;
1617: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1618: line_message(p_knum_and_mod =>l_knum_and_mod,
1619: p_line_number=>l_line_number,

Line 1617: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1613: p_type =>'U');
1614: p_line_errors := p_line_errors +1 ;
1615: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1616: rollback to H_STATUS;
1617: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1618: line_message(p_knum_and_mod =>l_knum_and_mod,
1619: p_line_number=>l_line_number,
1620: p_status =>l_new_status,
1621: p_old_status =>p_signed_line_rec.meaning,

Line 1625: x_return_status := OKC_API.G_RET_STS_ERROR;

1621: p_old_status =>p_signed_line_rec.meaning,
1622: p_msg_data => x_msg_data,
1623: p_type =>'E');
1624: p_line_errors := p_line_errors +1 ;
1625: x_return_status := OKC_API.G_RET_STS_ERROR;
1626: rollback to H_STATUS;
1627: WHEN OTHERS then
1628: line_message(p_knum_and_mod =>l_knum_and_mod,
1629: p_line_number=>l_line_number,

Line 1635: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1631: p_old_status =>p_signed_line_rec.meaning,
1632: p_msg_data => x_msg_data,
1633: p_type =>'U');
1634: p_line_errors := p_line_errors +1 ;
1635: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1636: rollback to H_STATUS;
1637: END line_signed;
1638: -- end of bug 5930684
1639:

Line 1665: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1661:
1662: BEGIN
1663:
1664:
1665: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1666: --added for bug fix 5285247
1667: Savepoint H_STATUS;
1668: l_new_status := null;
1669: l_new_status_m := null;

Line 1952: l_return_status := OKC_API.G_RET_STS_SUCCESS;

1948: ---------------------------------------------------------------------------------
1949: --Added for bug 5402421
1950: Savepoint H_STATUS;
1951:
1952: l_return_status := OKC_API.G_RET_STS_SUCCESS;
1953: -- From ACTIVE/SIGNED to Expired
1954: IF (h_status = 'EXPIRED') OR (h_status IS NULL) THEN
1955: IF p_kid IS NULL THEN
1956: /* Commented for Bug #3967643.

Line 2306: l_return_status := OKC_API.G_RET_STS_SUCCESS;

2302: END LOOP;
2303: END IF;
2304: END IF;
2305: END IF; --
2306: l_return_status := OKC_API.G_RET_STS_SUCCESS;
2307: l_new_status := null;
2308: l_new_status_m := null;
2309: l_knum_and_mod := null;
2310: l_line_number := null;

Line 2669: l_return_status := OKC_API.G_RET_STS_SUCCESS;

2665: END IF;
2666:
2667: Savepoint H_STATUS;
2668:
2669: l_return_status := OKC_API.G_RET_STS_SUCCESS;
2670: l_new_status := null;
2671: l_new_status_m := null;
2672: l_knum_and_mod := null;
2673: l_line_number := null;

Line 2935: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2931: p_msg_data => x_msg_data,
2932: p_type =>'U');
2933: p_line_errors := p_line_errors +1 ;
2934: rollback to H_STATUS;
2935: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2936: return;
2937:
2938: END; -- procedure line_status_change
2939: -- BUG 4285665 --

Line 3058: l_return_status VARCHAR2(1) := okc_api.g_ret_sts_success;

3054: p_debug IN VARCHAR2 ,
3055: p_last_rundate IN VARCHAR2 ) IS
3056: L_K_N_W_M VARCHAR2(240); -- contract number conactinated with contract number modifier.
3057: C number := 0;
3058: l_return_status VARCHAR2(1) := okc_api.g_ret_sts_success;
3059: p_init_msg_list VARCHAR2(200) := okc_api.g_true;
3060: x_msg_count NUMBER := okc_api.g_miss_num;
3061: x_msg_data VARCHAR2(2000) := okc_api.g_miss_char;
3062: l_chr_rec okc_contract_pub.chrv_rec_type;

Line 3059: p_init_msg_list VARCHAR2(200) := okc_api.g_true;

3055: p_last_rundate IN VARCHAR2 ) IS
3056: L_K_N_W_M VARCHAR2(240); -- contract number conactinated with contract number modifier.
3057: C number := 0;
3058: l_return_status VARCHAR2(1) := okc_api.g_ret_sts_success;
3059: p_init_msg_list VARCHAR2(200) := okc_api.g_true;
3060: x_msg_count NUMBER := okc_api.g_miss_num;
3061: x_msg_data VARCHAR2(2000) := okc_api.g_miss_char;
3062: l_chr_rec okc_contract_pub.chrv_rec_type;
3063: i_chr_rec okc_contract_pub.chrv_rec_type;

Line 3060: x_msg_count NUMBER := okc_api.g_miss_num;

3056: L_K_N_W_M VARCHAR2(240); -- contract number conactinated with contract number modifier.
3057: C number := 0;
3058: l_return_status VARCHAR2(1) := okc_api.g_ret_sts_success;
3059: p_init_msg_list VARCHAR2(200) := okc_api.g_true;
3060: x_msg_count NUMBER := okc_api.g_miss_num;
3061: x_msg_data VARCHAR2(2000) := okc_api.g_miss_char;
3062: l_chr_rec okc_contract_pub.chrv_rec_type;
3063: i_chr_rec okc_contract_pub.chrv_rec_type;
3064: p_error_from_line VARCHAR2(1) := 'N';

Line 3061: x_msg_data VARCHAR2(2000) := okc_api.g_miss_char;

3057: C number := 0;
3058: l_return_status VARCHAR2(1) := okc_api.g_ret_sts_success;
3059: p_init_msg_list VARCHAR2(200) := okc_api.g_true;
3060: x_msg_count NUMBER := okc_api.g_miss_num;
3061: x_msg_data VARCHAR2(2000) := okc_api.g_miss_char;
3062: l_chr_rec okc_contract_pub.chrv_rec_type;
3063: i_chr_rec okc_contract_pub.chrv_rec_type;
3064: p_error_from_line VARCHAR2(1) := 'N';
3065:

Line 3318: l_return_status := OKC_API.G_RET_STS_SUCCESS;

3314: c := 0;
3315: end if;
3316: savepoint H_STATUS;
3317: p_hdr_count:= p_hdr_count + 1;
3318: l_return_status := OKC_API.G_RET_STS_SUCCESS;
3319: L_K_N_W_M := r_terminated.K_N_W_M;
3320:
3321: l_new_status := null;
3322: l_new_status_m := null;

Line 3347: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3343: x_return_status => l_return_status,
3344: x_msg_count => x_msg_count,
3345: x_msg_data => x_msg_data,
3346: p_chrv_rec => l_chr_rec);
3347: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3348: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3349: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3350: raise OKC_API.G_EXCEPTION_ERROR;
3351: END IF;

Line 3348: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3344: x_msg_count => x_msg_count,
3345: x_msg_data => x_msg_data,
3346: p_chrv_rec => l_chr_rec);
3347: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3348: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3349: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3350: raise OKC_API.G_EXCEPTION_ERROR;
3351: END IF;
3352: --

Line 3349: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3345: x_msg_data => x_msg_data,
3346: p_chrv_rec => l_chr_rec);
3347: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3348: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3349: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3350: raise OKC_API.G_EXCEPTION_ERROR;
3351: END IF;
3352: --
3353: --

Line 3350: raise OKC_API.G_EXCEPTION_ERROR;

3346: p_chrv_rec => l_chr_rec);
3347: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3348: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3349: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3350: raise OKC_API.G_EXCEPTION_ERROR;
3351: END IF;
3352: --
3353: --
3354: update_contract_header (

Line 3363: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3359: x_msg_data => x_msg_data,
3360: p_chrv_rec => l_chr_rec,
3361: x_chrv_rec => i_chr_rec);
3362:
3363: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3364: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3365: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3366: raise OKC_API.G_EXCEPTION_ERROR;
3367: END IF;

Line 3364: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3360: p_chrv_rec => l_chr_rec,
3361: x_chrv_rec => i_chr_rec);
3362:
3363: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3364: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3365: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3366: raise OKC_API.G_EXCEPTION_ERROR;
3367: END IF;
3368:

Line 3365: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3361: x_chrv_rec => i_chr_rec);
3362:
3363: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3364: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3365: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3366: raise OKC_API.G_EXCEPTION_ERROR;
3367: END IF;
3368:
3369: OKC_K_TERM_ASMBLR_PVT.acn_assemble(

Line 3366: raise OKC_API.G_EXCEPTION_ERROR;

3362:
3363: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3364: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3365: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3366: raise OKC_API.G_EXCEPTION_ERROR;
3367: END IF;
3368:
3369: OKC_K_TERM_ASMBLR_PVT.acn_assemble(
3370: p_api_version => 1.0 ,

Line 3387: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3383: p_term_reason => r_terminated.termination_reason);
3384:
3385:
3386: --
3387: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3388: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3389: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3390: raise OKC_API.G_EXCEPTION_ERROR;
3391: END IF;

Line 3388: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3384:
3385:
3386: --
3387: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3388: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3389: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3390: raise OKC_API.G_EXCEPTION_ERROR;
3391: END IF;
3392: OKC_TIME_RES_PUB.res_time_termnt_k(

Line 3389: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3385:
3386: --
3387: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3388: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3389: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3390: raise OKC_API.G_EXCEPTION_ERROR;
3391: END IF;
3392: OKC_TIME_RES_PUB.res_time_termnt_k(
3393: P_CHR_ID => r_terminated.id,

Line 3390: raise OKC_API.G_EXCEPTION_ERROR;

3386: --
3387: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3388: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3389: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3390: raise OKC_API.G_EXCEPTION_ERROR;
3391: END IF;
3392: OKC_TIME_RES_PUB.res_time_termnt_k(
3393: P_CHR_ID => r_terminated.id,
3394: P_CLE_ID => NULL,

Line 3402: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3398: x_return_status => l_return_status
3399: );
3400:
3401:
3402: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3403: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3404: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3405: raise OKC_API.G_EXCEPTION_ERROR;
3406: END IF;

Line 3403: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3399: );
3400:
3401:
3402: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3403: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3404: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3405: raise OKC_API.G_EXCEPTION_ERROR;
3406: END IF;
3407: --

Line 3404: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3400:
3401:
3402: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3403: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3404: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3405: raise OKC_API.G_EXCEPTION_ERROR;
3406: END IF;
3407: --
3408: --+

Line 3405: raise OKC_API.G_EXCEPTION_ERROR;

3401:
3402: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3403: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3404: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3405: raise OKC_API.G_EXCEPTION_ERROR;
3406: END IF;
3407: --
3408: --+
3409: --+ remember header status for lines to follow it, not default

Line 3425: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3421: x_return_status => l_return_status);
3422:
3423:
3424:
3425: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3426: p_error_from_line := 'Y';
3427: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3428: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3429: p_error_from_line := 'Y';

Line 3427: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3423:
3424:
3425: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3426: p_error_from_line := 'Y';
3427: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3428: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3429: p_error_from_line := 'Y';
3430: raise OKC_API.G_EXCEPTION_ERROR;
3431: END IF;

Line 3428: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3424:
3425: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3426: p_error_from_line := 'Y';
3427: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3428: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3429: p_error_from_line := 'Y';
3430: raise OKC_API.G_EXCEPTION_ERROR;
3431: END IF;
3432: header_message(p_knum_and_mod =>L_K_N_W_M,

Line 3430: raise OKC_API.G_EXCEPTION_ERROR;

3426: p_error_from_line := 'Y';
3427: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3428: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3429: p_error_from_line := 'Y';
3430: raise OKC_API.G_EXCEPTION_ERROR;
3431: END IF;
3432: header_message(p_knum_and_mod =>L_K_N_W_M,
3433: p_old_status =>r_terminated.meaning,
3434: p_status =>h_new_status_m,

Line 3438: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

3434: p_status =>h_new_status_m,
3435: p_type =>'S');
3436: c:= c+1;
3437: EXCEPTION
3438: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3439: header_message(p_knum_and_mod =>L_K_N_W_M,
3440: p_status =>h_new_status_m,
3441: p_old_status =>r_terminated.meaning,
3442: p_msg_data => x_msg_data,

Line 3450: WHEN OKC_API.G_EXCEPTION_ERROR THEN

3446: else
3447: p_error_from_line := 'N';
3448: end if;
3449: rollback to H_STATUS;
3450: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3451: header_message(p_knum_and_mod =>L_K_N_W_M,
3452: p_status =>h_new_status_m,
3453: p_old_status =>r_terminated.meaning,
3454: p_msg_data => x_msg_data,

Line 3492: l_return_status := OKC_API.G_RET_STS_SUCCESS;

3488: end if;
3489:
3490: savepoint H_STATUS;
3491: p_hdr_count:= p_hdr_count + 1;
3492: l_return_status := OKC_API.G_RET_STS_SUCCESS;
3493: L_K_N_W_M := r_expired.K_N_W_M;
3494: l_new_status := null;
3495: l_new_status_m := null;
3496: h_status := null;

Line 3518: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3514: x_return_status => l_return_status,
3515: x_msg_count => x_msg_count,
3516: x_msg_data => x_msg_data,
3517: p_chrv_rec => l_chr_rec);
3518: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3519: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3520: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3521: raise OKC_API.G_EXCEPTION_ERROR;
3522: END IF;

Line 3519: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3515: x_msg_count => x_msg_count,
3516: x_msg_data => x_msg_data,
3517: p_chrv_rec => l_chr_rec);
3518: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3519: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3520: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3521: raise OKC_API.G_EXCEPTION_ERROR;
3522: END IF;
3523: --

Line 3520: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3516: x_msg_data => x_msg_data,
3517: p_chrv_rec => l_chr_rec);
3518: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3519: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3520: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3521: raise OKC_API.G_EXCEPTION_ERROR;
3522: END IF;
3523: --
3524: update_contract_header (

Line 3521: raise OKC_API.G_EXCEPTION_ERROR;

3517: p_chrv_rec => l_chr_rec);
3518: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3519: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3520: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3521: raise OKC_API.G_EXCEPTION_ERROR;
3522: END IF;
3523: --
3524: update_contract_header (
3525: p_api_version => 1.0,

Line 3532: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3528: x_msg_count => x_msg_count,
3529: x_msg_data => x_msg_data,
3530: p_chrv_rec => l_chr_rec,
3531: x_chrv_rec => i_chr_rec);
3532: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3533: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3534: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3535: raise OKC_API.G_EXCEPTION_ERROR;
3536: END IF;

Line 3533: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3529: x_msg_data => x_msg_data,
3530: p_chrv_rec => l_chr_rec,
3531: x_chrv_rec => i_chr_rec);
3532: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3533: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3534: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3535: raise OKC_API.G_EXCEPTION_ERROR;
3536: END IF;
3537: --+

Line 3534: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3530: p_chrv_rec => l_chr_rec,
3531: x_chrv_rec => i_chr_rec);
3532: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3533: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3534: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3535: raise OKC_API.G_EXCEPTION_ERROR;
3536: END IF;
3537: --+
3538: --+ remember header status for lines to follow it, not default

Line 3535: raise OKC_API.G_EXCEPTION_ERROR;

3531: x_chrv_rec => i_chr_rec);
3532: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3533: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3534: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3535: raise OKC_API.G_EXCEPTION_ERROR;
3536: END IF;
3537: --+
3538: --+ remember header status for lines to follow it, not default
3539: --+

Line 3549: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3545: p_k_num => r_expired.contract_number,
3546: p_k_num_mod => r_expired.contract_number_modifier,
3547: p_update_minor_version =>'N',
3548: x_return_status => l_return_status);
3549: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3550: p_error_from_line := 'Y';
3551: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3552: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3553: p_error_from_line := 'Y';

Line 3551: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3547: p_update_minor_version =>'N',
3548: x_return_status => l_return_status);
3549: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3550: p_error_from_line := 'Y';
3551: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3552: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3553: p_error_from_line := 'Y';
3554: raise OKC_API.G_EXCEPTION_ERROR;
3555: END IF;

Line 3552: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3548: x_return_status => l_return_status);
3549: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3550: p_error_from_line := 'Y';
3551: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3552: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3553: p_error_from_line := 'Y';
3554: raise OKC_API.G_EXCEPTION_ERROR;
3555: END IF;
3556: header_message(p_knum_and_mod =>L_K_N_W_M,

Line 3554: raise OKC_API.G_EXCEPTION_ERROR;

3550: p_error_from_line := 'Y';
3551: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3552: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3553: p_error_from_line := 'Y';
3554: raise OKC_API.G_EXCEPTION_ERROR;
3555: END IF;
3556: header_message(p_knum_and_mod =>L_K_N_W_M,
3557: p_status =>h_new_status_m,
3558: p_old_status =>r_expired.meaning,

Line 3563: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

3559: p_type =>'S');
3560:
3561: c := c + 1;
3562: EXCEPTION
3563: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3564: header_message(p_knum_and_mod =>L_K_N_W_M,
3565: p_status =>h_new_status_m,
3566: p_old_status =>r_expired.meaning,
3567: p_msg_data => x_msg_data,

Line 3575: WHEN OKC_API.G_EXCEPTION_ERROR THEN

3571: else
3572: p_error_from_line := 'N';
3573: end if;
3574: rollback to H_STATUS;
3575: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3576: header_message(p_knum_and_mod =>L_K_N_W_M,
3577: p_status =>h_new_status_m,
3578: p_old_status =>r_expired.meaning,
3579: p_msg_data => x_msg_data,

Line 3614: l_return_status := OKC_API.G_RET_STS_SUCCESS;

3610: c := 0;
3611: end if;
3612: savepoint H_STATUS;
3613: p_hdr_count:= p_hdr_count + 1;
3614: l_return_status := OKC_API.G_RET_STS_SUCCESS;
3615: L_K_N_W_M := r_active.K_N_W_M;
3616:
3617: l_new_status := null;
3618: l_new_status_m := null;

Line 3640: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3636: x_msg_count => x_msg_count,
3637: x_msg_data => x_msg_data,
3638: p_chrv_rec => l_chr_rec);
3639:
3640: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3641: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3642: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3643: raise OKC_API.G_EXCEPTION_ERROR;
3644: END IF;

Line 3641: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3637: x_msg_data => x_msg_data,
3638: p_chrv_rec => l_chr_rec);
3639:
3640: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3641: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3642: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3643: raise OKC_API.G_EXCEPTION_ERROR;
3644: END IF;
3645: --

Line 3642: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3638: p_chrv_rec => l_chr_rec);
3639:
3640: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3641: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3642: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3643: raise OKC_API.G_EXCEPTION_ERROR;
3644: END IF;
3645: --
3646: update_contract_header (

Line 3643: raise OKC_API.G_EXCEPTION_ERROR;

3639:
3640: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3641: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3642: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3643: raise OKC_API.G_EXCEPTION_ERROR;
3644: END IF;
3645: --
3646: update_contract_header (
3647: p_api_version => 1.0,

Line 3655: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3651: x_msg_data => x_msg_data,
3652: p_chrv_rec => l_chr_rec,
3653: x_chrv_rec => i_chr_rec);
3654:
3655: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3656: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3658: raise OKC_API.G_EXCEPTION_ERROR;
3659: END IF;

Line 3656: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3652: p_chrv_rec => l_chr_rec,
3653: x_chrv_rec => i_chr_rec);
3654:
3655: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3656: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3658: raise OKC_API.G_EXCEPTION_ERROR;
3659: END IF;
3660: --+

Line 3657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3653: x_chrv_rec => i_chr_rec);
3654:
3655: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3656: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3658: raise OKC_API.G_EXCEPTION_ERROR;
3659: END IF;
3660: --+
3661: --+ remember header status for lines to follow it, not default

Line 3658: raise OKC_API.G_EXCEPTION_ERROR;

3654:
3655: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3656: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3658: raise OKC_API.G_EXCEPTION_ERROR;
3659: END IF;
3660: --+
3661: --+ remember header status for lines to follow it, not default
3662: --+

Line 3674: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3670: p_k_num_mod => r_active.contract_number_modifier,
3671: p_update_minor_version =>'N',
3672: x_return_status => l_return_status);
3673:
3674: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3675: p_error_from_line := 'Y';
3676: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3677: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3678: p_error_from_line := 'Y';

Line 3676: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3672: x_return_status => l_return_status);
3673:
3674: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3675: p_error_from_line := 'Y';
3676: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3677: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3678: p_error_from_line := 'Y';
3679: raise OKC_API.G_EXCEPTION_ERROR;
3680: END IF;

Line 3677: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3673:
3674: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3675: p_error_from_line := 'Y';
3676: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3677: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3678: p_error_from_line := 'Y';
3679: raise OKC_API.G_EXCEPTION_ERROR;
3680: END IF;
3681: header_message(p_knum_and_mod =>L_K_N_W_M,

Line 3679: raise OKC_API.G_EXCEPTION_ERROR;

3675: p_error_from_line := 'Y';
3676: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3677: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3678: p_error_from_line := 'Y';
3679: raise OKC_API.G_EXCEPTION_ERROR;
3680: END IF;
3681: header_message(p_knum_and_mod =>L_K_N_W_M,
3682: p_status =>h_new_status_m,
3683: p_old_status =>r_active.meaning,

Line 3687: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

3683: p_old_status =>r_active.meaning,
3684: p_type =>'S');
3685: c := c+1;
3686: EXCEPTION
3687: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3688: header_message(p_knum_and_mod =>L_K_N_W_M,
3689: p_status =>h_new_status_m,
3690: p_old_status =>r_active.meaning,
3691: p_msg_data => x_msg_data,

Line 3699: WHEN OKC_API.G_EXCEPTION_ERROR THEN

3695: else
3696: p_error_from_line := 'N';
3697: end if;
3698: rollback to H_STATUS;
3699: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3700: header_message(p_knum_and_mod =>L_K_N_W_M,
3701: p_status =>h_new_status_m,
3702: p_old_status =>r_active.meaning,
3703: p_msg_data => x_msg_data,

Line 3741: l_return_status := OKC_API.G_RET_STS_SUCCESS;

3737: c := 0;
3738: end if;
3739: savepoint H_STATUS;
3740: p_hdr_count:= p_hdr_count + 1;
3741: l_return_status := OKC_API.G_RET_STS_SUCCESS;
3742: L_K_N_W_M := r_signed.K_N_W_M;
3743:
3744: l_new_status := null;
3745: l_new_status_m := null;

Line 3767: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3763: x_msg_count => x_msg_count,
3764: x_msg_data => x_msg_data,
3765: p_chrv_rec => l_chr_rec);
3766:
3767: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3768: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3769: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3770: raise OKC_API.G_EXCEPTION_ERROR;
3771: END IF;

Line 3768: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3764: x_msg_data => x_msg_data,
3765: p_chrv_rec => l_chr_rec);
3766:
3767: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3768: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3769: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3770: raise OKC_API.G_EXCEPTION_ERROR;
3771: END IF;
3772: --

Line 3769: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3765: p_chrv_rec => l_chr_rec);
3766:
3767: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3768: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3769: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3770: raise OKC_API.G_EXCEPTION_ERROR;
3771: END IF;
3772: --
3773: update_contract_header (

Line 3770: raise OKC_API.G_EXCEPTION_ERROR;

3766:
3767: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3768: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3769: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3770: raise OKC_API.G_EXCEPTION_ERROR;
3771: END IF;
3772: --
3773: update_contract_header (
3774: p_api_version => 1.0,

Line 3782: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3778: x_msg_data => x_msg_data,
3779: p_chrv_rec => l_chr_rec,
3780: x_chrv_rec => i_chr_rec);
3781:
3782: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3783: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3784: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3785: raise OKC_API.G_EXCEPTION_ERROR;
3786: END IF;

Line 3783: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3779: p_chrv_rec => l_chr_rec,
3780: x_chrv_rec => i_chr_rec);
3781:
3782: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3783: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3784: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3785: raise OKC_API.G_EXCEPTION_ERROR;
3786: END IF;
3787: --+

Line 3784: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3780: x_chrv_rec => i_chr_rec);
3781:
3782: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3783: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3784: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3785: raise OKC_API.G_EXCEPTION_ERROR;
3786: END IF;
3787: --+
3788: --+ remember header status for lines to follow it, not default

Line 3785: raise OKC_API.G_EXCEPTION_ERROR;

3781:
3782: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3783: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3784: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3785: raise OKC_API.G_EXCEPTION_ERROR;
3786: END IF;
3787: --+
3788: --+ remember header status for lines to follow it, not default
3789: --+

Line 3801: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

3797: p_k_num_mod => r_signed.contract_number_modifier,
3798: p_update_minor_version =>'N',
3799: x_return_status => l_return_status);
3800:
3801: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3802: p_error_from_line := 'Y';
3803: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3804: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3805: p_error_from_line := 'Y';

Line 3803: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

3799: x_return_status => l_return_status);
3800:
3801: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3802: p_error_from_line := 'Y';
3803: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3804: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3805: p_error_from_line := 'Y';
3806: raise OKC_API.G_EXCEPTION_ERROR;
3807: END IF;

Line 3804: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

3800:
3801: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3802: p_error_from_line := 'Y';
3803: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3804: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3805: p_error_from_line := 'Y';
3806: raise OKC_API.G_EXCEPTION_ERROR;
3807: END IF;
3808: header_message(p_knum_and_mod =>L_K_N_W_M,

Line 3806: raise OKC_API.G_EXCEPTION_ERROR;

3802: p_error_from_line := 'Y';
3803: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3804: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3805: p_error_from_line := 'Y';
3806: raise OKC_API.G_EXCEPTION_ERROR;
3807: END IF;
3808: header_message(p_knum_and_mod =>L_K_N_W_M,
3809: p_status =>h_new_status_m,
3810: p_old_status =>r_signed.meaning,

Line 3814: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

3810: p_old_status =>r_signed.meaning,
3811: p_type =>'S');
3812: c := c+1;
3813: EXCEPTION
3814: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3815: header_message(p_knum_and_mod =>L_K_N_W_M,
3816: p_status =>h_new_status_m,
3817: p_old_status =>r_signed.meaning,
3818: p_msg_data => x_msg_data,

Line 3826: WHEN OKC_API.G_EXCEPTION_ERROR THEN

3822: else
3823: p_error_from_line := 'N';
3824: end if;
3825: rollback to H_STATUS;
3826: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3827: header_message(p_knum_and_mod =>L_K_N_W_M,
3828: p_status =>h_new_status_m,
3829: p_old_status =>r_signed.meaning,
3830: p_msg_data => x_msg_data,