R04572

-- ============================================================
-- Program: R04572 Print Automatic Payments - Standard Format — the batch program that renders the physical check when a payment group is written; format variants exist for drafts, ACH, and EDI.
-- Purpose: Print Automatic Payments - Standard Format — the batch program that renders the physical check when a payment group is written; format variants exist for drafts, ACH, and EDI. — auto-generated boilerplate from program-table-map
-- Grain  : F0411 × F0401, F0111 — 1:N joins yield one row per detail line
-- Tables : F0411, F0401, F0111
-- 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.
-- ============================================================
SELECT
  h.RPKCO AS "Document company that owns the voucher number sequence",
  h.RPDOC AS "Voucher document number",
  h.RPDCT AS "Voucher document type (PV standard voucher, PD debit memo, PL logged, etc.)",
  h.RPSFX AS "Pay item — vouchers split into pay items with independent terms and status",
  h.RPSFXE AS "Pay item extension used by prepayments and multi-tax-rate splits",
  h.RPADSC / POWER(10, 2) AS "Discount available if paid by the discount due date",  -- implied decimals: 2 (verify in F9210)
  f0.WWAN8 AS "Address book number the contact belongs to; joins to F0101.",
  f0.WWIDLN AS "Line number distinguishing multiple contacts under one address; line 0 mirrors the entity itself."
FROM <catalog>.<schema_data>.f0411 h
LEFT JOIN <catalog>.<schema_data>.f0401 f
  ON f.A6AN8 = h.RPAN8
LEFT JOIN <catalog>.<schema_data>.f0111 f0
  ON 1 = 1  -- TODO: define join condition (no shared aliases detected)
ORDER BY h.RPKCO;