Initial commit

.template/lib/presentation/profiles/letter.typ

@@ -0,0 +1,147 @@
+// ==========================================
+// PROFILE: ДЕЛОВОЕ ПИСЬМО
+// ==========================================
+#import "../../domain/document.typ": document-profile, fail
+#import "../../domain/attachments.typ": attachment-set
+#import "../../domain/parties.typ": signer
+#import "../foundation.typ": apply-foundation
+#import "../components.typ": attachment-list, appendix-heading, company-footer, letter-header, signature-block
+
+#let normalize-letter(metadata) = {
+  if type(metadata.attachments) == array {
+    metadata.insert("attachments", attachment-set(items: metadata.attachments))
+  }
+  metadata
+}
+
+#let validate-letter(metadata) = {
+  if metadata.recipient == none or type(metadata.recipient) != dictionary or metadata.recipient.at("kind", default: none) != "recipient" {
+    fail("letter.recipient", "ожидался recipient")
+  }
+  if metadata.title != none and type(metadata.title) not in (str, content) {
+    fail("letter.title", "ожидались none, str или content")
+  }
+  if metadata.signer != none and (type(metadata.signer) != dictionary or metadata.signer.at("kind", default: none) != "signer") {
+    fail("letter.signer", "ожидались none или signer")
+  }
+  if type(metadata.attachments) != dictionary or metadata.attachments.at("kind", default: none) != "attachment-set" {
+    fail("letter.attachments", "ожидался attachment-set")
+  }
+  metadata
+}
+
+#let effective-signer(data, company, include-media: true) = {
+  let source = if data.signer == none {
+    signer(
+      company.director.name,
+      company.director.title,
+      signature: company.resources.signature,
+      stamp: company.resources.stamp,
+    )
+  } else {
+    data.signer
+  }
+  signer(
+    source.name,
+    source.title,
+    basis: source.basis,
+    signature: if include-media { source.signature } else { none },
+    stamp: if include-media { source.stamp } else { none },
+  )
+}
+
+#let render-letter-attachments(attachments, appendix-state) = {
+  for (index, item) in attachments.items.enumerate() {
+    pagebreak()
+    appendix-state.update(true)
+    let number = if item.number == auto { index + attachments.start } else { item.number }
+    appendix-heading(item, str(number))
+    v(0.5cm)
+    if type(item.body) == function { (item.body)() } else { item.body }
+  }
+}
+
+#let render-letter(body, ctx) = {
+  let company = ctx.company
+  let data = ctx.metadata
+  let include-media = ctx.options.mode == "final"
+  let person = effective-signer(data, company, include-media: include-media)
+  let media-policy = if include-media { ctx.options.at("media-policy") } else { "reserve-space" }
+  let appendix-state = state("scientia-letter-in-appendix", false)
+  let footer = context {
+    if not appendix-state.get() { company-footer(company) }
+  }
+  let composed = [
+    #letter-header(
+      company,
+      data.recipient,
+      date: data.date,
+      reference: data.reference,
+      title: data.title,
+      media_policy: ctx.options.at("media-policy"),
+    )
+    #v(0.7cm)
+    #body
+    #if data.attachments.items.len() > 0 {
+      v(0.8cm)
+      attachment-list(data.attachments)
+    }
+    #signature-block(
+      person,
+      company: company,
+      media_policy: media-policy,
+      show_stamp: data.at("show-stamp"),
+      note: data.note,
+    )
+    #if data.at("render-attachments") and data.attachments.items.len() > 0 {
+      render-letter-attachments(data.attachments, appendix-state)
+    }
+  ]
+
+  apply-foundation(
+    composed,
+    ctx: ctx,
+    tokens: (
+      text-font: "Arial",
+      text-size: 10pt,
+      line-height: 0.65em,
+      page-margin: (top: 1.5cm, bottom: 4cm, left: 1.5cm, right: 1.5cm),
+    ),
+    page-options: (
+      footer: footer,
+      footer-descent: 20%,
+    ),
+  )
+}
+
+#let letter-profile(
+  recipient: none,
+  date: none,
+  reference: none,
+  title: "Деловое письмо",
+  signer: none,
+  note: none,
+  show_stamp: true,
+  attachments: attachment-set(),
+  render_attachments: false,
+) = {
+  document-profile(
+    "letter",
+    render-letter,
+    metadata: (
+      recipient: recipient,
+      date: date,
+      reference: reference,
+      title: title,
+      signer: signer,
+      note: note,
+      show-stamp: show_stamp,
+      parties: (),
+      attachments: attachments,
+      bibliographies: (),
+      render-attachments: render_attachments,
+    ),
+    normalize: normalize-letter,
+    validate: validate-letter,
+  )
+}