@airmark/quiver 0.30.0 → 0.32.0

package/quills/usaf_memo/0.3.0/plate.typ

@@ -1,5 +1,11 @@
-#import "@local/quillmark-helper:0.1.0": data, signature-field
-#import "@local/tonguetoquill-usaf-memo:4.0.0": backmatter, frontmatter, indorsement, mainmatter
+#import "@local/quillmark-helper:0.1.0": data, display, form-field, signature-field
+#import "@local/tonguetoquill-usaf-memo:4.0.0": (
+  backmatter, date-pattern, frontmatter, indorsement, mainmatter,
+)
+
+// A memo has no "no style" state, so the blank takes the package's default.
+// Resolved once here: `frontmatter` and the date's pattern must agree.
+#let memo_style = if data.memo_style != "" { data.memo_style } else { "usaf" }
 
 // The letterhead arrives as one ordered array of lines. Element 0 is the title,
 // set larger; the rest are caption lines beneath it. A single element renders
@@ -8,54 +14,77 @@
 // leaves no glyphs and takes no space from the flow, and the seal stands alone.
 #let letterhead_lines = data.letterhead_title
 
+// Body text size, in points. Also the height of one line of the indorsement
+// header, which is what an omitted indorsement date reserves for its fill-in
+// widget (`date-placeholder-slot`, whose slot is `1em` tall and 1in wide).
+#let body_font_size = data.font_size * 1pt
+
 // Frontmatter configuration
 #show: frontmatter.with(
   // Letterhead configuration
   letterhead_title: letterhead_lines.at(0, default: ""),
   letterhead_caption: if letterhead_lines.len() > 1 { letterhead_lines.slice(1) } else { () },
-  letterhead_seal_subtitle: data.at("letterhead_seal_subtitle", default: none),
-  letterhead_seal: image(
-    if data.at("letterhead_seal", default: "dow") == "dod" {
-      "assets/dod_seal.png"
-    } else {
-      "assets/dow_seal.png"
-    }
-  ),
-
-  // Date
-  date: data.at("date", default: none),
+  letterhead_seal_subtitle: data.letterhead_seal_subtitle,
+  // Enum blank is `""`, not a seal. Omit so the package renders none rather
+  // than treating the blank as DoW.
+  ..if data.letterhead_seal != "" {
+    (letterhead_seal: image(
+      if data.letterhead_seal == "dod" {
+        "assets/dod_seal.png"
+      } else {
+        "assets/dow_seal.png"
+      }
+    ))
+  },
+
+  // Date. `data.date` is the native `datetime` and would render identically,
+  // but its ink would be born inside the package and carry no schema address.
+  // `display` places the field's *content* projection instead: the glyphs are
+  // born in the generated helper, so the memo date stays click-to-edit however
+  // deep the package formats it. A blank date yields `none`, which is what
+  // `frontmatter`'s `datetime.today()` fallback keys on.
+  date: display("date", date-pattern(memo-style: memo_style)),
 
   // Receiver information
   memo_for: data.memo_for,
 
   // Sender information (omitted for Memorandum for Record)
-  ..if data.at("memo_from", default: ()).len() > 0 { (memo_from: data.memo_from) },
+  ..if data.memo_from.len() > 0 { (memo_from: data.memo_from) },
 
   // Subject line
   subject: data.subject,
 
   // Optional references
-  ..if "references" in data { (references: data.references) },
+  ..if data.references.len() > 0 { (references: data.references) },
 
   // Optional footer tag line
-  ..if "tag_line" in data { (footer_tag_line: data.tag_line) },
-
-  // Optional classification level
-  ..if "classification" in data { (classification_level: data.classification) },
-
-  ..if "dissemination" in data { (dissemination: data.dissemination) },
-
-  // CUI designation indicator block fields (DoDM 5200.48)
-  ..if "cui_controlled_by" in data { (cui_controlled_by: data.cui_controlled_by) },
-  ..if "cui_category" in data { (cui_category: data.cui_category) },
-  ..if "cui_limited_dissemination" in data { (cui_limited_dissemination: data.cui_limited_dissemination) },
-  ..if "cui_poc" in data { (cui_poc: data.cui_poc) },
+  footer_tag_line: data.tag_line,
+
+  // The blank reads as no banner, which is what the package's own
+  // `classification_level: none` default means.
+  classification_level: data.classification.value,
+
+  dissemination: data.dissemination,
+
+  // CUI designation indicator block fields (DoDM 5200.48). `classification`
+  // declares a `CUI` variant, so these four exist only where the discriminant
+  // reads CUI, and the branch is what makes reading them total: inside it every
+  // declared field of that world is present, outside it none is. The package's
+  // own `cui_*: none` defaults cover the worlds that omit them.
+  ..if data.classification.value == "CUI" {
+    (
+      cui_controlled_by: data.classification.controlled_by,
+      cui_category: data.classification.category,
+      cui_limited_dissemination: data.classification.limited_dissemination,
+      cui_poc: data.classification.poc,
+    )
+  },
 
