960:
961: END;
962:
963:
964: PROCEDURE CLOSE_WF_NOTIFICATION (
965: p_credit_request_id IN NUMBER,
966: p_message_name IN VARCHAR2,
967: p_recipient_role IN VARCHAR2,
968: p_resultout OUT NOCOPY VARCHAR2,
967: p_recipient_role IN VARCHAR2,
968: p_resultout OUT NOCOPY VARCHAR2,
969: p_error_msg OUT NOCOPY VARCHAR2) IS
970:
971: l_notification_id wf_notifications.notification_id%type;
972:
973: BEGIN
974: IF pg_debug = 'Y' THEN
975: debug ('CLOSE_WF_NOTIFICATION(+)' );
971: l_notification_id wf_notifications.notification_id%type;
972:
973: BEGIN
974: IF pg_debug = 'Y' THEN
975: debug ('CLOSE_WF_NOTIFICATION(+)' );
976: debug ('p_credit_request_id '||p_credit_request_id );
977: debug ('Role '||p_recipient_role );
978: debug ('p_message_name '||p_message_name);
979: END IF;
981: p_error_msg := null;
982:
983: select notification_id
984: INTO l_notification_id
985: from wf_notifications
986: where message_name = p_message_name --'MSG_TO_CM_NO_CA'
987: and Recipient_role = p_recipient_role --'FND_RESP222:23918'
988: and status = 'OPEN'
989: and context like 'ARCMGTAP:'||p_credit_request_id||'%';
990:
991: IF pg_debug = 'Y' THEN
992: debug ('Notification Id '||l_notification_id);
993: END IF;
994: -- Now call wf_notification api to close the notification
995: WF_NOTIFICATION.close(
996: nid => l_notification_id );
997: IF pg_debug = 'Y' THEN
998: debug ('CLOSE_WF_NOTIFICATION(-)' );
991: IF pg_debug = 'Y' THEN
992: debug ('Notification Id '||l_notification_id);
993: END IF;
994: -- Now call wf_notification api to close the notification
995: WF_NOTIFICATION.close(
996: nid => l_notification_id );
997: IF pg_debug = 'Y' THEN
998: debug ('CLOSE_WF_NOTIFICATION(-)' );
999: END IF;
994: -- Now call wf_notification api to close the notification
995: WF_NOTIFICATION.close(
996: nid => l_notification_id );
997: IF pg_debug = 'Y' THEN
998: debug ('CLOSE_WF_NOTIFICATION(-)' );
999: END IF;
1000: EXCEPTION
1001: WHEN NO_DATA_FOUND
1002: THEN
1004: WHEN OTHERS
1005: THEN
1006: p_resultout := 1;
1007: p_error_msg := sqlerrm;
1008: END CLOSE_WF_NOTIFICATION;
1009:
1010: FUNCTION convert_amount (
1011: p_from_currency VARCHAR2,
1012: p_to_currency VARCHAR2,