APPS.OKL_SPLIT_ASSET_COMP_PVT dependencies on OKL_API

Line 29: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

25: IS
26:
27: l_api_version CONSTANT NUMBER := 1.0;
28: l_api_name CONSTANT VARCHAR2(30) := 'calculate_unit_cost';
29: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
30: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
31: l_id okl_txd_assets_B.ID%TYPE;
32: l_split_percent okl_txd_assets_B.SPLIT_PERCENT%TYPE;
33: l_oec okl_txl_assets_B.ORIGINAL_COST%TYPE;

Line 30: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;

26:
27: l_api_version CONSTANT NUMBER := 1.0;
28: l_api_name CONSTANT VARCHAR2(30) := 'calculate_unit_cost';
29: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
30: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
31: l_id okl_txd_assets_B.ID%TYPE;
32: l_split_percent okl_txd_assets_B.SPLIT_PERCENT%TYPE;
33: l_oec okl_txl_assets_B.ORIGINAL_COST%TYPE;
34: l_units okl_txl_assets_B.CURRENT_UNITS%TYPE;

Line 67: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

63: p_api_version,
64: l_api_name,
65: G_PKG_NAME ))
66: THEN
67: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
68: END IF;
69:
70: -- Initialize message list if requested
71: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 76: x_return_status := OKL_API.G_RET_STS_SUCCESS;

72: FND_MSG_PUB.initialize;
73: END IF;
74:
75: -- Initialize API status to success
76: x_return_status := OKL_API.G_RET_STS_SUCCESS;
77:
78:
79: /*** Begin API body ****************************************************/
80:

Line 112: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

108: x_msg_data,
109: l_asdv_rec,
110: x_asdv_rec);
111:
112: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
113: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
114: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
115: RAISE OKL_API.G_EXCEPTION_ERROR;
116: END IF;

Line 113: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

109: l_asdv_rec,
110: x_asdv_rec);
111:
112: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
113: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
114: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
115: RAISE OKL_API.G_EXCEPTION_ERROR;
116: END IF;
117:

Line 114: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN

110: x_asdv_rec);
111:
112: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
113: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
114: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
115: RAISE OKL_API.G_EXCEPTION_ERROR;
116: END IF;
117:
118: END LOOP;

Line 115: RAISE OKL_API.G_EXCEPTION_ERROR;

111:
112: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
113: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
114: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
115: RAISE OKL_API.G_EXCEPTION_ERROR;
116: END IF;
117:
118: END LOOP;
119: CLOSE c;

Line 129: WHEN OKL_API.G_EXCEPTION_ERROR THEN

