I need a little help with creating Index's in a Visual
FoxPro program. I can't seem to get the right index
open with the .dbf table I want to seek on. In the
following example, the SYS commands show:
SYS(21) 1
SYS(22) TK1
Instead of MCODES.
What am I doing wrong? Help....

Example of code:
USE PRCODES IN A
INDEX ON PRCODES.CODETYPE + PRCODES.STUBDESC TO MCODES
USE PUNCH IN D
USE TK001 IN C
INDEX ON TK001.U_ENO + TK001.U_COM + TK001.U_CODE TO TK1

SELECT D
SCAN
DO ADDREG
ENDSCAN

PROCEDURE ADDREG
SELECT A
? SYS(21)
? SYS(22)
IF SEEK("E" + D.DESC)
SELECT C
IF SEEK(

ENDIF
ENDIF
ENDPROC