-  // USAF vs DAF memorandum style (date format, body indentation)
-  memo_style: data.at("memo_style", default: "usaf"),
+  // USAF vs DAF memorandum style (date format, body indentation).
+  memo_style: memo_style,
 
   // Font size
-  font_size: data.at("font_size", default: 12) * 1pt,
+  font_size: body_font_size,
 
   // List recipients in vertical list
   memo_for_cols: 1,
@@ -76,18 +105,38 @@
   signing_field: signature-field("Signature", field: "signature_block"),
 
   // Optional cc
-  ..if "cc" in data { (cc: data.cc) },
+  ..if data.cc.len() > 0 { (cc: data.cc) },
 
   // Optional distribution
-  ..if "distribution" in data { (distribution: data.distribution) },
+  ..if data.distribution.len() > 0 { (distribution: data.distribution) },
 
   // Optional attachments
-  ..if "attachments" in data { (attachments: data.attachments) },
+  ..if data.attachments.len() > 0 { (attachments: data.attachments) },
+)
+
+// The action line's wording follows the indorsement's place in the chain, not
+// an endorser's choice: the last indorsement is the approval authority and
+// reads Approve / Disapprove, every one before it is a coordinating official
+// and reads Concur / Nonconcur. Only this loop can see whether an indorsement
+// is the last one, so the position is resolved here and passed down. Cards of
+// other kinds may interleave, so the last indorsement is the last card *of
+// this kind*, not the last card. `-1` never matches a real index, which is the
+// wanted result when there are no indorsements at all.
+// Parenthesized so the method chain can span lines: in markup, a `#let` whose
+// expression ends at a line break stops there, and the next line's leading
+// `.at(…)` would be read as text.
+#let last_indorsement_index = (
+  data
+    .at("$cards")
+    .enumerate()
+    .filter(entry => entry.at(1).at("$kind", default: none) == "indorsement")
+    .map(entry => entry.at(0))
+    .at(-1, default: -1)
 )
 
 // Indorsements - iterate through CARDS array and filter by CARD tag
 #for (i, card) in data.at("$cards").enumerate() {
-  if card.at("$kind") == "indorsement" {
+  if card.at("$kind", default: none) == "indorsement" {
     // The quillmark helper leaves an unset/whitespace-only markdown body as
     // the empty string `""`; only non-empty bodies are eval'd into content.
     // Pass truly empty content (`[]`) in the empty case so indorsement can
@@ -96,14 +145,15 @@
     let body_content = if type(body) == str { [] } else { body }
     // Per AFH 33-337 Ch. 14, an indorsement is dated when the endorser signs
     // it (distinct from the originating memo's date). The signing date is
-    // generally unknown at compile time and filled in by hand, so a blank or
-    // omitted date renders a fill-in line rather than stamping the compile date.
-    let card_date = card.at("date", default: none)
-    let resolved_date = if card_date == none or card_date == "" {
-      none
-    } else {
-      card_date
-    }
+    // generally unknown at compile time, so a blank or omitted date leaves the
+    // date slot fillable rather than stamping the compile date into it.
+    // `display` takes an address, so a per-card call yields a per-card region
+    // even though every iteration shares one `card` loop variable, and it
+    // returns `none` for a blank date — the fill-in case below.
+    let resolved_date = display(
+      card.at("$path") + "date",
+      date-pattern(memo-style: memo_style),
+    )
     // The card's `$path` prefix composes its canonical schema addresses
     // (`$cards.indorsement.<n>.…`, per-kind ordinal) — the absolute loop
     // index `i` is NOT that ordinal once kinds interleave, so it stays a
@@ -118,9 +168,23 @@
         "Ind_" + str(i) + "_Signature",
         field: card.at("$path") + "signature_block",
       ),
-      format: card.at("format", default: "standard"),
+      ..if card.format != "" { (format: card.format) },
       date: resolved_date,
-      ..if "action" in card { (action: card.action) },
+      // An omitted date becomes an empty AcroForm text box the endorser types
+      // the signing date into, sized to the slot the package reserves for it.
+      // Built only when there is no date to print: a widget over a printed date
+      // would offer an edit that the rendered document does not carry back.
+      ..if resolved_date == none {
+        (date_field: form-field(
+          "Ind_" + str(i) + "_Date",
+          type: "text",
+          width: 1in,
+          height: body_font_size,
+          field: card.at("$path") + "date",
+        ))
+      },
+      ..if card.action != "" { (action: card.action) },
+      approval_authority: i == last_indorsement_index,
       body_content,
     )
   }