DBA Data[Home] [Help]

APPS.PA_BILLING_WRKBNCH_EVENTS dependencies on FND_API

Line 85: l_return_status varchar2(1) := FND_API.G_RET_STS_SUCCESS;

81: X_Return_Status OUT NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
82: AS
83:
84: Invalid_event_action exception; /* Added for bug 3850381 */
85: l_return_status varchar2(1) := FND_API.G_RET_STS_SUCCESS;
86: l_err_message varchar2(240) := null;
87: l_event_processed varchar2(1) := 'Y';
88: l_rec_ver_num pa_events.record_version_number%type;
89: /* Added for bug 3850381 */

Line 97: X_Return_Status := FND_API.G_RET_STS_SUCCESS;

93: l_msg_index_out NUMBER := 0;
94:
95: BEGIN
96:
97: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
98:
99: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
100: FND_MSG_PUB.initialize;
101: END IF;

Line 99: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN

95: BEGIN
96:
97: X_Return_Status := FND_API.G_RET_STS_SUCCESS;
98:
99: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
100: FND_MSG_PUB.initialize;
101: END IF;
102:
103: If P_Event_Action = 'Delete'

Line 110: x_return_status := FND_API.G_RET_STS_ERROR;

106: (P_event_id => P_Event_Id );
107:
108: If l_event_processed <> 'Y'
109: Then
110: x_return_status := FND_API.G_RET_STS_ERROR;
111: l_err_message := FND_MESSAGE.GET_STRING('PA', 'PA_TK_EVENT_IN_USE');
112: PA_UTILS.ADD_MESSAGE
113: ( p_app_short_name => 'PA',
114: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 126: x_return_status := FND_API.G_RET_STS_ERROR;

122:
123: /* Added for bug 3935772 */
124: If P_Event_Type is null
125: Then
126: x_return_status := FND_API.G_RET_STS_ERROR;
127: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_NO_EVENT_TYPE');
128: PA_UTILS.ADD_MESSAGE
129: ( p_app_short_name => 'PA',
130: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 139: x_return_status := FND_API.G_RET_STS_ERROR;

135: End If;
136:
137: If P_Bill_Txn_Cur is null
138: Then
139: x_return_status := FND_API.G_RET_STS_ERROR;
140: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_INVALID_BIL_TRX_CUR_AMG');
141: PA_UTILS.ADD_MESSAGE
142: ( p_app_short_name => 'PA',
143: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 152: x_return_status := FND_API.G_RET_STS_ERROR;

148: End If;
149:
150: If P_Invoice_Amt is null
151: Then
152: x_return_status := FND_API.G_RET_STS_ERROR;
153: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_INVALID_INV_AMT');
154: PA_UTILS.ADD_MESSAGE
155: ( p_app_short_name => 'PA',
156: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 165: x_return_status := FND_API.G_RET_STS_ERROR;

161: End If;
162:
163: If P_Revenue_Amt is null
164: Then
165: x_return_status := FND_API.G_RET_STS_ERROR;
166: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_INVALID_REV_AMT');
167: PA_UTILS.ADD_MESSAGE
168: ( p_app_short_name => 'PA',
169: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 178: x_return_status := FND_API.G_RET_STS_ERROR;

174: End If;
175:
176: If P_Event_Org is null
177: Then
178: x_return_status := FND_API.G_RET_STS_ERROR;
179: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_INVALID_EVNT_ORG_AMG');
180: PA_UTILS.ADD_MESSAGE
181: ( p_app_short_name => 'PA',
182: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 189: IF X_Return_Status <> FND_API.G_RET_STS_SUCCESS

185: p_token2 => 'MESSAGE',
186: p_value2 => l_Err_Message);
187: End If;
188:
189: IF X_Return_Status <> FND_API.G_RET_STS_SUCCESS
190: THEN
191: raise Invalid_event_action;
192: END IF;
193:

Line 199: x_return_status := FND_API.G_RET_STS_ERROR;

195:
196: If PA_EVENT_CORE.CHECK_FUNDING ( P_Project_Id,
197: P_Task_Id ) = 'N'
198: Then
199: x_return_status := FND_API.G_RET_STS_ERROR;
200: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_TASK_FUND_NO_PROJ_EVENT_AMG');
201: PA_UTILS.ADD_MESSAGE
202: ( p_app_short_name => 'PA',
203: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 217: x_return_status := FND_API.G_RET_STS_ERROR;

213: If PA_EVENT_CORE.CHECK_VALID_EVENT_NUM( P_Project_Id,
214: P_Task_Id,
215: P_Event_Num) = 'N'
216: Then
217: x_return_status := FND_API.G_RET_STS_ERROR;
218: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_INV_EVNT_NUM_AMG');
219: PA_UTILS.ADD_MESSAGE
220: ( p_app_short_name => 'PA',
221: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 236: x_return_status := FND_API.G_RET_STS_ERROR;

232: Then
233:
234: If (p_Pfc_Rate_Date_Code = 'FIXED_DATE' and p_Pfc_Rate_Type <> 'User' and p_Pfc_Rate_Date is null)
235: Then
236: x_return_status := FND_API.G_RET_STS_ERROR;
237: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_INVALID_PROJFUNC_DATE_AMG');
238: PA_UTILS.ADD_MESSAGE
239: ( p_app_short_name => 'PA',
240: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 249: x_return_status := FND_API.G_RET_STS_ERROR;

245: End If;
246:
247: If (p_Pfc_Rate_Type = 'User' and nvl(p_Pfc_Excg_Rate, 0) <= 0)
248: Then
249: x_return_status := FND_API.G_RET_STS_ERROR;
250: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_EXCH_RATE_NULL_PF_AMG');
251: PA_UTILS.ADD_MESSAGE
252: ( p_app_short_name => 'PA',
253: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 267: x_return_status := FND_API.G_RET_STS_ERROR;

263: Then
264:
265: If (p_Pc_Rate_Date_Code = 'FIXED_DATE' and p_Pc_Rate_Type <> 'User' and p_Pc_Rate_Date is null)
266: Then
267: x_return_status := FND_API.G_RET_STS_ERROR;
268: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_INVALID_PROJ_DATE_AMG');
269: PA_UTILS.ADD_MESSAGE
270: ( p_app_short_name => 'PA',
271: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 280: x_return_status := FND_API.G_RET_STS_ERROR;

276: End If;
277:
278: If (p_Pc_Rate_Type = 'User' and nvl(p_Pc_Excg_Rate, 0) <= 0 )
279: Then
280: x_return_status := FND_API.G_RET_STS_ERROR;
281: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_EXCH_RATE_NULL_PC_AMG');
282: PA_UTILS.ADD_MESSAGE
283: ( p_app_short_name => 'PA',
284: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 295: x_return_status := FND_API.G_RET_STS_ERROR;

291: End If;
292:
293: If (p_Fc_Rate_Date_Code = 'FIXED_DATE' and p_Fc_Rate_Type <> 'User' and p_Fc_Rate_Date is null)
294: Then
295: x_return_status := FND_API.G_RET_STS_ERROR;
296: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_INVALID_FUND_DATE_AMG');
297: PA_UTILS.ADD_MESSAGE
298: ( p_app_short_name => 'PA',
299: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 308: x_return_status := FND_API.G_RET_STS_ERROR;

304: End If;
305:
306: If ( p_Fc_Rate_Type = 'User' and nvl(p_Fc_Excg_Rate, 0) <= 0 )
307: Then
308: x_return_status := FND_API.G_RET_STS_ERROR;
309: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_FUND_EXCG_RATE_INV_AMG');
310: PA_UTILS.ADD_MESSAGE
311: ( p_app_short_name => 'PA',
312: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 332: x_return_status := FND_API.G_RET_STS_ERROR;

328: where event_id = p_event_id;
329:
330: If l_rec_ver_num <> p_rec_ver_num
331: Then
332: x_return_status := FND_API.G_RET_STS_ERROR;
333: l_err_message := FND_MESSAGE.GET_STRING('PA','PA_XC_RECORD_CHANGED');
334: PA_UTILS.ADD_MESSAGE
335: ( p_app_short_name => 'PA',
336: p_msg_name => 'PA_ACTION_NAME_ERR',

Line 343: l_return_status := FND_API.G_RET_STS_ERROR;

339: p_token2 => 'MESSAGE',
340: p_value2 => l_Err_Message);
341: End If;
342: Exception When others then
343: l_return_status := FND_API.G_RET_STS_ERROR;
344: /* raise; */
345: End;
346: End If;
347:

Line 350: IF X_Return_Status <> FND_API.G_RET_STS_SUCCESS

346: End If;
347:
348: End If;
349:
350: IF X_Return_Status <> FND_API.G_RET_STS_SUCCESS
351: THEN
352: raise Invalid_event_action;
353: END IF;
354:

Line 357: x_return_status := FND_API.G_RET_STS_ERROR;

353: END IF;
354:
355: EXCEPTION
356: WHEN Invalid_event_action THEN
357: x_return_status := FND_API.G_RET_STS_ERROR;
358: l_msg_count := FND_MSG_PUB.count_msg;
359:
360: IF l_msg_count = 1 THEN
361: PA_INTERFACE_UTILS_PUB.get_messages

Line 362: (p_encoded => FND_API.G_TRUE,

358: l_msg_count := FND_MSG_PUB.count_msg;
359:
360: IF l_msg_count = 1 THEN
361: PA_INTERFACE_UTILS_PUB.get_messages
362: (p_encoded => FND_API.G_TRUE,
363: p_msg_index => 1,
364: p_msg_count => l_msg_count,
365: p_msg_data => l_msg_data,
366: p_data => l_data,

Line 376: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

372: END IF;
373: RETURN;
374:
375: WHEN OTHERS THEN
376: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
377: x_msg_count := 1;
378: x_msg_data := SQLERRM;
379:
380: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_BILLING_WRKBNCH_EVENTS'

Line 436: l_return_status varchar2(1) := FND_API.G_RET_STS_SUCCESS;

432: X_Return_Status OUT NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
433: AS
434:
435: l_tmp_return_status varchar2(1) := null;
436: l_return_status varchar2(1) := FND_API.G_RET_STS_SUCCESS;
437: l_err_message varchar2(240) := null;
438: l_tmp_rowid rowid;
439: cursor c_rowid is
440: select rowid from pa_events

Line 460: l_return_status := FND_API.G_RET_STS_ERROR;

456: p_token1 => 'ACTION_NAME',
457: p_value1 => P_Action_Name,
458: p_token2 => 'MESSAGE',
459: p_value2 => l_Err_Message);
460: l_return_status := FND_API.G_RET_STS_ERROR;
461: Else
462: open c_rowid;
463: fetch c_rowid into l_tmp_rowid;
464: