[Home] [Help]
76: CURSOR chk_batch IS
77: SELECT 'Has Lines'
78: FROM dual
79: WHERE EXISTS (SELECT 'Found Line'
80: FROM gl_je_headers jeh, gl_je_lines jel
81: WHERE jeh.je_batch_id = batch_id
82: AND jel.je_header_id = jeh.je_header_id);
83: dummy VARCHAR2(100);
84: BEGIN
107: CURSOR needs_apprvl IS
108: SELECT 'Needs Approval'
109: FROM dual
110: WHERE EXISTS (SELECT 'Needs Approval'
111: FROM gl_je_headers jeh, gl_ledgers lgr,
112: gl_je_sources src
113: WHERE jeh.je_batch_id = batch_id
114: AND lgr.ledger_id = jeh.ledger_id
115: AND lgr.enable_je_approval_flag = 'Y'
141: CURSOR needstx IS
142: SELECT 'Needs Tax'
143: FROM dual
144: WHERE EXISTS (SELECT 'Needs Tax'
145: FROM gl_je_headers jeh, gl_ledgers lgr
146: WHERE jeh.je_batch_id = batch_id
147: AND jeh.tax_status_code = 'R'
148: AND lgr.ledger_id = jeh.ledger_id
149: AND lgr.enable_automatic_tax_flag = 'Y');
176: decode(count(*),
177: sum(decode(JH.currency_code, 'STAT', 1, 0)), 'All STAT',
178: 'Not all STAT')
179: FROM
180: GL_JE_HEADERS JH
181: WHERE
182: JH.je_batch_id = X_je_batch_id
183: AND (JH.display_alc_journal_flag is null or JH.display_alc_journal_flag = 'Y');
184: dummy VARCHAR2(100);
199: CURSOR get_ledger_id IS
200: SELECT
201: DISTINCT JH.ledger_id
202: FROM
203: GL_JE_HEADERS JH, GL_LEDGERS LGR
204: WHERE
205: JH.je_batch_id = X_je_batch_id
206: AND (JH.display_alc_journal_flag is null
207: or JH.display_alc_journal_flag = 'Y')
242: BEGIN
243: SELECT max(ledger_id), nvl(max(je_source), 'Manual'),
244: nvl(max(decode(reversed_je_header_id, NULL, NULL, 'Y')),'N')
245: INTO one_of_ledgers_in_batch, x_je_source_name, reversal_flag
246: FROM gl_je_headers
247: WHERE je_batch_id = x_je_batch_id
248: AND rownum = 1;
249:
250: SELECT override_edits_flag
298: IF (X_Je_Batch_Id IS NOT NULL) THEN
299: BEGIN
300: SELECT 'Y'
301: INTO has_je
302: FROM gl_je_headers
303: WHERE je_batch_id = X_Je_Batch_Id
304: AND rownum = 1;
305:
306: EXCEPTION
568: IF (X_Je_Batch_Id IS NOT NULL) THEN
569: BEGIN
570: SELECT 'Y'
571: INTO has_je
572: FROM gl_je_headers
573: WHERE je_batch_id = X_Je_Batch_Id
574: AND rownum = 1;
575: EXCEPTION
576: WHEN NO_DATA_FOUND THEN
585:
586: -- If the user changes the average journal flag to 'Y', then
587: -- we need to reinitialize all of the journals effective dates.
588: IF (Update_Effective_Date_Flag = 'Y') THEN
589: GL_JE_HEADERS_PKG.change_effective_date(X_Je_Batch_Id,
590: X_Default_Effective_Date);
591: END IF;
592:
593: -- If the user starts the approval process, then we need to
616: END IF;
617: END IF;
618:
619: -- Recalculate the running totals
620: gl_je_headers_pkg.calculate_totals(
621: X_Je_Batch_Id,
622: X_Running_Total_Dr,
623: X_Running_Total_Cr,
624: X_Running_Total_Accounted_Dr,
748: BEGIN
749:
750: SELECT 'Y'
751: INTO has_je
752: FROM gl_je_headers
753: WHERE je_batch_id = X_Je_Batch_Id
754: AND rownum = 1;
755: EXCEPTION
756: WHEN NO_DATA_FOUND THEN
1296: BEGIN
1297:
1298: SELECT 'Y'
1299: INTO has_je
1300: FROM gl_je_headers
1301: WHERE je_batch_id = X_Je_Batch_Id
1302: AND rownum = 1;
1303: EXCEPTION
1304: WHEN NO_DATA_FOUND THEN
1313:
1314: -- If the user changes the average journal flag to 'Y', then
1315: -- we need to reinitialize all of the journals effective dates.
1316: IF (Update_Effective_Date_Flag = 'Y') THEN
1317: GL_JE_HEADERS_PKG.change_effective_date(X_Je_Batch_Id,
1318: X_Default_Effective_Date);
1319: END IF;
1320:
1321: -- If the user starts the approval process, then we need to
1492: END IF;
1493:
1494:
1495: -- Delete the journals
1496: gl_je_headers_pkg.delete_headers(Je_Batch_Id);
1497:
1498: -- Delete the batches
1499: DELETE FROM GL_JE_BATCHES
1500: WHERE rowid = X_Rowid;