75: ELSIF p_exception_level = G_EXC_OTHERS
76: THEN
77: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
78:
79: FND_MESSAGE.Set_Name('ASO', 'ASO_ERROR_RETURNED');
80: FND_MESSAGE.Set_token('PKG_NAME' , p_pkg_name);
81: FND_MESSAGE.Set_token('API_NAME' , p_api_name);
82: FND_MSG_PUB.ADD;
83: l_len_sqlerrm := Length(P_SQLERRM) ;
76: THEN
77: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
78:
79: FND_MESSAGE.Set_Name('ASO', 'ASO_ERROR_RETURNED');
80: FND_MESSAGE.Set_token('PKG_NAME' , p_pkg_name);
81: FND_MESSAGE.Set_token('API_NAME' , p_api_name);
82: FND_MSG_PUB.ADD;
83: l_len_sqlerrm := Length(P_SQLERRM) ;
84: While l_len_sqlerrm >= i Loop
77: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
78:
79: FND_MESSAGE.Set_Name('ASO', 'ASO_ERROR_RETURNED');
80: FND_MESSAGE.Set_token('PKG_NAME' , p_pkg_name);
81: FND_MESSAGE.Set_token('API_NAME' , p_api_name);
82: FND_MSG_PUB.ADD;
83: l_len_sqlerrm := Length(P_SQLERRM) ;
84: While l_len_sqlerrm >= i Loop
85: FND_MESSAGE.Set_Name('ASO', 'ASO_SQLERRM');
81: FND_MESSAGE.Set_token('API_NAME' , p_api_name);
82: FND_MSG_PUB.ADD;
83: l_len_sqlerrm := Length(P_SQLERRM) ;
84: While l_len_sqlerrm >= i Loop
85: FND_MESSAGE.Set_Name('ASO', 'ASO_SQLERRM');
86: FND_MESSAGE.Set_token('ERR_TEXT' , substr(P_SQLERRM,i,240));
87: i := i + 240;
88: FND_MSG_PUB.ADD;
89: end loop;
82: FND_MSG_PUB.ADD;
83: l_len_sqlerrm := Length(P_SQLERRM) ;
84: While l_len_sqlerrm >= i Loop
85: FND_MESSAGE.Set_Name('ASO', 'ASO_SQLERRM');
86: FND_MESSAGE.Set_token('ERR_TEXT' , substr(P_SQLERRM,i,240));
87: i := i + 240;
88: FND_MSG_PUB.ADD;
89: end loop;
90:
109: or (p_col_choice is NOT NULL and p_col_name is NULL)
110: then
111: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)
112: then
113: fnd_message.set_name('ASO', 'API_MISSING_ORDERBY_ELEMENT');
114: fnd_msg_pub.add;
115: end if;
116: raise fnd_api.g_exc_error;
117: end if;
132: return(l_col_name || ' DESC, ');
133: else
134: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)
135: then
136: fnd_message.set_name('ASO', 'API_INVALID_ORDERBY_CHOICE');
137: fnd_message.set_token('PARAM',p_col_choice, false);
138: fnd_msg_pub.add;
139: end if;
140: raise fnd_api.g_exc_error;
133: else
134: if fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error)
135: then
136: fnd_message.set_name('ASO', 'API_INVALID_ORDERBY_CHOICE');
137: fnd_message.set_token('PARAM',p_col_choice, false);
138: fnd_msg_pub.add;
139: end if;
140: raise fnd_api.g_exc_error;
141: return '';
169: G_PKG_NAME)
170: THEN
171: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
172: THEN
173: FND_MESSAGE.Set_Name('ASO', 'API_UNEXP_ERROR_IN_PROCESSING');
174: FND_MESSAGE.Set_Token('ROW', 'TRANSLATE_ORDERBY', TRUE);
175: FND_MSG_PUB.ADD;
176: END IF;
177: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
170: THEN
171: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
172: THEN
173: FND_MESSAGE.Set_Name('ASO', 'API_UNEXP_ERROR_IN_PROCESSING');
174: FND_MESSAGE.Set_Token('ROW', 'TRANSLATE_ORDERBY', TRUE);
175: FND_MSG_PUB.ADD;
176: END IF;
177: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
178: END IF;
196: IF G_User_Id IS NULL
197: THEN
198: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
199: THEN
200: FND_MESSAGE.Set_Name('ASO', 'UT_CANNOT_GET_PROFILE_VALUE');
201: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
202: FND_MSG_PUB.ADD;
203: END IF;
204: END IF;
197: THEN
198: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
199: THEN
200: FND_MESSAGE.Set_Name('ASO', 'UT_CANNOT_GET_PROFILE_VALUE');
201: FND_MESSAGE.Set_Token('PROFILE', 'USER_ID', FALSE);
202: FND_MSG_PUB.ADD;
203: END IF;
204: END IF;
205:
281: THEN
282: /*
283: l_length := length(p_msg);
284:
285: -- FND_MESSAGE doesn't allow message name to be over 30 chars
286: -- chop message name if length > 30
287: WHILE l_length > 30 LOOP
288: l_substring := substr(p_msg, l_start, 30);
289:
286: -- chop message name if length > 30
287: WHILE l_length > 30 LOOP
288: l_substring := substr(p_msg, l_start, 30);
289:
290: FND_MESSAGE.Set_Name('ASO', l_substring);
291: -- FND_MESSAGE.Set_Name(p_app_name, l_substring);
292: l_start := l_start + 30;
293: l_length := l_length - 30;
294: FND_MSG_PUB.Add;
287: WHILE l_length > 30 LOOP
288: l_substring := substr(p_msg, l_start, 30);
289:
290: FND_MESSAGE.Set_Name('ASO', l_substring);
291: -- FND_MESSAGE.Set_Name(p_app_name, l_substring);
292: l_start := l_start + 30;
293: l_length := l_length - 30;
294: FND_MSG_PUB.Add;
295: END LOOP;
294: FND_MSG_PUB.Add;
295: END LOOP;
296:
297: l_substring := substr(p_msg, l_start);
298: FND_MESSAGE.Set_Name('ASO', l_substring);
299: --dbms_output.put_line('l_substring: ' || l_substring);
300: -- FND_MESSAGE.Set_Name(p_app_name, p_msg);
301: FND_MSG_PUB.Add;
302: */
296:
297: l_substring := substr(p_msg, l_start);
298: FND_MESSAGE.Set_Name('ASO', l_substring);
299: --dbms_output.put_line('l_substring: ' || l_substring);
300: -- FND_MESSAGE.Set_Name(p_app_name, p_msg);
301: FND_MSG_PUB.Add;
302: */
303: l_length := length(p_msg);
304:
301: FND_MSG_PUB.Add;
302: */
303: l_length := length(p_msg);
304:
305: -- FND_MESSAGE doesn't allow message name to be over 30 chars
306: -- chop message name if length > 30
307: IF l_length > 30
308: THEN
309: l_substring := substr(p_msg, l_start, 30);
306: -- chop message name if length > 30
307: IF l_length > 30
308: THEN
309: l_substring := substr(p_msg, l_start, 30);
310: FND_MESSAGE.Set_Name('ASO', l_substring);
311: ELSE
312: FND_MESSAGE.Set_Name('ASO', p_msg);
313: END IF;
314:
308: THEN
309: l_substring := substr(p_msg, l_start, 30);
310: FND_MESSAGE.Set_Name('ASO', l_substring);
311: ELSE
312: FND_MESSAGE.Set_Name('ASO', p_msg);
313: END IF;
314:
315: FND_MSG_PUB.Add;
316: END IF;
471:
472: FOR l_count in 1..NVL(p_message_count,1) LOOP
473: l_temp_msg := fnd_msg_pub.get(l_count, fnd_api.g_true);
474:
475: fnd_message.parse_encoded(l_temp_msg, l_appl_short_name, l_message_name);
476:
477: OPEN Get_Appl_Id (l_appl_short_name);
478: FETCH Get_Appl_Id into l_id;
479: CLOSE Get_Appl_Id;
754: WHEN NO_DATA_FOUND THEN
755: RAISE NO_DATA_FOUND;
756: WHEN OTHERS THEN
757: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
758: FND_MESSAGE.Set_Name('ASO', 'ASO_API_ERROR_IN_QUERY');
759: FND_MSG_PUB.ADD;
760: END IF;
761: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
762: END Query_Header_Row;
2311: WHEN NO_DATA_FOUND THEN
2312: RAISE NO_DATA_FOUND;
2313: WHEN OTHERS THEN
2314: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2315: FND_MESSAGE.Set_Name('ASO', 'ASO_API_ERROR_IN_QUERY');
2316: FND_MSG_PUB.ADD;
2317: END IF;
2318: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2319: END Query_Shipment_Row;
3384: WHEN NO_DATA_FOUND THEN
3385: RAISE NO_DATA_FOUND;
3386: WHEN OTHERS THEN
3387: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3388: FND_MESSAGE.Set_Name('ASO', 'ASO_API_ERROR_IN_QUERY');
3389: FND_MSG_PUB.ADD;
3390: END IF;
3391: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3392: END Query_Qte_Line_Row;