92:
93: BEGIN
94:
95: -- Return if WF Not Running
96: IF (funcmode <> wf_engine.eng_run) THEN
97: resultout := wf_engine.eng_null;
98: RETURN;
99: END IF;
100:
93: BEGIN
94:
95: -- Return if WF Not Running
96: IF (funcmode <> wf_engine.eng_run) THEN
97: resultout := wf_engine.eng_null;
98: RETURN;
99: END IF;
100:
101:
99: END IF;
100:
101:
102: -- Assume WF Success
103: resultout := wf_engine.eng_completed||':'||'G';
104:
105:
106: -- Get Required Runtime Parmeters from WF
107: l_project_id := wf_engine.GetItemAttrNumber
103: resultout := wf_engine.eng_completed||':'||'G';
104:
105:
106: -- Get Required Runtime Parmeters from WF
107: l_project_id := wf_engine.GetItemAttrNumber
108: ( itemtype => itemtype
109: , itemkey => itemkey
110: , aname => 'PROJECT_ID'
111: );
110: , aname => 'PROJECT_ID'
111: );
112: /* Added for the deferred process */
113:
114: l_wf_started_by_id := wf_engine.GetItemAttrNumber
115: ( itemtype => itemtype
116: , itemkey => itemkey
117: , aname => 'WORKFLOW_STARTED_BY_UID'
118: );
116: , itemkey => itemkey
117: , aname => 'WORKFLOW_STARTED_BY_UID'
118: );
119:
120: l_wf_started_by_resp_id := wf_engine.GetItemAttrNumber
121: ( itemtype => itemtype
122: , itemkey => itemkey
123: , aname => 'WORKFLOW_STARTED_BY_RESP_ID'
124: );
122: , itemkey => itemkey
123: , aname => 'WORKFLOW_STARTED_BY_RESP_ID'
124: );
125:
126: l_wf_started_by_appl_id := wf_engine.GetItemAttrNumber
127: ( itemtype => itemtype
128: , itemkey => itemkey
129: , aname => 'WORKFLOW_STARTED_BY_APPL_ID'
130: );
170: L - Line level error
171: U - Work flow error
172: */
173: IF l_return_status = FND_API.G_RET_STS_SUCCESS AND l_plan_processing_code = 'E' THEN
174: resultout := wf_engine.eng_completed||':'||'L';
175: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
176: resultout := wf_engine.eng_completed||':'||'G';
177: END IF;
178:
172: */
173: IF l_return_status = FND_API.G_RET_STS_SUCCESS AND l_plan_processing_code = 'E' THEN
174: resultout := wf_engine.eng_completed||':'||'L';
175: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
176: resultout := wf_engine.eng_completed||':'||'G';
177: END IF;
178:
179:
180: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) AND
187:
188: FND_MESSAGE.SET_NAME ('PA','PA_NFDESC_FORECAST_SUCCESS');
189: l_msg_desc_text := FND_MESSAGE.GET;
190:
191: wf_engine.SetItemAttrText
192: ( itemtype => itemtype
193: , itemkey => itemkey
194: , aname => 'MSG_SUBJECT_FYI'
195: , avalue => l_msg_subj_text
194: , aname => 'MSG_SUBJECT_FYI'
195: , avalue => l_msg_subj_text
196: );
197:
198: wf_engine.SetItemAttrText
199: ( itemtype => itemtype
200: , itemkey => itemkey
201: , aname => 'MSG_DESCRIPTION_FYI'
202: , avalue => l_msg_desc_text
212: l_msg_desc_text := FND_MESSAGE.GET;
213:
214: -- Errors! Note that the WF only marked as failure if ORA error
215:
216: wf_engine.SetItemAttrText
217: ( itemtype => itemtype
218: , itemkey => itemkey
219: , aname => 'MSG_SUBJECT_FYI'
220: , avalue => l_msg_subj_text
219: , aname => 'MSG_SUBJECT_FYI'
220: , avalue => l_msg_subj_text
221: );
222:
223: wf_engine.SetItemAttrText
224: ( itemtype => itemtype
225: , itemkey => itemkey
226: , aname => 'MSG_DESCRIPTION_FYI'
227: , avalue => l_msg_desc_text
230: l_fcst_err_url :=
231: 'JSP:/OA_HTML/OA.jsp?akRegionApplicationId=275&akRegionCode=PA_FCST_ERROR_LAYOUT&paProjectId='||l_project_id||'&paCallingFrom="Notification"';
232: /* Added for bug to show the text ERRORS only if the process status is failure. */
233:
234: wf_engine.SetItemAttrText
235: ( itemtype => itemtype
236: , itemkey => itemkey
237: , aname => 'FCST_ERROR_URL_INFO'
238: , avalue => l_fcst_err_url
256:
257: FND_MESSAGE.SET_NAME ('PA','PA_NFDESC_FORECAST_FAILURE');
258: l_msg_desc_text := FND_MESSAGE.GET;
259:
260: wf_engine.SetItemAttrText
261: ( itemtype => itemtype
262: , itemkey => itemkey
263: , aname => 'MSG_SUBJECT_FYI'
264: , avalue => l_msg_subj_text
263: , aname => 'MSG_SUBJECT_FYI'
264: , avalue => l_msg_subj_text
265: );
266:
267: wf_engine.SetItemAttrText
268: ( itemtype => itemtype
269: , itemkey => itemkey
270: , aname => 'MSG_DESCRIPTION_FYI'
271: , avalue => l_msg_desc_text
281: p_msg_data => l_msg_data
282: );
283:
284: -- Set WF Status for Failure. Route to Sys Admin
285: resultout := wf_engine.eng_completed||':'||'U';
286:
287: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
288:
289: FND_MESSAGE.SET_NAME ('PA','PA_NFSUBJ_FORECAST_FAILURE');
291:
292: FND_MESSAGE.SET_NAME ('PA','PA_NFDESC_FORECAST_FAILURE');
293: l_msg_desc_text := FND_MESSAGE.GET;
294:
295: wf_engine.SetItemAttrText
296: ( itemtype => itemtype
297: , itemkey => itemkey
298: , aname => 'MSG_SUBJECT_FYI'
299: , avalue => l_msg_subj_text
298: , aname => 'MSG_SUBJECT_FYI'
299: , avalue => l_msg_subj_text
300: );
301:
302: wf_engine.SetItemAttrText
303: ( itemtype => itemtype
304: , itemkey => itemkey
305: , aname => 'MSG_DESCRIPTION_FYI'
306: , avalue => l_msg_desc_text
308:
309: FND_MESSAGE.SET_NAME ('PA','PA_NFERR_FCST');
310: l_msg_err_text := FND_MESSAGE.GET;
311:
312: wf_engine.SetItemAttrText
313: ( itemtype => itemtype
314: , itemkey => itemkey
315: , aname => 'ERROR_COMMENTS'
316: , avalue => l_msg_err_text
315: , aname => 'ERROR_COMMENTS'
316: , avalue => l_msg_err_text
317: );
318:
319: /* wf_engine.SetItemAttrText
320: ( itemtype => itemtype
321: , itemkey => itemkey
322: , aname => 'FCST_ERROR_URL_INFO'
323: , avalue => NULL
379: IF p_msg_count = 1 THEN
380: IF p_msg_data IS NOT NULL THEN
381: FND_MESSAGE.SET_ENCODED (p_msg_data);
382: l_data := FND_MESSAGE.GET;
383: wf_engine.SetItemAttrText
384: ( itemtype => p_item_type
385: , itemkey => p_item_key
386: , aname => 'ERROR_COMMENTS_1'
387: , avalue => l_data
403: p_msg_data => p_msg_data ,
404: p_data => l_data,
405: p_msg_index_out => l_msg_index_out );
406: l_item_attr_name := 'ERROR_COMMENTS_'||i;
407: wf_engine.SetItemAttrText
408: ( itemtype => p_item_type
409: , itemkey => p_item_key
410: , aname => l_item_attr_name
411: , avalue => l_data