1 PACKAGE FA_GCCID_PKG AUTHID CURRENT_USER as
2 /* $Header: FAFBGCS.pls 120.4 2009/03/26 21:32:40 bridgway ship $tpershad ship */
3
4 global_concat_segs varchar2(2000);
5 fafb_accts FA_FLEX_TYPE.fafb_acct_tab_type;
6
7
8 -- BUG# 2215671: this should only be set from FAPOST
9 -- where the book and period remain constant. To cache this
10 -- for normal transactions (even mass would require some more
11 -- work, since transactions could occur accross multiple
12 -- books in any given session (format = DD/MM/YYYY)
13
14 G_validation_date varchar2(10);
15
16 /*
17 --------------------------------------------------------------------------
18 *
19 * Name fafbgcc
20 *
21 *
22 * Description
23 * It constructs the flex function name by calling
24 * search_functions and then calls the Flex builder
25 * FAFLEXB.fafb_call_flex
26 * Notes
27 *
28 * Parameters
29 * book_type_code varchar2
30 * fn_trx_code in varchar2 Financial trx code. This is
31 * used to generate the function name
32 * which is passed to flex builder
33 * dist_ccid in number - distribution ccid.
34 * acct_segval in varchar2 - Seg value for acct segment
35 * rtn_ccid out number - Generated ccid
36 *
37 * Modifies
38 *
39 * Returns
40 * True on successful retrieval. Otherwise False.
41 *
42 * History
43 *
44 *------------------------------------------------------------------
45 */
46 FUNCTION fafbgcc (X_book_type_code in fa_book_controls.book_type_code%type,
47 X_fn_trx_code in varchar2,
48 X_dist_ccid in number,
49 X_acct_segval in varchar2,
50 X_account_ccid in number,
51 X_distribution_id in number,
52 X_rtn_ccid out nocopy number,
53 p_log_level_rec IN FA_API_TYPES.log_level_rec_type
54 default null)
55 return boolean;
56
57
58
59 /*
60 --------------------------------------------------------------------------
61 *
62 * Name fafbgcc_proc
63 *
64 *
65 * Description
66 * This procedure is used for calling from C functions
67 * Calling func fafbgcc from C program was causing some
68 * problems so this procedure was created to call
69 * from C program as a workaround only.This proc just
70 * calls fafbgcc and does nothing. In future we can
71 * remove this and then change the C program to call
72 * the func fafbgcc directly
73 * Notes
74 *
75 * Parameters
76 *
77 * Modifies
78 *
79 * Returns
80 * none
81 *
82 * History
83 *
84 *------------------------------------------------------------------
85 */
86
87 PROCEDURE fafbgcc_proc
88 (X_book_type_code in fa_book_controls.book_type_code%type,
89 X_fn_trx_code in varchar2,
90 X_dist_ccid in integer,
91 X_acct_segval in varchar2,
92 X_account_ccid in integer,
93 X_distribution_id in integer,
94 X_rtn_ccid out nocopy number,
95 X_concat_segs out nocopy varchar2,
96 X_return_value out nocopy integer);
97
98 -----------------------------------------------------------------------------
99 /*
100 --------------------------------------------------------------------------
101 *
102 * Name get_ccid
103 *
104 *
105 * Description
106 * This function is called from fafbgcc and fafbgcc_proc
107 * This function checks to see if ccid exists in
108 * fa_distribution_accounts and also checks if ccid is
109 * valid.
110 * Notes
111 *
112 * Parameters
113 *
114 * Modifies
115 *
116 * Returns
117 * X_rtn_ccid, X_ccid_found
118 *
119 * History
120 *
121 *------------------------------------------------------------------
122 */
123
124 FUNCTION get_ccid (X_book_type_code IN VARCHAR2,
125 X_distribution_id IN NUMBER,
126 X_fn_trx_code IN VARCHAR2,
127 X_validation_date IN DATE,
128 X_ccid_found OUT NOCOPY BOOLEAN,
129 X_rtn_ccid OUT NOCOPY NUMBER
130 ,p_log_level_rec IN fa_api_types.log_level_rec_type default null)
131 RETURN BOOLEAN;
132
133 /*
134 --------------------------------------------------------------------------
135 *
136 * Name fafbgcc_proc_msg
137 *
138 *
139 * Description
140 * This procedure is called directly from fafbgcc (Pro*C)
141 * It retrieves the PL/SQL message stack (and count)
142 * into the variables for display in concurrent logs.
143 *
144 * Notes
145 *
146 * Parameters
147 *
148 * Modifies
149 *
150 * Returns
151 * X_mesg_count, X_mesg_string
152 *
153 * History
154 * created bridgway 05/02/01
155 *
156 *------------------------------------------------------------------
157 *
158 */
159
160
161 PROCEDURE fafbgcc_proc_msg(X_mesg_count IN OUT NOCOPY number,
162 X_mesg_string IN OUT NOCOPY VARCHAR2);
163
164 END FA_GCCID_PKG;