rem {{ -----------------------------------------------------------------------+
rem File:        jrpblang.sql
rem Author:      
rem Date:        
rem Version:     
rem Project:     The Oracle Common Repository
rem Description: Language manipulation utilities
rem Notes:
rem RealAuth:    Karl McHorton
rem IncepDate:   12th March 1998
rem Copyright:   (c) Oracle Corporation 1998. All Rights Reserved.
rem Tagline:     -- Oracle Repository: Managing *all* your data --
rem --------------------------------------------------------------------------+
rem Log of Changes
rem --------------------------------------------------------------------------+

prompt Package Body: jr_language
create or replace package body jr_language is

  function is_enabled(lid language_id) return boolean is
    dummy integer;
  begin
    select null
    into   dummy
    from   m$nls_languages l
    where  l.lid=is_enabled.lid
    and    l.enabled='Y';
    
    return TRUE;
    
  exception when no_data_found then
    return FALSE;  
end is_enabled;
    
  procedure enable(lid language_id) is
  begin
    jr_folder.trace('jr_language.enable');
  end enable;

  procedure disable(lid language_id) is
  begin
    jr_folder.trace('jr_language.disable');
  end disable;

end jr_language;
/

rem
rem ---------------------------------------------------------------------------+
rem }} end of file
rem ---------------------------------------------------------------------------+