396: -----------------------------------------------------------------------
397: -- Name : validate_reason_code
398: -- Desc :
399: -- Generic routine to validate reason code/ reason id
400: -- Must exist in MTL_TRANSACTION_REASONS
401: --
402: -- I/P params :
403: -- p_reason_code OR p_resson_id (Mandatory)
404: -----------------------------------------------------------------------
415:
416: /* Get reason code info */
417: CURSOR c_get_reason_id IS
418: SELECT MTR.REASON_ID
419: FROM MTL_TRANSACTION_REASONS MTR
420: WHERE MTR.REASON_ID = p_reason_id
421: AND NVL(MTR.DISABLE_DATE, SYSDATE + 1) > SYSDATE;
422:
423: /* Get reason code info */
422:
423: /* Get reason code info */
424: CURSOR c_get_reason_code IS
425: SELECT MTR.REASON_ID
426: FROM MTL_TRANSACTION_REASONS MTR
427: WHERE MTR.REASON_NAME = p_reason_code
428: AND NVL(MTR.DISABLE_DATE, SYSDATE + 1) > SYSDATE;
429:
430: BEGIN