ADD TABLE "Note"
  AREA "Schema Area"
  LABEL "Note"
  DUMP-NAME "note"

ADD FIELD "NoteSeq" OF "Note" AS character 
  FORMAT "x(8)"
  INITIAL ""
  LABEL "NoteSeq"
  POSITION 3
  SQL-WIDTH 16
  COLUMN-LABEL "NoteSeq"
  ORDER 10

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

ADD FIELD "Active" OF "Note" AS logical 
  FORMAT "yes/no"
  INITIAL "no"
  LABEL "Active"
  POSITION 5
  SQL-WIDTH 1
  COLUMN-LABEL "Active"
  ORDER 40

ADD FIELD "NoteType" OF "Note" AS character 
  FORMAT "x(8)"
  INITIAL ""
  LABEL "NoteType"
  POSITION 6
  SQL-WIDTH 16
  COLUMN-LABEL "NoteType"
  ORDER 20

ADD FIELD "CreateTime" OF "Note" AS integer 
  FORMAT "->,>>>,>>9"
  INITIAL "0"
  LABEL "CreateTime"
  POSITION 7
  SQL-WIDTH 4
  COLUMN-LABEL "CreateTime"
  ORDER 60

ADD FIELD "CreateDate" OF "Note" AS date 
  FORMAT "99/99/99"
  INITIAL ?
  LABEL "CreateDate"
  POSITION 8
  SQL-WIDTH 4
  COLUMN-LABEL "CreateDate"
  ORDER 50

ADD INDEX "pukey" ON "Note" 
  AREA "Schema Area"
  UNIQUE
  PRIMARY
  INDEX-FIELD "NoteSeq" ASCENDING 

.
PSC
cpstream=ISO8859-1
.
0000001139