Key Function |
Namespace: XSharp.VFP
FUNCTION Key( uIndex, uArea ) AS STRING CLIPPER
[ClipperCallingConventionAttribute(new string[] { ... })] public static string Key( Usual uIndex = default, Usual uArea = default )
1Close Databases 2Open Database (HOME(2) + 'Data\testdata') 3Use Customer // Open customer table 4Clear 5For nCount = 1 TO TAGCOUNT( ) 6IF !EMPTY(TAG(nCount)) // Checks for tags in the index 7? TAG(nCount) + ' ' // Display tag name 8?? KEY(nCount) // Display index expression 9ELSE 10EXIT // Exit the loop when no more tags are found 11ENDIF 12ENDFor