dccvalidator (version 0.3.0)

report_unsatisfied_requirements: Create a modal dialog if user is not in required team(s) or certified

Description

Takes the output from check_team_membership() and check_certified_user(). If the user is not in the required teams or certified, creates a modal dialog indicating which teams they need to belong to and how to request access.

Usage

report_unsatisfied_requirements(membership, certified, syn)

Arguments

membership

Output from check_team_membership()

certified

Output from check_certified_user()

syn

Synapse client object

Value

If user is not certified or in the required teams, a modal dialog describing which requirements are not met.

Examples

# NOT RUN {
syn <- synapse$Synapse()
syn$login()
user <- syn$getUserProfile("dcctravistest")
membership <- check_team_membership(
  teams = "3396691",
  user = user,
  syn = syn
 )
certified <- check_certified_user(user$ownerId, syn = syn)
report_unsatisfied_requirements(membership, certified, syn = syn)
# }