gra008 modification for Enterprise DB

I'm unsuccessfully trying to modify gra008 to work with our Enterprise database. 

I think the main problem is with my sSql select & set code:

  sSql = "Select * " & _
         "From POINT " & _
         "Where sProjectIDfield = gINTRules.EnterpriseCurrPrjID"
        
  Set snPointIDs = gINTRules.CurrentProject.OpenRecordset(sSql, dbOpenSnapshot)

I get nothing returned for snPointIDs. 

If i leave off the "where..." then the 1st project in the DB is used (followed by all the others)

any pointers would be greatly appreciated.

Thanks