1 PACKAGE JG_ZZ_AMOUNT_IN_LETTERS AUTHID CURRENT_USER AS
2 /* $Header: jgzztrls.pls 115.13 2002/10/17 23:21:15 ashrivat ship $ */
3
4 TYPE numbers IS TABLE OF VARCHAR2(50)INDEX BY BINARY_INTEGER;
5 NumberList numbers;
6
7 TYPE thousands IS TABLE OF VARCHAR2(50)INDEX BY BINARY_INTEGER;
8 ThousandList thousands;
9
10 -- Number de niveaux defined by group of thousands (milliers)
11 g_level NUMBER := 4;
12
13 -- Initialization de variables
14 procedure fr_init;
15 procedure it_init;
16 procedure sp_init;
17
18 function hundreds(p_nb_char IN VARCHAR2 ) return VARCHAR2;
19
20 function litteral(p_number IN NUMBER, p_decimal IN BOOLEAN, p_lang IN VARCHAR2) return VARCHAR2;
21
22 function litteral_amount(p_number IN NUMBER, p_lang IN VARCHAR2) return VARCHAR2;
23
24 function it_exceptions(p_litteral IN VARCHAR2 ) return VARCHAR2;
25
26 function sp_exceptions(p_litteral IN VARCHAR2 ) return VARCHAR2;
27
28 function fr_exceptions(p_litteral IN VARCHAR2 ) return VARCHAR2;
29
30 function it_plural (p_litteral IN VARCHAR2 ) return VARCHAR2;
31
32 function fr_plural (p_litteral IN VARCHAR2 ) return VARCHAR2;
33
34 function sp_plural (p_litteral IN VARCHAR2 ) return VARCHAR2;
35
36 function fr_currency (p_litteral IN VARCHAR2, p_decimal IN BOOLEAN) return VARCHAR2;
37
38 end JG_ZZ_AMOUNT_IN_LETTERS ;
39