die "access denied"
unless ( $FS::CurrentUser::CurrentUser->access_right('List customers') &&
$FS::CurrentUser::CurrentUser->access_right('List packages')
die "access denied"
unless ( $FS::CurrentUser::CurrentUser->access_right('List customers') &&
$FS::CurrentUser::CurrentUser->access_right('List packages')