How to Create a Table that Has Many Fields of Identical Size (139527)

The information in this article applies to:

Microsoft Visual FoxPro for Windows 3.0

This article was previously published under Q139527

SUMMARY

Creating tables that contain many fields can be time consuming, especially if all the fields have the same type and size. With a few lines of code, the table can be created easily.

MORE INFORMATION

The following program creates a table called newtable that has 200 fields, each defined as a character field of size 20:

   lnTblstr="("
   FOR lnI=1 to 200
     lnTblstr=lnTblstr+"FLD"+ALLTRIM(STR(lnI))+" C(20),"
   ENDFOR
   lnTblstr=STUFF(lnTblstr,LEN(lnTblstr),1,")")
   CREATE TABLE newtable FREE &lnTblstr

Modification Type:	Major	Last Reviewed:	2/10/2000
Keywords:	kbcode KB139527