Oracle EBS GL Unposted Journals and Period Status SQL Generator

SELECT fa.application_short_name,
       ps.period_name,
       ps.closing_status,
       DECODE(ps.closing_status,
              'O', 'Open',
              'C', 'Closed',
              'F', 'Future entry',
              'N', 'Never opened',
              'P', 'Permanently closed',
              ps.closing_status) AS status_text
FROM   gl_period_statuses ps,
       fnd_application fa
WHERE  ps.application_id = fa.application_id
AND    ps.ledger_id = 1001
AND    ps.period_name = 'OCT-26'
AND    ps.application_id IN (101, 200, 222, 140, 201)
ORDER  BY fa.application_short_name;

SELECT jh.je_header_id,
       jh.name,
       jh.je_source,
       jh.je_category,
       jh.status,
       jh.running_total_dr,
       jh.running_total_cr,
       jh.created_by,
       jh.creation_date
FROM   gl_je_headers jh
WHERE  jh.ledger_id = 1001
AND    jh.period_name = 'OCT-26'
AND    jh.actual_flag = 'A'
AND    jh.status <> 'P'
ORDER  BY jh.je_source, jh.name;

SELECT gi.status,
       gi.user_je_source_name,
       gi.group_id,
       COUNT(*)  AS row_count,
       SUM(NVL(gi.entered_dr, 0)) AS total_dr,
       SUM(NVL(gi.entered_cr, 0)) AS total_cr
FROM   gl_interface gi
WHERE  gi.ledger_id = 1001
AND    gi.status <> 'PROCESSED'
GROUP  BY gi.status, gi.user_je_source_name, gi.group_id
ORDER  BY gi.user_je_source_name;

SELECT xah.application_id,
       xah.period_name,
       xah.accounting_entry_status_code,
       xah.gl_transfer_status_code,
       COUNT(*) AS entries
FROM   xla_ae_headers xah
WHERE  xah.ledger_id = 1001
AND    xah.application_id = 200
AND    xah.period_name = 'OCT-26'
AND    xah.gl_transfer_status_code <> 'Y'
GROUP  BY xah.application_id, xah.period_name,
          xah.accounting_entry_status_code, xah.gl_transfer_status_code;

SELECT gcc.segment1,
       gcc.segment2,
       gcc.segment3,
       SUM(NVL(gb.period_net_dr, 0)) AS period_dr,
       SUM(NVL(gb.period_net_cr, 0)) AS period_cr
FROM   gl_balances gb,
       gl_code_combinations gcc
WHERE  gb.code_combination_id = gcc.code_combination_id
AND    gb.ledger_id = 1001
AND    gb.period_name = 'OCT-26'
AND    gb.actual_flag = 'A'
AND    gb.currency_code = (SELECT currency_code FROM gl_ledgers WHERE ledger_id = 1001)
GROUP  BY gcc.segment1, gcc.segment2, gcc.segment3
ORDER  BY gcc.segment1, gcc.segment2, gcc.segment3;