Ocenite etot tekst:Ne chital10987654321
SoderzhanieFine HTMLPrinted versiontxt(Word,KPK)Lib.ru html
4GL. Opisanie ekrannyh form

 DDATABASEE  {db-name

 DSCREENE   [ SIZE lines [BY columns] ]       ƒ‘ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ’
D{E                                           ƒšSQL   |krannye formyƒš
         Pervaya stranica ekrannoj formy     …ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹ƒ‹…Ž
                .  .  .                     ƒš2 stranicy*66 strokiƒš
D}E                                           ƒš    fajl   DhsperE    ƒš
 DSCREENE   [ SIZE lines [BY columns] ]       ƒ“ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ›ƒ”
D{E
        Vtoraya stranica ekrannoj formy
        i t.d., no ne bolee 20 stranic

. . . Tekst     . . .  D[fieldtag  ]E     . . .
fieldtag - slovo iz bukv, cifr i znakov _
nachinayushcheesya s bukvy, ne dlinnee 50 simvolov
                .  .  .
 Graficheskie simvoly dlya risovaniya ramok:
   \gp-------q\g
   \g‘\g       \g
   \gb-------d\g
D}E

 DTABLESE        # Otkryvat' ne bolee 12 tablic !
        [tab-alias=[owner.]] table   ...

 DATTRIBUTESE
fieldtag =  [table.]column  [,spisok atributov] ;
fieldtag=column[n1,n2]; - pokazyvat' tol'ko chast' simvol'nogo stolbca
 .  .  .
fieldtag=DISPLAYONLY [ALLOWING INPUT] TYPE datatype [NOT NULL][,attr];
                     # datatype   -  lyuboj, krome SERIAL
        dlya polej ALLOWING INPUT sozdaetsya fiktivnaya tablica displaytable i
        podstavlyaetsya v konec spiska tablic

        DSoedinenieE:     # [*]- ukazyvaet na glavnyj stolbec dlya
                        # verifing joining

fieldtag=[*]column1 [,spisok atributov1];=column2 [,spisok atributov2];
DiliE fieldtag=[*]column1 = column2 [,spisok atributov] ;
 .  .  .
   DVozmozhnye attributy:E

        AUTONEXT
        COMMENTS = "Stroka kommentariya"
        NOENTRY
            NOUPDATE
            QUERYCLEAR  ochishchat' joining pole pered zaprosom
        REQUIRED
        VERIFY          trebovat' podtverzhdeniya
        DEFAULT = "CA"
        INCLUDE = ("CA", "OR", 1 to 50, 87,90)
            LOOKUP      Dopolnitel'naya spravka pri zaprose v fieldtag1
           fieldtag =table1.col, LOOKUP [fieldtag1=table2.col1
           [,fieldtag2=table2.col2 ,...] ] JOINING [*]table2.col
        FORMAT = "mm/dd/yyyy"     dlya dat
        FORMAT = "####.#####"     dlya chisel
        PICTURE = "tel.A##-#-###(XX)"  A-bukva,#-cifra,X-simvol
        WORDWRAP [COMPRESS] pole raspolozheno v neskol'kih strokah
            ZEROFILL
            RIGHT       pravoustanovlennoe pole
        UPSHIFT
        DOWNSHIFT
        REVERSE         negativ
        COLOR =[cvet] [intensivn] . . . [WHERE usloviya1]
      [,COLOR =[cvet2] [intensivn2] . . . WHERE usloviya2]
               cvet:              intensivnost':
             WHITE CYAN         DreverseE   underline
         YELLOW MAGENTA RED      blink       left
          GREEN BLUE BLACK  

[ DINSTRUCTIONSE

        Sovmestnoe soedinenie.
[COMPOSITES 
         [*]
 .  .  .]

[DELIMITERS "ab"        #    po umolchaniyu "ab"="[]"

[table1 MASTER table2]  #    Poryadok aktivizacii tablic.
[table2 MASTER table3]  #        Mozhno table1=table3.   
 .  .  .

DKontrol'nye bloki BEFORE, AFTERE ispol'zuyutsya dlya:
        Dvizheniya kursora
        Proverki vvodimyh znachenij
        Vychisleniya i izmeneniya znacheniya polej

{BEFORE
        operaciya
         .  .  .
{ AFTER | BEFORE } [ADD] [UPDATE] [QUERY] [REMOVE] [DISPLAY] OF table1
        operaciya
         .  .  .
.  .  .
         Vidy operacij:

      COMMENTS [BELL] [REVERSE] "Kommentarij"
      ABORT     prervat' kontrol'nyj blok
      NEXTFIELD = {fieldtag
      IF ... THEN ... ELSE ...
      LET fieldtag= vyrazhenie
v vyrazhenie vklyuchayutsya aktivnye imena fieldtag, no ne column !
Mozhno ispol'zovat' funkcii:
TOTAL OF fieldtag, COUNT OF fieldtag, AVERAGE OF fieldtag,
MAX   OF fieldtag, MIN   OF fieldtag, TODAY, CURRENT
operacii +,-,*,/  , ()

[ DENDE ]    okonchanie instrukcij
Last-modified: Thu, 12 Feb 1998 08:48:23 GMT
Ocenite etot tekst:Ne chital10987654321