I just tried recompiling - it didn't seem to change anything. Here's the entire code from CheckModifier.prg:


parameters ModifierToCheck, lnCodeVal

return .t. && ADDED THIS FOR TESTING

local lnExcludeCount, lnRangeCount, lnAnyRules

select coderule

count to lnAnyRules for ;
coderule.modifier == ModifierToCheck

if lnAnyRules = 0 && There are no rules for this modifer
return .t. && Okay to use this modifier on this code
endif

count to lnExcludeCount for ;
coderule.modifier == ModifierToCheck .and. ;
(lnCodeVal < val(coderule.BegCode) .or. ;
lnCodeVal > val(coderule.EndCode)) .and. ;
!coderule.exclude

count to lnRangeCount for ;
coderule.modifier == ModifierToCheck .and. ;
lnCodeVal >= val(coderule.BegCode) .and. ;
lnCodeVal <= val(coderule.EndCode) .and. ;
coderule.exclude

** Here we return .f. to indicate that this modifier should not be
** used on the lnCodeVal selected - or a .t. to say it can be used

return iif(lnExcludeCount > 0 .or. lnRangeCount > 0, .f., .t.)

Thanks for your help...