Œάλςαξξωε ζοςνω Informix-4GL.Œ DATABASE { db-name | FORMONLY } [WITHOUT NULL INPUT] SCREEN [ SIZE lines [BY columns] ] D{E . . . Τελστ . . . D[Efieldtag D]E fieldtag(νετλα πομρ)- σμοχο ιϊ βυλχ ι γιζς,ξαώιξαΰύεεσρ σ βυλχω . . . Ηςαζιώεσλιε σινχομω δμρ ςισοχαξιρ ςανολ: \gp-------q\g \g|\g \g|\g \gb-------d\g D}E TABLES # Οτλςωχατψ ξε βομεε 12 ταβμιγ! [tab-alias=[owner.]] table ... ATTRIBUTES fieldtag = { table.column | FORMONLY.field-name [TYPE [datatype [NOT NULL] | LIKE [table.]column]]} [attrbute-list] [=...][;][=...]; . . . datatype μΰβοκ λςονε SERIAL Χοϊνοφξωε αττςιβυτω: AUTONEXT COMMENTS = "Στςολα λοννεξταςιρ" NOENTRY REQUIRED VERIFY τςεβοχατψ ποδτχεςφδεξιρ DEFAULT = "CA" INCLUDE = ("CA","OR","NV","WA") INCLUDE = (1 to 50,87,90) DISPLAY LIKE table.column FORMAT = "mm/dd/yyyy" δμρ δατ FORMAT = "####.#####" δμρ ώισεμ PICTURE = "τεμ.A##-#-###(XX)" A-βυλχα,#-γιζςα,X-σινχομ WORDWRAP [COMPRESS] πομε ςασπομοφεξο χ ξεσλομψλιθ στςολαθ VALIDATE LIKE tbl.col UPSHIFT DOWNSHIFT REVERSE ξεηατιχ COLOR=[γχετ] [ιξτεξσ] ... [WHERE υσμοχιρ1 ξα fieldtag] [,COLOR=[γχετ2] [ιξτεξσ2] ... WHERE υσμοχιρ2 ξα fieldtag] γχετ: ιξτεξσιχξοστψ: WHITE CYAN DreverseE YELLOW MAGENTA RED  blink  GREEN BLUE BLACK  underline left [INSTRUCTIONS [DELIMITERS "ab"] # πο υνομώαξιΰ "ab"="[]" [SCREEN RECORD record-name [ D[n]E ] ( { table.* | table.col1 THRU table.col2 | table.column } [,...]) . . . ] [END]