Change Number

[OCPjahid]

I want to change number in word.
such as i write 1792400
it show seveteen lac ninty two thousand four hundred.


Jahid

[amitpatel66]

I want to change number in word.
such as i write 1792400
it show seveteen lac ninty two thousand four hundred.


Jahid

 
SELECT TO_CHAR(TO_DATE('1792400','J'),'JSP') FROM dual;
 
 

[subashsavji]

 
CREATE OR REPLACE FUNCTION NUMBER_CONVERSION(NUM NUMBER) RETURN VARCHAR2
IS
  A VARCHAR2(1000);
  B VARCHAR2(20);
  X NUMBER;
  Y NUMBER := 1;
  Z NUMBER;
  LSIGN NUMBER;
  NO NUMBER;
BEGIN
  X:= INSTR(NUM, '.');
  LSIGN := SIGN(NUM);
  NO := ABS(NUM); 
  IF X = 0 THEN 
     SELECT  TO_CHAR(TO_DATE(NO, 'J'), 'JSP')  INTO A FROM DUAL;
  ELSE
     SELECT  to_char(to_date(SUBSTR(NO, 1,
       NVL(INSTR(NO, '.')-1, LENGTH(NO))),
        'J'), 'JSP') INTO A FROM DUAL;
     SELECT LENGTH(SUBSTR(NO, INSTR(NO, '.')+1)) INTO Z FROM DUAL;
     A := A ||' POINT ';
     WHILE Y< Z+1 LOOP
  SELECT TO_CHAR(TO_DATE(SUBSTR(NO, (INSTR(NO, '.')+Y), 1), 'J'), 'JSP')
        INTO B FROM DUAL;
  A := A || B ||' ';
  y :=y+1;
     END LOOP;
  END IF;
  IF LSIGN = -1 THEN
     RETURN 'NEGATIVE '||A;
  ELSE
     RETURN A;
  END IF;
END;
 

Select number_conversion(-3786.9899876) from dual;