Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

Code Block
/* Creates a Linear Hash table, CONTACTS,  
at the location defined by the volume pointer name MY_DATA on the CUSTOMERS database. 
The table attributes are set to an estimated 1,000 rows, an average row size of 400 bytes, 
an estimated 25 columns, a framesize of 1,024 bytes, and a resize threshold of 80 percent. */
Declare Subroutine Create_Table
AttribList = "1000,400,25,1024,80"
Convert "," to @FM in AttribList
Create_Table ("MY_DATA", "CONTACTS", "", "CUSTOMERS", AttribList, "")