1 PACKAGE GL_FC_XLATE_PKG AUTHID CURRENT_USER AS
2 /* $Header: glfcxlts.pls 120.4 2005/05/05 02:05:26 kvora ship $ */
3
4 -- FUNCTION
5 -- get_unique_name
6 -- PURPOSE
7 -- This funtion will generate the unique target ledger name
8 -- HISTORY
9 -- 03/18/03 C Ma Created
10 -- ARGUMENTS
11 -- ldg_name
12 -- ldg_id
13 -- tcurr_code
14 FUNCTION get_unique_name(ldg_name IN VARCHAR2,
15 ldg_id IN NUMBER,
16 tcurr_code IN VARCHAR2) RETURN VARCHAR2;
17
18 -- FUNCTION
19 -- get_unique_short_name
20 -- PURPOSE
21 -- This funtion will generate the unique target ledger short name
22 -- HISTORY
23 -- 03/18/03 C Ma Created
24 -- ARGUMENTS
25 -- ldg_name
26 -- ldg_id
27 -- tcurr_code
28 FUNCTION get_unique_short_name(ldg_short_name IN VARCHAR2,
29 ldg_id IN NUMBER,
30 tcurr_code IN VARCHAR2) RETURN VARCHAR2;
31
32 -- FUNCTION
33 -- get_ledger_name
34 -- PURPOSE
35 -- This funtion gets the ledger name for a particular ledger and currency,
36 -- or creates one using get_unique_name and returns it.
37 -- HISTORY
38 -- 05/02/03 M Ward Created
39 -- ARGUMENTS
40 -- ldg_name
41 -- ldg_id
42 -- tcurr_code
43 FUNCTION get_ledger_name(ldg_name IN VARCHAR2,
44 ldg_id IN NUMBER,
45 tcurr_code IN VARCHAR2) RETURN VARCHAR2;
46
47 -- FUNCTION
48 -- get_ledger_short_name
49 -- PURPOSE
50 -- This funtion gets the short name for a particular ledger and currency,
51 -- or creates one using get_unique_short_name and returns it.
52 -- HISTORY
53 -- 05/02/03 M Ward Created
54 -- ARGUMENTS
55 -- ldg_name
56 -- ldg_id
57 -- tcurr_code
58 FUNCTION get_ledger_short_name(ldg_short_name IN VARCHAR2,
59 ldg_id IN NUMBER,
60 tcurr_code IN VARCHAR2) RETURN VARCHAR2;
61
62 -- FUNCTION
63 -- relation_exist
64 -- PURPOSE
65 -- This funtion will check whether a translation ALC relationship
66 -- has been created for the ledger and the target currency.
67 -- HISTORY
68 -- 03/18/03 C Ma Created
69 -- ARGUMENTS
70 -- ldg_id
71 -- tcurr_code
72 FUNCTION relation_exist(ldg_id IN NUMBER,
73 tcurr_code IN VARCHAR2) RETURN VARCHAR2;
74
75 -- FUNCTION
76 -- xlated_ever
77 -- PURPOSE
78 -- This funtion will check whether a ledger has been translated before.
79 -- HISTORY
80 -- 03/18/03 C Ma Created
81 -- ARGUMENTS
82 -- ldg_id
83 -- tcurr_code
84 -- bal_seg_val
85 FUNCTION xlated_ever(ldg_id IN NUMBER,
86 tcurr_code IN VARCHAR2,
87 bal_seg_val IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2;
88
89
90 --
91 -- Function
92 -- FIRST_EVER_PERIOD_CHECK
93 -- Purpose
94 -- This procedure checks whether the period is first ever period in the calendar
95 -- If it is the first ever period defined in the calendar, then it displays a message.
96 -- History
97 -- 10-FEB-2005 Srini Pala Created.
98 -- Arguments
99 -- Ledger_ID and Period_Name.
100 -- Example
101 -- TRANSLATION.FIRST_EVER_PERIOD_CHECK(120, 'Jan-02');
102 -- Notes
103 --
104
105 FUNCTION FIRST_EVER_PERIOD_CHECK(x_ledger_id NUMBER, x_period VARCHAR2)
106 RETURN BOOLEAN;
107
108
109 END GL_FC_XLATE_PKG;