Function debitOnceAttributed

@suluk/credits — a metered credit ledger (C046, extracted verbatim). The package OWNS the schema (credit_transaction

the credit_amount/credit_key sidecars); the app injects a Drizzle handle (D1 in prod, bun:sqlite in tests). The money-correctness core: the ATOMIC debitIfCovers (a conditional INSERT that can't drive the ledger negative under concurrency) + the idempotent debitOnceIfCovers (the partial-refund double-spend guard) + per-key spend + the activity-log query. App-specific payment-alert kinds + the user-table count stay in the app.

debitOnceAttributed(
    db: CreditsDB,
    userId: string,
    amount: number,
    reason: string,
    idemKey: string,
    keyId?: string | null,
): Promise<DebitOutcome>
Idempotent debit + per-key ATTRIBUTION — the money primitive a per-item bulk charge needs (debitOnceIfCovers itself does NOT attribute). On a FRESH debited it records the spend against keyId (the row id is the stable nonce); a replayed/insufficient attributes nothing.
Parameters
- db: CreditsDB
- userId: string
- amount: number
- reason: string
- idemKey: string
- OptionalkeyId: string | null
Returns Promise<DebitOutcome>
- Defined in packages/credits/src/credits.ts:122