PACKAGE BODY: APPS.JTF_DBSTRING_UTILS

Source

1 PACKAGE BODY JTF_DBSTRING_UTILS AS
2 /* $Header: JTFSTRGB.pls 115.5 2002/02/14 12:09:25 pkm ship     $ */
3   maxStringLength       constant integer := 32767;
4   boolean_true_string   constant varchar2(5) := 'T';
5   boolean_false_string  constant varchar2(5) := 'F';
6   lineFeed              constant varchar2(10) := fnd_global.newline;
7   nullString            constant varchar2(10) := 'null';
8   currencyFormatLength  constant integer := 60;
9 
10 ------------------------------------------------------------------------------
11 --  PUBLIC METHODS
12 -----------------------------------------------------------------------------
13 
14 
15 ------------------------------------------------------------------------------
16 --  Methods dealing with mnemonics
17 -----------------------------------------------------------------------------
18 
19 function getMnemonicChar(label in varchar2) return varchar2 is
20   pos number := instr(label,'&');
21 begin
22   if pos > 0 then
23     return substr(label,pos + 1,1);
24   else
25     return null;
26   end if;
27 end getMnemonicChar;
28 
29 -----------------------------------------------------------------------------
30 
31 function stripMnemonic(label in varchar2) return varchar2 is
32 begin
33   return replace(label,'&');
34 end stripMnemonic;
35 
36 function getLineFeed   return varchar2 is
37 begin
38 	return lineFeed;
39 end getLineFeed;
40 -----------------------------------------------------------------------------
41 
42 function getNullString return varchar2 is
43 begin
44 	return nullString;
45 end getNullString;
46 
47 -----------------------------------------------------------------------------
48 function getBooleanString(thisBoolean in boolean) return varchar2 is
49 begin
50   if thisBoolean then
51     return boolean_true_string;
52   else
53    return boolean_false_string;
54   end if;
55 end getBooleanString;
56 
57 -----------------------------------------------------------------------------
58 function getBoolean(thisBoolean in varchar2) return boolean is
59 begin
60   if thisBoolean  = boolean_true_string then
61     return true;
62   else
63    return false;
64   end if;
65 end getBoolean;
66 
67 function getMaxStringLength return integer is
68 begin
69   return maxStringLength;
70 end getMaxStringLength;
71 
72 
73 function getCurrencyFormatLength return integer is
74 begin
75   return currencyFormatLength;
76 end getCurrencyFormatLength;
77 
78 FUNCTION getVersion RETURN VARCHAR2 IS
79   BEGIN
80     RETURN('$Header: JTFSTRGB.pls 115.5 2002/02/14 12:09:25 pkm ship     $');
81   END getVersion;
82 
83 END JTF_DBSTRING_UTILS;