Get Person Default Language in IFS

DECLARE 
   user_id_         VARCHAR2(50);
   language_code_   VARCHAR2(10);
BEGIN
   --Get Session Logged-in Language Code
   user_id_ := Fnd_Session_API.Get_Fnd_User;
   Dbms_Output.Put_Line('user_id_: ' || user_id_);

   --Get User's Language Code
   language_code_ := Language_Code_API.Get_Lang_Code_Rfc3066(
                        Iso_Language_API.Encode(
                           Person_Info_API.Get_Default_Language(
                              Person_Info_API.Get_Id_For_User(user_id_)
                           )
                        )
                     );
   Dbms_Output.Put_Line('language_code_: ' || language_code_);
END;