I have a procedure that loops through the tags on a file and determines which (if any) are the primary key. It's always worked without a problem (I believe it's even stolern from the Help). It has recently returned .F. regardless of what is declared in the dbf. When I set the tag to Regular, saved, then set back to Primary, it began working again.

Any insights?

jt

*-- simple code to show primary key
lcPrimeTag = ''
FOR lnCount = 1 TO 254
IF !EMPTY(TAG(lnCount)) && Checks for tags in the index
IF PRIMARY(lnCount)
lcPrimeTag = TAG(lnCount)
EXIT && Primary tag found
ENDIF
ELSE
EXIT && Exit the loop when no more tags are found
ENDIF
ENDFOR
? 'Primary Tag: '+lcPrimeTag