568: ItemType VARCHAR2(30) ;
569: ItemKey VARCHAR2(240); --NUMBER;
570: l_list WF_PARAMETER_LIST_T;
571: l_param WF_PARAMETER_T;
572: l_wf_event_name VARCHAR2(240);
573: l_last_entered_note VARCHAR2(2000);
574: l_sysdate VARCHAR2(50);
575:
576: /*-----------------------------------------------------------------------+
620: FROM dual;
621:
622: OPEN csr_loan_event_details;
623: FETCH csr_loan_event_details
624: INTO l_wf_event_name
625: ,l_loan_number
626: ,l_requested_amount
627: ,l_loan_description
628: ,l_loan_class_code
654: -- initialization of object variables
655: l_list := WF_PARAMETER_LIST_T();
656: l_sysdate := to_char(sysdate, wf_core.canonical_date_mask);
657:
658: wf_event.AddParameterToList(p_name => 'LNS_LOAN_ID',
659: p_value => p_loan_id,
660: p_parameterlist => l_list);
661: wf_event.AddParameterToList(p_name => 'LNS_LOAN_NUMBER',
662: p_value => l_loan_number,
657:
658: wf_event.AddParameterToList(p_name => 'LNS_LOAN_ID',
659: p_value => p_loan_id,
660: p_parameterlist => l_list);
661: wf_event.AddParameterToList(p_name => 'LNS_LOAN_NUMBER',
662: p_value => l_loan_number,
663: p_parameterlist => l_list);
664: wf_event.AddParameterToList(p_name => 'LNS_LOAN_DESCRIPTION',
665: p_value => l_loan_description,
660: p_parameterlist => l_list);
661: wf_event.AddParameterToList(p_name => 'LNS_LOAN_NUMBER',
662: p_value => l_loan_number,
663: p_parameterlist => l_list);
664: wf_event.AddParameterToList(p_name => 'LNS_LOAN_DESCRIPTION',
665: p_value => l_loan_description,
666: p_parameterlist => l_list);
667: wf_event.AddParameterToList(p_name => 'LNS_REQUESTED_AMOUNT',
668: p_value => l_requested_amount,
663: p_parameterlist => l_list);
664: wf_event.AddParameterToList(p_name => 'LNS_LOAN_DESCRIPTION',
665: p_value => l_loan_description,
666: p_parameterlist => l_list);
667: wf_event.AddParameterToList(p_name => 'LNS_REQUESTED_AMOUNT',
668: p_value => l_requested_amount,
669: p_parameterlist => l_list);
670: wf_event.AddParameterToList(p_name => 'LNS_FORMATTED_AMOUNT',
671: p_value => l_loan_formatted_amount,
666: p_parameterlist => l_list);
667: wf_event.AddParameterToList(p_name => 'LNS_REQUESTED_AMOUNT',
668: p_value => l_requested_amount,
669: p_parameterlist => l_list);
670: wf_event.AddParameterToList(p_name => 'LNS_FORMATTED_AMOUNT',
671: p_value => l_loan_formatted_amount,
672: p_parameterlist => l_list);
673: wf_event.AddParameterToList(p_name => 'LNS_LOAN_UNDISBURSED_AMOUNT',
674: p_value => l_loan_undisbursed_amount,
669: p_parameterlist => l_list);
670: wf_event.AddParameterToList(p_name => 'LNS_FORMATTED_AMOUNT',
671: p_value => l_loan_formatted_amount,
672: p_parameterlist => l_list);
673: wf_event.AddParameterToList(p_name => 'LNS_LOAN_UNDISBURSED_AMOUNT',
674: p_value => l_loan_undisbursed_amount,
675: p_parameterlist => l_list);
676: wf_event.AddParameterToList(p_name => 'LNS_WF_INIT_DATE',
677: p_value => l_sysdate,
672: p_parameterlist => l_list);
673: wf_event.AddParameterToList(p_name => 'LNS_LOAN_UNDISBURSED_AMOUNT',
674: p_value => l_loan_undisbursed_amount,
675: p_parameterlist => l_list);
676: wf_event.AddParameterToList(p_name => 'LNS_WF_INIT_DATE',
677: p_value => l_sysdate,
678: p_parameterlist => l_list);
679: wf_event.AddParameterToList(p_name => 'LNS_OLD_LOAN_STATUS',
680: p_value => p_from_status,
675: p_parameterlist => l_list);
676: wf_event.AddParameterToList(p_name => 'LNS_WF_INIT_DATE',
677: p_value => l_sysdate,
678: p_parameterlist => l_list);
679: wf_event.AddParameterToList(p_name => 'LNS_OLD_LOAN_STATUS',
680: p_value => p_from_status,
681: p_parameterlist => l_list);
682: wf_event.AddParameterToList(p_name => 'LNS_LOAN_CLASS_CODE',
683: p_value => l_loan_class_code,
678: p_parameterlist => l_list);
679: wf_event.AddParameterToList(p_name => 'LNS_OLD_LOAN_STATUS',
680: p_value => p_from_status,
681: p_parameterlist => l_list);
682: wf_event.AddParameterToList(p_name => 'LNS_LOAN_CLASS_CODE',
683: p_value => l_loan_class_code,
684: p_parameterlist => l_list);
685: wf_event.AddParameterToList(p_name => 'LNS_LOAN_TYPE_ID',
686: p_value => l_loan_type_id,
681: p_parameterlist => l_list);
682: wf_event.AddParameterToList(p_name => 'LNS_LOAN_CLASS_CODE',
683: p_value => l_loan_class_code,
684: p_parameterlist => l_list);
685: wf_event.AddParameterToList(p_name => 'LNS_LOAN_TYPE_ID',
686: p_value => l_loan_type_id,
687: p_parameterlist => l_list);
688: wf_event.AddParameterToList(p_name => 'LNS_CURRENT_USER_ID',
689: p_value => l_current_user_id,
684: p_parameterlist => l_list);
685: wf_event.AddParameterToList(p_name => 'LNS_LOAN_TYPE_ID',
686: p_value => l_loan_type_id,
687: p_parameterlist => l_list);
688: wf_event.AddParameterToList(p_name => 'LNS_CURRENT_USER_ID',
689: p_value => l_current_user_id,
690: p_parameterlist => l_list);
691: wf_event.AddParameterToList(p_name => 'LNS_LOAN_TYPE',
692: p_value => l_loan_type,
687: p_parameterlist => l_list);
688: wf_event.AddParameterToList(p_name => 'LNS_CURRENT_USER_ID',
689: p_value => l_current_user_id,
690: p_parameterlist => l_list);
691: wf_event.AddParameterToList(p_name => 'LNS_LOAN_TYPE',
692: p_value => l_loan_type,
693: p_parameterlist => l_list);
694: wf_event.AddParameterToList(p_name => 'LNS_EVENT_NAME',
695: p_value => p_event_name,
690: p_parameterlist => l_list);
691: wf_event.AddParameterToList(p_name => 'LNS_LOAN_TYPE',
692: p_value => l_loan_type,
693: p_parameterlist => l_list);
694: wf_event.AddParameterToList(p_name => 'LNS_EVENT_NAME',
695: p_value => p_event_name,
696: p_parameterlist => l_list);
697: wf_event.AddParameterToList(p_name => 'LNS_ERS_FUNCTION_NAME',
698: p_value => l_function_name,
693: p_parameterlist => l_list);
694: wf_event.AddParameterToList(p_name => 'LNS_EVENT_NAME',
695: p_value => p_event_name,
696: p_parameterlist => l_list);
697: wf_event.AddParameterToList(p_name => 'LNS_ERS_FUNCTION_NAME',
698: p_value => l_function_name,
699: p_parameterlist => l_list);
700: wf_event.AddParameterToList(p_name => 'LNS_LAST_ENTERED_NOTE',
701: p_value => G_LAST_ENTERED_NOTE,
696: p_parameterlist => l_list);
697: wf_event.AddParameterToList(p_name => 'LNS_ERS_FUNCTION_NAME',
698: p_value => l_function_name,
699: p_parameterlist => l_list);
700: wf_event.AddParameterToList(p_name => 'LNS_LAST_ENTERED_NOTE',
701: p_value => G_LAST_ENTERED_NOTE,
702: p_parameterlist => l_list);
703:
704: LogMessage(FND_LOG.LEVEL_STATEMENT,'Adding parameters:');
720:
721: G_LAST_ENTERED_NOTE := '';
722: LogMessage(FND_LOG.LEVEL_STATEMENT,'Setting G_LAST_ENTERED_NOTE to NULL');
723: LogMessage(FND_LOG.LEVEL_STATEMENT,'itemkey = ' || itemkey);
724: LogMessage(FND_LOG.LEVEL_STATEMENT,'l_wf_event_name = ' || l_wf_event_name);
725:
726: wf_event.raise (p_event_name => l_wf_event_name,
727: p_event_key => itemkey,
728: p_parameters => l_list);
722: LogMessage(FND_LOG.LEVEL_STATEMENT,'Setting G_LAST_ENTERED_NOTE to NULL');
723: LogMessage(FND_LOG.LEVEL_STATEMENT,'itemkey = ' || itemkey);
724: LogMessage(FND_LOG.LEVEL_STATEMENT,'l_wf_event_name = ' || l_wf_event_name);
725:
726: wf_event.raise (p_event_name => l_wf_event_name,
727: p_event_key => itemkey,
728: p_parameters => l_list);
729: LogMessage(FND_LOG.LEVEL_STATEMENT,'Event is raised');
730: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
730: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
731: EXCEPTION
732: WHEN OTHERS
733: THEN
734: WF_CORE.CONTEXT('LNSWF',l_wf_event_name, itemkey);
735: RAISE;
736: END RAISE_EVENT;
737: /*========================================================================
738: | PRIVATE PROCEDURE LOG_EVENT_HISTORY