R43500

-- ============================================================
-- Program: R43500 Purchase Order Print — batch-print purchase orders for suppliers and advance order line statuses
-- Purpose: Purchase Order Print — batch-print purchase orders for suppliers and advance order line statuses — auto-generated boilerplate from program-table-map
-- Grain  : F4301 × F4311 — 1:N joins yield one row per detail line
-- Tables : F4301, F4311
-- Notes  : Auto-generated skeleton. Julian dates are converted to DATE and implied-decimal amounts are scaled (verify decimals in F9210). Audit columns (…USER/…PID/…UPMJ) are omitted — see the quirks guide. Set catalog/schema to your Unity Catalog location; fill remaining placeholders (<...>) for your tenant.
-- Omitted: F0101 is cataloged for this program, but no verified join condition connects it to F4301, so it is left out of this skeleton. Add the join yourself using the key fields on each table's page.
-- ============================================================
SELECT
  h.PHKCOO AS "Company that owns the order-number sequence; part of the composite order key",
  h.PHDOCO AS "Order number",
  h.PHDCTO AS "Order document type (e.g. OP purchase order, SO sales order)",
  h.PHSFXO AS "Order suffix distinguishing multiple documents under one order number",
  d.PDLNID / POWER(10, 3) AS "Order line number (3 implied decimals, e.g. 1.000)"  -- implied decimals: 3 (verify in F9210)
FROM <catalog>.<schema_data>.f4301 h
LEFT JOIN <catalog>.<schema_data>.f4311 d
  ON d.PDDOCO = h.PHDOCO
 AND d.PDKCOO = h.PHKCOO
 AND d.PDDCTO = h.PHDCTO
 AND d.PDSFXO = h.PHSFXO
WHERE
  h.PHKCOO = '<KCOO>'
  AND h.PHDOCO = <DOCO>
  AND h.PHDCTO = '<DCTO>'
ORDER BY h.PHKCOO;