customer-registry-v1
SP203NZ4Q7C7XRQCY0C38091CPAXYW95JDB7G6QA2Source Code
;; Client Database - Track clients
(define-map clients {provider: principal, client: principal} {name: (string-ascii 50), active: bool})
(define-public (add-client (client principal) (name (string-ascii 50)))
(begin
(map-set clients {provider: tx-sender, client: client} {name: name, active: true})
(ok true)))
(define-read-only (get-client (provider principal) (client principal))
(map-get? clients {provider: provider, client: client}))
Functions (2)
| Function | Access | Args |
|---|---|---|
| add-client | public | client: principal, name: (string-ascii 50 |
| get-client | read-only | provider: principal, client: principal |