337: ItemType VARCHAR2(30) ;
338: ItemKey NUMBER;
339: l_list WF_PARAMETER_LIST_T;
340: l_param WF_PARAMETER_T;
341: l_wf_event_name VARCHAR2(240);
342:
343: /*-----------------------------------------------------------------------+
344: | Cursor Declarations |
345: +-----------------------------------------------------------------------*/
376: FROM dual;
377:
378: OPEN csr_loan_event_details;
379: FETCH csr_loan_event_details
380: INTO l_wf_event_name
381: ,l_loan_number
382: ,l_requested_amount
383: ,l_loan_description
384: ,l_loan_class_code
394: CLOSE csr_loan_event_details;
395: -- initialization of object variables
396: l_list := WF_PARAMETER_LIST_T();
397:
398: wf_event.AddParameterToList(p_name => 'LNS_LOAN_ID',
399: p_value => p_loan_id,
400: p_parameterlist => l_list);
401: wf_event.AddParameterToList(p_name => 'LNS_LOAN_NUMBER',
402: p_value => l_loan_number,
397:
398: wf_event.AddParameterToList(p_name => 'LNS_LOAN_ID',
399: p_value => p_loan_id,
400: p_parameterlist => l_list);
401: wf_event.AddParameterToList(p_name => 'LNS_LOAN_NUMBER',
402: p_value => l_loan_number,
403: p_parameterlist => l_list);
404: wf_event.AddParameterToList(p_name => 'LNS_LOAN_DESCRIPTION',
405: p_value => l_loan_description,
400: p_parameterlist => l_list);
401: wf_event.AddParameterToList(p_name => 'LNS_LOAN_NUMBER',
402: p_value => l_loan_number,
403: p_parameterlist => l_list);
404: wf_event.AddParameterToList(p_name => 'LNS_LOAN_DESCRIPTION',
405: p_value => l_loan_description,
406: p_parameterlist => l_list);
407: wf_event.AddParameterToList(p_name => 'LNS_REQUESTED_AMOUNT',
408: p_value => l_requested_amount,
403: p_parameterlist => l_list);
404: wf_event.AddParameterToList(p_name => 'LNS_LOAN_DESCRIPTION',
405: p_value => l_loan_description,
406: p_parameterlist => l_list);
407: wf_event.AddParameterToList(p_name => 'LNS_REQUESTED_AMOUNT',
408: p_value => l_requested_amount,
409: p_parameterlist => l_list);
410: wf_event.AddParameterToList(p_name => 'LNS_FORMATTED_AMOUNT',
411: p_value => l_loan_formatted_amount,
406: p_parameterlist => l_list);
407: wf_event.AddParameterToList(p_name => 'LNS_REQUESTED_AMOUNT',
408: p_value => l_requested_amount,
409: p_parameterlist => l_list);
410: wf_event.AddParameterToList(p_name => 'LNS_FORMATTED_AMOUNT',
411: p_value => l_loan_formatted_amount,
412: p_parameterlist => l_list);
413: wf_event.AddParameterToList(p_name => 'LNS_LOAN_UNDISBURSED_AMOUNT',
414: p_value => l_loan_undisbursed_amount,
409: p_parameterlist => l_list);
410: wf_event.AddParameterToList(p_name => 'LNS_FORMATTED_AMOUNT',
411: p_value => l_loan_formatted_amount,
412: p_parameterlist => l_list);
413: wf_event.AddParameterToList(p_name => 'LNS_LOAN_UNDISBURSED_AMOUNT',
414: p_value => l_loan_undisbursed_amount,
415: p_parameterlist => l_list);
416: wf_event.AddParameterToList(p_name => 'LNS_WF_INIT_DATE',
417: p_value => SYSDATE,
412: p_parameterlist => l_list);
413: wf_event.AddParameterToList(p_name => 'LNS_LOAN_UNDISBURSED_AMOUNT',
414: p_value => l_loan_undisbursed_amount,
415: p_parameterlist => l_list);
416: wf_event.AddParameterToList(p_name => 'LNS_WF_INIT_DATE',
417: p_value => SYSDATE,
418: p_parameterlist => l_list);
419: wf_event.AddParameterToList(p_name => 'LNS_OLD_LOAN_STATUS',
420: p_value => p_from_status,
415: p_parameterlist => l_list);
416: wf_event.AddParameterToList(p_name => 'LNS_WF_INIT_DATE',
417: p_value => SYSDATE,
418: p_parameterlist => l_list);
419: wf_event.AddParameterToList(p_name => 'LNS_OLD_LOAN_STATUS',
420: p_value => p_from_status,
421: p_parameterlist => l_list);
422: wf_event.AddParameterToList(p_name => 'LNS_LOAN_CLASS_CODE',
423: p_value => l_loan_class_code,
418: p_parameterlist => l_list);
419: wf_event.AddParameterToList(p_name => 'LNS_OLD_LOAN_STATUS',
420: p_value => p_from_status,
421: p_parameterlist => l_list);
422: wf_event.AddParameterToList(p_name => 'LNS_LOAN_CLASS_CODE',
423: p_value => l_loan_class_code,
424: p_parameterlist => l_list);
425: wf_event.AddParameterToList(p_name => 'LNS_LOAN_TYPE_ID',
426: p_value => l_loan_type_id,
421: p_parameterlist => l_list);
422: wf_event.AddParameterToList(p_name => 'LNS_LOAN_CLASS_CODE',
423: p_value => l_loan_class_code,
424: p_parameterlist => l_list);
425: wf_event.AddParameterToList(p_name => 'LNS_LOAN_TYPE_ID',
426: p_value => l_loan_type_id,
427: p_parameterlist => l_list);
428: wf_event.AddParameterToList(p_name => 'LNS_CURRENT_USER_ID',
429: p_value => l_current_user_id,
424: p_parameterlist => l_list);
425: wf_event.AddParameterToList(p_name => 'LNS_LOAN_TYPE_ID',
426: p_value => l_loan_type_id,
427: p_parameterlist => l_list);
428: wf_event.AddParameterToList(p_name => 'LNS_CURRENT_USER_ID',
429: p_value => l_current_user_id,
430: p_parameterlist => l_list);
431: wf_event.AddParameterToList(p_name => 'LNS_LOAN_TYPE',
432: p_value => l_loan_type,
427: p_parameterlist => l_list);
428: wf_event.AddParameterToList(p_name => 'LNS_CURRENT_USER_ID',
429: p_value => l_current_user_id,
430: p_parameterlist => l_list);
431: wf_event.AddParameterToList(p_name => 'LNS_LOAN_TYPE',
432: p_value => l_loan_type,
433: p_parameterlist => l_list);
434: wf_event.AddParameterToList(p_name => 'LNS_EVENT_NAME',
435: p_value => p_event_name,
430: p_parameterlist => l_list);
431: wf_event.AddParameterToList(p_name => 'LNS_LOAN_TYPE',
432: p_value => l_loan_type,
433: p_parameterlist => l_list);
434: wf_event.AddParameterToList(p_name => 'LNS_EVENT_NAME',
435: p_value => p_event_name,
436: p_parameterlist => l_list);
437: wf_event.AddParameterToList(p_name => 'LNS_ERS_FUNCTION_NAME',
438: p_value => l_function_name,
433: p_parameterlist => l_list);
434: wf_event.AddParameterToList(p_name => 'LNS_EVENT_NAME',
435: p_value => p_event_name,
436: p_parameterlist => l_list);
437: wf_event.AddParameterToList(p_name => 'LNS_ERS_FUNCTION_NAME',
438: p_value => l_function_name,
439: p_parameterlist => l_list);
440: wf_event.raise (p_event_name => l_wf_event_name,
441: p_event_key => itemkey,
436: p_parameterlist => l_list);
437: wf_event.AddParameterToList(p_name => 'LNS_ERS_FUNCTION_NAME',
438: p_value => l_function_name,
439: p_parameterlist => l_list);
440: wf_event.raise (p_event_name => l_wf_event_name,
441: p_event_key => itemkey,
442: p_parameters => l_list);
443: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
444: EXCEPTION
443: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
444: EXCEPTION
445: WHEN OTHERS
446: THEN
447: WF_CORE.CONTEXT('LNSWF',l_wf_event_name, itemkey);
448: RAISE;
449: END RAISE_EVENT;
450: /*========================================================================
451: | PRIVATE PROCEDURE LOG_EVENT_HISTORY