How to submit request with default language as 'American English' in other non-english language sessions.

Question

Dear All,
Kindly suggest how to submit request with default language as 'American English' in other language sessions (Ex: Arabic).
R12: 12.1.3
The issue is we created function using 'arabic' text in it, which runs perfect in the english session, but doesnt gets value in the arabic session.
So we decided to make the submit request with default language as 'American English'.
Below is the function. Kindly note that SEGMENT1 is not linked to any valueset.
CREATE OR REPLACE FUNCTION F_GET_OLD_LEAVE(P_PERSON_ID NUMBER)
  RETURN NUMBER IS
  V_DAYS NUMBER;
BEGIN
  select
     SUM(EXCD_DAYS)
    INTO V_DAYS
      FROM (
            SELECT
  --            NVL(SEGMENT5, 'تجاوز') Late_type,
  --             SEGMENT1 NOTES,
  --            ACTUAL_TERMINATION_DATE,
(CASE 
WHEN NVL(SEGMENT5,'تجاوز') not in ( 'تجاوز' ,'إجازة غير مدفوعة') and segment1 not in ('إجازة غير مدفوعة') THEN 0
--WHEN SEGMENT1  like 'إجازة غير مدفوعة' THEN
--TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR') -
--TO_DATE(to_date(SUBSTR(segment2, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR') +1
when segment1 not in('بدل نقدي','إجازة غير مدفوعة') and segment4 is null then
TRUNC(to_date(ACTUAL_TERMINATION_DATE,'DD/MM/RRRR'))- TO_DATE(to_date(SUBSTR(segment3, 1, 10),'DD/MM/YYYY'), 'DD/MM/RRRR')-1 
when segment1 in('إجازة غير مدفوعة') and segment4 is null then
TRUNC(to_date(ACTUAL_TERMINATION_DATE,'DD/MM/RRRR'))- TO_DATE(to_date(SUBSTR(segment2, 1, 10),'DD/MM/YYYY'), 'DD/MM/RRRR')
WHEN SEGMENT1 <> 'إجازة غير مدفوعة' and
            TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')  <
            TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR') 
THEN 0
  WHEN SEGMENT1 <> 'إجازة غير مدفوعة' and
            TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')  -
            TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')  <=1
THEN 0
WHEN SEGMENT1 like  '%بدل نقدي%' then 0
           -- TO_DATE(to_date(SUBSTR(segment2, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')  
  WHEN SEGMENT1 like '%إجازة سنوية%' and segment5 in( 'إجازة غير مدفوعة','تجاوز')and
            TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')  -
            TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')  >=2
            then
            TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')  -
            TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR') -1
WHEN SEGMENT1 like '%إجازة حج%' and segment5 in('إجازة غير مدفوعة','تجاوز') and
            TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')  -
            TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')  >=2
            then
            TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')  -
            TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR') -1
when SEGMENT1 LIKE '%إجازة غير مدفوعة%' AND
TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR') -
TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')<=1
THEN
TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR') -
TO_DATE(to_date(SUBSTR(segment2, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')
when SEGMENT1 LIKE '%إجازة غير مدفوعة%' AND SEGMENT5 NOT IN('تجاوز','إجازة غير مدفوعة') AND
TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR') -
TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')>=2
THEN
TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR') -
TO_DATE(to_date(SUBSTR(segment2, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')+1
when SEGMENT1 LIKE '%إجازة غير مدفوعة%' AND SEGMENT5  IN('تجاوز','إجازة غير مدفوعة') AND
TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR') -
TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')>=2
THEN
TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR') -
TO_DATE(to_date(SUBSTR(segment2, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')
WHEN
           EXTRACT(YEAR FROM TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR'))  <>
           EXTRACT(YEAR FROM TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')) 
THEN
   TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'),'DD/MM/RRRR') -
   TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'),'DD/MM/RRRR') - 2
WHEN 
        to_char(to_date(SUBSTR(SEGMENT3, 1, 10),'YYYY/MM/DD'),'DD/MM/YYYY') =
        to_char(to_date(SUBSTR(SEGMENT4, 1, 10),'YYYY/MM/DD'),'DD/MM/YYYY')
        THEN  0
WHEN
EXTRACT(DAY FROM TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR'))= 31
  THEN
     TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR') -
  TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')-1
--------------------------------------------when enddate is NULL---------------------------------------------------------------------------------
-- WHEN segment3 IS NULL THEN round(TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'),'DD/MM/RRRR') -
--  TO_DATE(to_date(SUBSTR(segment2, 1, 10),'YYYY/MM/DD'),'DD/MM/RRRR'))
WHEN segment3 IS NULL THEN ((EXTRACT(MONTH FROM TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')) -
        EXTRACT(MONTH FROM TO_DATE(to_date(SUBSTR(segment2, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR'))) * 30) +
         (EXTRACT(DAY FROM TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')) -
        EXTRACT(DAY FROM TO_DATE(to_date(SUBSTR(segment2, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')))
-----***********************************when segment1**********************************--------------------------
WHEN SEGMENT1  like '%صادف%' THEN ((EXTRACT(MONTH FROM TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')) -
        EXTRACT(MONTH FROM TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR'))) * 0) +
         (EXTRACT(DAY FROM TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')) -
        EXTRACT(DAY FROM TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')))
  WHEN 
    EXTRACT(YEAR FROM TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')) =
    EXTRACT(YEAR FROM TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR'))
THEN
      ((EXTRACT(MONTH FROM TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')) -
        EXTRACT(MONTH FROM TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR'))) * 30) +
       (EXTRACT(DAY FROM TO_DATE(to_date(SUBSTR(segment4, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')) -
        EXTRACT(DAY FROM TO_DATE(to_date(SUBSTR(segment3, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')))-1
         ELSE 0
         END )EXCD_DAYS
             FROM HR.PER_ANALYSIS_CRITERIA C,
               PER_ALL_PEOPLE_F         PPF,
                PER_PERIODS_OF_SERVICE PPPS,
               PER_PERSON_ANALYSES      T ,
               fnd_id_flex_structures_vl f
             WHERE 1 = 1
           AND T.ANALYSIS_CRITERIA_ID = C.ANALYSIS_CRITERIA_ID
           AND PPF.PERSON_ID = T.PERSON_ID
           and ppps.PERSON_ID=ppf.person_id(+)
          and   ppps.ACTUAL_TERMINATION_DATE           BETWEEN  ppf.effective_start_date and nvl(ppf.effective_end_date, to_date('31/12/4712', 'DD/MM/YYYY'))
          -- AND C.ID_FLEX_NUM = 50318
           and c.id_flex_num = f.id_flex_num
    AND f.id_flex_code = 'PEA' 
      and f.ID_FLEX_STRUCTURE_NAME =  'XX_Old_Leave_Details'
    AND PPF.person_id = P_PERSON_ID
AND T.DATE_FROM>=( select
TO_DATE(to_date(SUBSTR(xx.global_value, 1, 10),'YYYY/MM/DD'), 'DD/MM/RRRR')
FROM
ff_globals_f xx
where xx.GLOBAL_NAME='XX_NEW_LEAVES_DATE_FROM'
AND SYSDATE BETWEEN XX.EFFECTIVE_START_DATE AND XX.EFFECTIVE_END_DATE)
and substr(c.segment1,1,10)>=
           select substr(xx.global_value,1,10)
FROM
ff_globals_f xx
where xx.GLOBAL_NAME='XX_NEW_LEAVES_STD'
AND SYSDATE BETWEEN XX.EFFECTIVE_START_DATE AND XX.EFFECTIVE_END_DATE
  RETURN NVL(V_DAYS, 0);
EXCEPTION
  WHEN OTHERS THEN
    RETURN 0;
END;
Thanks in Advance.
Regards,
Afzal.

Answer 1

Dear All,
I found the solution for the above function.
In the same function I removed the static arabic values replacing with code values from the value set.
In my scenario there is a value set where some of these values exists, and other we can add there.
Kindly let me know if someone was successful by using the arabic text in the coding and defaulting the language in conc prog as English.
Thanks a lot.
Regards,
Afzal.