글로벌 스크립트 예제

다음 글로벌 스크립트는 현재 사용자가 지정된 그룹의 멤버인지 확인합니다. 사용자가 그룹에 속한 경우 후크는 True 값을 리턴합니다.

이 예제는 글로벌 스크립트를 작성하는 방법에 대한 일반적인 개념을 제공합니다. 가독성을 위해 예제에는 오류 검사가 포함되어 있지 않습니다. 데이터베이스에 레코드를 확약하기 전에 유효성 검증 API의 리턴값을 확인하여 오류가 없는지 확인하십시오.

VBScript

Function IsInGroup(groupname)

    ' groupName As String

    ' IsInGroup As Bool

    Set curSession = GetSession

    groupList = curSession.GetUserGroups

    IsInGroup = False

    For Each group in groupList

      If group = groupname Then

        IsInGroup = True

        Exit For

      End If 

    Next

End Function

Perl

sub IsInGroup { 

    my ($groupName) = @_;

    my ($curSession,

    $groupList,

    $isInGroup,

    $group,

    );


    $curSession = $entity->GetSession();

    $groupList = $curSession->GetUserGroups();

    $isInGroup = 0;



    foreach $group (@$groupList) {

      if ($group eq $groupName) {

         $isInGroup = 1;

         last;

      } 

    } 

    return $isInGroup;

} 

피드백