IaC / SwiftFlow

Artifact 0e34bc4774f1707aae92f95ee8028751fb59042b76c86cdc2ee1bb1371ecaab7:

• File shared/ql361api/src/ql361api/json_codec.gleam — part of check-in [5bb18ed4d4] at 2026-10-23 03:34:10 on branch trunk — 把来肯对接和本地库落到可切换的后端。

  账号从环境读取，商品由人工增量同步，订单按五分钟轮询并缓存登录会话。开发期用 SQLite，同一套结构可切到 PostgreSQL。 (user: pluto size: 414)

import gleam/dynamic/decode
import gleam/float
import gleam/int

/// QL361 数字字段有时是整数，有时是小数。先按实际类型解码，避免把真实单据解丢。
pub fn int() -> decode.Decoder(Int) {
  decode.one_of(decode.int, or: [decode.map(decode.float, float.round)])
}

pub fn number() -> decode.Decoder(Float) {
  decode.one_of(decode.float, or: [decode.map(decode.int, int.to_float)])
}