1000 THEN nIndex := 1; END_IF ]]>