// api/admin-me.prg — Format /me response
FUNCTION Main()
   AP_JSONRESPONSE({ ;
      "ok"   => .t., ;
      "user" => { ;
         "id"       => Val(ctx_get("user_id", "0")), ;
         "username" => ctx_get("username", ""), ;
         "name"     => ctx_get("name", ""), ;
         "role"     => ctx_get("role", "user"), ;
         "lang"     => ctx_get("lang", "ko") ;
      } ;
   })
RETURN NIL