Returns true or false, depending on whether the current character set is simple (i.e., single-byte, no special characters, no special handling).
FUNCTION Ora_Nls.Simple_Cs
RETURN BOOLEAN;
/*
** Determine if the language is simple or not
*/
simplecs := Ora_Nls.Simple_Cs;
IF simplecs = TRUE
lang_name (langinfo.txt);
Text_IO.Put ('This language uses a simple
character set.');
ELSE
lang_name (langinfo.txt);
Text_IO.Put ('This language uses a complex
character set.');
ENDIF;