Compile function SRP_Logon(@Service, @Params) /************************************************************************************************ This program is proprietary and is not to be used by or disclosed to others, nor is it to be copied without written permission from SRP Computer Solutions, Inc. Name : SRP_Logon Description : Service module for the SRP_Logon system. Parameters: Service [IN] - The service to execute Params [IN] - Service specific parameters History (Date, Initials, Notes) 06/18/20 KRF Original programmer ************************************************************************************************/ #pragma precomp SRP_PreCompiler $insert LOGICAL Declare function SRPLogonAPI_ValidateUser, SRPLogonAPI_GetADGroups, SRPLogonAPI_GetError GoToService Return Response or "" //----------------------------------------------------------------------------- // SERVICES //----------------------------------------------------------------------------- Service ValidateUser(Username, Password, Domain) Response = SRPLogonAPI_ValidateUser(Username, Password, Domain) End Service Service GetADGroups(AdName, DcName) Response = SRPLogonAPI_GetADGroups(AdName, DcName) End Service Service GetError() Response = SRPLogonAPI_GetError() End Service