JDE F0911Z1 Journal Entry Batch Input SQL Generator

-- Line numbers: VNEDLN has 3 implied decimals, so line 1.000 is stored as 1000.
-- Amounts: stored without the decimal point; 125000 = 1,250.00 for a 2-decimal currency.
-- VNEDSP = '0' (unprocessed), VNEDTC = 'A' (add), VNEDTR = 'J' (journal entry).
-- VNAM = '2' means VNANI holds business unit.object.subsidiary (1 = short ID, 3 = third account number).
INSERT INTO CRPDTA.F0911Z1
  (VNEDUS, VNEDTN, VNEDLN, VNEDBT, VNEDSP, VNEDTC, VNEDTR,
   VNKCO, VNDCT, VNDGJ, VNANI, VNAM, VNAA, VNLT, VNEXA, VNCRCD)
VALUES
  ('GLLOAD', 'JE20261022001', 1000, 'GL261022', '0', 'A', 'J',
   '00100', 'JE', 126295, '30.6110', '2', 125000, 'AA', 'Accrual reclass Oct 2026', 'USD');

INSERT INTO CRPDTA.F0911Z1
  (VNEDUS, VNEDTN, VNEDLN, VNEDBT, VNEDSP, VNEDTC, VNEDTR,
   VNKCO, VNDCT, VNDGJ, VNANI, VNAM, VNAA, VNLT, VNEXA, VNCRCD)
VALUES
  ('GLLOAD', 'JE20261022001', 2000, 'GL261022', '0', 'A', 'J',
   '00100', 'JE', 126295, '1.1110', '2', -125000, 'AA', 'Accrual reclass Oct 2026', 'USD');

COMMIT;

SELECT VNEDUS, VNEDBT, VNEDTN, VNEDLN / 1000 AS line_no, VNEDSP,
       VNDGJ, VNANI, VNAA, VNLT, VNEXA
FROM   CRPDTA.F0911Z1
WHERE  VNEDUS = 'GLLOAD'
  AND  VNEDBT = 'GL261022'
ORDER  BY VNEDTN, VNEDLN;

-- The entry must net to zero per transaction:
SELECT VNEDTN, SUM(VNAA) AS net_amount
FROM   CRPDTA.F0911Z1
WHERE  VNEDUS = 'GLLOAD' AND VNEDBT = 'GL261022'
GROUP  BY VNEDTN
HAVING SUM(VNAA) <> 0;

-- 1. Review or correct the lines in the batch journal entry revisions program (P0911Z1).
-- 2. Run R09110Z (Journal Entries Batch Processor) with a data selection on
--    VNEDUS = 'GLLOAD' and VNEDBT = 'GL261022'; check its processing options before the first run.
-- 3. Successful lines get VNEDSP = '1'; errors go to the Work Center.
-- 4. Review and post the created batch as with any manual journal entry.