DBA Data[Home] [Help]

PACKAGE BODY: APPS.JL_JGZZGLTRB_XMLP_PKG

Source


1 PACKAGE BODY JL_JGZZGLTRB_XMLP_PKG AS
2 /* $Header: JGZZGLTRBB.pls 120.1 2007/12/25 16:32:02 dwkrishn noship $ */
3   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4     CURSOR LEDGER_ACCTG_CODE IS
5       SELECT
6         C.ACCTG_ENVIRONMENT_CODE
7       FROM
8         GL_LEDGERS L,
9         GL_LEDGER_CONFIGURATIONS C
10       WHERE L.LEDGER_ID = P_LEDGER_ID
11         AND C.CONFIGURATION_ID = L.CONFIGURATION_ID;
12     CURSOR GET_EXC_LE_ID IS
13       SELECT
14         CD.OBJECT_ID
15       FROM
16         GL_LEDGERS L,
17         GL_LEDGER_CONFIG_DETAILS CD
18       WHERE L.LEDGER_ID = P_LEDGER_ID
19         AND CD.CONFIGURATION_ID = L.CONFIGURATION_ID
20         AND CD.OBJECT_TYPE_CODE = 'LEGAL_ENTITY';
21     L_ACCTG_CODE VARCHAR2(30);
22     L_EXC_LE_ID NUMBER(15);
23     L_PERIOD_YEAR NUMBER(15);
24     L_PERIOD_TYPE VARCHAR2(15);
25     L_VERSION VARCHAR2(20);
26   BEGIN
27     P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
28     /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
29     USER_NAME := FND_GLOBAL.USER_NAME;
30     SELECT
31       RELEASE_NAME
32     INTO L_VERSION
33     FROM
34       FND_PRODUCT_GROUPS;
35     SYS_NAME_VER := P_APPL_NAME || L_VERSION || '.';
36     SELECT
37       TO_CHAR(SYSDATE
38              ,'YYYY-MM-DD') || 'T' || TO_CHAR(SYSDATE
39              ,'HH24:MI:SS')
40     INTO REPORT_EXEC_DATE
41     FROM
42       DUAL;
43     SELECT
44       NAME,
45       CHART_OF_ACCOUNTS_ID,
46       PERIOD_SET_NAME,
47       ACCOUNTED_PERIOD_TYPE
48     INTO DATA_ACCESS_SET_NAME,COA_ID,L_PERIOD_SET_NAME,L_PERIOD_TYPE
49     FROM
50       GL_ACCESS_SETS
51     WHERE ACCESS_SET_ID = P_ACCESS_SET_ID;
52     SELECT
53       NVL(LR.TARGET_LEDGER_NAME
54          ,L.NAME)
55     INTO PARAM_LEDGER_NAME
56     FROM
57       GL_LEDGERS L,
58       GL_LEDGER_RELATIONSHIPS LR
59     WHERE L.LEDGER_ID = P_LEDGER_ID
60       AND LR.APPLICATION_ID (+) = 101
61       AND LR.SOURCE_LEDGER_ID (+) = L.LEDGER_ID
62       AND LR.TARGET_LEDGER_ID (+) = L.LEDGER_ID
63       AND LR.TARGET_CURRENCY_CODE (+) = P_LEDGER_CURRENCY;
64     SELECT
65       P1.PERIOD_YEAR,
66       P1.START_DATE,
67       P2.END_DATE,
68       TO_CHAR(P1.START_DATE
69              ,'YYYY-MM-DD') || 'T' || TO_CHAR(P1.START_DATE
70              ,'HH24:MI:SS'),
71       TO_CHAR(P2.END_DATE
72              ,'YYYY-MM-DD') || 'T' || TO_CHAR(P2.END_DATE
73              ,'HH24:MI:SS')
74     INTO L_PERIOD_YEAR,PER_FROM_START_DATE,PER_TO_END_DATE,PERIOD_FROM_START_DATE,PERIOD_TO_END_DATE
75     FROM
76       GL_PERIODS P1,
77       GL_PERIODS P2
78     WHERE P1.PERIOD_SET_NAME = L_PERIOD_SET_NAME
79       AND P1.PERIOD_NAME = P_PERIOD_FROM
80       AND P2.PERIOD_SET_NAME = L_PERIOD_SET_NAME
81       AND P2.PERIOD_NAME = P_PERIOD_TO;
82     SELECT
83       P1.PERIOD_NAME,
84       P1.ADJUSTMENT_PERIOD_FLAG
85     INTO FIRST_PERIOD_NAME,FIRST_PERIOD_ADJ_FLAG
86     FROM
87       GL_PERIODS P1
88     WHERE P1.PERIOD_SET_NAME = L_PERIOD_SET_NAME
89       AND P1.PERIOD_TYPE = L_PERIOD_TYPE
90       AND P1.PERIOD_YEAR = L_PERIOD_YEAR
91       AND P1.PERIOD_NUM = (
92       SELECT
93         MIN(P2.PERIOD_NUM)
94       FROM
95         GL_PERIODS P2
96       WHERE P2.PERIOD_SET_NAME = L_PERIOD_SET_NAME
97         AND P2.PERIOD_TYPE = L_PERIOD_TYPE
98         AND P2.PERIOD_YEAR = L_PERIOD_YEAR );
99     /*SRW.REFERENCE(COA_ID)*/NULL;
100     IF (P_KFF_FROM IS NOT NULL OR P_KFF_TO IS NOT NULL) THEN
101       NULL;
102     END IF;
103     OPEN LEDGER_ACCTG_CODE;
104     FETCH LEDGER_ACCTG_CODE
105      INTO L_ACCTG_CODE;
106     CLOSE LEDGER_ACCTG_CODE;
107     IF (L_ACCTG_CODE = 'EXCLUSIVE') THEN
108       OPEN GET_EXC_LE_ID;
109       FETCH GET_EXC_LE_ID
110        INTO L_EXC_LE_ID;
111       CLOSE GET_EXC_LE_ID;
112       SELECT_LE := TO_CHAR(L_EXC_LE_ID);
113       FROM_LNSV := ' ';
114       WHERE_LE := ' ';
115     ELSIF (L_ACCTG_CODE = 'SHARED') THEN
116       SELECT_LE := 'lnsv.LEGAL_ENTITY_ID';
117       FROM_LNSV := ', GL_LEDGER_NORM_SEG_VALS lnsv';
118       WHERE_LE := ' where lnsv.ledger_id (+) = ' || TO_CHAR(P_LEDGER_ID) || ' and lnsv.segment_type_code (+) = ''B''' || ' and lnsv.segment_value (+) = BALANCING_SEGMENT_VALUE' || ' and status_code IS NULL';
119     ELSE
120       SELECT_LE := 'NULL';
121       FROM_LNSV := ' ';
122       WHERE_LE := ' ';
123     END IF;
124     IF (P_PERIOD_FROM = P_PERIOD_TO) THEN
125       WHERE_PERIOD := ' and per.period_name in (''' || P_PERIOD_FROM || ''', ''' || FIRST_PERIOD_NAME || ''')';
126     ELSE
127       WHERE_PERIOD := ' and (per.start_date BETWEEN to_date(''' || TO_CHAR(PER_FROM_START_DATE
128                              ,'YYYY-MM-DD') || ''', ''YYYY-MM-DD'')' || ' AND to_date(''' || TO_CHAR(PER_TO_END_DATE
129                              ,'YYYY-MM-DD') || ''', ''YYYY-MM-DD'')' || ' or per.period_name = ''' || FIRST_PERIOD_NAME || ''')';
130     END IF;
131     IF (P_CURRENCY_TYPE = 'E') THEN
132       WHERE_TRANSLATED_FLAG := 'and nvl(bal.translated_flag, ''R'') = ''R''';
133     ELSIF (P_CURRENCY_TYPE = 'T') THEN
134       WHERE_TRANSLATED_FLAG := 'and nvl(bal.translated_flag, ''x'') <> ''R''';
135     ELSIF (P_CURRENCY_TYPE = 'S') THEN
136       WHERE_TRANSLATED_FLAG := 'and bal.translated_flag IS NULL';
137     ELSE
138       WHERE_TRANSLATED_FLAG := ' ';
139     END IF;
140     IF (P_ACCT_CLASS = 'ALL') THEN
141       WHERE_ACCT_CLASS := 'and gcc.account_type in (''A'', ''L'', ''O'', ''R'', ''E'')';
142     ELSIF (P_ACCT_CLASS = 'BS') THEN
143       WHERE_ACCT_CLASS := 'and gcc.account_type in (''A'', ''L'', ''O'')';
144     ELSIF (P_ACCT_CLASS = 'IS') THEN
145       WHERE_ACCT_CLASS := 'and gcc.account_type in (''R'', ''E'')';
146     END IF;
147     WHERE_DAS := GL_ACCESS_SET_SECURITY_PKG.GET_SECURITY_CLAUSE(P_ACCESS_SET_ID
148                                                                ,'R'
149                                                                ,'LEDGER_COLUMN'
150                                                                ,'LEDGER_ID'
151                                                                ,'BAL'
152                                                                ,'SEG_COLUMN'
153                                                                ,NULL
154                                                                ,'GCC'
155                                                                ,NULL);
156     IF (WHERE_DAS IS NOT NULL) THEN
157       WHERE_DAS := ' and ' || WHERE_DAS;
158     ELSE
159       WHERE_DAS := ' ';
160     END IF;
161     IF (P_ACCT_LEVEL > 0 OR P_REPORT_TYPE IS NOT NULL) THEN
162       SELECT
163         FS.FLEX_VALUE_SET_ID
164       INTO ACCT_SEG_VALUE_SET_ID
165       FROM
166         FND_SEGMENT_ATTRIBUTE_VALUES SAV,
167         FND_ID_FLEX_SEGMENTS FS
168       WHERE SAV.APPLICATION_ID = 101
169         AND SAV.ID_FLEX_CODE = 'GL#'
170         AND SAV.ID_FLEX_NUM = COA_ID
171         AND SAV.SEGMENT_ATTRIBUTE_TYPE = 'GL_ACCOUNT'
172         AND SAV.ATTRIBUTE_VALUE = 'Y'
173         AND FS.APPLICATION_COLUMN_NAME = SAV.APPLICATION_COLUMN_NAME
174         AND FS.APPLICATION_ID = 101
175         AND FS.ID_FLEX_CODE = 'GL#'
176         AND FS.ID_FLEX_NUM = COA_ID
177         AND FS.ENABLED_FLAG = 'Y';
178     END IF;
179     IF (P_ACCT_LEVEL > 0) THEN
180       JG_GL_ACCT_HIER_PKG.POPULATE_ACCT_HIER_TABLE(ACCT_SEG_VALUE_SET_ID
181                                                   ,P_TOP_PARENT_VALUE);
182     END IF;
183     IF (P_REPORT_TYPE IS NOT NULL) THEN
184       WHERE_DEGREE := 'and EXISTS (select 1' || ' from FND_FLEX_VALUES_VL parent' || ' where parent.flex_value_set_id = ' || TO_CHAR(ACCT_SEG_VALUE_SET_ID) || ' and substr(' || SELECT_ACCT_SEG
185       || ', 1, length(parent.flex_value)) = parent.flex_value' || ' and gcc.summary_flag = ''N''' || ' and length(parent.flex_value) > 1';
186       IF (P_REPORT_TYPE = 'BEGIN YEAR') THEN
187         WHERE_DEGREE := WHERE_DEGREE || ' and (substr(parent.flex_value, 1, 1) in (''1'',''2'',''3'',''4'',''5'') or parent.flex_value = ''88'')' || ' and substr(' || SELECT_ACCT_SEG
188         || ', 1, 1) in (''1'',''2'',''3'',''4'',''5'',''8'') )';
189       ELSIF (P_REPORT_TYPE = 'END YEAR') THEN
190         WHERE_DEGREE := WHERE_DEGREE || ' and substr(parent.flex_value, 1, 1) in (''1'',''2'',''3'',''4'',''5'',''8'')' || ' and substr(' || SELECT_ACCT_SEG || ', 1, 1) in (''1'',''2'',''3'',''4'',''5'',''8''))';
191       ELSIF (P_REPORT_TYPE = 'RESULTS') THEN
192         WHERE_DEGREE := WHERE_DEGREE || ' and substr(parent.flex_value, 1, 1) in (''6'',''7'',''8'') and substr(parent.flex_value, 1, 2) <> ''88''' || ' and substr(' || SELECT_ACCT_SEG
193         || ', 1, 1) in (''6'',''7'',''8''))';
194       ELSE
195         WHERE_DEGREE := WHERE_DEGREE || ')';
196       END IF;
197     ELSE
198       WHERE_DEGREE := ' ';
199     END IF;
200     IF (P_CURRENCY_TYPE = 'T') THEN
201       PARAM_CURRENCY := P_LEDGER_CURRENCY;
202     ELSE
203       PARAM_CURRENCY := P_ENTERED_CURRENCY;
204     END IF;
205     PARAM_PERIOD_FROM := P_PERIOD_FROM;
206     PARAM_PERIOD_TO := P_PERIOD_TO;
207     PARAM_ACCT_FROM := P_KFF_FROM;
208     PARAM_ACCT_TO := P_KFF_TO;
209     PARAM_ACCT_LEVEL := P_ACCT_LEVEL;
210     PARAM_TOP_PARENT_VALUE := P_TOP_PARENT_VALUE;
211     PARAM_PAGE_NUM_FORMAT := P_PAGE_NUM_FORMAT;
212     SELECT
213       MIN(MEANING)
214     INTO PARAM_CURRENCY_TYPE
215     FROM
216       GL_LOOKUPS
217     WHERE LOOKUP_TYPE = 'GL_CURRENCY_TYPE'
218       AND LOOKUP_CODE = P_CURRENCY_TYPE;
219     SELECT
220       MIN(MEANING)
221     INTO PARAM_ZERO_BEGIN_YEAR_BAL
222     FROM
223       FND_LOOKUPS
224     WHERE LOOKUP_TYPE = 'YES/NO'
225       AND LOOKUP_CODE = P_ZERO_BYB;
226     SELECT
227       MIN(MEANING)
228     INTO PARAM_ACCT_CLASS
229     FROM
230       FND_LOOKUPS
231     WHERE LOOKUP_TYPE = 'JGZZ_ACCOUNT_CLASS'
232       AND LOOKUP_CODE = P_ACCT_CLASS;
233     SELECT
234       MIN(MEANING)
235     INTO PARAM_REPORT_TYPE
236     FROM
237       FND_LOOKUPS
238     WHERE LOOKUP_TYPE = 'JGZZ_GL_TB_TYPE'
239       AND LOOKUP_CODE = P_REPORT_TYPE;
240     PARAM_USER_1 := P_USER_P1;
241     PARAM_USER_2 := P_USER_P2;
242     PARAM_USER_3 := P_USER_P3;
243     PARAM_USER_4 := P_USER_P4;
244     PARAM_USER_5 := P_USER_P5;
245     PARAM_USER_6 := P_USER_P6;
246     PARAM_USER_7 := P_USER_P7;
247     PARAM_USER_8 := P_USER_P8;
248     PARAM_USER_9 := P_USER_P9;
249     PARAM_USER_10 := P_USER_P10;
250     RETURN (TRUE);
251   END BEFOREREPORT;
252 
253   FUNCTION AFTERREPORT RETURN BOOLEAN IS
254   BEGIN
255     /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
256     RETURN (TRUE);
257   END AFTERREPORT;
258 
259   FUNCTION ACCT_LEVEL1_VALUEFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
260                                    ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
261     VAL VARCHAR2(40);
262   BEGIN
263     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
264     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
265     VAL := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_VALUE(ACCT_SEG_VALUE_SET_ID
266                                                    ,P_ACCT_LEVEL
267                                                    ,ACCOUNT_SEGMENT_VALUE
268                                                    ,ACCT_VALUE_DESC
269                                                    ,P_ACCT_DELIMITER
270                                                    ,1);
271     RETURN (VAL);
272   END ACCT_LEVEL1_VALUEFORMULA;
273 
274   FUNCTION ACCT_LEVEL2_VALUEFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
275                                    ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
276     VAL VARCHAR2(40);
277   BEGIN
278     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
279     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
280     VAL := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_VALUE(ACCT_SEG_VALUE_SET_ID
281                                                    ,P_ACCT_LEVEL
282                                                    ,ACCOUNT_SEGMENT_VALUE
283                                                    ,ACCT_VALUE_DESC
284                                                    ,P_ACCT_DELIMITER
285                                                    ,2);
286     RETURN (VAL);
287   END ACCT_LEVEL2_VALUEFORMULA;
288 
289   FUNCTION ACCT_LEVEL3_VALUEFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
290                                    ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
291     VAL VARCHAR2(40);
292   BEGIN
293     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
294     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
295     VAL := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_VALUE(ACCT_SEG_VALUE_SET_ID
296                                                    ,P_ACCT_LEVEL
297                                                    ,ACCOUNT_SEGMENT_VALUE
298                                                    ,ACCT_VALUE_DESC
299                                                    ,P_ACCT_DELIMITER
300                                                    ,3);
301     RETURN (VAL);
302   END ACCT_LEVEL3_VALUEFORMULA;
303 
304   FUNCTION ACCT_LEVEL4_VALUEFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
305                                    ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
306     VAL VARCHAR2(40);
307   BEGIN
308     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
309     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
310     VAL := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_VALUE(ACCT_SEG_VALUE_SET_ID
311                                                    ,P_ACCT_LEVEL
312                                                    ,ACCOUNT_SEGMENT_VALUE
313                                                    ,ACCT_VALUE_DESC
314                                                    ,P_ACCT_DELIMITER
315                                                    ,4);
316     RETURN (VAL);
317   END ACCT_LEVEL4_VALUEFORMULA;
318 
319   FUNCTION ACCT_LEVEL5_VALUEFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
320                                    ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
321     VAL VARCHAR2(40);
322   BEGIN
323     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
324     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
325     VAL := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_VALUE(ACCT_SEG_VALUE_SET_ID
326                                                    ,P_ACCT_LEVEL
327                                                    ,ACCOUNT_SEGMENT_VALUE
328                                                    ,ACCT_VALUE_DESC
329                                                    ,P_ACCT_DELIMITER
330                                                    ,5);
331     RETURN (VAL);
332   END ACCT_LEVEL5_VALUEFORMULA;
333 
334   FUNCTION ACCT_LEVEL6_VALUEFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
335                                    ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
336     VAL VARCHAR2(40);
337   BEGIN
338     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
339     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
340     VAL := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_VALUE(ACCT_SEG_VALUE_SET_ID
341                                                    ,P_ACCT_LEVEL
342                                                    ,ACCOUNT_SEGMENT_VALUE
343                                                    ,ACCT_VALUE_DESC
344                                                    ,P_ACCT_DELIMITER
345                                                    ,6);
346     RETURN (VAL);
347   END ACCT_LEVEL6_VALUEFORMULA;
348 
349   FUNCTION ACCT_LEVEL7_VALUEFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
350                                    ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
351     VAL VARCHAR2(40);
352   BEGIN
353     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
354     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
355     VAL := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_VALUE(ACCT_SEG_VALUE_SET_ID
356                                                    ,P_ACCT_LEVEL
357                                                    ,ACCOUNT_SEGMENT_VALUE
358                                                    ,ACCT_VALUE_DESC
359                                                    ,P_ACCT_DELIMITER
360                                                    ,7);
361     RETURN (VAL);
362   END ACCT_LEVEL7_VALUEFORMULA;
363 
364   FUNCTION ACCT_LEVEL8_VALUEFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
365                                    ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
366     VAL VARCHAR2(40);
367   BEGIN
368     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
369     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
370     VAL := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_VALUE(ACCT_SEG_VALUE_SET_ID
371                                                    ,P_ACCT_LEVEL
372                                                    ,ACCOUNT_SEGMENT_VALUE
373                                                    ,ACCT_VALUE_DESC
374                                                    ,P_ACCT_DELIMITER
375                                                    ,8);
376     RETURN (VAL);
377   END ACCT_LEVEL8_VALUEFORMULA;
378 
379   FUNCTION ACCT_LEVEL9_VALUEFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
380                                    ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
381     VAL VARCHAR2(40);
382   BEGIN
383     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
384     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
385     VAL := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_VALUE(ACCT_SEG_VALUE_SET_ID
386                                                    ,P_ACCT_LEVEL
387                                                    ,ACCOUNT_SEGMENT_VALUE
388                                                    ,ACCT_VALUE_DESC
389                                                    ,P_ACCT_DELIMITER
390                                                    ,9);
391     RETURN (VAL);
392   END ACCT_LEVEL9_VALUEFORMULA;
393 
394   FUNCTION ACCT_LEVEL1_VALUE_DESCFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
395                                         ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
396     STR VARCHAR2(240);
397   BEGIN
398     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
399     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
400     STR := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_DESC(ACCT_SEG_VALUE_SET_ID
401                                                   ,P_ACCT_LEVEL
402                                                   ,ACCOUNT_SEGMENT_VALUE
403                                                   ,ACCT_VALUE_DESC
404                                                   ,P_ACCT_DELIMITER
405                                                   ,1);
406     RETURN (STR);
407   END ACCT_LEVEL1_VALUE_DESCFORMULA;
408 
409   FUNCTION ACCT_LEVEL2_VALUE_DESCFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
410                                         ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
411     STR VARCHAR2(240);
412   BEGIN
413     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
414     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
415     STR := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_DESC(ACCT_SEG_VALUE_SET_ID
416                                                   ,P_ACCT_LEVEL
417                                                   ,ACCOUNT_SEGMENT_VALUE
418                                                   ,ACCT_VALUE_DESC
419                                                   ,P_ACCT_DELIMITER
420                                                   ,2);
421     RETURN (STR);
422   END ACCT_LEVEL2_VALUE_DESCFORMULA;
423 
424   FUNCTION ACCT_LEVEL3_VALUE_DESCFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
425                                         ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
426     STR VARCHAR2(240);
427   BEGIN
428     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
429     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
430     STR := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_DESC(ACCT_SEG_VALUE_SET_ID
431                                                   ,P_ACCT_LEVEL
432                                                   ,ACCOUNT_SEGMENT_VALUE
433                                                   ,ACCT_VALUE_DESC
434                                                   ,P_ACCT_DELIMITER
435                                                   ,3);
436     RETURN (STR);
437   END ACCT_LEVEL3_VALUE_DESCFORMULA;
438 
439   FUNCTION ACCT_LEVEL4_VALUE_DESCFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
440                                         ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
441     STR VARCHAR2(240);
442   BEGIN
443     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
444     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
445     STR := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_DESC(ACCT_SEG_VALUE_SET_ID
446                                                   ,P_ACCT_LEVEL
447                                                   ,ACCOUNT_SEGMENT_VALUE
448                                                   ,ACCT_VALUE_DESC
449                                                   ,P_ACCT_DELIMITER
450                                                   ,4);
451     RETURN (STR);
452   END ACCT_LEVEL4_VALUE_DESCFORMULA;
453 
454   FUNCTION ACCT_LEVEL5_VALUE_DESCFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
455                                         ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
456     STR VARCHAR2(240);
457   BEGIN
458     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
459     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
460     STR := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_DESC(ACCT_SEG_VALUE_SET_ID
461                                                   ,P_ACCT_LEVEL
462                                                   ,ACCOUNT_SEGMENT_VALUE
463                                                   ,ACCT_VALUE_DESC
464                                                   ,P_ACCT_DELIMITER
465                                                   ,5);
466     RETURN (STR);
467   END ACCT_LEVEL5_VALUE_DESCFORMULA;
468 
469   FUNCTION ACCT_LEVEL6_VALUE_DESCFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
470                                         ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
471     STR VARCHAR2(240);
472   BEGIN
473     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
474     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
475     STR := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_DESC(ACCT_SEG_VALUE_SET_ID
476                                                   ,P_ACCT_LEVEL
477                                                   ,ACCOUNT_SEGMENT_VALUE
478                                                   ,ACCT_VALUE_DESC
479                                                   ,P_ACCT_DELIMITER
480                                                   ,6);
481     RETURN (STR);
482   END ACCT_LEVEL6_VALUE_DESCFORMULA;
483 
484   FUNCTION ACCT_LEVEL7_VALUE_DESCFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
485                                         ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
486     STR VARCHAR2(240);
487   BEGIN
488     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
489     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
490     STR := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_DESC(ACCT_SEG_VALUE_SET_ID
491                                                   ,P_ACCT_LEVEL
492                                                   ,ACCOUNT_SEGMENT_VALUE
493                                                   ,ACCT_VALUE_DESC
494                                                   ,P_ACCT_DELIMITER
495                                                   ,7);
496     RETURN (STR);
497   END ACCT_LEVEL7_VALUE_DESCFORMULA;
498 
499   FUNCTION ACCT_LEVEL8_VALUE_DESCFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
500                                         ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
501     STR VARCHAR2(240);
502   BEGIN
503     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
504     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
505     STR := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_DESC(ACCT_SEG_VALUE_SET_ID
506                                                   ,P_ACCT_LEVEL
507                                                   ,ACCOUNT_SEGMENT_VALUE
508                                                   ,ACCT_VALUE_DESC
509                                                   ,P_ACCT_DELIMITER
510                                                   ,8);
511     RETURN (STR);
512   END ACCT_LEVEL8_VALUE_DESCFORMULA;
513 
514   FUNCTION ACCT_LEVEL9_VALUE_DESCFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
515                                         ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
516     STR VARCHAR2(240);
517   BEGIN
518     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
519     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
520     STR := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_DESC(ACCT_SEG_VALUE_SET_ID
521                                                   ,P_ACCT_LEVEL
522                                                   ,ACCOUNT_SEGMENT_VALUE
523                                                   ,ACCT_VALUE_DESC
524                                                   ,P_ACCT_DELIMITER
525                                                   ,9);
526     RETURN (STR);
527   END ACCT_LEVEL9_VALUE_DESCFORMULA;
528 
529   PROCEDURE GET_LE_INFO(CURRENT_LE_ID IN NUMBER) IS
530     CURSOR GET_COMPANY_INFO(V_LE_ID IN NUMBER) IS
531       SELECT
532         LEGAL_ENTITY_ID,
533         NAME,
534         LTRIM(ADDRESS_LINE_1),
535         LTRIM(ADDRESS_LINE_2),
536         LTRIM(ADDRESS_LINE_3),
537         LTRIM(TOWN_OR_CITY),
538         LTRIM(POSTAL_CODE),
539         ACTIVITY_CODE,
540         REGISTRATION_NUMBER
541       FROM
542         XLE_FIRSTPARTY_INFORMATION_V
543       WHERE LEGAL_ENTITY_ID = V_LE_ID;
544   BEGIN
545     IF (TEMP_LE_ID IS NOT NULL AND CURRENT_LE_ID = TEMP_LE_ID) THEN
546       RETURN;
547     END IF;
548     OPEN GET_COMPANY_INFO(CURRENT_LE_ID);
549     FETCH GET_COMPANY_INFO
550      INTO TEMP_LE_ID,TEMP_LE_NAME,TEMP_LE_ADDR1,TEMP_LE_ADDR2,TEMP_LE_ADDR3,TEMP_LE_CITY,TEMP_LE_POSTAL_CODE,TEMP_LE_SERVICE_TYPE,TEMP_LE_TAX_PAYER_ID;
551     CLOSE GET_COMPANY_INFO;
552   END GET_LE_INFO;
553 
554   FUNCTION LE_ADDR1FORMULA(LEGAL_ENTITY_ID IN NUMBER
555                           ,LE_ADDR1 IN VARCHAR2) RETURN CHAR IS
556   BEGIN
557     /*SRW.REFERENCE(LEGAL_ENTITY_ID)*/NULL;
558     IF (LEGAL_ENTITY_ID IS NOT NULL) THEN
559       GET_LE_INFO(LEGAL_ENTITY_ID);
560       RETURN (TEMP_LE_ADDR1);
561     END IF;
562     RETURN (LE_ADDR1);
563   END LE_ADDR1FORMULA;
564 
565   FUNCTION LE_ADDR2FORMULA(LEGAL_ENTITY_ID IN NUMBER
566                           ,LE_ADDR2 IN VARCHAR2) RETURN CHAR IS
567   BEGIN
568     /*SRW.REFERENCE(LEGAL_ENTITY_ID)*/NULL;
569     IF (LEGAL_ENTITY_ID IS NOT NULL) THEN
570       GET_LE_INFO(LEGAL_ENTITY_ID);
571       RETURN (TEMP_LE_ADDR2);
572     END IF;
573     RETURN (LE_ADDR2);
574   END LE_ADDR2FORMULA;
575 
576   FUNCTION LE_ADDR3FORMULA(LEGAL_ENTITY_ID IN NUMBER
577                           ,LE_ADDR3 IN VARCHAR2) RETURN CHAR IS
578   BEGIN
579     /*SRW.REFERENCE(LEGAL_ENTITY_ID)*/NULL;
580     IF (LEGAL_ENTITY_ID IS NOT NULL) THEN
581       GET_LE_INFO(LEGAL_ENTITY_ID);
582       RETURN (TEMP_LE_ADDR3);
583     END IF;
584     RETURN (LE_ADDR3);
585   END LE_ADDR3FORMULA;
586 
587   FUNCTION LE_CITYFORMULA(LEGAL_ENTITY_ID IN NUMBER
588                          ,LE_CITY IN VARCHAR2) RETURN CHAR IS
589   BEGIN
590     /*SRW.REFERENCE(LEGAL_ENTITY_ID)*/NULL;
591     IF (LEGAL_ENTITY_ID IS NOT NULL) THEN
592       GET_LE_INFO(LEGAL_ENTITY_ID);
593       RETURN (TEMP_LE_CITY);
594     END IF;
595     RETURN (LE_CITY);
596   END LE_CITYFORMULA;
597 
598   FUNCTION LE_POSTAL_CODEFORMULA(LEGAL_ENTITY_ID IN NUMBER
599                                 ,LE_POSTAL_CODE IN VARCHAR2) RETURN CHAR IS
600   BEGIN
601     /*SRW.REFERENCE(LEGAL_ENTITY_ID)*/NULL;
602     IF (LEGAL_ENTITY_ID IS NOT NULL) THEN
603       GET_LE_INFO(LEGAL_ENTITY_ID);
604       RETURN (TEMP_LE_POSTAL_CODE);
605     END IF;
606     RETURN (LE_POSTAL_CODE);
607   END LE_POSTAL_CODEFORMULA;
608 
609   FUNCTION LE_SERVICE_TYPEFORMULA(LEGAL_ENTITY_ID IN NUMBER
610                                  ,LE_SERVICE_TYPE IN VARCHAR2) RETURN CHAR IS
611   BEGIN
612     /*SRW.REFERENCE(LEGAL_ENTITY_ID)*/NULL;
613     IF (LEGAL_ENTITY_ID IS NOT NULL) THEN
614       GET_LE_INFO(LEGAL_ENTITY_ID);
615       RETURN (TEMP_LE_SERVICE_TYPE);
616     END IF;
617     RETURN (LE_SERVICE_TYPE);
618   END LE_SERVICE_TYPEFORMULA;
619 
620   FUNCTION LE_TAX_PAYER_IDFORMULA(LEGAL_ENTITY_ID IN NUMBER
621                                  ,LE_TAX_PAYER_ID IN VARCHAR2) RETURN CHAR IS
622   BEGIN
623     /*SRW.REFERENCE(LEGAL_ENTITY_ID)*/NULL;
624     IF (LEGAL_ENTITY_ID IS NOT NULL) THEN
625       GET_LE_INFO(LEGAL_ENTITY_ID);
626       RETURN (TEMP_LE_TAX_PAYER_ID);
627     END IF;
628     RETURN (LE_TAX_PAYER_ID);
629   END LE_TAX_PAYER_IDFORMULA;
630 
631   FUNCTION LE_NAMEFORMULA(LEGAL_ENTITY_ID IN NUMBER
632                          ,LE_NAME IN VARCHAR2) RETURN CHAR IS
633   BEGIN
634     /*SRW.REFERENCE(LEGAL_ENTITY_ID)*/NULL;
635     IF (LEGAL_ENTITY_ID IS NOT NULL) THEN
636       GET_LE_INFO(LEGAL_ENTITY_ID);
637       RETURN (TEMP_LE_NAME);
638     END IF;
639     RETURN (LE_NAME);
640   END LE_NAMEFORMULA;
641 
642   FUNCTION ACCT_VALUEFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
643                             ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
644     VAL VARCHAR2(40);
645   BEGIN
646     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
647     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
648     VAL := JG_GL_ACCT_HIER_PKG.GET_DELIMITED_DETAIL_ACCT(ACCT_SEG_VALUE_SET_ID
649                                                         ,P_ACCT_LEVEL
650                                                         ,ACCOUNT_SEGMENT_VALUE
651                                                         ,ACCT_VALUE_DESC
652                                                         ,P_ACCT_DELIMITER);
653     IF (VAL IS NULL) THEN
654       VAL := ACCOUNT_SEGMENT_VALUE;
655     END IF;
656     RETURN (VAL);
657   END ACCT_VALUEFORMULA;
658 
659   FUNCTION ACCT_LEVEL10_VALUEFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
660                                     ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
661     VAL VARCHAR2(40);
662   BEGIN
663     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
664     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
665     VAL := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_VALUE(ACCT_SEG_VALUE_SET_ID
666                                                    ,P_ACCT_LEVEL
667                                                    ,ACCOUNT_SEGMENT_VALUE
668                                                    ,ACCT_VALUE_DESC
669                                                    ,P_ACCT_DELIMITER
670                                                    ,10);
671     RETURN (VAL);
672   END ACCT_LEVEL10_VALUEFORMULA;
673 
674   FUNCTION ACCT_LEVEL10_VALUE_DESCFORMULA(ACCOUNT_SEGMENT_VALUE IN VARCHAR2
675                                          ,ACCT_VALUE_DESC IN VARCHAR2) RETURN CHAR IS
676     STR VARCHAR2(240);
677   BEGIN
678     /*SRW.REFERENCE(ACCOUNT_SEGMENT_VALUE)*/NULL;
679     /*SRW.REFERENCE(ACCT_VALUE_DESC)*/NULL;
680     STR := JG_GL_ACCT_HIER_PKG.GET_LEVEL_ACCT_DESC(ACCT_SEG_VALUE_SET_ID
681                                                   ,P_ACCT_LEVEL
682                                                   ,ACCOUNT_SEGMENT_VALUE
683                                                   ,ACCT_VALUE_DESC
684                                                   ,P_ACCT_DELIMITER
685                                                   ,10);
686     RETURN (STR);
687   END ACCT_LEVEL10_VALUE_DESCFORMULA;
688 
689   FUNCTION BEFOREPFORM RETURN BOOLEAN IS
690   BEGIN
691     RETURN (TRUE);
692   END BEFOREPFORM;
693 
694   FUNCTION SELECT_ACCT_SEG_P RETURN VARCHAR2 IS
695   BEGIN
696     RETURN SELECT_ACCT_SEG;
697   END SELECT_ACCT_SEG_P;
698 
699   FUNCTION SELECT_BAL_SEG_P RETURN VARCHAR2 IS
700   BEGIN
701     RETURN SELECT_BAL_SEG;
702   END SELECT_BAL_SEG_P;
703 
704   FUNCTION SELECT_CC_SEG_P RETURN VARCHAR2 IS
705   BEGIN
706     RETURN SELECT_CC_SEG;
707   END SELECT_CC_SEG_P;
708 
709   FUNCTION SELECT_IC_SEG_P RETURN VARCHAR2 IS
710   BEGIN
711     RETURN SELECT_IC_SEG;
712   END SELECT_IC_SEG_P;
713 
714   FUNCTION SELECT_MGT_SEG_P RETURN VARCHAR2 IS
715   BEGIN
716     RETURN SELECT_MGT_SEG;
717   END SELECT_MGT_SEG_P;
718 
719   FUNCTION SELECT_ST_SEG_P RETURN VARCHAR2 IS
720   BEGIN
721     RETURN SELECT_ST_SEG;
722   END SELECT_ST_SEG_P;
723 
724   FUNCTION COA_ID_P RETURN NUMBER IS
725   BEGIN
726     RETURN COA_ID;
727   END COA_ID_P;
728 
729   FUNCTION DATA_ACCESS_SET_NAME_P RETURN VARCHAR2 IS
730   BEGIN
731     RETURN DATA_ACCESS_SET_NAME;
732   END DATA_ACCESS_SET_NAME_P;
733 
734   FUNCTION PARAM_TOP_PARENT_VALUE_P RETURN VARCHAR2 IS
735   BEGIN
736     RETURN PARAM_TOP_PARENT_VALUE;
737   END PARAM_TOP_PARENT_VALUE_P;
738 
739   FUNCTION FIRST_PERIOD_ADJ_FLAG_P RETURN VARCHAR2 IS
740   BEGIN
741     RETURN FIRST_PERIOD_ADJ_FLAG;
742   END FIRST_PERIOD_ADJ_FLAG_P;
743 
744   FUNCTION PARAM_CURRENCY_P RETURN VARCHAR2 IS
745   BEGIN
746     RETURN PARAM_CURRENCY;
747   END PARAM_CURRENCY_P;
748 
749   FUNCTION PARAM_LEDGER_NAME_P RETURN VARCHAR2 IS
750   BEGIN
751     RETURN PARAM_LEDGER_NAME;
752   END PARAM_LEDGER_NAME_P;
753 
754   FUNCTION PARAM_PERIOD_FROM_P RETURN VARCHAR2 IS
755   BEGIN
756     RETURN PARAM_PERIOD_FROM;
757   END PARAM_PERIOD_FROM_P;
758 
759   FUNCTION PARAM_PERIOD_TO_P RETURN VARCHAR2 IS
760   BEGIN
761     RETURN PARAM_PERIOD_TO;
762   END PARAM_PERIOD_TO_P;
763 
764   FUNCTION PARAM_ACCT_FROM_P RETURN VARCHAR2 IS
765   BEGIN
766     RETURN PARAM_ACCT_FROM;
767   END PARAM_ACCT_FROM_P;
768 
769   FUNCTION PARAM_ACCT_TO_P RETURN VARCHAR2 IS
770   BEGIN
771     RETURN PARAM_ACCT_TO;
772   END PARAM_ACCT_TO_P;
773 
774   FUNCTION FIRST_PERIOD_NAME_P RETURN VARCHAR2 IS
775   BEGIN
776     RETURN FIRST_PERIOD_NAME;
777   END FIRST_PERIOD_NAME_P;
778 
779   FUNCTION SELECT_ACCOUNT_P RETURN VARCHAR2 IS
780   BEGIN
781     RETURN SELECT_ACCOUNT;
782   END SELECT_ACCOUNT_P;
783 
784   FUNCTION WHERE_ACCT_RANGE_P RETURN VARCHAR2 IS
785   BEGIN
786     RETURN WHERE_ACCT_RANGE;
787   END WHERE_ACCT_RANGE_P;
788 
789   FUNCTION WHERE_PERIOD_P RETURN VARCHAR2 IS
790   BEGIN
791     RETURN WHERE_PERIOD;
792   END WHERE_PERIOD_P;
793 
794   FUNCTION PARAM_ZERO_BEGIN_YEAR_BAL_P RETURN VARCHAR2 IS
795   BEGIN
796     RETURN PARAM_ZERO_BEGIN_YEAR_BAL;
797   END PARAM_ZERO_BEGIN_YEAR_BAL_P;
798 
799   FUNCTION PARAM_ACCT_LEVEL_P RETURN NUMBER IS
800   BEGIN
801     RETURN PARAM_ACCT_LEVEL;
802   END PARAM_ACCT_LEVEL_P;
803 
804   FUNCTION PARAM_ACCT_CLASS_P RETURN VARCHAR2 IS
805   BEGIN
806     RETURN PARAM_ACCT_CLASS;
807   END PARAM_ACCT_CLASS_P;
808 
809   FUNCTION PARAM_REPORT_TYPE_P RETURN VARCHAR2 IS
810   BEGIN
811     RETURN PARAM_REPORT_TYPE;
812   END PARAM_REPORT_TYPE_P;
813 
814   FUNCTION PARAM_PAGE_NUM_FORMAT_P RETURN VARCHAR2 IS
815   BEGIN
816     RETURN PARAM_PAGE_NUM_FORMAT;
817   END PARAM_PAGE_NUM_FORMAT_P;
818 
819   FUNCTION PER_FROM_START_DATE_P RETURN DATE IS
820   BEGIN
821     RETURN PER_FROM_START_DATE;
822   END PER_FROM_START_DATE_P;
823 
824   FUNCTION PER_TO_END_DATE_P RETURN DATE IS
825   BEGIN
826     RETURN PER_TO_END_DATE;
827   END PER_TO_END_DATE_P;
828 
829   FUNCTION PERIOD_SET_NAME_P RETURN VARCHAR2 IS
830   BEGIN
831     RETURN L_PERIOD_SET_NAME;
832   END PERIOD_SET_NAME_P;
833 
834   FUNCTION WHERE_ACCT_CLASS_P RETURN VARCHAR2 IS
835   BEGIN
836     RETURN WHERE_ACCT_CLASS;
837   END WHERE_ACCT_CLASS_P;
838 
839   FUNCTION WHERE_TRANSLATED_FLAG_P RETURN VARCHAR2 IS
840   BEGIN
841     RETURN WHERE_TRANSLATED_FLAG;
842   END WHERE_TRANSLATED_FLAG_P;
843 
844   FUNCTION WHERE_DAS_P RETURN VARCHAR2 IS
845   BEGIN
846     RETURN WHERE_DAS;
847   END WHERE_DAS_P;
848 
849   FUNCTION USER_NAME_P RETURN VARCHAR2 IS
850   BEGIN
851     RETURN USER_NAME;
852   END USER_NAME_P;
853 
854   FUNCTION TEMP_LE_NAME_P RETURN VARCHAR2 IS
855   BEGIN
856     RETURN TEMP_LE_NAME;
857   END TEMP_LE_NAME_P;
858 
859   FUNCTION TEMP_LE_ADDR1_P RETURN VARCHAR2 IS
860   BEGIN
861     RETURN TEMP_LE_ADDR1;
862   END TEMP_LE_ADDR1_P;
863 
864   FUNCTION WHERE_DEGREE_P RETURN VARCHAR2 IS
865   BEGIN
866     RETURN WHERE_DEGREE;
867   END WHERE_DEGREE_P;
868 
869   FUNCTION TEMP_LE_SERVICE_TYPE_P RETURN VARCHAR2 IS
870   BEGIN
871     RETURN TEMP_LE_SERVICE_TYPE;
872   END TEMP_LE_SERVICE_TYPE_P;
873 
874   FUNCTION TEMP_LE_TAX_PAYER_ID_P RETURN VARCHAR2 IS
875   BEGIN
876     RETURN TEMP_LE_TAX_PAYER_ID;
877   END TEMP_LE_TAX_PAYER_ID_P;
878 
879   FUNCTION TEMP_LE_CITY_P RETURN VARCHAR2 IS
880   BEGIN
881     RETURN TEMP_LE_CITY;
882   END TEMP_LE_CITY_P;
883 
884   FUNCTION TEMP_LE_POSTAL_CODE_P RETURN VARCHAR2 IS
885   BEGIN
886     RETURN TEMP_LE_POSTAL_CODE;
887   END TEMP_LE_POSTAL_CODE_P;
888 
889   FUNCTION ACCT_SEG_VALUE_SET_ID_P RETURN NUMBER IS
890   BEGIN
891     RETURN ACCT_SEG_VALUE_SET_ID;
892   END ACCT_SEG_VALUE_SET_ID_P;
893 
894   FUNCTION SELECT_LE_P RETURN VARCHAR2 IS
895   BEGIN
896     RETURN SELECT_LE;
897   END SELECT_LE_P;
898 
899   FUNCTION FROM_LNSV_P RETURN VARCHAR2 IS
900   BEGIN
901     RETURN FROM_LNSV;
902   END FROM_LNSV_P;
903 
904   FUNCTION WHERE_LE_P RETURN VARCHAR2 IS
905   BEGIN
906     RETURN WHERE_LE;
907   END WHERE_LE_P;
908 
909   FUNCTION TEMP_LE_ADDR2_P RETURN VARCHAR2 IS
910   BEGIN
911     RETURN TEMP_LE_ADDR2;
912   END TEMP_LE_ADDR2_P;
913 
914   FUNCTION TEMP_LE_ADDR3_P RETURN VARCHAR2 IS
915   BEGIN
916     RETURN TEMP_LE_ADDR3;
917   END TEMP_LE_ADDR3_P;
918 
919   FUNCTION TEMP_LE_ID_P RETURN NUMBER IS
920   BEGIN
921     RETURN TEMP_LE_ID;
922   END TEMP_LE_ID_P;
923 
924   FUNCTION PARAM_CURRENCY_TYPE_P RETURN VARCHAR2 IS
925   BEGIN
926     RETURN PARAM_CURRENCY_TYPE;
927   END PARAM_CURRENCY_TYPE_P;
928 
929   FUNCTION SYS_NAME_VER_P RETURN VARCHAR2 IS
930   BEGIN
931     RETURN SYS_NAME_VER;
932   END SYS_NAME_VER_P;
933 
934   FUNCTION REPORT_EXEC_DATE_P RETURN VARCHAR2 IS
935   BEGIN
936     RETURN REPORT_EXEC_DATE;
937   END REPORT_EXEC_DATE_P;
938 
939   FUNCTION PARAM_USER_1_P RETURN VARCHAR2 IS
940   BEGIN
941     RETURN PARAM_USER_1;
942   END PARAM_USER_1_P;
943 
944   FUNCTION PARAM_USER_2_P RETURN VARCHAR2 IS
945   BEGIN
946     RETURN PARAM_USER_2;
947   END PARAM_USER_2_P;
948 
949   FUNCTION PARAM_USER_3_P RETURN VARCHAR2 IS
950   BEGIN
951     RETURN PARAM_USER_3;
952   END PARAM_USER_3_P;
953 
954   FUNCTION PARAM_USER_4_P RETURN VARCHAR2 IS
955   BEGIN
956     RETURN PARAM_USER_4;
957   END PARAM_USER_4_P;
958 
959   FUNCTION PARAM_USER_5_P RETURN VARCHAR2 IS
960   BEGIN
961     RETURN PARAM_USER_5;
962   END PARAM_USER_5_P;
963 
964   FUNCTION PERIOD_FROM_START_DATE_P RETURN VARCHAR2 IS
965   BEGIN
966     RETURN PERIOD_FROM_START_DATE;
967   END PERIOD_FROM_START_DATE_P;
968 
969   FUNCTION PERIOD_TO_END_DATE_P RETURN VARCHAR2 IS
970   BEGIN
971     RETURN PERIOD_TO_END_DATE;
972   END PERIOD_TO_END_DATE_P;
973 
974   FUNCTION PARAM_USER_6_P RETURN VARCHAR2 IS
975   BEGIN
976     RETURN PARAM_USER_6;
977   END PARAM_USER_6_P;
978 
979   FUNCTION PARAM_USER_7_P RETURN VARCHAR2 IS
980   BEGIN
981     RETURN PARAM_USER_7;
982   END PARAM_USER_7_P;
983 
984   FUNCTION PARAM_USER_8_P RETURN VARCHAR2 IS
985   BEGIN
986     RETURN PARAM_USER_8;
987   END PARAM_USER_8_P;
988 
989   FUNCTION PARAM_USER_9_P RETURN VARCHAR2 IS
990   BEGIN
991     RETURN PARAM_USER_9;
992   END PARAM_USER_9_P;
993 
994   FUNCTION PARAM_USER_10_P RETURN VARCHAR2 IS
995   BEGIN
996     RETURN PARAM_USER_10;
997   END PARAM_USER_10_P;
998 
999 END JL_JGZZGLTRB_XMLP_PKG;
1000 
1001 
1002