JD Edwards F4801 Work Order SQL Query Generator

SELECT WADOCO AS wo_number,
       WADCTO AS order_type,
       LTRIM(WAMCU) AS branch_plant,
       WALITM AS item_number,
       WADL01 AS description,
       WASRST AS status,
       WAUORG AS qty_ordered_raw,
       WASOQS AS qty_completed_raw,
       DATEADD(DAY, (WADRQJ % 1000) - 1, DATEFROMPARTS(1900 + WADRQJ / 1000, 1, 1)) AS request_date,
       WAANPA AS supervisor
FROM PRODDTA.F4801
WHERE LTRIM(WAMCU) = 'M30'
  AND WADCTO = 'WO'
  AND WASRST BETWEEN '10' AND '40'
  AND WADRQJ > 0
  AND WADRQJ <= 126365
ORDER BY WADRQJ, WADOCO;

SELECT WMDOCO AS wo_number,
       WMCPIT AS component_short_item,
       WMLITM AS component_item,
       WMUORG AS qty_required_raw,
       WMTRQT AS qty_issued_raw
FROM PRODDTA.F3111
WHERE WMDOCO = 412345
ORDER BY WMCPIT;

SELECT WLDOCO AS wo_number,
       WLOPSQ AS operation_seq,
       WLOPHD AS description,
       WLMCU AS work_center
FROM PRODDTA.F3112
WHERE WLDOCO = 412345
ORDER BY WLOPSQ;