[Home] [Help]
PACKAGE BODY: APPS.GL_INTERFACE_PKG
Source
1 PACKAGE BODY gl_interface_pkg AS
2 /* $Header: glijiinb.pls 120.10.12020000.2 2012/12/01 14:23:26 dthakker ship $ */
3
4 --
5 -- PRIVATE FUNCTIONS
6 --
7 PROCEDURE Lock_Budget_Transfer_Row(
8 X_Rowid VARCHAR2,
9 X_Status VARCHAR2,
10 X_Ledger_Id NUMBER,
11 X_User_Je_Source_Name VARCHAR2,
12 X_Group_Id NUMBER,
13 X_User_Je_Category_Name VARCHAR2,
14 X_Budget_Version_Id NUMBER,
15 X_Je_Batch_Name VARCHAR2,
16 X_Currency_Code VARCHAR2,
17 X_Code_Combination_Id NUMBER,
18 X_Combination_Number NUMBER,
19 X_Period_Name VARCHAR2,
20 X_Entered_Dr NUMBER,
21 X_Entered_Cr NUMBER
22 ) IS
23 CURSOR C IS
24 SELECT *
25 FROM GL_INTERFACE
26 WHERE rowid = X_Rowid
27 FOR UPDATE of User_Je_Source_Name NOWAIT;
28 Recinfo C%ROWTYPE;
29 BEGIN
30
31 OPEN C;
32 FETCH C INTO Recinfo;
33 if (C%NOTFOUND) then
34 CLOSE C;
35 RAISE NO_DATA_FOUND;
36 end if;
37 CLOSE C;
38
39 if (
40 ( (Recinfo.status = X_Status)
41 OR ( (Recinfo.status IS NULL)
42 AND (X_Status IS NULL)))
43 AND ( (Recinfo.ledger_id = X_Ledger_Id)
44 OR ( (Recinfo.ledger_id IS NULL)
45 AND (X_Ledger_Id IS NULL)))
46 AND ( (Recinfo.user_je_source_name = X_User_Je_Source_Name)
47 OR ( (Recinfo.user_je_source_name IS NULL)
48 AND (X_User_Je_Source_Name IS NULL)))
49 AND ( (Recinfo.group_id = X_Group_Id)
50 OR ( (Recinfo.group_id IS NULL)
51 AND (X_Group_Id IS NULL)))
52 AND ( (Recinfo.user_je_category_name = X_User_Je_Category_Name)
53 OR ( (Recinfo.user_je_category_name IS NULL)
54 AND (X_User_Je_Category_Name IS NULL)))
55 AND (Recinfo.actual_flag = 'B')
56 AND ( (Recinfo.budget_version_id = X_Budget_Version_Id)
57 OR ( (Recinfo.budget_version_id IS NULL)
58 AND (X_Budget_Version_Id IS NULL)))
59 AND ( (Recinfo.reference1 = X_Je_Batch_Name)
60 OR ( (Recinfo.reference1 IS NULL)
61 AND (X_Je_Batch_Name IS NULL)))
62 AND ( (Recinfo.currency_code = X_Currency_Code)
63 OR ( (Recinfo.currency_code IS NULL)
64 AND (X_Currency_Code IS NULL)))
65 AND ( (Recinfo.code_combination_id = X_Code_Combination_Id)
66 OR ( (Recinfo.code_combination_id IS NULL)
67 AND (X_Code_Combination_Id IS NULL)))
68 AND ( (Recinfo.je_batch_id = X_Combination_Number)
69 OR ( (Recinfo.je_batch_id IS NULL)
70 AND (X_Combination_Number IS NULL)))
71 AND ( (Recinfo.period_name = X_Period_Name)
72 OR ( (Recinfo.period_name IS NULL)
73 AND (X_Period_Name IS NULL)))
74 AND ( (Recinfo.entered_dr = X_Entered_Dr)
75 OR ( (Recinfo.entered_dr IS NULL)
76 AND (X_Entered_Dr IS NULL)))
77 AND ( (Recinfo.entered_cr = X_Entered_Cr)
78 OR ( (Recinfo.entered_cr IS NULL)
79 AND (X_Entered_Cr IS NULL)))
80 ) then
81 return;
82 else
83 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
84 APP_EXCEPTION.RAISE_EXCEPTION;
85 end if;
86 END Lock_Budget_Transfer_Row;
87
88
89 --
90 -- PUBLIC FUNCTIONS
91 --
92 FUNCTION Get_Ledger_Column_Name(
93 Itable VARCHAR2,
94 Resp_Id NUMBER,
95 Resp_Appl_Id NUMBER ) RETURN VARCHAR2 IS
96 ledger_column_num VARCHAR2(30);
97 syntname VARCHAR2(30);
98 syntown VARCHAR2(30);
99 BEGIN
100 SELECT upper(nvl(max(syn.table_name),'')),
101 upper(nvl(max(syn.table_owner),''))
102 INTO syntname, syntown
103 FROM user_synonyms syn
104 WHERE syn.synonym_name = upper(Itable);
105
106 IF (syntname IS NULL) THEN
107 SELECT upper(Itable), upper(nvl(max(usr.oracle_username),''))
108 INTO syntname, syntown
109 FROM fnd_responsibility resp, fnd_data_group_units dg,
110 fnd_oracle_userid usr
111 WHERE resp.application_id = Resp_appl_id
112 AND resp.responsibility_id = Resp_id
113 AND dg.application_id = resp.data_group_application_id
114 AND dg.data_group_id = resp.data_group_id
115 AND usr.oracle_id = dg.oracle_id;
116 END IF;
117
118 /* Bug15938178 Modified query to check for logical column name
119 for the table, DO NOT call this API for view */
120
121
122 SELECT nvl(sum(decode(tab.column_name, 'LEDGER_ID', 10,
123 'SET_OF_BOOKS_ID', 1)),10)
124 INTO ledger_column_num
125 FROM dba_tab_columns tab, user_synonyms syn
126 WHERE syn.synonym_name = syntname
127 AND tab.owner = syn.table_owner
128 AND tab.table_name = syn.table_name;
129
130 IF (ledger_column_num = 10) THEN
131 RETURN('LEDGER_ID');
132 ELSIF (ledger_column_num = 1) THEN
133 RETURN('SET_OF_BOOKS_ID');
134 ELSE
135 RETURN('decode(LEDGER_ID, -1, SET_OF_BOOKS_ID, LEDGER_ID)');
136 END IF;
137 END Get_Ledger_Column_Name;
138
139 FUNCTION Get_Ledger_Id(
140 Itable VARCHAR2,
141 Ledger_Column_Name VARCHAR2,
142 X_Rowid VARCHAR2) RETURN NUMBER IS
143 TYPE ledger_curr_type IS REF CURSOR;
144 lgrcur ledger_curr_type;
145 lgr_id NUMBER;
146 lgrstr VARCHAR2(1000);
147 BEGIN
148
149 lgrstr := 'SELECT '|| Ledger_Column_Name || ' ' ||
150 'FROM ' || Itable || ' ' ||
151 'WHERE rowid = :X_Rowid ';
152
153 OPEN lgrcur FOR lgrstr USING X_Rowid;
154
155 FETCH lgrcur INTO lgr_id;
156
157 CLOSE lgrcur;
158
159 RETURN(lgr_id);
160 EXCEPTION
161 WHEN NO_DATA_FOUND THEN
162 RETURN (null);
163 END Get_Ledger_Id;
164
165 PROCEDURE Insert_Budget_Transfer_Row(
166 X_From_Rowid IN OUT NOCOPY VARCHAR2,
167 X_To_Rowid IN OUT NOCOPY VARCHAR2,
168 X_Status VARCHAR2,
169 X_Ledger_Id NUMBER,
170 X_User_Je_Source_Name VARCHAR2,
171 X_Group_Id NUMBER,
172 X_User_Je_Category_Name VARCHAR2,
173 X_Budget_Version_Id NUMBER,
174 X_Je_Batch_Name VARCHAR2,
175 X_Currency_Code VARCHAR2,
176 X_From_Code_Combination_Id NUMBER,
177 X_To_Code_Combination_Id NUMBER,
178 X_Combination_Number NUMBER,
179 X_Period_Name VARCHAR2,
180 X_From_Entered_Dr NUMBER,
181 X_From_Entered_Cr NUMBER,
182 X_To_Entered_Dr NUMBER,
183 X_To_Entered_Cr NUMBER,
184 X_Date_Created DATE,
185 X_Created_By NUMBER
186 ) IS
187 CURSOR C (ccid IN NUMBER, unique_value IN VARCHAR2) IS
188 SELECT rowid FROM GL_INTERFACE
189 WHERE user_je_source_name = X_User_Je_Source_Name
190 AND group_id = X_Group_Id
191 AND ledger_id = X_Ledger_Id
192 AND status_description = unique_value
193 AND code_combination_id = ccid
194 AND je_batch_id = X_Combination_Number
195 AND period_name = X_Period_Name;
196 BEGIN
197
198 -- Insert the From line
199 INSERT INTO GL_INTERFACE(
200 status,
201 ledger_id,
202 user_je_source_name,
203 user_je_category_name,
204 accounting_date,
205 currency_code,
206 date_created,
207 created_by,
208 actual_flag,
209 budget_version_id,
210 entered_dr,
211 entered_cr,
212 reference1,
213 group_id,
214 period_name,
215 je_batch_id,
216 status_description,
217 code_combination_id
218 ) VALUES (
219 X_Status,
220 X_Ledger_Id,
221 X_User_Je_Source_Name,
222 X_User_Je_Category_Name,
223 sysdate,
224 X_Currency_Code,
225 X_Date_Created,
226 X_Created_By,
227 'B',
228 X_Budget_Version_Id,
229 X_From_Entered_Dr,
230 X_From_Entered_Cr,
231 X_Je_Batch_Name,
232 X_Group_Id,
233 X_Period_Name,
234 X_Combination_Number,
235 'New Budget Transfer Row',
236 X_From_Code_Combination_Id);
237
238 OPEN C(X_From_Code_Combination_Id, 'New Budget Transfer Row');
239 FETCH C INTO X_From_Rowid;
240 if (C%NOTFOUND) then
241 CLOSE C;
242 RAISE NO_DATA_FOUND;
243 end if;
244 CLOSE C;
245
246 -- Insert the to line, switching the Cr and Dr
247 INSERT INTO GL_INTERFACE(
248 status,
249 ledger_id,
250 user_je_source_name,
251 user_je_category_name,
252 accounting_date,
253 currency_code,
254 date_created,
255 created_by,
256 actual_flag,
257 budget_version_id,
258 entered_dr,
259 entered_cr,
260 reference1,
261 group_id,
262 period_name,
263 je_batch_id,
264 status_description,
265 code_combination_id
266 ) VALUES (
267 X_Status,
268 X_Ledger_Id,
269 X_User_Je_Source_Name,
270 X_User_Je_Category_Name,
271 sysdate,
272 X_Currency_Code,
273 X_Date_Created,
274 X_Created_By,
275 'B',
276 X_Budget_Version_Id,
277 X_To_Entered_Dr,
278 X_To_Entered_Cr,
279 X_Je_Batch_Name,
280 X_Group_Id,
281 X_Period_Name,
282 X_Combination_Number,
283 X_From_RowId,
284 X_To_Code_Combination_Id);
285
286 OPEN C(X_To_Code_Combination_Id, X_From_RowId);
287 FETCH C INTO X_To_Rowid;
288 if (C%NOTFOUND) then
289 CLOSE C;
290 RAISE NO_DATA_FOUND;
291 end if;
292 CLOSE C;
293
294
295 -- Change the from status description to the to rowid.
296 UPDATE GL_INTERFACE
297 SET status_description = X_To_RowId
298 WHERE user_je_source_name = X_User_Je_Source_Name
299 AND group_id = X_Group_Id
300 AND ledger_id = X_Ledger_Id
301 AND status_description = 'New Budget Transfer Row'
302 AND code_combination_id = X_From_Code_Combination_Id
303 AND je_batch_id = X_Combination_Number
304 AND period_name = X_Period_Name;
305
306 END Insert_Budget_Transfer_Row;
307
308
309 PROCEDURE Lock_Budget_Transfer_Row(
310 X_From_Rowid VARCHAR2,
311 X_To_Rowid VARCHAR2,
312 X_Status VARCHAR2,
313 X_Ledger_Id NUMBER,
314 X_User_Je_Source_Name VARCHAR2,
315 X_Group_Id NUMBER,
316 X_User_Je_Category_Name VARCHAR2,
317 X_Budget_Version_Id NUMBER,
318 X_Je_Batch_Name VARCHAR2,
319 X_Currency_Code VARCHAR2,
320 X_From_Code_Combination_Id NUMBER,
321 X_To_Code_Combination_Id NUMBER,
322 X_Combination_Number NUMBER,
323 X_Period_Name VARCHAR2,
324 X_From_Entered_Dr NUMBER,
325 X_From_Entered_Cr NUMBER,
326 X_To_Entered_Dr NUMBER,
327 X_To_Entered_Cr NUMBER
328 ) IS
329 BEGIN
330
331 -- Lock the from row
332 GL_INTERFACE_PKG.Lock_Budget_Transfer_Row(
333 X_Rowid => X_From_RowId,
334 X_Status => X_Status,
335 X_Ledger_Id => X_Ledger_Id,
336 X_User_Je_Source_Name => X_User_Je_Source_Name,
337 X_Group_Id => X_Group_Id,
338 X_User_Je_Category_Name=> X_User_Je_Category_Name,
339 X_Currency_Code => X_Currency_Code,
340 X_Budget_Version_Id => X_Budget_Version_Id,
341 X_Period_Name => X_Period_Name,
342 X_Code_Combination_Id => X_From_Code_Combination_Id,
343 X_Combination_Number => X_Combination_Number,
344 X_Entered_Dr => X_From_Entered_Dr,
345 X_Entered_Cr => X_From_Entered_Cr,
346 X_Je_Batch_Name => X_Je_Batch_Name
347 );
348
349 -- Lock the to row
350 GL_INTERFACE_PKG.Lock_Budget_Transfer_Row(
351 X_Rowid => X_To_RowId,
352 X_Status => X_Status,
353 X_Ledger_Id => X_Ledger_Id,
354 X_User_Je_Source_Name => X_User_Je_Source_Name,
355 X_Group_Id => X_Group_Id,
356 X_User_Je_Category_Name=> X_User_Je_Category_Name,
357 X_Currency_Code => X_Currency_Code,
358 X_Budget_Version_Id => X_Budget_Version_Id,
359 X_Period_Name => X_Period_Name,
360 X_Code_Combination_Id => X_To_Code_Combination_Id,
361 X_Combination_Number => X_Combination_Number,
362 X_Entered_Dr => X_To_Entered_Dr,
363 X_Entered_Cr => X_To_Entered_Cr,
364 X_Je_Batch_Name => X_Je_Batch_Name
365 );
366
367 END Lock_Budget_Transfer_Row;
368
369 PROCEDURE Update_Budget_Transfer_Row(
370 X_From_Rowid VARCHAR2,
371 X_To_Rowid VARCHAR2,
372 X_Status VARCHAR2,
373 X_Ledger_Id NUMBER,
374 X_User_Je_Source_Name VARCHAR2,
375 X_Group_Id NUMBER,
376 X_User_Je_Category_Name VARCHAR2,
377 X_Budget_Version_Id NUMBER,
378 X_Je_Batch_Name VARCHAR2,
379 X_Currency_Code VARCHAR2,
380 X_From_Code_Combination_Id NUMBER,
381 X_To_Code_Combination_Id NUMBER,
382 X_Combination_Number NUMBER,
383 X_Period_Name VARCHAR2,
384 X_From_Entered_Dr NUMBER,
388 ) IS
385 X_From_Entered_Cr NUMBER,
386 X_To_Entered_Dr NUMBER,
387 X_To_Entered_Cr NUMBER
389 BEGIN
390 UPDATE GL_INTERFACE
391 SET
392 status = X_Status,
393 ledger_id = X_Ledger_Id,
394 user_je_source_name = X_User_Je_Source_Name,
395 group_id = X_Group_Id,
396 user_je_category_name = X_User_Je_Category_Name,
397 actual_flag = 'B',
398 budget_version_id = X_Budget_Version_Id,
399 reference1 = X_Je_Batch_Name,
400 currency_code = X_Currency_Code,
401 code_combination_id = decode(rowid,
402 X_From_Rowid, X_From_Code_Combination_Id,
403 X_To_Rowid, X_To_Code_Combination_Id),
404 je_batch_id = X_Combination_Number,
405 period_name = X_Period_Name,
406 entered_dr = decode(rowid,
407 X_From_Rowid, X_From_Entered_Dr,
408 X_To_Rowid, X_To_Entered_Dr),
409 entered_cr = decode(rowid,
410 X_From_Rowid, X_From_Entered_Cr,
411 X_To_Rowid, X_To_Entered_Cr)
412 WHERE rowid IN (X_From_Rowid, X_To_RowId);
413
414 if (SQL%NOTFOUND) then
415 RAISE NO_DATA_FOUND;
416 end if;
417
418 END Update_Budget_Transfer_Row;
419
420 PROCEDURE Delete_Budget_Transfer_Row(X_From_Rowid VARCHAR2,
421 X_To_Rowid VARCHAR2) IS
422 BEGIN
423 DELETE FROM GL_INTERFACE
424 WHERE rowid IN (X_From_Rowid, X_To_Rowid);
425
426 if (SQL%NOTFOUND) then
427 RAISE NO_DATA_FOUND;
428 end if;
429 END Delete_Budget_Transfer_Row;
430
431 PROCEDURE delete_rows(x_ledger_id NUMBER,
432 x_user_je_source_name VARCHAR2,
433 x_group_id NUMBER DEFAULT NULL,
434 x_je_batch_id NUMBER DEFAULT NULL) IS
435 BEGIN
436 DELETE gl_interface
437 WHERE ledger_id = x_ledger_id
438 AND user_je_source_name = x_user_je_source_name
439 AND nvl(group_id,-1) = nvl(x_group_id, -1)
440 AND nvl(je_batch_id, -1) = nvl(x_je_batch_id, nvl(je_batch_id, -1));
441 END delete_rows;
442
443 FUNCTION exists_data(x_ledger_id NUMBER,
444 x_user_je_source_name VARCHAR2,
445 x_group_id NUMBER DEFAULT NULL
446 ) RETURN BOOLEAN IS
447 CURSOR check_for_data IS
448 SELECT 'Has data'
449 FROM dual
450 WHERE EXISTS (SELECT 'Has data'
451 FROM gl_interface
452 WHERE ledger_id = x_ledger_id
453 AND user_je_source_name = x_user_je_source_name
454 AND group_id = x_group_id);
455 dummy VARCHAR2(100);
456 BEGIN
457 OPEN check_for_data;
458 FETCH check_for_data INTO dummy;
459
460 IF check_for_data%FOUND THEN
461 CLOSE check_for_data;
462 return(TRUE);
463 ELSE
464 CLOSE check_for_data;
465 return(FALSE);
466 END IF;
467
468 END exists_data;
469
470 procedure LOCK_ROW (
471 X_ROWID in VARCHAR2,
472 X_ITABLE in VARCHAR2,
473 X_STATUS in VARCHAR2,
474 X_LEDGER_ID in NUMBER,
475 X_ACCOUNTING_DATE in DATE,
476 X_CURRENCY_CODE in VARCHAR2,
477 X_DATE_CREATED in DATE,
478 X_CREATED_BY in NUMBER,
479 X_ACTUAL_FLAG in VARCHAR2,
480 X_USER_JE_CATEGORY_NAME in VARCHAR2,
481 X_USER_JE_SOURCE_NAME in VARCHAR2,
482 X_CURRENCY_CONVERSION_DATE in DATE,
483 X_ENCUMBRANCE_TYPE_ID in NUMBER,
484 X_BUDGET_VERSION_ID in NUMBER,
485 X_USER_CURRENCY_CONV_TYPE in VARCHAR2,
486 X_CURRENCY_CONVERSION_RATE in NUMBER,
487 X_AVERAGE_JOURNAL_FLAG in VARCHAR2,
488 X_SEGMENT1 in VARCHAR2,
489 X_SEGMENT2 in VARCHAR2,
490 X_SEGMENT3 in VARCHAR2,
491 X_SEGMENT4 in VARCHAR2,
492 X_SEGMENT5 in VARCHAR2,
493 X_SEGMENT6 in VARCHAR2,
494 X_SEGMENT7 in VARCHAR2,
495 X_SEGMENT8 in VARCHAR2,
496 X_SEGMENT9 in VARCHAR2,
497 X_SEGMENT10 in VARCHAR2,
498 X_SEGMENT11 in VARCHAR2,
499 X_SEGMENT12 in VARCHAR2,
500 X_SEGMENT13 in VARCHAR2,
501 X_SEGMENT14 in VARCHAR2,
502 X_SEGMENT15 in VARCHAR2,
503 X_SEGMENT16 in VARCHAR2,
504 X_SEGMENT17 in VARCHAR2,
505 X_SEGMENT18 in VARCHAR2,
506 X_SEGMENT19 in VARCHAR2,
507 X_SEGMENT20 in VARCHAR2,
508 X_SEGMENT21 in VARCHAR2,
509 X_SEGMENT22 in VARCHAR2,
510 X_SEGMENT23 in VARCHAR2,
511 X_SEGMENT24 in VARCHAR2,
512 X_SEGMENT25 in VARCHAR2,
513 X_SEGMENT26 in VARCHAR2,
514 X_SEGMENT27 in VARCHAR2,
515 X_SEGMENT28 in VARCHAR2,
516 X_SEGMENT29 in VARCHAR2,
517 X_SEGMENT30 in VARCHAR2,
518 X_ENTERED_DR in NUMBER,
519 X_ENTERED_CR in NUMBER,
520 X_ACCOUNTED_DR in NUMBER,
521 X_ACCOUNTED_CR in NUMBER,
522 X_REFERENCE1 in VARCHAR2,
523 X_REFERENCE2 in VARCHAR2,
524 X_REFERENCE3 in VARCHAR2,
525 X_REFERENCE4 in VARCHAR2,
526 X_REFERENCE5 in VARCHAR2,
527 X_REFERENCE6 in VARCHAR2,
528 X_REFERENCE7 in VARCHAR2,
529 X_REFERENCE8 in VARCHAR2,
530 X_REFERENCE9 in VARCHAR2,
531 X_REFERENCE10 in VARCHAR2,
532 X_REFERENCE11 in VARCHAR2,
533 X_REFERENCE12 in VARCHAR2,
534 X_REFERENCE13 in VARCHAR2,
535 X_REFERENCE14 in VARCHAR2,
536 X_REFERENCE15 in VARCHAR2,
537 X_REFERENCE16 in VARCHAR2,
541 X_REFERENCE20 in VARCHAR2,
538 X_REFERENCE17 in VARCHAR2,
539 X_REFERENCE18 in VARCHAR2,
540 X_REFERENCE19 in VARCHAR2,
542 X_REFERENCE21 in VARCHAR2,
543 X_REFERENCE22 in VARCHAR2,
544 X_REFERENCE23 in VARCHAR2,
545 X_REFERENCE24 in VARCHAR2,
546 X_REFERENCE25 in VARCHAR2,
547 X_REFERENCE26 in VARCHAR2,
548 X_REFERENCE27 in VARCHAR2,
549 X_REFERENCE28 in VARCHAR2,
550 X_REFERENCE29 in VARCHAR2,
551 X_REFERENCE30 in VARCHAR2,
552 X_PERIOD_NAME in VARCHAR2,
553 X_CODE_COMBINATION_ID in NUMBER,
554 X_STAT_AMOUNT in NUMBER,
555 X_GROUP_ID in NUMBER,
556 X_REQUEST_ID in NUMBER,
557 X_SUBLEDGER_DOC_SEQUENCE_ID in NUMBER,
558 X_SUBLEDGER_DOC_SEQUENCE_VALUE in NUMBER,
559 X_ATTRIBUTE1 in VARCHAR2,
560 X_ATTRIBUTE2 in VARCHAR2,
561 X_ATTRIBUTE3 in VARCHAR2,
562 X_ATTRIBUTE4 in VARCHAR2,
563 X_ATTRIBUTE5 in VARCHAR2,
564 X_ATTRIBUTE6 in VARCHAR2,
565 X_ATTRIBUTE7 in VARCHAR2,
566 X_ATTRIBUTE8 in VARCHAR2,
567 X_ATTRIBUTE9 in VARCHAR2,
568 X_ATTRIBUTE10 in VARCHAR2,
569 X_ATTRIBUTE11 in VARCHAR2,
570 X_ATTRIBUTE12 in VARCHAR2,
571 X_ATTRIBUTE13 in VARCHAR2,
572 X_ATTRIBUTE14 in VARCHAR2,
573 X_ATTRIBUTE15 in VARCHAR2,
574 X_ATTRIBUTE16 in VARCHAR2,
575 X_ATTRIBUTE17 in VARCHAR2,
576 X_ATTRIBUTE18 in VARCHAR2,
577 X_ATTRIBUTE19 in VARCHAR2,
578 X_ATTRIBUTE20 in VARCHAR2,
579 X_CONTEXT in VARCHAR2,
580 X_CONTEXT2 in VARCHAR2,
581 X_INVOICE_DATE in DATE,
582 X_TAX_CODE in VARCHAR2,
583 X_INVOICE_IDENTIFIER in VARCHAR2,
584 X_INVOICE_AMOUNT in NUMBER,
585 X_CONTEXT3 in VARCHAR2,
586 X_USSGL_TRANSACTION_CODE in VARCHAR2,
587 X_JGZZ_RECON_REF in VARCHAR2,
588 X_ORIGINATING_BAL_SEG_VALUE in VARCHAR2,
589 X_GL_SL_LINK_ID in NUMBER,
590 X_GL_SL_LINK_TABLE in VARCHAR2
591 ) IS
592 sqlstmt VARCHAR2(10000);
593
594 STATUS VARCHAR2(50);
595 LEDGER_ID NUMBER;
596 ACCOUNTING_DATE DATE;
597 CURRENCY_CODE VARCHAR2(15);
598 DATE_CREATED DATE;
599 CREATED_BY NUMBER;
600 ACTUAL_FLAG VARCHAR2(1);
601 USER_JE_CATEGORY_NAME VARCHAR2(25);
602 USER_JE_SOURCE_NAME VARCHAR2(25);
603 CURRENCY_CONVERSION_DATE DATE;
604 ENCUMBRANCE_TYPE_ID NUMBER;
605 BUDGET_VERSION_ID NUMBER;
606 USER_CURRENCY_CONVERSION_TYPE VARCHAR2(30);
607 CURRENCY_CONVERSION_RATE NUMBER;
608 AVERAGE_JOURNAL_FLAG VARCHAR2(1);
609 SEGMENT1 VARCHAR2(25);
610 SEGMENT2 VARCHAR2(25);
611 SEGMENT3 VARCHAR2(25);
612 SEGMENT4 VARCHAR2(25);
613 SEGMENT5 VARCHAR2(25);
614 SEGMENT6 VARCHAR2(25);
615 SEGMENT7 VARCHAR2(25);
616 SEGMENT8 VARCHAR2(25);
617 SEGMENT9 VARCHAR2(25);
618 SEGMENT10 VARCHAR2(25);
619 SEGMENT11 VARCHAR2(25);
620 SEGMENT12 VARCHAR2(25);
621 SEGMENT13 VARCHAR2(25);
622 SEGMENT14 VARCHAR2(25);
623 SEGMENT15 VARCHAR2(25);
624 SEGMENT16 VARCHAR2(25);
625 SEGMENT17 VARCHAR2(25);
626 SEGMENT18 VARCHAR2(25);
627 SEGMENT19 VARCHAR2(25);
628 SEGMENT20 VARCHAR2(25);
629 SEGMENT21 VARCHAR2(25);
630 SEGMENT22 VARCHAR2(25);
631 SEGMENT23 VARCHAR2(25);
632 SEGMENT24 VARCHAR2(25);
633 SEGMENT25 VARCHAR2(25);
634 SEGMENT26 VARCHAR2(25);
635 SEGMENT27 VARCHAR2(25);
636 SEGMENT28 VARCHAR2(25);
637 SEGMENT29 VARCHAR2(25);
638 SEGMENT30 VARCHAR2(25);
639 ENTERED_DR NUMBER;
640 ENTERED_CR NUMBER;
641 ACCOUNTED_DR NUMBER;
642 ACCOUNTED_CR NUMBER;
643 REFERENCE1 VARCHAR2(100);
644 REFERENCE2 VARCHAR2(240);
645 REFERENCE3 VARCHAR2(100);
646 REFERENCE4 VARCHAR2(100);
647 REFERENCE5 VARCHAR2(240);
648 REFERENCE6 VARCHAR2(100);
649 REFERENCE7 VARCHAR2(100);
650 REFERENCE8 VARCHAR2(100);
651 REFERENCE9 VARCHAR2(100);
652 REFERENCE10 VARCHAR2(240);
653 REFERENCE11 VARCHAR2(100);
654 REFERENCE12 VARCHAR2(100);
655 REFERENCE13 VARCHAR2(100);
656 REFERENCE14 VARCHAR2(100);
657 REFERENCE15 VARCHAR2(100);
658 REFERENCE16 VARCHAR2(100);
659 REFERENCE17 VARCHAR2(100);
660 REFERENCE18 VARCHAR2(100);
661 REFERENCE19 VARCHAR2(100);
662 REFERENCE20 VARCHAR2(240);
663 REFERENCE21 VARCHAR2(240);
664 REFERENCE22 VARCHAR2(240);
665 REFERENCE23 VARCHAR2(240);
666 REFERENCE24 VARCHAR2(240);
667 REFERENCE25 VARCHAR2(240);
668 REFERENCE26 VARCHAR2(240);
669 REFERENCE27 VARCHAR2(240);
670 REFERENCE28 VARCHAR2(240);
671 REFERENCE29 VARCHAR2(240);
672 REFERENCE30 VARCHAR2(240);
673 PERIOD_NAME VARCHAR2(15);
677 REQUEST_ID NUMBER;
674 CODE_COMBINATION_ID NUMBER;
675 STAT_AMOUNT NUMBER;
676 GROUP_ID NUMBER;
678 SUBLEDGER_DOC_SEQUENCE_ID NUMBER;
679 SUBLEDGER_DOC_SEQUENCE_VALUE NUMBER;
680 ATTRIBUTE1 VARCHAR2(150);
681 ATTRIBUTE2 VARCHAR2(150);
682 ATTRIBUTE3 VARCHAR2(150);
683 ATTRIBUTE4 VARCHAR2(150);
684 ATTRIBUTE5 VARCHAR2(150);
685 ATTRIBUTE6 VARCHAR2(150);
686 ATTRIBUTE7 VARCHAR2(150);
687 ATTRIBUTE8 VARCHAR2(150);
688 ATTRIBUTE9 VARCHAR2(150);
689 ATTRIBUTE10 VARCHAR2(150);
690 ATTRIBUTE11 VARCHAR2(150);
691 ATTRIBUTE12 VARCHAR2(150);
692 ATTRIBUTE13 VARCHAR2(150);
693 ATTRIBUTE14 VARCHAR2(150);
694 ATTRIBUTE15 VARCHAR2(150);
695 ATTRIBUTE16 VARCHAR2(150);
696 ATTRIBUTE17 VARCHAR2(150);
697 ATTRIBUTE18 VARCHAR2(150);
698 ATTRIBUTE19 VARCHAR2(150);
699 ATTRIBUTE20 VARCHAR2(150);
700 CONTEXT VARCHAR2(150);
701 CONTEXT2 VARCHAR2(150);
702 INVOICE_DATE DATE;
703 TAX_CODE VARCHAR2(15);
704 INVOICE_IDENTIFIER VARCHAR2(20);
705 INVOICE_AMOUNT NUMBER;
706 CONTEXT3 VARCHAR2(150);
707 USSGL_TRANSACTION_CODE VARCHAR2(30);
708 JGZZ_RECON_REF VARCHAR2(240);
709 ORIGINATING_BAL_SEG_VALUE VARCHAR2(25);
710 GL_SL_LINK_ID NUMBER;
711 GL_SL_LINK_TABLE VARCHAR2(30);
712 BEGIN
713 sqlstmt := 'select
714 STATUS,
715 decode(LEDGER_ID, -1, SET_OF_BOOKS_ID, LEDGER_ID),
716 ACCOUNTING_DATE,
717 CURRENCY_CODE,
718 DATE_CREATED,
719 CREATED_BY,
720 ACTUAL_FLAG,
721 USER_JE_CATEGORY_NAME,
722 USER_JE_SOURCE_NAME,
723 CURRENCY_CONVERSION_DATE,
724 ENCUMBRANCE_TYPE_ID,
725 BUDGET_VERSION_ID,
726 USER_CURRENCY_CONVERSION_TYPE,
727 CURRENCY_CONVERSION_RATE,
728 SEGMENT1,
729 SEGMENT2,
730 SEGMENT3,
731 SEGMENT4,
732 SEGMENT5,
733 SEGMENT6,
734 SEGMENT7,
735 SEGMENT8,
736 SEGMENT9,
737 SEGMENT10,
738 SEGMENT11,
739 SEGMENT12,
740 SEGMENT13,
741 SEGMENT14,
742 SEGMENT15,
743 SEGMENT16,
744 SEGMENT17,
745 SEGMENT18,
746 SEGMENT19,
747 SEGMENT20,
748 SEGMENT21,
749 SEGMENT22,
750 SEGMENT23,
751 SEGMENT24,
752 SEGMENT25,
753 SEGMENT26,
754 SEGMENT27,
755 SEGMENT28,
756 SEGMENT29,
757 SEGMENT30,
758 ENTERED_DR,
759 ENTERED_CR,
760 ACCOUNTED_DR,
761 ACCOUNTED_CR,
762 REFERENCE1,
763 REFERENCE2,
764 REFERENCE3,
765 REFERENCE4,
766 REFERENCE5,
767 REFERENCE6,
768 REFERENCE7,
769 REFERENCE8,
770 REFERENCE9,
771 REFERENCE10,
772 REFERENCE11,
773 REFERENCE12,
774 REFERENCE13,
775 REFERENCE14,
776 REFERENCE15,
777 REFERENCE16,
778 REFERENCE17,
779 REFERENCE18,
780 REFERENCE19,
781 REFERENCE20,
782 REFERENCE21,
783 REFERENCE22,
784 REFERENCE23,
785 REFERENCE24,
786 REFERENCE25,
787 REFERENCE26,
788 REFERENCE27,
789 REFERENCE28,
790 REFERENCE29,
791 REFERENCE30,
792 PERIOD_NAME,
793 CODE_COMBINATION_ID,
794 STAT_AMOUNT,
795 GROUP_ID,
796 SUBLEDGER_DOC_SEQUENCE_ID,
797 SUBLEDGER_DOC_SEQUENCE_VALUE,
798 ATTRIBUTE1,
799 ATTRIBUTE2,
800 ATTRIBUTE3,
801 ATTRIBUTE4,
802 ATTRIBUTE5,
803 ATTRIBUTE6,
804 ATTRIBUTE7,
805 ATTRIBUTE8,
806 ATTRIBUTE9,
807 ATTRIBUTE10,
808 ATTRIBUTE11,
809 ATTRIBUTE12,
810 ATTRIBUTE13,
811 ATTRIBUTE14,
812 ATTRIBUTE15,
813 ATTRIBUTE16,
814 ATTRIBUTE17,
815 ATTRIBUTE18,
816 ATTRIBUTE19,
817 ATTRIBUTE20,
818 CONTEXT,
819 CONTEXT2,
820 INVOICE_DATE,
821 TAX_CODE,
822 INVOICE_IDENTIFIER,
823 INVOICE_AMOUNT,
824 CONTEXT3,
825 USSGL_TRANSACTION_CODE,
826 JGZZ_RECON_REF,
827 AVERAGE_JOURNAL_FLAG,
828 ORIGINATING_BAL_SEG_VALUE,
829 GL_SL_LINK_ID,
830 GL_SL_LINK_TABLE
831 from ' || X_ITABLE ||
832 ' where ROWID = :X_ROWID
833 for update of USER_JE_SOURCE_NAME nowait';
834
835 EXECUTE IMMEDIATE sqlstmt
836 INTO
837 STATUS,
838 LEDGER_ID,
839 ACCOUNTING_DATE,
840 CURRENCY_CODE,
841 DATE_CREATED,
842 CREATED_BY,
843 ACTUAL_FLAG,
844 USER_JE_CATEGORY_NAME,
845 USER_JE_SOURCE_NAME,
846 CURRENCY_CONVERSION_DATE,
847 ENCUMBRANCE_TYPE_ID,
848 BUDGET_VERSION_ID,
849 USER_CURRENCY_CONVERSION_TYPE,
850 CURRENCY_CONVERSION_RATE,
851 SEGMENT1,
852 SEGMENT2,
856 SEGMENT6,
853 SEGMENT3,
854 SEGMENT4,
855 SEGMENT5,
857 SEGMENT7,
858 SEGMENT8,
859 SEGMENT9,
860 SEGMENT10,
861 SEGMENT11,
862 SEGMENT12,
863 SEGMENT13,
864 SEGMENT14,
865 SEGMENT15,
866 SEGMENT16,
867 SEGMENT17,
868 SEGMENT18,
869 SEGMENT19,
870 SEGMENT20,
871 SEGMENT21,
872 SEGMENT22,
873 SEGMENT23,
874 SEGMENT24,
875 SEGMENT25,
876 SEGMENT26,
877 SEGMENT27,
878 SEGMENT28,
879 SEGMENT29,
880 SEGMENT30,
881 ENTERED_DR,
882 ENTERED_CR,
883 ACCOUNTED_DR,
884 ACCOUNTED_CR,
885 REFERENCE1,
886 REFERENCE2,
887 REFERENCE3,
888 REFERENCE4,
889 REFERENCE5,
890 REFERENCE6,
891 REFERENCE7,
892 REFERENCE8,
893 REFERENCE9,
894 REFERENCE10,
895 REFERENCE11,
896 REFERENCE12,
897 REFERENCE13,
898 REFERENCE14,
899 REFERENCE15,
900 REFERENCE16,
901 REFERENCE17,
902 REFERENCE18,
903 REFERENCE19,
904 REFERENCE20,
905 REFERENCE21,
906 REFERENCE22,
907 REFERENCE23,
908 REFERENCE24,
909 REFERENCE25,
910 REFERENCE26,
911 REFERENCE27,
912 REFERENCE28,
913 REFERENCE29,
914 REFERENCE30,
915 PERIOD_NAME,
916 CODE_COMBINATION_ID,
917 STAT_AMOUNT,
918 GROUP_ID,
919 SUBLEDGER_DOC_SEQUENCE_ID,
920 SUBLEDGER_DOC_SEQUENCE_VALUE,
921 ATTRIBUTE1,
922 ATTRIBUTE2,
923 ATTRIBUTE3,
924 ATTRIBUTE4,
925 ATTRIBUTE5,
926 ATTRIBUTE6,
927 ATTRIBUTE7,
928 ATTRIBUTE8,
929 ATTRIBUTE9,
930 ATTRIBUTE10,
931 ATTRIBUTE11,
932 ATTRIBUTE12,
933 ATTRIBUTE13,
934 ATTRIBUTE14,
935 ATTRIBUTE15,
936 ATTRIBUTE16,
937 ATTRIBUTE17,
938 ATTRIBUTE18,
939 ATTRIBUTE19,
940 ATTRIBUTE20,
941 CONTEXT,
942 CONTEXT2,
943 INVOICE_DATE,
944 TAX_CODE,
945 INVOICE_IDENTIFIER,
946 INVOICE_AMOUNT,
947 CONTEXT3,
948 USSGL_TRANSACTION_CODE,
949 JGZZ_RECON_REF,
950 AVERAGE_JOURNAL_FLAG,
951 ORIGINATING_BAL_SEG_VALUE,
952 GL_SL_LINK_ID,
953 GL_SL_LINK_TABLE
954 USING X_ROWID;
955
956 IF ( (rtrim(STATUS) = X_STATUS)
957 AND (LEDGER_ID = X_LEDGER_ID)
958 AND (ACCOUNTING_DATE = X_ACCOUNTING_DATE)
959 AND (CURRENCY_CODE = X_CURRENCY_CODE)
960 AND (DATE_CREATED = X_DATE_CREATED)
961 AND (CREATED_BY = X_CREATED_BY)
962 AND (ACTUAL_FLAG = X_ACTUAL_FLAG)
963 AND (USER_JE_CATEGORY_NAME = X_USER_JE_CATEGORY_NAME)
964 AND (USER_JE_SOURCE_NAME = X_USER_JE_SOURCE_NAME)
965 AND ((CURRENCY_CONVERSION_DATE = X_CURRENCY_CONVERSION_DATE)
966 OR ((CURRENCY_CONVERSION_DATE is null) AND (X_CURRENCY_CONVERSION_DATE is null)))
967 AND ((ENCUMBRANCE_TYPE_ID = X_ENCUMBRANCE_TYPE_ID)
968 OR ((ENCUMBRANCE_TYPE_ID is null) AND (X_ENCUMBRANCE_TYPE_ID is null)))
969 AND ((BUDGET_VERSION_ID = X_BUDGET_VERSION_ID)
970 OR ((BUDGET_VERSION_ID is null) AND (X_BUDGET_VERSION_ID is null)))
971 AND ((USER_CURRENCY_CONVERSION_TYPE = X_USER_CURRENCY_CONV_TYPE)
972 OR ((USER_CURRENCY_CONVERSION_TYPE is null) AND (X_USER_CURRENCY_CONV_TYPE is null)))
973 AND ((CURRENCY_CONVERSION_RATE = X_CURRENCY_CONVERSION_RATE)
974 OR ((CURRENCY_CONVERSION_RATE is null) AND (X_CURRENCY_CONVERSION_RATE is null)))
975 AND ((AVERAGE_JOURNAL_FLAG = X_AVERAGE_JOURNAL_FLAG)
976 OR ((AVERAGE_JOURNAL_FLAG is null) AND (X_AVERAGE_JOURNAL_FLAG is null)))
977 AND ((SEGMENT1 = X_SEGMENT1)
978 OR ((SEGMENT1 is null) AND (X_SEGMENT1 is null)))
979 AND ((SEGMENT2 = X_SEGMENT2)
980 OR ((SEGMENT2 is null) AND (X_SEGMENT2 is null)))
981 AND ((SEGMENT3 = X_SEGMENT3)
982 OR ((SEGMENT3 is null) AND (X_SEGMENT3 is null)))
983 AND ((SEGMENT4 = X_SEGMENT4)
984 OR ((SEGMENT4 is null) AND (X_SEGMENT4 is null)))
985 AND ((SEGMENT5 = X_SEGMENT5)
986 OR ((SEGMENT5 is null) AND (X_SEGMENT5 is null)))
987 AND ((SEGMENT6 = X_SEGMENT6)
988 OR ((SEGMENT6 is null) AND (X_SEGMENT6 is null)))
989 AND ((SEGMENT7 = X_SEGMENT7)
990 OR ((SEGMENT7 is null) AND (X_SEGMENT7 is null)))
991 AND ((SEGMENT8 = X_SEGMENT8)
992 OR ((SEGMENT8 is null) AND (X_SEGMENT8 is null)))
993 AND ((SEGMENT9 = X_SEGMENT9)
994 OR ((SEGMENT9 is null) AND (X_SEGMENT9 is null)))
995 AND ((SEGMENT10 = X_SEGMENT10)
996 OR ((SEGMENT10 is null) AND (X_SEGMENT10 is null)))
997 AND ((SEGMENT11 = X_SEGMENT11)
998 OR ((SEGMENT11 is null) AND (X_SEGMENT11 is null)))
999 AND ((SEGMENT12 = X_SEGMENT12)
1000 OR ((SEGMENT12 is null) AND (X_SEGMENT12 is null)))
1001 AND ((SEGMENT13 = X_SEGMENT13)
1002 OR ((SEGMENT13 is null) AND (X_SEGMENT13 is null)))
1003 AND ((SEGMENT14 = X_SEGMENT14)
1004 OR ((SEGMENT14 is null) AND (X_SEGMENT14 is null)))
1005 AND ((SEGMENT15 = X_SEGMENT15)
1006 OR ((SEGMENT15 is null) AND (X_SEGMENT15 is null)))
1007 AND ((SEGMENT16 = X_SEGMENT16)
1008 OR ((SEGMENT16 is null) AND (X_SEGMENT16 is null)))
1009 AND ((SEGMENT17 = X_SEGMENT17)
1010 OR ((SEGMENT17 is null) AND (X_SEGMENT17 is null)))
1014 OR ((SEGMENT19 is null) AND (X_SEGMENT19 is null)))
1011 AND ((SEGMENT18 = X_SEGMENT18)
1012 OR ((SEGMENT18 is null) AND (X_SEGMENT18 is null)))
1013 AND ((SEGMENT19 = X_SEGMENT19)
1015 AND ((SEGMENT20 = X_SEGMENT20)
1016 OR ((SEGMENT20 is null) AND (X_SEGMENT20 is null)))
1017 AND ((SEGMENT21 = X_SEGMENT21)
1018 OR ((SEGMENT21 is null) AND (X_SEGMENT21 is null)))
1019 AND ((SEGMENT22 = X_SEGMENT22)
1020 OR ((SEGMENT22 is null) AND (X_SEGMENT22 is null)))
1021 AND ((SEGMENT23 = X_SEGMENT23)
1022 OR ((SEGMENT23 is null) AND (X_SEGMENT23 is null)))
1023 AND ((SEGMENT24 = X_SEGMENT24)
1024 OR ((SEGMENT24 is null) AND (X_SEGMENT24 is null)))
1025 AND ((SEGMENT25 = X_SEGMENT25)
1026 OR ((SEGMENT25 is null) AND (X_SEGMENT25 is null)))
1027 AND ((SEGMENT26 = X_SEGMENT26)
1028 OR ((SEGMENT26 is null) AND (X_SEGMENT26 is null)))
1029 AND ((SEGMENT27 = X_SEGMENT27)
1030 OR ((SEGMENT27 is null) AND (X_SEGMENT27 is null)))
1031 AND ((SEGMENT28 = X_SEGMENT28)
1032 OR ((SEGMENT28 is null) AND (X_SEGMENT28 is null)))
1033 AND ((SEGMENT29 = X_SEGMENT29)
1034 OR ((SEGMENT29 is null) AND (X_SEGMENT29 is null)))
1035 AND ((SEGMENT30 = X_SEGMENT30)
1036 OR ((SEGMENT30 is null) AND (X_SEGMENT30 is null)))
1037 AND ((ENTERED_DR = X_ENTERED_DR)
1038 OR ((ENTERED_DR is null) AND (X_ENTERED_DR is null)))
1039 AND ((ENTERED_CR = X_ENTERED_CR)
1040 OR ((ENTERED_CR is null) AND (X_ENTERED_CR is null)))
1041 AND ((ACCOUNTED_DR = X_ACCOUNTED_DR)
1042 OR ((ACCOUNTED_DR is null) AND (X_ACCOUNTED_DR is null)))
1043 AND ((ACCOUNTED_CR = X_ACCOUNTED_CR)
1044 OR ((ACCOUNTED_CR is null) AND (X_ACCOUNTED_CR is null)))
1045 AND ((rtrim(REFERENCE1) = X_REFERENCE1)
1046 OR ((rtrim(REFERENCE1) is null) AND (X_REFERENCE1 is null)))
1047 AND ((rtrim(REFERENCE2) = X_REFERENCE2)
1048 OR ((rtrim(REFERENCE2) is null) AND (X_REFERENCE2 is null)))
1049 AND ((rtrim(REFERENCE3) = X_REFERENCE3)
1050 OR ((rtrim(REFERENCE3) is null) AND (X_REFERENCE3 is null)))
1051 AND ((rtrim(REFERENCE4) = X_REFERENCE4)
1052 OR ((rtrim(REFERENCE4) is null) AND (X_REFERENCE4 is null)))
1053 AND ((rtrim(REFERENCE5) = X_REFERENCE5)
1054 OR ((rtrim(REFERENCE5) is null) AND (X_REFERENCE5 is null)))
1055 AND ((rtrim(REFERENCE6) = X_REFERENCE6)
1056 OR ((rtrim(REFERENCE6) is null) AND (X_REFERENCE6 is null)))
1057 AND ((rtrim(REFERENCE7) = X_REFERENCE7)
1058 OR ((rtrim(REFERENCE7) is null) AND (X_REFERENCE7 is null)))
1059 AND ((rtrim(REFERENCE8) = X_REFERENCE8)
1060 OR ((rtrim(REFERENCE8) is null) AND (X_REFERENCE8 is null)))
1061 AND ((rtrim(REFERENCE9) = X_REFERENCE9)
1062 OR ((rtrim(REFERENCE9) is null) AND (X_REFERENCE9 is null)))
1063 AND ((rtrim(REFERENCE10) = X_REFERENCE10)
1064 OR ((rtrim(REFERENCE10) is null) AND (X_REFERENCE10 is null)))
1065 AND ((rtrim(REFERENCE11) = X_REFERENCE11)
1066 OR ((rtrim(REFERENCE11) is null) AND (X_REFERENCE11 is null)))
1067 AND ((rtrim(REFERENCE12) = X_REFERENCE12)
1068 OR ((rtrim(REFERENCE12) is null) AND (X_REFERENCE12 is null)))
1069 AND ((rtrim(REFERENCE13) = X_REFERENCE13)
1070 OR ((rtrim(REFERENCE13) is null) AND (X_REFERENCE13 is null)))
1071 AND ((rtrim(REFERENCE14) = X_REFERENCE14)
1072 OR ((rtrim(REFERENCE14) is null) AND (X_REFERENCE14 is null)))
1073 AND ((rtrim(REFERENCE15) = X_REFERENCE15)
1074 OR ((rtrim(REFERENCE15) is null) AND (X_REFERENCE15 is null)))
1075 AND ((rtrim(REFERENCE16) = X_REFERENCE16)
1076 OR ((rtrim(REFERENCE16) is null) AND (X_REFERENCE16 is null)))
1077 AND ((rtrim(REFERENCE17) = X_REFERENCE17)
1078 OR ((rtrim(REFERENCE17) is null) AND (X_REFERENCE17 is null)))
1079 AND ((rtrim(REFERENCE18) = X_REFERENCE18)
1080 OR ((rtrim(REFERENCE18) is null) AND (X_REFERENCE18 is null)))
1081 AND ((rtrim(REFERENCE19) = X_REFERENCE19)
1082 OR ((rtrim(REFERENCE19) is null) AND (X_REFERENCE19 is null)))
1083 AND ((rtrim(REFERENCE20) = X_REFERENCE20)
1084 OR ((rtrim(REFERENCE20) is null) AND (X_REFERENCE20 is null)))
1085 AND ((rtrim(REFERENCE21) = X_REFERENCE21)
1086 OR ((rtrim(REFERENCE21) is null) AND (X_REFERENCE21 is null)))
1087 AND ((rtrim(REFERENCE22) = X_REFERENCE22)
1088 OR ((rtrim(REFERENCE22) is null) AND (X_REFERENCE22 is null)))
1089 AND ((rtrim(REFERENCE23) = X_REFERENCE23)
1090 OR ((rtrim(REFERENCE23) is null) AND (X_REFERENCE23 is null)))
1091 AND ((rtrim(REFERENCE24) = X_REFERENCE24)
1092 OR ((rtrim(REFERENCE24) is null) AND (X_REFERENCE24 is null)))
1093 AND ((rtrim(REFERENCE25) = X_REFERENCE25)
1094 OR ((rtrim(REFERENCE25) is null) AND (X_REFERENCE25 is null)))
1095 AND ((rtrim(REFERENCE26) = X_REFERENCE26)
1096 OR ((rtrim(REFERENCE26) is null) AND (X_REFERENCE26 is null)))
1097 AND ((rtrim(REFERENCE27) = X_REFERENCE27)
1098 OR ((rtrim(REFERENCE27) is null) AND (X_REFERENCE27 is null)))
1099 AND ((rtrim(REFERENCE28) = X_REFERENCE28)
1100 OR ((rtrim(REFERENCE28) is null) AND (X_REFERENCE28 is null)))
1101 AND ((rtrim(REFERENCE29) = X_REFERENCE29)
1102 OR ((rtrim(REFERENCE29) is null) AND (X_REFERENCE29 is null)))
1103 AND ((rtrim(REFERENCE30) = X_REFERENCE30)
1104 OR ((rtrim(REFERENCE30) is null) AND (X_REFERENCE30 is null)))
1105 AND ((PERIOD_NAME = X_PERIOD_NAME)
1106 OR ((PERIOD_NAME is null) AND (X_PERIOD_NAME is null)))
1107 AND ((CODE_COMBINATION_ID = X_CODE_COMBINATION_ID)
1108 OR ((CODE_COMBINATION_ID is null) AND (X_CODE_COMBINATION_ID is null)))
1109 AND ((STAT_AMOUNT = X_STAT_AMOUNT)
1110 OR ((STAT_AMOUNT is null) AND (X_STAT_AMOUNT is null)))
1111 AND ((GROUP_ID = X_GROUP_ID)
1115 AND ((SUBLEDGER_DOC_SEQUENCE_VALUE = X_SUBLEDGER_DOC_SEQUENCE_VALUE)
1112 OR ((GROUP_ID is null) AND (X_GROUP_ID is null)))
1113 AND ((SUBLEDGER_DOC_SEQUENCE_ID = X_SUBLEDGER_DOC_SEQUENCE_ID)
1114 OR ((SUBLEDGER_DOC_SEQUENCE_ID is null) AND (X_SUBLEDGER_DOC_SEQUENCE_ID is null)))
1116 OR ((SUBLEDGER_DOC_SEQUENCE_VALUE is null) AND (X_SUBLEDGER_DOC_SEQUENCE_VALUE is null)))
1117 AND ((rtrim(ATTRIBUTE1) = X_ATTRIBUTE1)
1118 OR ((rtrim(ATTRIBUTE1) is null) AND (X_ATTRIBUTE1 is null)))
1119 AND ((rtrim(ATTRIBUTE2) = X_ATTRIBUTE2)
1120 OR ((rtrim(ATTRIBUTE2) is null) AND (X_ATTRIBUTE2 is null)))
1121 AND ((rtrim(ATTRIBUTE3) = X_ATTRIBUTE3)
1122 OR ((rtrim(ATTRIBUTE3) is null) AND (X_ATTRIBUTE3 is null)))
1123 AND ((rtrim(ATTRIBUTE4) = X_ATTRIBUTE4)
1124 OR ((rtrim(ATTRIBUTE4) is null) AND (X_ATTRIBUTE4 is null)))
1125 AND ((rtrim(ATTRIBUTE5) = X_ATTRIBUTE5)
1126 OR ((rtrim(ATTRIBUTE5) is null) AND (X_ATTRIBUTE5 is null)))
1127 AND ((rtrim(ATTRIBUTE6) = X_ATTRIBUTE6)
1128 OR ((rtrim(ATTRIBUTE6) is null) AND (X_ATTRIBUTE6 is null)))
1129 AND ((rtrim(ATTRIBUTE7) = X_ATTRIBUTE7)
1130 OR ((rtrim(ATTRIBUTE7) is null) AND (X_ATTRIBUTE7 is null)))
1131 AND ((rtrim(ATTRIBUTE8) = X_ATTRIBUTE8)
1132 OR ((rtrim(ATTRIBUTE8) is null) AND (X_ATTRIBUTE8 is null)))
1133 AND ((rtrim(ATTRIBUTE9) = X_ATTRIBUTE9)
1134 OR ((rtrim(ATTRIBUTE9) is null) AND (X_ATTRIBUTE9 is null)))
1135 AND ((rtrim(ATTRIBUTE10) = X_ATTRIBUTE10)
1136 OR ((rtrim(ATTRIBUTE10) is null) AND (X_ATTRIBUTE10 is null)))
1137 AND ((rtrim(ATTRIBUTE11) = X_ATTRIBUTE11)
1138 OR ((rtrim(ATTRIBUTE11) is null) AND (X_ATTRIBUTE11 is null)))
1139 AND ((rtrim(ATTRIBUTE12) = X_ATTRIBUTE12)
1140 OR ((rtrim(ATTRIBUTE12) is null) AND (X_ATTRIBUTE12 is null)))
1141 AND ((rtrim(ATTRIBUTE13) = X_ATTRIBUTE13)
1142 OR ((rtrim(ATTRIBUTE13) is null) AND (X_ATTRIBUTE13 is null)))
1143 AND ((rtrim(ATTRIBUTE14) = X_ATTRIBUTE14)
1144 OR ((rtrim(ATTRIBUTE14) is null) AND (X_ATTRIBUTE14 is null)))
1145 AND ((rtrim(ATTRIBUTE15) = X_ATTRIBUTE15)
1146 OR ((rtrim(ATTRIBUTE15) is null) AND (X_ATTRIBUTE15 is null)))
1147 AND ((rtrim(ATTRIBUTE16) = X_ATTRIBUTE16)
1148 OR ((rtrim(ATTRIBUTE16) is null) AND (X_ATTRIBUTE16 is null)))
1149 AND ((rtrim(ATTRIBUTE17) = X_ATTRIBUTE17)
1150 OR ((rtrim(ATTRIBUTE17) is null) AND (X_ATTRIBUTE17 is null)))
1151 AND ((rtrim(ATTRIBUTE18) = X_ATTRIBUTE18)
1152 OR ((rtrim(ATTRIBUTE18) is null) AND (X_ATTRIBUTE18 is null)))
1153 AND ((rtrim(ATTRIBUTE19) = X_ATTRIBUTE19)
1154 OR ((rtrim(ATTRIBUTE19) is null) AND (X_ATTRIBUTE19 is null)))
1155 AND ((rtrim(ATTRIBUTE20) = X_ATTRIBUTE20)
1156 OR ((rtrim(ATTRIBUTE20) is null) AND (X_ATTRIBUTE20 is null)))
1157 AND ((rtrim(CONTEXT) = X_CONTEXT)
1158 OR ((rtrim(CONTEXT) is null) AND (X_CONTEXT is null)))
1159 AND ((rtrim(CONTEXT2) = X_CONTEXT2)
1160 OR ((rtrim(CONTEXT2) is null) AND (X_CONTEXT2 is null)))
1161 AND ((INVOICE_DATE = X_INVOICE_DATE)
1162 OR ((INVOICE_DATE is null) AND (X_INVOICE_DATE is null)))
1163 AND ((rtrim(TAX_CODE) = X_TAX_CODE)
1164 OR ((rtrim(TAX_CODE) is null) AND (X_TAX_CODE is null)))
1165 AND ((rtrim(INVOICE_IDENTIFIER) = X_INVOICE_IDENTIFIER)
1166 OR ((rtrim(INVOICE_IDENTIFIER) is null) AND (X_INVOICE_IDENTIFIER is null)))
1167 AND ((INVOICE_AMOUNT = X_INVOICE_AMOUNT)
1168 OR ((INVOICE_AMOUNT is null) AND (X_INVOICE_AMOUNT is null)))
1169 AND ((rtrim(CONTEXT3) = X_CONTEXT3)
1170 OR ((rtrim(CONTEXT3) is null) AND (X_CONTEXT3 is null)))
1171 AND ((USSGL_TRANSACTION_CODE = X_USSGL_TRANSACTION_CODE)
1172 OR ((USSGL_TRANSACTION_CODE is null) AND (X_USSGL_TRANSACTION_CODE is null)))
1173 AND ((JGZZ_RECON_REF = X_JGZZ_RECON_REF)
1174 OR ((JGZZ_RECON_REF is null) AND (X_JGZZ_RECON_REF is null)))
1175 AND ((ORIGINATING_BAL_SEG_VALUE = X_ORIGINATING_BAL_SEG_VALUE)
1176 OR ((ORIGINATING_BAL_SEG_VALUE is null) AND (X_ORIGINATING_BAL_SEG_VALUE is null)))
1177 AND ((GL_SL_LINK_ID = X_GL_SL_LINK_ID)
1178 OR ((GL_SL_LINK_ID is null) AND (X_GL_SL_LINK_ID is null)))
1179 AND ((GL_SL_LINK_TABLE = X_GL_SL_LINK_TABLE)
1180 OR ((GL_SL_LINK_TABLE is null) AND (X_GL_SL_LINK_TABLE is null)))
1181 ) THEN
1182 null;
1183 ELSE
1184 fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
1185 app_exception.raise_exception;
1186 END IF;
1187 end lock_row;
1188
1189
1190 procedure UPDATE_ROW (
1191 X_ROWID in VARCHAR2,
1192 X_ITABLE in VARCHAR2,
1193 X_STATUS in VARCHAR2,
1194 X_LEDGER_ID in NUMBER,
1195 X_ACCOUNTING_DATE in DATE,
1196 X_CURRENCY_CODE in VARCHAR2,
1197 X_DATE_CREATED in DATE,
1198 X_CREATED_BY in NUMBER,
1199 X_ACTUAL_FLAG in VARCHAR2,
1200 X_USER_JE_CATEGORY_NAME in VARCHAR2,
1201 X_USER_JE_SOURCE_NAME in VARCHAR2,
1202 X_CURRENCY_CONVERSION_DATE in DATE,
1203 X_ENCUMBRANCE_TYPE_ID in NUMBER,
1204 X_BUDGET_VERSION_ID in NUMBER,
1205 X_USER_CURRENCY_CONV_TYPE in VARCHAR2,
1206 X_CURRENCY_CONVERSION_RATE in NUMBER,
1207 X_AVERAGE_JOURNAL_FLAG in VARCHAR2,
1208 X_SEGMENT1 in VARCHAR2,
1209 X_SEGMENT2 in VARCHAR2,
1210 X_SEGMENT3 in VARCHAR2,
1211 X_SEGMENT4 in VARCHAR2,
1212 X_SEGMENT5 in VARCHAR2,
1213 X_SEGMENT6 in VARCHAR2,
1214 X_SEGMENT7 in VARCHAR2,
1215 X_SEGMENT8 in VARCHAR2,
1216 X_SEGMENT9 in VARCHAR2,
1217 X_SEGMENT10 in VARCHAR2,
1218 X_SEGMENT11 in VARCHAR2,
1219 X_SEGMENT12 in VARCHAR2,
1220 X_SEGMENT13 in VARCHAR2,
1221 X_SEGMENT14 in VARCHAR2,
1222 X_SEGMENT15 in VARCHAR2,
1223 X_SEGMENT16 in VARCHAR2,
1224 X_SEGMENT17 in VARCHAR2,
1225 X_SEGMENT18 in VARCHAR2,
1226 X_SEGMENT19 in VARCHAR2,
1227 X_SEGMENT20 in VARCHAR2,
1231 X_SEGMENT24 in VARCHAR2,
1228 X_SEGMENT21 in VARCHAR2,
1229 X_SEGMENT22 in VARCHAR2,
1230 X_SEGMENT23 in VARCHAR2,
1232 X_SEGMENT25 in VARCHAR2,
1233 X_SEGMENT26 in VARCHAR2,
1234 X_SEGMENT27 in VARCHAR2,
1235 X_SEGMENT28 in VARCHAR2,
1236 X_SEGMENT29 in VARCHAR2,
1237 X_SEGMENT30 in VARCHAR2,
1238 X_ENTERED_DR in NUMBER,
1239 X_ENTERED_CR in NUMBER,
1240 X_ACCOUNTED_DR in NUMBER,
1241 X_ACCOUNTED_CR in NUMBER,
1242 X_REFERENCE1 in VARCHAR2,
1243 X_REFERENCE2 in VARCHAR2,
1244 X_REFERENCE3 in VARCHAR2,
1245 X_REFERENCE4 in VARCHAR2,
1246 X_REFERENCE5 in VARCHAR2,
1247 X_REFERENCE6 in VARCHAR2,
1248 X_REFERENCE7 in VARCHAR2,
1249 X_REFERENCE8 in VARCHAR2,
1250 X_REFERENCE9 in VARCHAR2,
1251 X_REFERENCE10 in VARCHAR2,
1252 X_REFERENCE11 in VARCHAR2,
1253 X_REFERENCE12 in VARCHAR2,
1254 X_REFERENCE13 in VARCHAR2,
1255 X_REFERENCE14 in VARCHAR2,
1256 X_REFERENCE15 in VARCHAR2,
1257 X_REFERENCE16 in VARCHAR2,
1258 X_REFERENCE17 in VARCHAR2,
1259 X_REFERENCE18 in VARCHAR2,
1260 X_REFERENCE19 in VARCHAR2,
1261 X_REFERENCE20 in VARCHAR2,
1262 X_REFERENCE21 in VARCHAR2,
1263 X_REFERENCE22 in VARCHAR2,
1264 X_REFERENCE23 in VARCHAR2,
1265 X_REFERENCE24 in VARCHAR2,
1266 X_REFERENCE25 in VARCHAR2,
1267 X_REFERENCE26 in VARCHAR2,
1268 X_REFERENCE27 in VARCHAR2,
1269 X_REFERENCE28 in VARCHAR2,
1270 X_REFERENCE29 in VARCHAR2,
1271 X_REFERENCE30 in VARCHAR2,
1272 X_PERIOD_NAME in VARCHAR2,
1273 X_CODE_COMBINATION_ID in NUMBER,
1274 X_STAT_AMOUNT in NUMBER,
1275 X_GROUP_ID in NUMBER,
1276 X_REQUEST_ID in NUMBER,
1277 X_SUBLEDGER_DOC_SEQUENCE_ID in NUMBER,
1278 X_SUBLEDGER_DOC_SEQUENCE_VALUE in NUMBER,
1279 X_ATTRIBUTE1 in VARCHAR2,
1280 X_ATTRIBUTE2 in VARCHAR2,
1281 X_ATTRIBUTE3 in VARCHAR2,
1282 X_ATTRIBUTE4 in VARCHAR2,
1283 X_ATTRIBUTE5 in VARCHAR2,
1284 X_ATTRIBUTE6 in VARCHAR2,
1285 X_ATTRIBUTE7 in VARCHAR2,
1286 X_ATTRIBUTE8 in VARCHAR2,
1287 X_ATTRIBUTE9 in VARCHAR2,
1288 X_ATTRIBUTE10 in VARCHAR2,
1289 X_ATTRIBUTE11 in VARCHAR2,
1290 X_ATTRIBUTE12 in VARCHAR2,
1291 X_ATTRIBUTE13 in VARCHAR2,
1292 X_ATTRIBUTE14 in VARCHAR2,
1293 X_ATTRIBUTE15 in VARCHAR2,
1294 X_ATTRIBUTE16 in VARCHAR2,
1295 X_ATTRIBUTE17 in VARCHAR2,
1296 X_ATTRIBUTE18 in VARCHAR2,
1297 X_ATTRIBUTE19 in VARCHAR2,
1298 X_ATTRIBUTE20 in VARCHAR2,
1299 X_CONTEXT in VARCHAR2,
1300 X_CONTEXT2 in VARCHAR2,
1301 X_INVOICE_DATE in DATE,
1302 X_TAX_CODE in VARCHAR2,
1303 X_INVOICE_IDENTIFIER in VARCHAR2,
1304 X_INVOICE_AMOUNT in NUMBER,
1305 X_CONTEXT3 in VARCHAR2,
1306 X_USSGL_TRANSACTION_CODE in VARCHAR2,
1307 X_JGZZ_RECON_REF in VARCHAR2,
1308 X_ORIGINATING_BAL_SEG_VALUE in VARCHAR2,
1309 X_GL_SL_LINK_ID in NUMBER,
1310 X_GL_SL_LINK_TABLE in VARCHAR2
1311 ) IS
1312 sqlstmt VARCHAR2(10000);
1313 BEGIN
1314 sqlstmt :=
1315 'update ' || X_ITABLE || ' set
1316 STATUS = :X_STATUS,
1317 LEDGER_ID = :X_LEDGER_ID,
1318 ACCOUNTING_DATE = :X_ACCOUNTING_DATE,
1319 CURRENCY_CODE = :X_CURRENCY_CODE,
1320 DATE_CREATED = :X_DATE_CREATED,
1321 CREATED_BY = :X_CREATED_BY,
1322 ACTUAL_FLAG = :X_ACTUAL_FLAG,
1323 USER_JE_CATEGORY_NAME = :X_USER_JE_CATEGORY_NAME,
1324 USER_JE_SOURCE_NAME = :X_USER_JE_SOURCE_NAME,
1325 CURRENCY_CONVERSION_DATE = :X_CURRENCY_CONVERSION_DATE,
1326 ENCUMBRANCE_TYPE_ID = :X_ENCUMBRANCE_TYPE_ID,
1327 BUDGET_VERSION_ID = :X_BUDGET_VERSION_ID,
1328 USER_CURRENCY_CONVERSION_TYPE = :X_USER_CURRENCY_CONV_TYPE,
1329 CURRENCY_CONVERSION_RATE = :X_CURRENCY_CONVERSION_RATE,
1330 AVERAGE_JOURNAL_FLAG = :X_AVERAGE_JOURNAL_FLAG,
1331 SEGMENT1 = :X_SEGMENT1,
1332 SEGMENT2 = :X_SEGMENT2,
1333 SEGMENT3 = :X_SEGMENT3,
1334 SEGMENT4 = :X_SEGMENT4,
1335 SEGMENT5 = :X_SEGMENT5,
1336 SEGMENT6 = :X_SEGMENT6,
1337 SEGMENT7 = :X_SEGMENT7,
1338 SEGMENT8 = :X_SEGMENT8,
1339 SEGMENT9 = :X_SEGMENT9,
1340 SEGMENT10 = :X_SEGMENT10,
1341 SEGMENT11 = :X_SEGMENT11,
1342 SEGMENT12 = :X_SEGMENT12,
1343 SEGMENT13 = :X_SEGMENT13,
1344 SEGMENT14 = :X_SEGMENT14,
1345 SEGMENT15 = :X_SEGMENT15,
1346 SEGMENT16 = :X_SEGMENT16,
1347 SEGMENT17 = :X_SEGMENT17,
1348 SEGMENT18 = :X_SEGMENT18,
1349 SEGMENT19 = :X_SEGMENT19,
1350 SEGMENT20 = :X_SEGMENT20,
1351 SEGMENT21 = :X_SEGMENT21,
1352 SEGMENT22 = :X_SEGMENT22,
1353 SEGMENT23 = :X_SEGMENT23,
1354 SEGMENT24 = :X_SEGMENT24,
1355 SEGMENT25 = :X_SEGMENT25,
1356 SEGMENT26 = :X_SEGMENT26,
1357 SEGMENT27 = :X_SEGMENT27,
1358 SEGMENT28 = :X_SEGMENT28,
1359 SEGMENT29 = :X_SEGMENT29,
1360 SEGMENT30 = :X_SEGMENT30,
1361 ENTERED_DR = :X_ENTERED_DR,
1362 ENTERED_CR = :X_ENTERED_CR,
1363 ACCOUNTED_DR = :X_ACCOUNTED_DR,
1364 ACCOUNTED_CR = :X_ACCOUNTED_CR,
1365 REFERENCE1 = :X_REFERENCE1,
1366 REFERENCE2 = :X_REFERENCE2,
1367 REFERENCE3 = :X_REFERENCE3,
1368 REFERENCE4 = :X_REFERENCE4,
1369 REFERENCE5 = :X_REFERENCE5,
1370 REFERENCE6 = :X_REFERENCE6,
1371 REFERENCE7 = :X_REFERENCE7,
1372 REFERENCE8 = :X_REFERENCE8,
1373 REFERENCE9 = :X_REFERENCE9,
1374 REFERENCE10 = :X_REFERENCE10,
1375 REFERENCE11 = :X_REFERENCE11,
1376 REFERENCE12 = :X_REFERENCE12,
1377 REFERENCE13 = :X_REFERENCE13,
1378 REFERENCE14 = :X_REFERENCE14,
1379 REFERENCE15 = :X_REFERENCE15,
1380 REFERENCE16 = :X_REFERENCE16,
1381 REFERENCE17 = :X_REFERENCE17,
1382 REFERENCE18 = :X_REFERENCE18,
1383 REFERENCE19 = :X_REFERENCE19,
1384 REFERENCE20 = :X_REFERENCE20,
1385 REFERENCE21 = :X_REFERENCE21,
1389 REFERENCE25 = :X_REFERENCE25,
1386 REFERENCE22 = :X_REFERENCE22,
1387 REFERENCE23 = :X_REFERENCE23,
1388 REFERENCE24 = :X_REFERENCE24,
1390 REFERENCE26 = :X_REFERENCE26,
1391 REFERENCE27 = :X_REFERENCE27,
1392 REFERENCE28 = :X_REFERENCE28,
1393 REFERENCE29 = :X_REFERENCE29,
1394 REFERENCE30 = :X_REFERENCE30,
1395 PERIOD_NAME = :X_PERIOD_NAME,
1396 CODE_COMBINATION_ID = :X_CODE_COMBINATION_ID,
1397 STAT_AMOUNT = :X_STAT_AMOUNT,
1398 GROUP_ID = :X_GROUP_ID,
1399 REQUEST_ID = :X_REQUEST_ID,
1400 SUBLEDGER_DOC_SEQUENCE_ID = :X_SUBLEDGER_DOC_SEQUENCE_ID,
1401 SUBLEDGER_DOC_SEQUENCE_VALUE = :X_SUBLEDGER_DOC_SEQUENCE_VALUE,
1402 ATTRIBUTE1 = :X_ATTRIBUTE1,
1403 ATTRIBUTE2 = :X_ATTRIBUTE2,
1404 ATTRIBUTE3 = :X_ATTRIBUTE3,
1405 ATTRIBUTE4 = :X_ATTRIBUTE4,
1406 ATTRIBUTE5 = :X_ATTRIBUTE5,
1407 ATTRIBUTE6 = :X_ATTRIBUTE6,
1408 ATTRIBUTE7 = :X_ATTRIBUTE7,
1409 ATTRIBUTE8 = :X_ATTRIBUTE8,
1410 ATTRIBUTE9 = :X_ATTRIBUTE9,
1411 ATTRIBUTE10 = :X_ATTRIBUTE10,
1412 ATTRIBUTE11 = :X_ATTRIBUTE11,
1413 ATTRIBUTE12 = :X_ATTRIBUTE12,
1414 ATTRIBUTE13 = :X_ATTRIBUTE13,
1415 ATTRIBUTE14 = :X_ATTRIBUTE14,
1416 ATTRIBUTE15 = :X_ATTRIBUTE15,
1417 ATTRIBUTE16 = :X_ATTRIBUTE16,
1418 ATTRIBUTE17 = :X_ATTRIBUTE17,
1419 ATTRIBUTE18 = :X_ATTRIBUTE18,
1420 ATTRIBUTE19 = :X_ATTRIBUTE19,
1421 ATTRIBUTE20 = :X_ATTRIBUTE20,
1422 CONTEXT = :X_CONTEXT,
1423 CONTEXT2 = :X_CONTEXT2,
1424 INVOICE_DATE = :X_INVOICE_DATE,
1425 TAX_CODE = :X_TAX_CODE,
1426 INVOICE_IDENTIFIER = :X_INVOICE_IDENTIFIER,
1427 INVOICE_AMOUNT = :X_INVOICE_AMOUNT,
1428 CONTEXT3 = :X_CONTEXT3,
1429 USSGL_TRANSACTION_CODE = :X_USSGL_TRANSACTION_CODE,
1430 JGZZ_RECON_REF = :X_JGZZ_RECON_REF,
1431 ORIGINATING_BAL_SEG_VALUE = :X_ORIGINATING_BAL_SEG_VALUE,
1432 GL_SL_LINK_ID = :X_GL_SL_LINK_ID,
1433 GL_SL_LINK_TABLE = :X_GL_SL_LINK_TABLE
1434 where ROWID = :X_ROWID';
1435
1436 EXECUTE IMMEDIATE sqlstmt
1437 USING
1438 X_STATUS,
1439 X_LEDGER_ID,
1440 X_ACCOUNTING_DATE,
1441 X_CURRENCY_CODE,
1442 X_DATE_CREATED,
1443 X_CREATED_BY,
1444 X_ACTUAL_FLAG,
1445 X_USER_JE_CATEGORY_NAME,
1446 X_USER_JE_SOURCE_NAME,
1447 X_CURRENCY_CONVERSION_DATE,
1448 X_ENCUMBRANCE_TYPE_ID,
1449 X_BUDGET_VERSION_ID,
1450 X_USER_CURRENCY_CONV_TYPE,
1451 X_CURRENCY_CONVERSION_RATE,
1452 X_AVERAGE_JOURNAL_FLAG,
1453 X_SEGMENT1,
1454 X_SEGMENT2,
1455 X_SEGMENT3,
1456 X_SEGMENT4,
1457 X_SEGMENT5,
1458 X_SEGMENT6,
1459 X_SEGMENT7,
1460 X_SEGMENT8,
1461 X_SEGMENT9,
1462 X_SEGMENT10,
1463 X_SEGMENT11,
1464 X_SEGMENT12,
1465 X_SEGMENT13,
1466 X_SEGMENT14,
1467 X_SEGMENT15,
1468 X_SEGMENT16,
1469 X_SEGMENT17,
1470 X_SEGMENT18,
1471 X_SEGMENT19,
1472 X_SEGMENT20,
1473 X_SEGMENT21,
1474 X_SEGMENT22,
1475 X_SEGMENT23,
1476 X_SEGMENT24,
1477 X_SEGMENT25,
1478 X_SEGMENT26,
1479 X_SEGMENT27,
1480 X_SEGMENT28,
1481 X_SEGMENT29,
1482 X_SEGMENT30,
1483 X_ENTERED_DR,
1484 X_ENTERED_CR,
1485 X_ACCOUNTED_DR,
1486 X_ACCOUNTED_CR,
1487 X_REFERENCE1,
1488 X_REFERENCE2,
1489 X_REFERENCE3,
1490 X_REFERENCE4,
1491 X_REFERENCE5,
1492 X_REFERENCE6,
1493 X_REFERENCE7,
1494 X_REFERENCE8,
1495 X_REFERENCE9,
1496 X_REFERENCE10,
1497 X_REFERENCE11,
1498 X_REFERENCE12,
1499 X_REFERENCE13,
1500 X_REFERENCE14,
1501 X_REFERENCE15,
1502 X_REFERENCE16,
1503 X_REFERENCE17,
1504 X_REFERENCE18,
1505 X_REFERENCE19,
1506 X_REFERENCE20,
1507 X_REFERENCE21,
1508 X_REFERENCE22,
1509 X_REFERENCE23,
1510 X_REFERENCE24,
1511 X_REFERENCE25,
1512 X_REFERENCE26,
1513 X_REFERENCE27,
1514 X_REFERENCE28,
1515 X_REFERENCE29,
1516 X_REFERENCE30,
1517 X_PERIOD_NAME,
1518 X_CODE_COMBINATION_ID,
1519 X_STAT_AMOUNT,
1520 X_GROUP_ID,
1521 X_REQUEST_ID,
1522 X_SUBLEDGER_DOC_SEQUENCE_ID,
1523 X_SUBLEDGER_DOC_SEQUENCE_VALUE,
1524 X_ATTRIBUTE1,
1525 X_ATTRIBUTE2,
1526 X_ATTRIBUTE3,
1527 X_ATTRIBUTE4,
1528 X_ATTRIBUTE5,
1529 X_ATTRIBUTE6,
1530 X_ATTRIBUTE7,
1531 X_ATTRIBUTE8,
1532 X_ATTRIBUTE9,
1533 X_ATTRIBUTE10,
1534 X_ATTRIBUTE11,
1535 X_ATTRIBUTE12,
1536 X_ATTRIBUTE13,
1537 X_ATTRIBUTE14,
1538 X_ATTRIBUTE15,
1539 X_ATTRIBUTE16,
1540 X_ATTRIBUTE17,
1541 X_ATTRIBUTE18,
1542 X_ATTRIBUTE19,
1543 X_ATTRIBUTE20,
1544 X_CONTEXT,
1545 X_CONTEXT2,
1546 X_INVOICE_DATE,
1547 X_TAX_CODE,
1548 X_INVOICE_IDENTIFIER,
1549 X_INVOICE_AMOUNT,
1550 X_CONTEXT3,
1551 X_USSGL_TRANSACTION_CODE,
1552 X_JGZZ_RECON_REF,
1553 X_ORIGINATING_BAL_SEG_VALUE,
1554 X_GL_SL_LINK_ID,
1555 X_GL_SL_LINK_TABLE,
1556 X_ROWID;
1557
1558 if (sql%notfound) then
1559 raise no_data_found;
1560 end if;
1561 null;
1562 END update_row;
1563
1564 procedure DELETE_ROW (
1565 X_ROWID in VARCHAR2,
1566 X_ITABLE in VARCHAR2
1567 ) IS
1571 'delete from ' || X_ITABLE || ' ' ||
1568 sqlstmt VARCHAR2(2000);
1569 BEGIN
1570 sqlstmt :=
1572 'where ROW_ID = :X_ROWID';
1573
1574 EXECUTE IMMEDIATE sqlstmt
1575 USING X_ROWID;
1576
1577 if (sql%notfound) then
1578 raise no_data_found;
1579 end if;
1580 null;
1581 END delete_row;
1582
1583
1584 END gl_interface_pkg;