Forum Post: RE: help - user can't release Journal Transaction

Hi Rodi,

       StrSql = "Select * from  vs_usergrp where userid = " & SParm(Trim(bpes.UserId)) & " and GroupId ='XXX'"

       intRet = SqlFetch1(CsrTmp, StrSql, bUserGrp)

       Call SqlFree(CsrTmp)

       If Trim(bUserGrp.UserId) = "XXX"  and Trim(bUserGrp.UserId)  = "XXX" Then

       Else

           Call MessBox("Your not authorised user", MB_ICONINFORMATION, STRCPNYID)

           Exit Sub

       End If

Thanks,