4507: p_cannot_close_period OUT NOCOPY BOOLEAN ,
4508: p_incomplete_events OUT NOCOPY BOOLEAN )
4509: IS
4510:
4511: -- Declare a record of XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_header%ROWTYPE as we need to fetch a single record
4512: ar_xla_period_close_header_rec XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_header%ROWTYPE;
4513:
4514: -- Declare a pl/sql table of XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt%ROWTYPE as we need to loop through the data
4515: TYPE ar_xla_period_close_evt_tab IS TABLE OF XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt%ROWTYPE
4508: p_incomplete_events OUT NOCOPY BOOLEAN )
4509: IS
4510:
4511: -- Declare a record of XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_header%ROWTYPE as we need to fetch a single record
4512: ar_xla_period_close_header_rec XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_header%ROWTYPE;
4513:
4514: -- Declare a pl/sql table of XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt%ROWTYPE as we need to loop through the data
4515: TYPE ar_xla_period_close_evt_tab IS TABLE OF XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt%ROWTYPE
4516: INDEX BY BINARY_INTEGER;
4510:
4511: -- Declare a record of XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_header%ROWTYPE as we need to fetch a single record
4512: ar_xla_period_close_header_rec XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_header%ROWTYPE;
4513:
4514: -- Declare a pl/sql table of XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt%ROWTYPE as we need to loop through the data
4515: TYPE ar_xla_period_close_evt_tab IS TABLE OF XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt%ROWTYPE
4516: INDEX BY BINARY_INTEGER;
4517: l_ar_xla_period_close_evt_tab ar_xla_period_close_evt_tab;
4518:
4511: -- Declare a record of XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_header%ROWTYPE as we need to fetch a single record
4512: ar_xla_period_close_header_rec XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_header%ROWTYPE;
4513:
4514: -- Declare a pl/sql table of XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt%ROWTYPE as we need to loop through the data
4515: TYPE ar_xla_period_close_evt_tab IS TABLE OF XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt%ROWTYPE
4516: INDEX BY BINARY_INTEGER;
4517: l_ar_xla_period_close_evt_tab ar_xla_period_close_evt_tab;
4518:
4519: i NUMBER := 0;
4528: -- If application security context is not set, then xla cursors will not give data
4529: xla_security_pkg.set_security_context(p_application_id);
4530:
4531: -- If there are any headers in XLA which are not transferred to GL, user can not close the period
4532: OPEN xla_period_close_exp_pkg.period_close_cur_header(p_application_id,p_ledger_id,p_period_name);
4533: FETCH xla_period_close_exp_pkg.period_close_cur_header INTO ar_xla_period_close_header_rec;
4534:
4535:
4536: IF xla_period_close_exp_pkg.period_close_cur_header%FOUND THEN
4529: xla_security_pkg.set_security_context(p_application_id);
4530:
4531: -- If there are any headers in XLA which are not transferred to GL, user can not close the period
4532: OPEN xla_period_close_exp_pkg.period_close_cur_header(p_application_id,p_ledger_id,p_period_name);
4533: FETCH xla_period_close_exp_pkg.period_close_cur_header INTO ar_xla_period_close_header_rec;
4534:
4535:
4536: IF xla_period_close_exp_pkg.period_close_cur_header%FOUND THEN
4537: p_cannot_close_period := TRUE;
4532: OPEN xla_period_close_exp_pkg.period_close_cur_header(p_application_id,p_ledger_id,p_period_name);
4533: FETCH xla_period_close_exp_pkg.period_close_cur_header INTO ar_xla_period_close_header_rec;
4534:
4535:
4536: IF xla_period_close_exp_pkg.period_close_cur_header%FOUND THEN
4537: p_cannot_close_period := TRUE;
4538: RETURN;
4539: END IF;
4540: CLOSE xla_period_close_exp_pkg.period_close_cur_header;
4536: IF xla_period_close_exp_pkg.period_close_cur_header%FOUND THEN
4537: p_cannot_close_period := TRUE;
4538: RETURN;
4539: END IF;
4540: CLOSE xla_period_close_exp_pkg.period_close_cur_header;
4541: /* Bug 14325948 change the order of fetch and loop to correct the looping and fetching of records */
4542: OPEN XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt(p_application_id,p_ledger_id,p_period_name);
4543: LOOP
4544: FETCH XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt BULK COLLECT INTO l_ar_xla_period_close_evt_tab LIMIT MAX_ARRAY_SIZE;
4538: RETURN;
4539: END IF;
4540: CLOSE xla_period_close_exp_pkg.period_close_cur_header;
4541: /* Bug 14325948 change the order of fetch and loop to correct the looping and fetching of records */
4542: OPEN XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt(p_application_id,p_ledger_id,p_period_name);
4543: LOOP
4544: FETCH XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt BULK COLLECT INTO l_ar_xla_period_close_evt_tab LIMIT MAX_ARRAY_SIZE;
4545: -- LOOP
4546: IF l_ar_xla_period_close_evt_tab.count = 0 THEN
4540: CLOSE xla_period_close_exp_pkg.period_close_cur_header;
4541: /* Bug 14325948 change the order of fetch and loop to correct the looping and fetching of records */
4542: OPEN XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt(p_application_id,p_ledger_id,p_period_name);
4543: LOOP
4544: FETCH XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt BULK COLLECT INTO l_ar_xla_period_close_evt_tab LIMIT MAX_ARRAY_SIZE;
4545: -- LOOP
4546: IF l_ar_xla_period_close_evt_tab.count = 0 THEN
4547: EXIT;
4548: END IF;
4586: EXIT;
4587: END IF;
4588:
4589: END LOOP;
4590: CLOSE XLA_PERIOD_CLOSE_EXP_PKG.period_close_cur_evt;
4591:
4592: log('ARP_XLA_EVENTS.ar_xla_period_close ()-');
4593: EXCEPTION
4594: WHEN OTHERS THEN