ADD TABLE "SecUser"
  AREA "Schema Area"
  LABEL "SecUser"
  DESCRIPTION "Security information for a system user"
  DUMP-NAME "secuser"

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

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

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

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

ADD FIELD "SecProfileID" OF "SecUser" AS character 
  FORMAT "x(8)"
  INITIAL ""
  LABEL "SecProfileID"
  POSITION 6
  SQL-WIDTH 16
  COLUMN-LABEL "SecProfileID"
  ORDER 50

ADD INDEX "key1" ON "SecUser" 
  AREA "Schema Area"
  UNIQUE
  PRIMARY
  INDEX-FIELD "SecUserID" ASCENDING 

ADD INDEX "key2" ON "SecUser" 
  AREA "Schema Area"
  INDEX-FIELD "PersonID" ASCENDING 

ADD INDEX "key3" ON "SecUser" 
  AREA "Schema Area"
  INDEX-FIELD "SecProfileID" ASCENDING 

.
PSC
cpstream=ISO8859-1
.
0000001246