125: (p_count => x_msg_count,
126: p_data => x_msg_data);
127:
128: EXCEPTION
129: WHEN OKL_API.G_EXCEPTION_ERROR THEN
130: ROLLBACK TO calculate_unit_cost_pvt;
131: x_return_status := OKL_API.G_RET_STS_ERROR;
132: FND_MSG_PUB.Count_And_Get
133: (p_count => x_msg_count,

Line 131: x_return_status := OKL_API.G_RET_STS_ERROR;

127:
128: EXCEPTION
129: WHEN OKL_API.G_EXCEPTION_ERROR THEN
130: ROLLBACK TO calculate_unit_cost_pvt;
131: x_return_status := OKL_API.G_RET_STS_ERROR;
132: FND_MSG_PUB.Count_And_Get
133: (p_count => x_msg_count,
134: p_data => x_msg_data);
135:

Line 136: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

132: FND_MSG_PUB.Count_And_Get
133: (p_count => x_msg_count,
134: p_data => x_msg_data);
135:
136: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
137: ROLLBACK TO calculate_unit_cost_pvt;
138: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
139: FND_MSG_PUB.Count_And_Get
140: (p_count => x_msg_count,

Line 138: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

134: p_data => x_msg_data);
135:
136: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
137: ROLLBACK TO calculate_unit_cost_pvt;
138: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
139: FND_MSG_PUB.Count_And_Get
140: (p_count => x_msg_count,
141: p_data => x_msg_data);
142:

Line 145: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

141: p_data => x_msg_data);
142:
143: WHEN OTHERS THEN
144: ROLLBACK TO calculate_unit_cost_pvt;
145: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
146: OKL_API.Set_Message(p_app_name => G_APP_NAME,
147: p_msg_name => G_UNEXPECTED_ERROR,
148: p_token1 => G_SQLCODE_TOKEN,
149: p_token1_value => SQLCODE,

Line 146: OKL_API.Set_Message(p_app_name => G_APP_NAME,

142:
143: WHEN OTHERS THEN
144: ROLLBACK TO calculate_unit_cost_pvt;
145: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
146: OKL_API.Set_Message(p_app_name => G_APP_NAME,
147: p_msg_name => G_UNEXPECTED_ERROR,
148: p_token1 => G_SQLCODE_TOKEN,
149: p_token1_value => SQLCODE,
150: p_token2 => G_SQLERRM_TOKEN,

Line 165: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

161: p_asdv_rec IN advv_rec_type
162: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
163: ) RETURN VARCHAR2
164: IS
165: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
166: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
167: BEGIN
168:
169: -- is required

Line 166: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;

162: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
163: ) RETURN VARCHAR2
164: IS
165: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
166: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
167: BEGIN
168:
169: -- is required
170: IF (p_asdv_rec.ASSET_NUMBER IS NULL) OR

Line 171: (p_asdv_rec.ASSET_NUMBER = OKL_API.G_MISS_CHAR)

167: BEGIN
168:
169: -- is required
170: IF (p_asdv_rec.ASSET_NUMBER IS NULL) OR
171: (p_asdv_rec.ASSET_NUMBER = OKL_API.G_MISS_CHAR)
172: THEN
173: OKL_API.Set_Message(p_app_name => G_APP_NAME,
174: p_msg_name => G_REQUIRED_VALUE,
175: p_token1 => G_COL_NAME_TOKEN,

Line 173: OKL_API.Set_Message(p_app_name => G_APP_NAME,

169: -- is required
170: IF (p_asdv_rec.ASSET_NUMBER IS NULL) OR
171: (p_asdv_rec.ASSET_NUMBER = OKL_API.G_MISS_CHAR)
172: THEN
173: OKL_API.Set_Message(p_app_name => G_APP_NAME,
174: p_msg_name => G_REQUIRED_VALUE,
175: p_token1 => G_COL_NAME_TOKEN,
176: p_token1_value => 'Asset Number');
177: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 188: l_return_status := OKL_API.G_RET_STS_ERROR;

184:
185: RETURN l_return_status;
186: EXCEPTION
187: WHEN G_EXCEPTION_HALT_VALIDATION THEN
188: l_return_status := OKL_API.G_RET_STS_ERROR;
189: RETURN l_return_status;
190: WHEN OTHERS THEN
191: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
192: OKL_API.Set_Message(p_app_name => G_APP_NAME,

Line 191: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

187: WHEN G_EXCEPTION_HALT_VALIDATION THEN
188: l_return_status := OKL_API.G_RET_STS_ERROR;
189: RETURN l_return_status;
190: WHEN OTHERS THEN
191: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
192: OKL_API.Set_Message(p_app_name => G_APP_NAME,
193: p_msg_name => G_UNEXPECTED_ERROR,
194: p_token1 => G_SQLCODE_TOKEN,
195: p_token1_value => SQLCODE,

Line 192: OKL_API.Set_Message(p_app_name => G_APP_NAME,

188: l_return_status := OKL_API.G_RET_STS_ERROR;
189: RETURN l_return_status;
190: WHEN OTHERS THEN
191: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
192: OKL_API.Set_Message(p_app_name => G_APP_NAME,
193: p_msg_name => G_UNEXPECTED_ERROR,
194: p_token1 => G_SQLCODE_TOKEN,
195: p_token1_value => SQLCODE,
196: p_token2 => G_SQLERRM_TOKEN,

Line 208: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

204: p_asdv_rec IN advv_rec_type
205: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
206: ) RETURN VARCHAR2
207: IS
208: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
209: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
210: BEGIN
211:
212: -- is required

Line 209: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;

205: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
206: ) RETURN VARCHAR2
207: IS
208: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
209: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
210: BEGIN
211:
212: -- is required
213: IF (p_asdv_rec.DESCRIPTION IS NULL) OR

Line 214: (p_asdv_rec.DESCRIPTION = OKL_API.G_MISS_CHAR)

210: BEGIN
211:
212: -- is required
213: IF (p_asdv_rec.DESCRIPTION IS NULL) OR
214: (p_asdv_rec.DESCRIPTION = OKL_API.G_MISS_CHAR)
215: THEN
216: OKL_API.Set_Message(p_app_name => G_APP_NAME,
217: p_msg_name => G_REQUIRED_VALUE,
218: p_token1 => G_COL_NAME_TOKEN,

Line 216: OKL_API.Set_Message(p_app_name => G_APP_NAME,

212: -- is required
213: IF (p_asdv_rec.DESCRIPTION IS NULL) OR
214: (p_asdv_rec.DESCRIPTION = OKL_API.G_MISS_CHAR)
215: THEN
216: OKL_API.Set_Message(p_app_name => G_APP_NAME,
217: p_msg_name => G_REQUIRED_VALUE,
218: p_token1 => G_COL_NAME_TOKEN,
219: p_token1_value => 'Asset Description');
220: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 226: l_return_status := OKL_API.G_RET_STS_ERROR;

222:
223: RETURN l_return_status;
224: EXCEPTION
225: WHEN G_EXCEPTION_HALT_VALIDATION THEN
226: l_return_status := OKL_API.G_RET_STS_ERROR;
227: RETURN l_return_status;
228: WHEN OTHERS THEN
229: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
230: OKL_API.Set_Message(p_app_name => G_APP_NAME,

Line 229: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

225: WHEN G_EXCEPTION_HALT_VALIDATION THEN
226: l_return_status := OKL_API.G_RET_STS_ERROR;
227: RETURN l_return_status;
228: WHEN OTHERS THEN
229: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
230: OKL_API.Set_Message(p_app_name => G_APP_NAME,
231: p_msg_name => G_UNEXPECTED_ERROR,
232: p_token1 => G_SQLCODE_TOKEN,
233: p_token1_value => SQLCODE,

Line 230: OKL_API.Set_Message(p_app_name => G_APP_NAME,

226: l_return_status := OKL_API.G_RET_STS_ERROR;
227: RETURN l_return_status;
228: WHEN OTHERS THEN
229: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
230: OKL_API.Set_Message(p_app_name => G_APP_NAME,
231: p_msg_name => G_UNEXPECTED_ERROR,
232: p_token1 => G_SQLCODE_TOKEN,
233: p_token1_value => SQLCODE,
234: p_token2 => G_SQLERRM_TOKEN,

Line 246: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

242: p_asdv_rec IN advv_rec_type
243: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
244: ) RETURN VARCHAR2
245: IS
246: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
247: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
248: l_percent NUMBER;
249:
250: BEGIN

Line 247: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;

243: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
244: ) RETURN VARCHAR2
245: IS
246: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
247: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
248: l_percent NUMBER;
249:
250: BEGIN
251:

Line 254: (p_asdv_rec.SPLIT_PERCENT = OKL_API.G_MISS_NUM)

250: BEGIN
251:
252: -- is required
253: IF (p_asdv_rec.SPLIT_PERCENT IS NULL) OR
254: (p_asdv_rec.SPLIT_PERCENT = OKL_API.G_MISS_NUM)
255: THEN
256: OKL_API.Set_Message(p_app_name => G_APP_NAME,
257: p_msg_name => G_REQUIRED_VALUE,
258: p_token1 => G_COL_NAME_TOKEN,

Line 256: OKL_API.Set_Message(p_app_name => G_APP_NAME,

252: -- is required
253: IF (p_asdv_rec.SPLIT_PERCENT IS NULL) OR
254: (p_asdv_rec.SPLIT_PERCENT = OKL_API.G_MISS_NUM)
255: THEN
256: OKL_API.Set_Message(p_app_name => G_APP_NAME,
257: p_msg_name => G_REQUIRED_VALUE,
258: p_token1 => G_COL_NAME_TOKEN,
259: p_token1_value => 'Split Percent');
260: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 264: OKL_API.Set_Message(p_app_name => G_APP_NAME,

260: RAISE G_EXCEPTION_HALT_VALIDATION;
261: END IF;
262:
263: IF (p_asdv_rec.SPLIT_PERCENT < 0) THEN
264: OKL_API.Set_Message(p_app_name => G_APP_NAME,
265: p_msg_name => 'OKL_LLA_POSITIVE_AMOUNT_ONLY',
266: p_token1 => G_COL_NAME_TOKEN,
267: p_token1_value => 'Split Percent');
268: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 272: OKL_API.Set_Message(p_app_name => G_APP_NAME,

268: RAISE G_EXCEPTION_HALT_VALIDATION;
269: END IF;
270:
271: IF (p_asdv_rec.SPLIT_PERCENT > 100) THEN
272: OKL_API.Set_Message(p_app_name => G_APP_NAME,
273: p_msg_name => 'OKL_LLA_PERCENT');
274: RAISE G_EXCEPTION_HALT_VALIDATION;
275:
276: END IF;

Line 281: l_return_status := OKL_API.G_RET_STS_ERROR;

277:
278: RETURN l_return_status;
279: EXCEPTION
280: WHEN G_EXCEPTION_HALT_VALIDATION THEN
281: l_return_status := OKL_API.G_RET_STS_ERROR;
282: RETURN l_return_status;
283: WHEN OTHERS THEN
284: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
285: OKL_API.Set_Message(p_app_name => G_APP_NAME,

Line 284: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

280: WHEN G_EXCEPTION_HALT_VALIDATION THEN
281: l_return_status := OKL_API.G_RET_STS_ERROR;
282: RETURN l_return_status;
283: WHEN OTHERS THEN
284: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
285: OKL_API.Set_Message(p_app_name => G_APP_NAME,
286: p_msg_name => G_UNEXPECTED_ERROR,
287: p_token1 => G_SQLCODE_TOKEN,
288: p_token1_value => SQLCODE,

Line 285: OKL_API.Set_Message(p_app_name => G_APP_NAME,

281: l_return_status := OKL_API.G_RET_STS_ERROR;
282: RETURN l_return_status;
283: WHEN OTHERS THEN
284: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
285: OKL_API.Set_Message(p_app_name => G_APP_NAME,
286: p_msg_name => G_UNEXPECTED_ERROR,
287: p_token1 => G_SQLCODE_TOKEN,
288: p_token1_value => SQLCODE,
289: p_token2 => G_SQLERRM_TOKEN,

Line 301: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

297: p_asdv_rec IN advv_rec_type
298: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
299: ) RETURN VARCHAR2
300: IS
301: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
302: l_dummy VARCHAR2(1) := '?';
303:
304: BEGIN
305:

Line 308: (p_asdv_rec.INVENTORY_ITEM_ID = OKL_API.G_MISS_NUM)

304: BEGIN
305:
306: -- is required
307: IF (p_asdv_rec.INVENTORY_ITEM_ID IS NULL) OR
308: (p_asdv_rec.INVENTORY_ITEM_ID = OKL_API.G_MISS_NUM)
309: THEN
310: OKL_API.Set_Message(p_app_name => G_APP_NAME,
311: p_msg_name => G_REQUIRED_VALUE,
312: p_token1 => G_COL_NAME_TOKEN,

Line 310: OKL_API.Set_Message(p_app_name => G_APP_NAME,

306: -- is required
307: IF (p_asdv_rec.INVENTORY_ITEM_ID IS NULL) OR
308: (p_asdv_rec.INVENTORY_ITEM_ID = OKL_API.G_MISS_NUM)
309: THEN
310: OKL_API.Set_Message(p_app_name => G_APP_NAME,
311: p_msg_name => G_REQUIRED_VALUE,
312: p_token1 => G_COL_NAME_TOKEN,
313: p_token1_value => 'Item');
314: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 322: l_return_status := OKL_API.G_RET_STS_ERROR;

318:
319: RETURN l_return_status;
320: EXCEPTION
321: WHEN G_EXCEPTION_HALT_VALIDATION THEN
322: l_return_status := OKL_API.G_RET_STS_ERROR;
323: RETURN l_return_status;
324: WHEN OTHERS THEN
325: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
326: OKL_API.Set_Message(p_app_name => G_APP_NAME,

Line 325: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

321: WHEN G_EXCEPTION_HALT_VALIDATION THEN
322: l_return_status := OKL_API.G_RET_STS_ERROR;
323: RETURN l_return_status;
324: WHEN OTHERS THEN
325: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
326: OKL_API.Set_Message(p_app_name => G_APP_NAME,
327: p_msg_name => G_UNEXPECTED_ERROR,
328: p_token1 => G_SQLCODE_TOKEN,
329: p_token1_value => SQLCODE,

Line 326: OKL_API.Set_Message(p_app_name => G_APP_NAME,

322: l_return_status := OKL_API.G_RET_STS_ERROR;
323: RETURN l_return_status;
324: WHEN OTHERS THEN
325: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
326: OKL_API.Set_Message(p_app_name => G_APP_NAME,
327: p_msg_name => G_UNEXPECTED_ERROR,
328: p_token1 => G_SQLCODE_TOKEN,
329: p_token1_value => SQLCODE,
330: p_token2 => G_SQLERRM_TOKEN,

Line 341: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

337: p_asdv_rec IN advv_rec_type
338: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
339: ) RETURN VARCHAR2
340: IS
341: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
342: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
343:
344: BEGIN
345:

Line 342: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

338: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
339: ) RETURN VARCHAR2
340: IS
341: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
342: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
343:
344: BEGIN
345:
346: -- Do formal attribute validation:

Line 349: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

345:
346: -- Do formal attribute validation:
347: l_return_status := validate_asset_number(p_asdv_rec, p_mode);
348: --- Store the highest degree of error
349: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
350: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
351: x_return_status := l_return_status;
352: END IF;
353: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 350: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

346: -- Do formal attribute validation:
347: l_return_status := validate_asset_number(p_asdv_rec, p_mode);
348: --- Store the highest degree of error
349: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
350: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
351: x_return_status := l_return_status;
352: END IF;
353: RAISE G_EXCEPTION_HALT_VALIDATION;
354: END IF;

Line 359: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

355:
356: -- Do formal attribute validation:
357: l_return_status := validate_asset_description(p_asdv_rec, p_mode);
358: --- Store the highest degree of error
359: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
360: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
361: x_return_status := l_return_status;
362: END IF;
363: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 360: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

356: -- Do formal attribute validation:
357: l_return_status := validate_asset_description(p_asdv_rec, p_mode);
358: --- Store the highest degree of error
359: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
360: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
361: x_return_status := l_return_status;
362: END IF;
363: RAISE G_EXCEPTION_HALT_VALIDATION;
364: END IF;

Line 369: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

365:
366: -- Do formal attribute validation:
367: l_return_status := validate_split_percent(p_asdv_rec, p_mode);
368: --- Store the highest degree of error
369: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
370: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
371: x_return_status := l_return_status;
372: END IF;
373: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 370: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

366: -- Do formal attribute validation:
367: l_return_status := validate_split_percent(p_asdv_rec, p_mode);
368: --- Store the highest degree of error
369: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
370: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
371: x_return_status := l_return_status;
372: END IF;
373: RAISE G_EXCEPTION_HALT_VALIDATION;
374: END IF;

Line 379: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

375:
376: -- Do formal attribute validation:
377: l_return_status := validate_item(p_asdv_rec, p_mode);
378: --- Store the highest degree of error
379: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
380: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
381: x_return_status := l_return_status;
382: END IF;
383: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 380: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

376: -- Do formal attribute validation:
377: l_return_status := validate_item(p_asdv_rec, p_mode);
378: --- Store the highest degree of error
379: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
380: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
381: x_return_status := l_return_status;
382: END IF;
383: RAISE G_EXCEPTION_HALT_VALIDATION;
384: END IF;

Line 391: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

387: EXCEPTION
388: WHEN G_EXCEPTION_HALT_VALIDATION THEN
389: RETURN x_return_status;
390: WHEN OTHERS THEN
391: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
392: OKL_API.Set_Message(p_app_name => G_APP_NAME,
393: p_msg_name => G_UNEXPECTED_ERROR,
394: p_token1 => G_SQLCODE_TOKEN,
395: p_token1_value => SQLCODE,

Line 392: OKL_API.Set_Message(p_app_name => G_APP_NAME,

388: WHEN G_EXCEPTION_HALT_VALIDATION THEN
389: RETURN x_return_status;
390: WHEN OTHERS THEN
391: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
392: OKL_API.Set_Message(p_app_name => G_APP_NAME,
393: p_msg_name => G_UNEXPECTED_ERROR,
394: p_token1 => G_SQLCODE_TOKEN,
395: p_token1_value => SQLCODE,
396: p_token2 => G_SQLERRM_TOKEN,

Line 409: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

405: p_asdv_tbl IN advv_tbl_type
406: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
407: ) RETURN VARCHAR2
408: IS
409: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
410: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
411: l_percent NUMBER;
412:
413: CURSOR c(p_tal_id NUMBER)

Line 410: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;

406: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
407: ) RETURN VARCHAR2
408: IS
409: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
410: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
411: l_percent NUMBER;
412:
413: CURSOR c(p_tal_id NUMBER)
414: IS

Line 430: OKL_API.Set_Message(p_app_name => G_APP_NAME,

426: FETCH c INTO l_percent;
427: CLOSE c;
428:
429: IF (l_percent > 100) THEN
430: OKL_API.Set_Message(p_app_name => G_APP_NAME,
431: p_msg_name => 'OKL_LLA_PERCENT');
432: RAISE G_EXCEPTION_HALT_VALIDATION;
433:
434: END IF;

Line 439: l_return_status := OKL_API.G_RET_STS_ERROR;

435:
436: RETURN l_return_status;
437: EXCEPTION
438: WHEN G_EXCEPTION_HALT_VALIDATION THEN
439: l_return_status := OKL_API.G_RET_STS_ERROR;
440: RETURN l_return_status;
441: WHEN OTHERS THEN
442: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
443: OKL_API.Set_Message(p_app_name => G_APP_NAME,

Line 442: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

438: WHEN G_EXCEPTION_HALT_VALIDATION THEN
439: l_return_status := OKL_API.G_RET_STS_ERROR;
440: RETURN l_return_status;
441: WHEN OTHERS THEN
442: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
443: OKL_API.Set_Message(p_app_name => G_APP_NAME,
444: p_msg_name => G_UNEXPECTED_ERROR,
445: p_token1 => G_SQLCODE_TOKEN,
446: p_token1_value => SQLCODE,

Line 443: OKL_API.Set_Message(p_app_name => G_APP_NAME,

439: l_return_status := OKL_API.G_RET_STS_ERROR;
440: RETURN l_return_status;
441: WHEN OTHERS THEN
442: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
443: OKL_API.Set_Message(p_app_name => G_APP_NAME,
444: p_msg_name => G_UNEXPECTED_ERROR,
445: p_token1 => G_SQLCODE_TOKEN,
446: p_token1_value => SQLCODE,
447: p_token2 => G_SQLERRM_TOKEN,

Line 459: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

455: p_asdv_tbl IN advv_tbl_type
456: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
457: ) RETURN VARCHAR2
458: IS
459: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
460: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
461: l_asset_number okl_txd_assets_B.ASSET_NUMBER%TYPE;
462:
463: --cursor to check duplicate within same transaction

Line 460: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;

456: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
457: ) RETURN VARCHAR2
458: IS
459: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
460: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
461: l_asset_number okl_txd_assets_B.ASSET_NUMBER%TYPE;
462:
463: --cursor to check duplicate within same transaction
464: CURSOR c(p_tal_id NUMBER)

Line 521: OKL_API.Set_Message(p_app_name => G_APP_NAME,

517: CLOSE c;
518:
519: IF (l_asset_number IS NOT NULL) THEN
520:
521: OKL_API.Set_Message(p_app_name => G_APP_NAME,
522: p_msg_name => G_NOT_UNIQUE,
523: p_token1 => G_COL_NAME_TOKEN,
524: p_token1_value => 'Asset Number '|| l_asset_number);
525: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 561: OKL_API.Set_Message(p_app_name => G_APP_NAME,

557: CLOSE asset_chk_curs1;
558: END IF;
559: IF l_asset_exists = 'Y' THEN
560: -- store SQL error message on message stack
561: OKL_API.Set_Message(p_app_name => G_APP_NAME,
562: p_msg_name => G_NOT_UNIQUE,
563: p_token1 => G_COL_NAME_TOKEN,
564: p_token1_value => 'Asset Number '|| p_asdv_tbl(i).asset_number);
565:

Line 583: l_return_status := OKL_API.G_RET_STS_ERROR;

579: RETURN l_return_status;
580:
581: EXCEPTION
582: WHEN G_EXCEPTION_HALT_VALIDATION THEN
583: l_return_status := OKL_API.G_RET_STS_ERROR;
584: RETURN l_return_status;
585: WHEN OTHERS THEN
586:
587: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

Line 587: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

583: l_return_status := OKL_API.G_RET_STS_ERROR;
584: RETURN l_return_status;
585: WHEN OTHERS THEN
586:
587: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
588:
589: --bug #2465479 begin
590: --close the cursor
591: IF asset_chk_curs1%ISOPEN THEN

Line 609: OKL_API.Set_Message(p_app_name => G_APP_NAME,

605: END IF;
606: --bug #2465479 end
607:
608:
609: OKL_API.Set_Message(p_app_name => G_APP_NAME,
610: p_msg_name => G_UNEXPECTED_ERROR,
611: p_token1 => G_SQLCODE_TOKEN,
612: p_token1_value => SQLCODE,
613: p_token2 => G_SQLERRM_TOKEN,

Line 625: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

621: p_asdv_tbl IN advv_tbl_type
622: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
623: ) RETURN VARCHAR2
624: IS
625: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
626: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
627: l_inventory_item_id okl_txd_assets_B.INVENTORY_ITEM_ID%TYPE;
628: l_inventory_item_name okx_system_items_v.NAME%TYPE;
629:

Line 626: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;

622: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
623: ) RETURN VARCHAR2
624: IS
625: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
626: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
627: l_inventory_item_id okl_txd_assets_B.INVENTORY_ITEM_ID%TYPE;
628: l_inventory_item_name okx_system_items_v.NAME%TYPE;
629:
630: CURSOR c(p_tal_id NUMBER)

Line 663: OKL_API.Set_Message(p_app_name => G_APP_NAME,

659: OPEN c_name (l_inventory_item_id);
660: FETCH c_name INTO l_inventory_item_name;
661: CLOSE c_name;
662:
663: OKL_API.Set_Message(p_app_name => G_APP_NAME,
664: p_msg_name => G_NOT_UNIQUE,
665: p_token1 => G_COL_NAME_TOKEN,
666: p_token1_value => 'Inventory Item Name ' || l_inventory_item_name);
667: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 674: l_return_status := OKL_API.G_RET_STS_ERROR;

670:
671: RETURN l_return_status;
672: EXCEPTION
673: WHEN G_EXCEPTION_HALT_VALIDATION THEN
674: l_return_status := OKL_API.G_RET_STS_ERROR;
675: RETURN l_return_status;
676: WHEN OTHERS THEN
677: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
678: OKL_API.Set_Message(p_app_name => G_APP_NAME,

Line 677: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

673: WHEN G_EXCEPTION_HALT_VALIDATION THEN
674: l_return_status := OKL_API.G_RET_STS_ERROR;
675: RETURN l_return_status;
676: WHEN OTHERS THEN
677: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
678: OKL_API.Set_Message(p_app_name => G_APP_NAME,
679: p_msg_name => G_UNEXPECTED_ERROR,
680: p_token1 => G_SQLCODE_TOKEN,
681: p_token1_value => SQLCODE,

Line 678: OKL_API.Set_Message(p_app_name => G_APP_NAME,

674: l_return_status := OKL_API.G_RET_STS_ERROR;
675: RETURN l_return_status;
676: WHEN OTHERS THEN
677: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
678: OKL_API.Set_Message(p_app_name => G_APP_NAME,
679: p_msg_name => G_UNEXPECTED_ERROR,
680: p_token1 => G_SQLCODE_TOKEN,
681: p_token1_value => SQLCODE,
682: p_token2 => G_SQLERRM_TOKEN,

Line 693: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

689: p_asdv_tbl IN advv_tbl_type
690: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
691: ) RETURN VARCHAR2
692: IS
693: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
694: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
695:
696: BEGIN
697:

Line 694: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

690: ,p_mode IN VARCHAR2 -- 'C'reate,'U'pdate,'D'elete
691: ) RETURN VARCHAR2
692: IS
693: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
694: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
695:
696: BEGIN
697:
698: -- Do formal attribute validation:

Line 701: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

697:
698: -- Do formal attribute validation:
699: l_return_status := validate_split_percent(p_asdv_tbl, p_mode);
700: --- Store the highest degree of error
701: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
702: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
703: x_return_status := l_return_status;
704: END IF;
705: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 702: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

698: -- Do formal attribute validation:
699: l_return_status := validate_split_percent(p_asdv_tbl, p_mode);
700: --- Store the highest degree of error
701: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
702: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
703: x_return_status := l_return_status;
704: END IF;
705: RAISE G_EXCEPTION_HALT_VALIDATION;
706: END IF;

Line 710: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

706: END IF;
707:
708: l_return_status := validate_asset_number(p_asdv_tbl, p_mode);
709: --- Store the highest degree of error
710: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
711: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
712: x_return_status := l_return_status;
713: END IF;
714: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 711: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

707:
708: l_return_status := validate_asset_number(p_asdv_tbl, p_mode);
709: --- Store the highest degree of error
710: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
711: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
712: x_return_status := l_return_status;
713: END IF;
714: RAISE G_EXCEPTION_HALT_VALIDATION;
715: END IF;

Line 725: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

721: /*
722:
723: l_return_status := validate_inventory_item_id(p_asdv_tbl, p_mode);
724: --- Store the highest degree of error
725: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
726: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
727: x_return_status := l_return_status;
728: END IF;
729: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 726: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

722:
723: l_return_status := validate_inventory_item_id(p_asdv_tbl, p_mode);
724: --- Store the highest degree of error
725: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
726: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
727: x_return_status := l_return_status;
728: END IF;
729: RAISE G_EXCEPTION_HALT_VALIDATION;
730: END IF;

Line 739: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

735: EXCEPTION
736: WHEN G_EXCEPTION_HALT_VALIDATION THEN
737: RETURN x_return_status;
738: WHEN OTHERS THEN
739: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
740: OKL_API.Set_Message(p_app_name => G_APP_NAME,
741: p_msg_name => G_UNEXPECTED_ERROR,
742: p_token1 => G_SQLCODE_TOKEN,
743: p_token1_value => SQLCODE,

Line 740: OKL_API.Set_Message(p_app_name => G_APP_NAME,

736: WHEN G_EXCEPTION_HALT_VALIDATION THEN
737: RETURN x_return_status;
738: WHEN OTHERS THEN
739: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
740: OKL_API.Set_Message(p_app_name => G_APP_NAME,
741: p_msg_name => G_UNEXPECTED_ERROR,
742: p_token1 => G_SQLCODE_TOKEN,
743: p_token1_value => SQLCODE,
744: p_token2 => G_SQLERRM_TOKEN,

Line 817: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

813: END IF;
814:
815: EXCEPTION
816: WHEN OTHERS THEN
817: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
818: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
819: END raise_business_event;
820:
821: /*

Line 818: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

814:
815: EXCEPTION
816: WHEN OTHERS THEN
817: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
818: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
819: END raise_business_event;
820:
821: /*
822: -- mvasudev, 08/23/2004

Line 836: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

832: p_api_version,
833: l_api_name,
834: G_PKG_NAME ))
835: THEN
836: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
837: END IF;
838:
839: -- Initialize message list if requested
840: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 845: x_return_status := OKL_API.G_RET_STS_SUCCESS;

841: FND_MSG_PUB.initialize;
842: END IF;
843:
844: -- Initialize API status to success
845: x_return_status := OKL_API.G_RET_STS_SUCCESS;
846:
847:
848: /*** Begin API body ****************************************************/
849:

Line 857: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

853: LOOP
854:
855: l_return_status := validate_attributes(p_asdv_tbl(i), l_mode);
856: --- Store the highest degree of error
857: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
858: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
859: x_return_status := l_return_status;
860: END IF;
861: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 858: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

854:
855: l_return_status := validate_attributes(p_asdv_tbl(i), l_mode);
856: --- Store the highest degree of error
857: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
858: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
859: x_return_status := l_return_status;
860: END IF;
861: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
862: END IF;

Line 861: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

857: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
858: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
859: x_return_status := l_return_status;
860: END IF;
861: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
862: END IF;
863:
864: --Bug# 4126331: Only upper case aset numbers are alowed in FA
865: l_asdv_rec := NULL;

Line 883: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

879: END LOOP;
880:
881: -- validate all based on current image
882: l_return_status := validate_rows(p_asdv_tbl, l_mode);
883: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
884: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
885: x_return_status := l_return_status;
886: END IF;
887: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 884: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

880:
881: -- validate all based on current image
882: l_return_status := validate_rows(p_asdv_tbl, l_mode);
883: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
884: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
885: x_return_status := l_return_status;
886: END IF;
887: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
888: END IF;

Line 887: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

883: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
884: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
885: x_return_status := l_return_status;
886: END IF;
887: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
888: END IF;
889:
890: -- update all based on current image
891: calculate_unit_cost(p_api_version => p_api_version,

Line 898: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

894: x_msg_count => x_msg_count,
895: x_msg_data => x_msg_data,
896: p_tal_id => p_asdv_tbl(p_asdv_tbl.FIRST).tal_id);
897:
898: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
899: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
900: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
901: RAISE OKL_API.G_EXCEPTION_ERROR;
902: END IF;

Line 899: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

895: x_msg_data => x_msg_data,
896: p_tal_id => p_asdv_tbl(p_asdv_tbl.FIRST).tal_id);
897:
898: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
899: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
900: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
901: RAISE OKL_API.G_EXCEPTION_ERROR;
902: END IF;
903:

Line 900: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN

896: p_tal_id => p_asdv_tbl(p_asdv_tbl.FIRST).tal_id);
897:
898: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
899: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
900: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
901: RAISE OKL_API.G_EXCEPTION_ERROR;
902: END IF;
903:
904: /*

Line 901: RAISE OKL_API.G_EXCEPTION_ERROR;

897:
898: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
899: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
900: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
901: RAISE OKL_API.G_EXCEPTION_ERROR;
902: END IF;
903:
904: /*
905: -- mvasudev, 08/23/2004

Line 909: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

905: -- mvasudev, 08/23/2004
906: -- Code change to enable Business Event
907: */
908: raise_business_event(x_return_status => x_return_status);
909: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
910: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
911: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
912: RAISE OKL_API.G_EXCEPTION_ERROR;
913: END IF;

Line 910: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

906: -- Code change to enable Business Event
907: */
908: raise_business_event(x_return_status => x_return_status);
909: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
910: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
911: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
912: RAISE OKL_API.G_EXCEPTION_ERROR;
913: END IF;
914:

Line 911: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

907: */
908: raise_business_event(x_return_status => x_return_status);
909: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
910: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
911: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
912: RAISE OKL_API.G_EXCEPTION_ERROR;
913: END IF;
914:
915: /*

Line 912: RAISE OKL_API.G_EXCEPTION_ERROR;

908: raise_business_event(x_return_status => x_return_status);
909: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
910: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
911: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
912: RAISE OKL_API.G_EXCEPTION_ERROR;
913: END IF;
914:
915: /*
916: -- mvasudev, 08/23/2004

Line 930: WHEN OKL_API.G_EXCEPTION_ERROR THEN

926: (p_count => x_msg_count,
927: p_data => x_msg_data);
928:
929: EXCEPTION
930: WHEN OKL_API.G_EXCEPTION_ERROR THEN
931: ROLLBACK TO create_split_asset_comp_pvt;
932: x_return_status := OKL_API.G_RET_STS_ERROR;
933: FND_MSG_PUB.Count_And_Get
934: (p_count => x_msg_count,

Line 932: x_return_status := OKL_API.G_RET_STS_ERROR;

928:
929: EXCEPTION
930: WHEN OKL_API.G_EXCEPTION_ERROR THEN
931: ROLLBACK TO create_split_asset_comp_pvt;
932: x_return_status := OKL_API.G_RET_STS_ERROR;
933: FND_MSG_PUB.Count_And_Get
934: (p_count => x_msg_count,
935: p_data => x_msg_data);
936:

Line 937: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

933: FND_MSG_PUB.Count_And_Get
934: (p_count => x_msg_count,
935: p_data => x_msg_data);
936:
937: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
938: ROLLBACK TO create_split_asset_comp_pvt;
939: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
940: FND_MSG_PUB.Count_And_Get
941: (p_count => x_msg_count,

Line 939: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

935: p_data => x_msg_data);
936:
937: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
938: ROLLBACK TO create_split_asset_comp_pvt;
939: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
940: FND_MSG_PUB.Count_And_Get
941: (p_count => x_msg_count,
942: p_data => x_msg_data);
943:

Line 946: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

942: p_data => x_msg_data);
943:
944: WHEN OTHERS THEN
945: ROLLBACK TO create_split_asset_comp_pvt;
946: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
947: OKL_API.Set_Message(p_app_name => G_APP_NAME,
948: p_msg_name => G_UNEXPECTED_ERROR,
949: p_token1 => G_SQLCODE_TOKEN,
950: p_token1_value => SQLCODE,

Line 947: OKL_API.Set_Message(p_app_name => G_APP_NAME,

943:
944: WHEN OTHERS THEN
945: ROLLBACK TO create_split_asset_comp_pvt;
946: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
947: OKL_API.Set_Message(p_app_name => G_APP_NAME,
948: p_msg_name => G_UNEXPECTED_ERROR,
949: p_token1 => G_SQLCODE_TOKEN,
950: p_token1_value => SQLCODE,
951: p_token2 => G_SQLERRM_TOKEN,

Line 989: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

985: p_api_version,
986: l_api_name,
987: G_PKG_NAME ))
988: THEN
989: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
990: END IF;
991:
992: -- Initialize message list if requested
993: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 998: x_return_status := OKL_API.G_RET_STS_SUCCESS;

994: FND_MSG_PUB.initialize;
995: END IF;
996:
997: -- Initialize API status to success
998: x_return_status := OKL_API.G_RET_STS_SUCCESS;
999:
1000:
1001: /*** Begin API body ****************************************************/
1002:

Line 1009: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

1005: i := p_asdv_tbl.FIRST;
1006: LOOP
1007:
1008: l_return_status := validate_attributes(p_asdv_tbl(i), l_mode);
1009: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1010: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1011: x_return_status := l_return_status;
1012: END IF;
1013: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1010: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1006: LOOP
1007:
1008: l_return_status := validate_attributes(p_asdv_tbl(i), l_mode);
1009: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1010: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1011: x_return_status := l_return_status;
1012: END IF;
1013: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1014: END IF;

Line 1013: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1009: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1010: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1011: x_return_status := l_return_status;
1012: END IF;
1013: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1014: END IF;
1015:
1016: --Bug# 4126331: Only upper case aset numbers are alowed in FA
1017: l_asdv_rec := NULL;

Line 1035: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

1031: END LOOP;
1032:
1033: -- validate all based on current image
1034: l_return_status := validate_rows(p_asdv_tbl, l_mode);
1035: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1036: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1037: x_return_status := l_return_status;
1038: END IF;
1039: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1036: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1032:
1033: -- validate all based on current image
1034: l_return_status := validate_rows(p_asdv_tbl, l_mode);
1035: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1036: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1037: x_return_status := l_return_status;
1038: END IF;
1039: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1040: END IF;

Line 1039: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1035: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1036: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1037: x_return_status := l_return_status;
1038: END IF;
1039: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1040: END IF;
1041:
1042: -- update all based on current image
1043: calculate_unit_cost(p_api_version => p_api_version,

Line 1050: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1046: x_msg_count => x_msg_count,
1047: x_msg_data => x_msg_data,
1048: p_tal_id => p_asdv_tbl(p_asdv_tbl.FIRST).tal_id);
1049:
1050: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1051: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1052: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
1053: RAISE OKL_API.G_EXCEPTION_ERROR;
1054: END IF;

Line 1051: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1047: x_msg_data => x_msg_data,
1048: p_tal_id => p_asdv_tbl(p_asdv_tbl.FIRST).tal_id);
1049:
1050: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1051: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1052: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
1053: RAISE OKL_API.G_EXCEPTION_ERROR;
1054: END IF;
1055:

Line 1052: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN

1048: p_tal_id => p_asdv_tbl(p_asdv_tbl.FIRST).tal_id);
1049:
1050: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1051: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1052: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
1053: RAISE OKL_API.G_EXCEPTION_ERROR;
1054: END IF;
1055:
1056: END IF;

Line 1053: RAISE OKL_API.G_EXCEPTION_ERROR;

1049:
1050: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1051: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1052: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
1053: RAISE OKL_API.G_EXCEPTION_ERROR;
1054: END IF;
1055:
1056: END IF;
1057:

Line 1066: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1062: (p_count => x_msg_count,
1063: p_data => x_msg_data);
1064:
1065: EXCEPTION
1066: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1067: ROLLBACK TO update_split_asset_comp_pvt;
1068: x_return_status := OKL_API.G_RET_STS_ERROR;
1069: FND_MSG_PUB.Count_And_Get
1070: (p_count => x_msg_count,

Line 1068: x_return_status := OKL_API.G_RET_STS_ERROR;

1064:
1065: EXCEPTION
1066: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1067: ROLLBACK TO update_split_asset_comp_pvt;
1068: x_return_status := OKL_API.G_RET_STS_ERROR;
1069: FND_MSG_PUB.Count_And_Get
1070: (p_count => x_msg_count,
1071: p_data => x_msg_data);
1072:

Line 1073: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1069: FND_MSG_PUB.Count_And_Get
1070: (p_count => x_msg_count,
1071: p_data => x_msg_data);
1072:
1073: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1074: ROLLBACK TO update_split_asset_comp_pvt;
1075: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1076: FND_MSG_PUB.Count_And_Get
1077: (p_count => x_msg_count,

Line 1075: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

1071: p_data => x_msg_data);
1072:
1073: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1074: ROLLBACK TO update_split_asset_comp_pvt;
1075: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1076: FND_MSG_PUB.Count_And_Get
1077: (p_count => x_msg_count,
1078: p_data => x_msg_data);
1079:

Line 1082: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

1078: p_data => x_msg_data);
1079:
1080: WHEN OTHERS THEN
1081: ROLLBACK TO update_split_asset_comp_pvt;
1082: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1083: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1084: p_msg_name => G_UNEXPECTED_ERROR,
1085: p_token1 => G_SQLCODE_TOKEN,
1086: p_token1_value => SQLCODE,

Line 1083: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1079:
1080: WHEN OTHERS THEN
1081: ROLLBACK TO update_split_asset_comp_pvt;
1082: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1083: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1084: p_msg_name => G_UNEXPECTED_ERROR,
1085: p_token1 => G_SQLCODE_TOKEN,
1086: p_token1_value => SQLCODE,
1087: p_token2 => G_SQLERRM_TOKEN,

Line 1119: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1115: p_api_version,
1116: l_api_name,
1117: G_PKG_NAME ))
1118: THEN
1119: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1120: END IF;
1121:
1122: -- Initialize message list if requested
1123: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 1128: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1124: FND_MSG_PUB.initialize;
1125: END IF;
1126:
1127: -- Initialize API status to success
1128: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1129:
1130:
1131: /*** Begin API body ****************************************************/
1132: Okl_Asd_Pvt.delete_row(p_api_version,

Line 1139: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1135: x_msg_count,
1136: x_msg_data,
1137: p_asdv_tbl);
1138:
1139: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1140: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1141: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
1142: RAISE OKL_API.G_EXCEPTION_ERROR;
1143: END IF;

Line 1140: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1136: x_msg_data,
1137: p_asdv_tbl);
1138:
1139: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1140: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1141: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
1142: RAISE OKL_API.G_EXCEPTION_ERROR;
1143: END IF;
1144:

Line 1141: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN

1137: p_asdv_tbl);
1138:
1139: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1140: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1141: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
1142: RAISE OKL_API.G_EXCEPTION_ERROR;
1143: END IF;
1144:
1145: /*** End API body ******************************************************/

Line 1142: RAISE OKL_API.G_EXCEPTION_ERROR;

1138:
1139: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1140: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1141: ELSIF (x_return_Status = OKL_API.G_RET_STS_ERROR) THEN
1142: RAISE OKL_API.G_EXCEPTION_ERROR;
1143: END IF;
1144:
1145: /*** End API body ******************************************************/
1146:

Line 1153: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1149: (p_count => x_msg_count,
1150: p_data => x_msg_data);
1151:
1152: EXCEPTION
1153: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1154: ROLLBACK TO delete_split_asset_comp_pvt;
1155: x_return_status := OKL_API.G_RET_STS_ERROR;
1156: FND_MSG_PUB.Count_And_Get
1157: (p_count => x_msg_count,

Line 1155: x_return_status := OKL_API.G_RET_STS_ERROR;

1151:
1152: EXCEPTION
1153: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1154: ROLLBACK TO delete_split_asset_comp_pvt;
1155: x_return_status := OKL_API.G_RET_STS_ERROR;
1156: FND_MSG_PUB.Count_And_Get
1157: (p_count => x_msg_count,
1158: p_data => x_msg_data);
1159:

Line 1160: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1156: FND_MSG_PUB.Count_And_Get
1157: (p_count => x_msg_count,
1158: p_data => x_msg_data);
1159:
1160: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1161: ROLLBACK TO delete_split_asset_comp_pvt;
1162: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1163: FND_MSG_PUB.Count_And_Get
1164: (p_count => x_msg_count,

Line 1162: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

1158: p_data => x_msg_data);
1159:
1160: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1161: ROLLBACK TO delete_split_asset_comp_pvt;
1162: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1163: FND_MSG_PUB.Count_And_Get
1164: (p_count => x_msg_count,
1165: p_data => x_msg_data);
1166:

Line 1169: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

1165: p_data => x_msg_data);
1166:
1167: WHEN OTHERS THEN
1168: ROLLBACK TO delete_split_asset_comp_pvt;
1169: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1170: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1171: p_msg_name => G_UNEXPECTED_ERROR,
1172: p_token1 => G_SQLCODE_TOKEN,
1173: p_token1_value => SQLCODE,

Line 1170: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1166:
1167: WHEN OTHERS THEN
1168: ROLLBACK TO delete_split_asset_comp_pvt;
1169: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1170: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1171: p_msg_name => G_UNEXPECTED_ERROR,
1172: p_token1 => G_SQLCODE_TOKEN,
1173: p_token1_value => SQLCODE,
1174: p_token2 => G_SQLERRM_TOKEN,

Line 1189: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1185: FUNCTION validate_split_percent(
1186: p_tal_id IN NUMBER
1187: ) RETURN VARCHAR2
1188: IS
1189: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1190: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
1191: l_percent NUMBER;
1192:
1193: CURSOR c(p_tal_id NUMBER)

Line 1190: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;

1186: p_tal_id IN NUMBER
1187: ) RETURN VARCHAR2
1188: IS
1189: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1190: l_dummy VARCHAR2(1) := OKL_API.G_TRUE;
1191: l_percent NUMBER;
1192:
1193: CURSOR c(p_tal_id NUMBER)
1194: IS

Line 1210: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1206: FETCH c INTO l_percent;
1207: CLOSE c;
1208:
1209: IF (l_percent <> 100) THEN
1210: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1211: p_msg_name => 'OKL_LLA_TOTAL_PERCENT',
1212: p_token1 => 'TITLE',
1213: p_token1_value => 'Split Percent');
1214: RAISE G_EXCEPTION_HALT_VALIDATION;

Line 1221: l_return_status := OKL_API.G_RET_STS_ERROR;

1217:
1218: RETURN l_return_status;
1219: EXCEPTION
1220: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1221: l_return_status := OKL_API.G_RET_STS_ERROR;
1222: RETURN l_return_status;
1223: WHEN OTHERS THEN
1224: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1225: OKL_API.Set_Message(p_app_name => G_APP_NAME,

Line 1224: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

1220: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1221: l_return_status := OKL_API.G_RET_STS_ERROR;
1222: RETURN l_return_status;
1223: WHEN OTHERS THEN
1224: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1225: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1226: p_msg_name => G_UNEXPECTED_ERROR,
1227: p_token1 => G_SQLCODE_TOKEN,
1228: p_token1_value => SQLCODE,

Line 1225: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1221: l_return_status := OKL_API.G_RET_STS_ERROR;
1222: RETURN l_return_status;
1223: WHEN OTHERS THEN
1224: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1225: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1226: p_msg_name => G_UNEXPECTED_ERROR,
1227: p_token1 => G_SQLCODE_TOKEN,
1228: p_token1_value => SQLCODE,
1229: p_token2 => G_SQLERRM_TOKEN,

Line 1296: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1292:
1293: l_parameter_list wf_parameter_list_t;
1294: BEGIN
1295:
1296: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1297:
1298: wf_event.AddParameterToList(G_WF_ITM_CONTRACT_ID,p_dnz_chr_id,l_parameter_list);
1299: wf_event.AddParameterToList(G_WF_ITM_ASSET_ID,p_cle_id,l_parameter_list);
1300: wf_event.AddParameterToList(G_WF_ITM_TRANS_DATE,fnd_date.date_to_canonical(p_trx_date),l_parameter_list);

Line 1312: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

1308: p_parameters => l_parameter_list);
1309:
1310: EXCEPTION
1311: WHEN OTHERS THEN
1312: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1313: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1314: END raise_business_event;
1315:
1316: /*

Line 1313: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1309:
1310: EXCEPTION
1311: WHEN OTHERS THEN
1312: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1313: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1314: END raise_business_event;
1315:
1316: /*
1317: -- mvasudev, 08/24/2004

Line 1332: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1328: p_api_version,
1329: l_api_name,
1330: G_PKG_NAME ))
1331: THEN
1332: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1333: END IF;
1334:
1335: -- Initialize message list if requested
1336: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 1341: x_return_status := OKL_API.G_RET_STS_SUCCESS;

1337: FND_MSG_PUB.initialize;
1338: END IF;
1339:
1340: -- Initialize API status to success
1341: x_return_status := OKL_API.G_RET_STS_SUCCESS;
1342:
1343:
1344: /*** Begin API body ****************************************************/
1345: --

Line 1377: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

1373: -- 2) total split percent must = 100
1374: -- 3) same item has been apply to differnt asset number?
1375: -- validation:
1376: l_return_status := validate_split_percent(p_tal_id);
1377: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1378: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1379: x_return_status := l_return_status;
1380: END IF;
1381: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1378: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1374: -- 3) same item has been apply to differnt asset number?
1375: -- validation:
1376: l_return_status := validate_split_percent(p_tal_id);
1377: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1378: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1379: x_return_status := l_return_status;
1380: END IF;
1381: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1382: END IF;

Line 1381: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1377: IF (l_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
1378: IF (x_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1379: x_return_status := l_return_status;
1380: END IF;
1381: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1382: END IF;
1383:
1384: OKL_SPLIT_ASSET_PUB.Split_Fixed_Asset
1385: (p_api_version => p_api_version,

Line 1392: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1388: x_msg_count => x_msg_count,
1389: x_msg_data => x_msg_data,
1390: p_cle_id => l_cle_id,
1391: x_cle_tbl => l_cle_tbl);
1392: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1393: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1394: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1395: RAISE OKL_API.G_EXCEPTION_ERROR;
1396: END IF;

Line 1393: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1389: x_msg_data => x_msg_data,
1390: p_cle_id => l_cle_id,
1391: x_cle_tbl => l_cle_tbl);
1392: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1393: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1394: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1395: RAISE OKL_API.G_EXCEPTION_ERROR;
1396: END IF;
1397: END IF;

Line 1394: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1390: p_cle_id => l_cle_id,
1391: x_cle_tbl => l_cle_tbl);
1392: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1393: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1394: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1395: RAISE OKL_API.G_EXCEPTION_ERROR;
1396: END IF;
1397: END IF;
1398: CLOSE fin_ast_csr;

Line 1395: RAISE OKL_API.G_EXCEPTION_ERROR;

1391: x_cle_tbl => l_cle_tbl);
1392: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1393: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1394: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1395: RAISE OKL_API.G_EXCEPTION_ERROR;
1396: END IF;
1397: END IF;
1398: CLOSE fin_ast_csr;
1399:

Line 1409: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1405: raise_business_event(p_dnz_chr_id => l_dnz_chr_id,
1406: p_trx_date => l_trx_date,
1407: p_cle_id => l_cleb_id,
1408: x_return_status => x_return_status);
1409: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1410: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1411: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1412: RAISE OKL_API.G_EXCEPTION_ERROR;
1413: END IF;

Line 1410: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1406: p_trx_date => l_trx_date,
1407: p_cle_id => l_cleb_id,
1408: x_return_status => x_return_status);
1409: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1410: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1411: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1412: RAISE OKL_API.G_EXCEPTION_ERROR;
1413: END IF;
1414:

Line 1411: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN

1407: p_cle_id => l_cleb_id,
1408: x_return_status => x_return_status);
1409: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1410: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1411: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1412: RAISE OKL_API.G_EXCEPTION_ERROR;
1413: END IF;
1414:
1415: /*

Line 1412: RAISE OKL_API.G_EXCEPTION_ERROR;

1408: x_return_status => x_return_status);
1409: IF (x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1410: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1411: ELSIF (x_return_status = OKL_API.G_RET_STS_ERROR) THEN
1412: RAISE OKL_API.G_EXCEPTION_ERROR;
1413: END IF;
1414:
1415: /*
1416: -- mvasudev, 08/24/2004

Line 1431: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1427: (p_count => x_msg_count,
1428: p_data => x_msg_data);
1429:
1430: EXCEPTION
1431: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1432: ROLLBACK TO process_split_asset_comp_pvt;
1433: x_return_status := OKL_API.G_RET_STS_ERROR;
1434: FND_MSG_PUB.Count_And_Get
1435: (p_count => x_msg_count,

Line 1433: x_return_status := OKL_API.G_RET_STS_ERROR;

1429:
1430: EXCEPTION
1431: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1432: ROLLBACK TO process_split_asset_comp_pvt;
1433: x_return_status := OKL_API.G_RET_STS_ERROR;
1434: FND_MSG_PUB.Count_And_Get
1435: (p_count => x_msg_count,
1436: p_data => x_msg_data);
1437:

Line 1438: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1434: FND_MSG_PUB.Count_And_Get
1435: (p_count => x_msg_count,
1436: p_data => x_msg_data);
1437:
1438: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1439: ROLLBACK TO process_split_asset_comp_pvt;
1440: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1441: FND_MSG_PUB.Count_And_Get
1442: (p_count => x_msg_count,

Line 1440: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

1436: p_data => x_msg_data);
1437:
1438: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1439: ROLLBACK TO process_split_asset_comp_pvt;
1440: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1441: FND_MSG_PUB.Count_And_Get
1442: (p_count => x_msg_count,
1443: p_data => x_msg_data);
1444:

Line 1447: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;

1443: p_data => x_msg_data);
1444:
1445: WHEN OTHERS THEN
1446: ROLLBACK TO process_split_asset_comp_pvt;
1447: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1448: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1449: p_msg_name => G_UNEXPECTED_ERROR,
1450: p_token1 => G_SQLCODE_TOKEN,
1451: p_token1_value => SQLCODE,

Line 1448: OKL_API.Set_Message(p_app_name => G_APP_NAME,

1444:
1445: WHEN OTHERS THEN
1446: ROLLBACK TO process_split_asset_comp_pvt;
1447: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR ;
1448: OKL_API.Set_Message(p_app_name => G_APP_NAME,
1449: p_msg_name => G_UNEXPECTED_ERROR,
1450: p_token1 => G_SQLCODE_TOKEN,
1451: p_token1_value => SQLCODE,
1452: p_token2 => G_SQLERRM_TOKEN,