Source Code
;; Amanah Record - Bag
;; Amanah record for bag
(define-map bag-95-amanah {owner: principal, keeper: principal} bool)
(define-public (record-bag-95 (keeper principal))
(begin
(map-set bag-95-amanah {owner: tx-sender, keeper: keeper} true)
(ok true)
)
)
(define-read-only (get-bag-95-status (owner principal) (keeper principal))
(default-to false (map-get? bag-95-amanah {owner: owner, keeper: keeper}))
)
Functions (2)
| Function | Access | Args |
|---|---|---|
| record-bag-95 | public | keeper: principal |
| get-bag-95-status | read-only | owner: principal, keeper: principal |