PACKAGE BODY: APPS.QA_COMMON_XMLP_PKG

Source

1 package body QA_COMMON_XMLP_PKG As
2 /* $Header: QACOMMONB.pls 120.0 2007/12/27 08:19:42 dwkrishn noship $ */
3 
4 function get_precision(qty_precision in number) return VARCHAR2 is
5 begin
6 
7 if qty_precision = 0 then return('999G999G999G990');
8 
9 elsif qty_precision = 1 then return('999G999G999G990D0');
10 
11 elsif qty_precision = 3 then return('999G999G999G990D000');
12 
13 elsif qty_precision = 4 then return('999G999G999G990D0000');
14 
15 elsif qty_precision = 5 then return('999G999G999G990D00000');
16 
17 elsif qty_precision = 6 then  return('999G999G999G990D000000');
18 
19 else return('999G999G999G990D00');
20 
21 end if;
22 
23 end;
24 
25 end QA_COMMON_XMLP_PKG;