DDATABASEE {db-name ‘ "db-name"} [WITHOUT NULL INPUT] DSCREENE [ SIZE lines [BY columns] ] ƒ‘ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ’ D{E ƒšSQL άλςαξξωε ζοςνωƒš Πεςχαρ στςαξιγα όλςαξξοκ ζοςνω …ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹…Ž . . . ƒš2 στςαξιγω*66 στςολιƒš D}E ƒš ζακμ DhsperE ƒš DSCREENE [ SIZE lines [BY columns] ] ƒ“ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ” D{E Χτοςαρ στςαξιγα όλςαξξοκ ζοςνω ι τ.δ., ξο ξε βομεε 20 στςαξιγ . . . Τελστ . . . D[fieldtag ]E . . . fieldtag - σμοχο ιϊ βυλχ, γιζς ι ϊξαλοχ _ ξαώιξαΰύεεσρ σ βυλχω, ξε δμιξξεε 50 σινχομοχ . . . Ηςαζιώεσλιε σινχομω δμρ ςισοχαξιρ ςανολ: \gp-------q\g \g‘\g \g‘\g \gb-------d\g D}E DTABLESE # Οτλςωχατψ ξε βομεε 12 ταβμιγ ! [tab-alias=[owner.]] table ... DATTRIBUTESE fieldtag = [table.]column [,σπισολ ατςιβυτοχ] ; fieldtag=column[n1,n2]; - πολαϊωχατψ τομψλο ώαστψ σινχομψξοηο στομβγα . . . fieldtag=DISPLAYONLY [ALLOWING INPUT] TYPE datatype [NOT NULL][,attr]; # datatype - μΰβοκ, λςονε SERIAL δμρ πομεκ ALLOWING INPUT σοϊδαετσρ ζιλτιχξαρ ταβμιγα displaytable ι ποδσταχμρετσρ χ λοξεγ σπισλα ταβμιγ DΣοεδιξεξιεE: # [*]- υλαϊωχαετ ξα ημαχξωκ στομβεγ δμρ # verifing joining fieldtag=[*]column1 [,σπισολ ατςιβυτοχ1];=column2 [,σπισολ ατςιβυτοχ2]; DιμιE fieldtag=[*]column1 = column2 [,σπισολ ατςιβυτοχ] ; . . . DΧοϊνοφξωε αττςιβυτω:E AUTONEXT COMMENTS = "Στςολα λοννεξταςιρ" NOENTRY NOUPDATE QUERYCLEAR οώιύατψ joining πομε πεςεδ ϊαπςοσον REQUIRED VERIFY τςεβοχατψ ποδτχεςφδεξιρ DEFAULT = "CA" INCLUDE = ("CA", "OR", 1 to 50, 87,90) LOOKUP Δοπομξιτεμψξαρ σπςαχλα πςι ϊαπςοσε χ fieldtag1 fieldtag =table1.col, LOOKUP [fieldtag1=table2.col1 [,fieldtag2=table2.col2 ,...] ] JOINING [*]table2.col FORMAT = "mm/dd/yyyy" δμρ δατ FORMAT = "####.#####" δμρ ώισεμ PICTURE = "τεμ.A##-#-###(XX)" A-βυλχα,#-γιζςα,X-σινχομ WORDWRAP [COMPRESS] πομε ςασπομοφεξο χ ξεσλομψλιθ στςολαθ ZEROFILL RIGHT πςαχουσταξοχμεξξοε πομε UPSHIFT DOWNSHIFT REVERSE ξεηατιχ COLOR =[γχετ] [ιξτεξσιχξ] . . . [WHERE υσμοχιρ1] [,COLOR =[γχετ2] [ιξτεξσιχξ2] . . . WHERE υσμοχιρ2] γχετ: ιξτεξσιχξοστψ: WHITE CYAN DreverseE underline YELLOW MAGENTA RED  blink left  GREEN BLUE BLACK  [ DINSTRUCTIONSE Σοχνεστξοε σοεδιξεξιε. [COMPOSITES [*] . . .] [DELIMITERS "ab" # πο υνομώαξιΰ "ab"="[]" [table1 MASTER table2] # Ποςρδολ αλτιχιϊαγιι ταβμιγ. [table2 MASTER table3] # Νοφξο table1=table3.  . . . DΛοξτςομψξωε βμολι BEFORE, AFTERE ισπομψϊυΰτσρ δμρ: Δχιφεξιρ λυςσοςα Πςοχεςλι χχοδινωθ ϊξαώεξικ Χωώισμεξιρ ι ιϊνεξεξιρ ϊξαώεξιρ πομεκ {BEFORE ‘ AFTER } {[EDITADD] [EDITUPDATE]} OF table/col-list οπεςαγιρ . . . { AFTER | BEFORE } [ADD] [UPDATE] [QUERY] [REMOVE] [DISPLAY] OF table1 οπεςαγιρ . . . . . . Χιδω οπεςαγικ: COMMENTS [BELL] [REVERSE] "Λοννεξταςικ" ABORT πςεςχατψ λοξτςομψξωκ βμολ NEXTFIELD = {fieldtag ‘ EXITNOW} πεςεχεστι λυςσος IF ... THEN ... ELSE ... LET fieldtag= χωςαφεξιε χ χωςαφεξιε χλμΰώαΰτσρ αλτιχξωε ινεξα fieldtag, ξο ξε column ! Νοφξο ισπομψϊοχατψ ζυξλγιι: TOTAL OF fieldtag, COUNT OF fieldtag, AVERAGE OF fieldtag, MAX OF fieldtag, MIN OF fieldtag, TODAY, CURRENT οπεςαγιι +,-,*,/ , () [ DENDE ] ολοξώαξιε ιξστςυλγικ