pAlpha.access('read',F:pAlpha.documents(P)) <- pAlpha.team(P)
 pAlpha.documents('proj1') <- 'file//fileA'
 pAlpha.team('proj1') <- pBob
 pAlpha.team('proj2') <- pJoe