ADD TABLE "WebState"
  AREA "Schema Area"
  LABEL "WebState"
  DESCRIPTION "Used to store session information about a web based log in."
  DUMP-NAME "webstate"

ADD FIELD "SessionID" OF "WebState" AS character 
  FORMAT "x(8)"
  INITIAL ""
  LABEL "SessionID"
  POSITION 2
  SQL-WIDTH 16
  COLUMN-LABEL "SessionID"
  ORDER 10

ADD FIELD "Category" OF "WebState" AS character 
  FORMAT "x(8)"
  INITIAL ""
  LABEL "Category"
  POSITION 3
  SQL-WIDTH 16
  COLUMN-LABEL "Category"
  ORDER 20

ADD FIELD "Name" OF "WebState" AS character 
  FORMAT "x(8)"
  INITIAL ""
  LABEL "Name"
  POSITION 4
  SQL-WIDTH 16
  COLUMN-LABEL "Name"
  ORDER 30

ADD FIELD "Data" OF "WebState" AS character 
  FORMAT "x(8)"
  INITIAL ""
  LABEL "Data"
  POSITION 5
  SQL-WIDTH 16
  COLUMN-LABEL "Data"
  ORDER 40

ADD INDEX "pukey" ON "WebState" 
  AREA "Schema Area"
  UNIQUE
  PRIMARY
  INDEX-FIELD "SessionID" ASCENDING 
  INDEX-FIELD "Category" ASCENDING 
  INDEX-FIELD "Name" ASCENDING 

ADD INDEX "key1" ON "WebState" 
  AREA "Schema Area"
  INDEX-FIELD "SessionID" ASCENDING 

.
PSC
cpstream=ISO8859-1
.
0000001064