Article ID: 196025
Article Last Modified on 5/12/2003
TAG([CDXFileName,] nTagNumber [, nWorkArea | cTableAlias])
DESCENDING([CDXFileName,] nIndexNumber [, nWorkArea | cTableAlias])
TAG([CDXFileName[, nTagNumber [, nWorkArea | cTableAlias]]])
DESCENDING([CDXFileName[, nIndexNumber [, nWorkArea | cTableAlias]]])
CLEAR
CLOSE ALL
?"Return values with no open Tables:"
DO TagInfo
CREATE DATABASE MyDbc
CREATE TABLE MyTbl (Fld1 C(7) PRIMARY KEY, Fld2 C(4))
INSERT INTO MyTbl VALUES("111-111","AAAA")
INSERT INTO MyTbl VALUES("111-112","BBBB")
INSERT INTO MyTbl VALUES("111-113","CCCC")
?"Return values with no controlling Index:"
OPEN DATABASE MyDbc
USE MyTbl
DO TagInfo
?"Return values with controlling Index:"
SET ORDER TO Fld1 DESCENDING
DO TagInfo
PROCEDURE TagInfo
?TAG()
?DESCENDING()
Keywords: kbbug kbxbase kbdatabase kbdocerr kbcode KB196025