@      ̡G
E-mail    Gtjm@royals.ee.nctu.edu.tw

   XGТX
  t ΡGʤѤξ_~
  y GDBASE (CLIPPER 5.01 + rtlink)
D{W١GMAIN.PRG,MAIN1.PRG
wqɦW١GMAIN.DEF
ɦW١GMAIN.DSP
LɦW١GMAIN.PRT

---------------------------- w MAIN ----------------------------------------
򥻰tơG
    ơ@~tΡGMS-DOS 3.3HWC
    ƢqءG80286HWC
    ƣOG346K byte HWǲΰOA̦nEMS iH[t{C
              3.57{iHiJO@ҦAiHϥΤpǲΰOC
    ƤϺоGOxsƮwjpөwAD{ݭn400KkŶC
    ƥùGαm⪺ùҥiC
    ƦƹG䴩C
    ƧLGtΥiH䴩ҥiC
    ƨƾھGHayseۮeƾھ]۰ʼɨϥΡ^C

wˡG
    ơwФdosUإߤ@ؿ]ۦW^C
    ƢϤJnоC
    ƣNϤҦɮcopywЪӦؿAYiC

---------------------------- 3.60 NEW FUNCTION -------------------------------
ץpɿJ~A勵έpҦp~tAܦCLyyקACn
ܦCLءC
---------------------------- ϥΤk ----------------------------------------
 zwwwwwwww{
 x    򥻾ާ@    x
 |wwwwwwww}

 iJ BIG-5 Xҡ]ҦpGʤѩξ_~BB^
 iJ DB_COWORKER

  ib DOS JjG

   main <parm1> <parm2> <parm3> <parm4> <//F:nn>}GiJDB_COWORKER

   ơ²ϥήɤݭnJѼơADB-COWORKERۤv|ϥΤwѼơC
   Ƣ<parm1>G]wwqɦWAtΤwuMAIN.DEFvApnۦ]wP
              wqɦWANХ[J@ѼơC
   Ƣ<parm2>G]wpwqɦWAtΤwuMAIN.RELvApnۦ]w
              PpwqɦWANХ[J@ѼơCL@Ѽƥb
              Ƥ@]ۭqwqɦW^sbU~ॿTQŪC
   ƣ<parm3>G]wforeign keyΡApɦsbɡAѼƳ]w@ӹB⦡A
              ΩJˬdJƦbpɤSƩΪ̤sb
              ΡC@gkpUG

              main main.def main.rel x1p1+x1p2

              䤤x1p1Mx1p2UۥNJeĤ@Ĥ@MĤGܼơC
              Yx᭱NJeơAp᭱NJeJܼ
              ǡC

              tΦbOJAUN|ˬdux1p1+x1p2vȬO_bp
              sbέƪ{HC

              ѼƭY]wAtαN|ˬdforeign keyƻPsb
              pC

   Ƥ<parm4>GѼƻPѼƤTAѼƳ]wforeign keyˬdX
              pɡAtαNpƮwĴX}lLX|쪺e
              HѿJѦҿܥΡC

              ҦpG main main.def main.rel x1p1+x1p2 6

              hƱpoͮɡAh|pɪwqɤ6_LX
              ȡA`@LX6B7B8B9CS]wɨtΤwĤG
              }lLC

   ƥ <parm5>GѼƥΨӫwyɪɦWC

   Ʀ <//F:nn>Gnn N̦h}ɮ׼ƥءAtΤwO 14 ӡC {үP
                }Ҫ̦hɮ׼ơAOѦѼƩMconfig.sysfilesѼƪp
                ȨMwC

 Х\ ]oΡ^

            GWBUʡC
   PgUpBPgDn   GeܤWBU@
   Home         GвܲĤ@
   End          Gв̫ܳ@

 Х\

            GPJ
            GbP@줤BkʡC
   PgUpBPgDn   GPJe]Ū^
   Home         Gвܦ歺
   End          Gвܦr̫
   Ins          GNJA

   Enter        GԬݩΤ@J
   F1           GܥD\Wﶵ


 \ܪ ww F1

    PgUp/PgDn Home/EndGʴ
   Enter  HotKeyG
   Alt + HotKey   GܤUԦM
   EscG
   Alt+D\jgriJD\ﶵC
   UԦ\峡\ѻAӥk䪺^W\
      धHot Key]iߧYsΦ@\^C

h  p\GΨӱNlƮwPƮwƥάY@ȳsCpwq
              ]MAIN.RELΰѼƤG^sb{檺ؿɡAeU|X{
              ip\ҥΡjrˡAܦƮwPpwqɤҩwq
              ƮwإpC
۰ʼ\Gi1B2B3...Xmodem]ƾھ^۰ʼA
                0qƾھnAF
                1wqɤĤ@ӹqܸX
                2wqɤĤGӹqܸX
                lC
                b3.57A]niJO@ҦYA\C

 } DB_COWORKER

   Esc  }   Y  }

 _{kGALT-C A N

 Bz  GYƿäpХҢݢUAJ DEL *.NTXAAsiJC

 `@  N  GnNDBASEJΧƮwɡC


 zwwwwwwww{
 x    \श    x
 |wwwwwwww}

ơFileGUئӸɪBz

       iiiiiiiiiii
       izwwwwwww{i
       ix}     Alt-Ixi
       ix              xi
       ixد Ctl-Nxi
       ix              xi
       ixƭ    X xi
       ix              xi
       ixXɮ      xi
       ix              xi
       ixקﵲc      xi
       ix              xi
       ixƻsɮ      xi
       i|wwwwwww}i
       iiiiiiiiiii

 }      Gs}t@ӷswqɡABzt@ӸƮwC

 د  Gɶñɡ]qBBΥdbaseJ^AدޡC

 ƭ  GƯuMC

 Xɮ  GŪJsLɮתơAX֩󦹸ƮwC
               (Ū~Ѧ\)
               пJn[JɮצW              GJnX֪ɮצW
               пJw]SwNdťա^GJn
                                                     pGaddr='x_'C
               n[Jɮ׮榡                    GܿJɮ׮榡
               Ʈw                              G[JDbaseۮeƮwɮ
               r                              G[JDbaseiHŪJrɡA
                                                     pSDF榡Ar}榡....
               n[Jrɮ榡                   :ܤrɪJ榡
               ױƦn                       :SFD榡
               άYO}                     :pr....

 קﵲc  GƵc@pTקɡ]pmW[^Aiקwqɫ榹\C
       `N
         ܡuW١vN|Ϧ즳ƲMťաAnWeзVI

 ƻsɮ  :ƮwơAƻsLɮסC
              пJnXɮצW               GJnƻsɮצW
              пJw]SwNdťա^ GJn
                                                     paddr='x_'C
              nXɮ׮榡                     GܿXɮ׮榡
              Ʈw                               G[JDbaseۮeƮwɮ
              r                               G[JDbaseiHXrɡA
                                                     pSDF榡Ar}榡....
              nXrɮ榡                   GܤrɪX榡
              ױƦn                       GSFD榡
              άYO}                     Gpr....


ƢRecordGUئOBz

      iiiiiiiiiii
      izwwwwwww{i
      ix     Enterxi
      ixwwwwwwwxi
      ixֳtM    S xi
      ix              xi
      ixM          xi
      ix              xi
      ixSM      xi
      ix              xi
      ixMҦ Txi
      ixwwwwwwwxi
      ix        E xi
      ix              xi
      ixsק    M xi
      ix              xi
      ixW    [   Insxi
      ixwwwwwwwxi
      ix    ^    R xi
      ixR       Delxi
      i|wwwwwww}i
      iiiiiiiiiii

         GݦOԲӤe]榡pJ榡Awqɡ^

 ֳtM    GH{bƦCǡ]^DMC

 M        GHLƦCǡ]^DӴMC

 SM    GMSުơ]ݭnDbaseOAuʡ^A
                 pGaddr='x_' .and. sex='pj'C

 MҦGiMҦ
                 a.@MҦwuơC
                 b.έpMҦwƨòέpƶqC

         Gק惡ơC

 sק    Gק惡ΦHUơC

 W    [    GJơC

     ^    GϦ^QRơC

 R        GRơC

   ƭקμW[ɡAiInsJMNҦAôѥHU\G
     F2: oΡ]С^UƨsϡC
     F3: Oв{bsϤơC
     F4: NeҰOЪƫ{bsϤC
     F5: δ`ǴMkM{bҦbsۦPưOAñN
         ƫiJ@sC
     F8: ΨӱNyNରyCUN|ŪJϤr
         yNAΨӬdߤyɤơApGdAhNNXഫ
         yC
         yɡG@ӥ]tӤr줧ƮwAcodeNXA
                   contain ơCt~@ӻPy
                   PWA̷codeӱƧǪɦsb]{|۰ʲ͡^
                   CyɦWqshortkey.dbfAiROCĤ
                   ѼƤۭqɦWC

   F1: ĥΦhp[cɡABɲĤTѼƦ]wɡAtη|Dˬd
         pAo{DnpɤƻݭnקɡAiHF1iJק
         Dnpɡ]wqbpwqɤĤ@pɡ^ҦC

   W[ɥtS\
     F6: β{bƱƦCǡAMȻP{bҦbsۦP
         ưOAñNƫiJҦsC
     F7: NU@ƪeiJҦs]q`tXF6Ρ^C

ƣMoveGܳBz[

     iiiiiiiiiii
     izwwwwwww{i
     ixW @   PgUpxi
     ix              xi
     ixU @   PgDnxi
     ix              xi
     ix    e  Homexi
     ix              xi
     ix       Endxi
     ix              xi
     ixW @     xi
     ix              xi
     ixU @     xi
     i|wwwwwww}i
     iiiiiiiiiii


 W @   GW@

 U @   GU@

     e  G̫e@

       G̫᭱@

 W @   GW@

 U @   GU@

ƤSortGܱƦC覡

 ̷өwqɤҩwƧǤ覡Owq F2AF3AF4AF5AAF10
   вܩҿwƧǤ覡Aenter YiC

ƥPrintGCL\

    iiiiiiiiiii
    izwwwwwww{i
    ixҦCL      xi
    ix              xi
    ix[سCL  xi
    ix              xi
    ixCL      xi
    ix              xi
    ixHʦCL      xi
    ix              xi
    ixdCL      xi
    ix              xi
    ixܦCL      xi
    ixwwwwwwwxi
    ixCLѼƳ]w  xi
    ixwwwwwwwxi
    ixXG        xi
    ixҦG        xi
    ix_IG        xi
    ixơG        xi
    i|wwwwwww}i
    iiiiiiiiiii

 ҦCL    GLX

 [سCLGLX[س

 CL    GLX[س

 HʦCL    GLXH

 dCL    GLXJd

 ܦCL    G{ɿܭnCXAH@椧LسΦCLC
                 ЩJ榡J줤ܱzҭnCLA
                 J'*''+'ܭnCLC
                 J'*'Ť@AJ'+'ᤣŮC

 Y  GLɳ]wCƤj0]Yn^ɡA{bC
                 Le|nDϥΪ̿JYɡAiHC@Xe[J
                 ϥΪ̦ۭqYBCpGݭn]wYܡA
                 iHuEntervLC

                 Yɪ榡аѾ\@C

 CLѼƳ]wG]wX]ƤΦCLd

 iiiiiiiiiiiiiiiiiiiiiiiiiiiiiii
 izwwwwwwwwwwwwwwwwwwwwwwwwwww{i
 ixX]ơG    CLҦG    CL_IG    CLסG  xi
 ix                                                      xi
 ixڢޢ⢰      CL      ɮ׶}      CL    xi
 ix                                                      xi
 ixڢޢ⢱      ۦPL      Цm      uLo    xi
 ix                                                      xi
 ixԢ                    ŦXY    ѱzMw    xi
 ix                                                      xi
 ix                                                      xi
 i|wwwwwwwwwwwwwwwwwwwwwwwwwww}i
 iiiiiiiiiiiiiiiiiiiiiiiiiiiiiii

   X]  G]wX]
     ڢޢ⢰  GĤ@C]wȡ^
     ڢޢ⢱  GĤGC
     Ԣ  GXɮס]iAPE2קASⴤɥiΦ^

   CLҦ  G]wCLҦ
     CL  GCLXh
     ۦPL  GȬۦPƥuLXĤ@ApGۦP}C

   X]  G]wX]
     ɮ׶}  Gɮ׶}Y}lLC
     Цm  GѵoΡ]С^B}lLC]wȡ^
     ŦXYG
       ޼ҦGŦXSCL]LO޹Lơ^
                 @νdOѲĤ@ƶ}lAåi]wWUC
                 WU]wɵLҼ{ƤjpAunqXIYiC

       @ҦGŦXSCL]DbaseO^A
                 pGaddr='x_' .and. sex='pj'C
                 @νdOѵoΡ]С^B}l̫@ơC

   CL  G
     CL  GLXҦŦX󪺸ơC
     uLo  GuLoΡ]С^ҫơC
     ѱzMw  GѨϥΪ̿JCLơC

 X        GܩҿwX]ơC

 Ҧ        GܩҿwXҦC

 _I        GܩҿwX_IC

         GܩҿwXơC

ƦOtherGLBz

     iiiiiiiiiii
     izwwwwwww{i
     ixSBz      xi
     ix              xi
     ix[`P    xi
     ix              xi
     ix      xi
     ix              xi
     ix    p      xi
     ix              xi
     ixp Ctl-F10xi
     ix              xi
     i|wwwwwww}i
     iiiiiiiiiii

 SBz    G{bS@

 [`P  GBzY쪺[`P]pGp`HƤΥHơ^
   a.пJnBzGJn[`M쪺BC
                         p num+money*2
   b.пJw]SwNdťա^GJ]XG󪺤~Bz^C

     GBzӸƮwYSw쪺C]pG~+1^
   a.пJnBzGJnC
   b.пJnsơGJnơC
   c.пJw]SwNdťա^GJ]XG󪺤~^C

   2.,3.AODbaseykgJB⦡Cp dep='qt'

     p    GέpƤơ]O޹Lơ^C
                 CLɥiCTRL-PCLXCCLX]ƨCLѼƳ]wC

 p      GpƦrAtiF3NGsJȦsϡAF4XC

ƧQuit GhXC


------------------------ۦ]pƮwtΪk ------------------------------
 zwwwwwwww{
 x            x
 |wwwwwwww}

ơ{|ɮץiѭקGmain.defwq
                            main.dspܮ榡
                            main.prtC榡
                            main.relpwq
  iϥPE2BHErBznӭק惡|ɮסC

Ƣwqɤ]wƮw榡AåiקɻPCɨøƮwW١CקƮw
  cɥiקwqɡAAD\FileﶵUܡuקﵲcvYiC

ƣקܻPJ榡iקɡA䤤ťթΡu*vܶ}lBC

ƤקC榡iקCɡA䤤u*vC}lBAåiϥ
  pGsubstr(name,1,2)A@B⦡]XrҦ^C

ƥpɤwqƮwPpƮwYC

Ʀ|ɮ׳Ρu$vѥNAu$vҥ[r곣ѡC

ƧԲӭק覡аѦҫ媺СC


h   G {BzrBƦrBB޿ơACLɥu౵rκA
            ơA]s@CɮɽЦۦNƧκAରrκACwqɡB
            ɡBCɤjpiWL32768 bytesC

h  wqɼgkG

$򥻤WwqɡBɡBMLɳOFree Format 覡ѼgA
$ضiJNťաC
$ '$'Ÿ᭱rOAvTɮקtNC
$ 1.wqɦW
main.dsp
$ 2.wqLɦW
main.prt
$ 3.wqƮwɦW]{ݥئnƮwA|۰ʰͪŸƮw^
   MAIN.DBF
$4.Ʈwơ]@wngT^
7
$ƮwcAC ܦrκABN:ƦrκABD:κABL:޿κA
$bOK\઺Atη|W[TΨӰOקBɶP
$קH]|s@^
NAME C 8 0
SEX C 4 0
BIRTH C 8 0
TEL C 15 0
ADDR C 40 0
ttt  N 6 1   $ 6NƪסA1NpI
test C 5 0
$sW\Aimodem۰ʼ
$modem 
COM2   $ƾھҦbcom port
ATX3   $lƼƾھemX
ATDT   $emX
035    $aϰ츹X]|۰ʤϰ츹X^
1      $q
$qW
TEL

$5.wqɡ]{ݥئnɡA|۰ʰͯɡ^
 A.NTX    $ɦW
 name     $̷Ӥӱ
 mW     $Nq
 B.NTX
 sex
ʧO
C.NTX
   birth
             ͤ
D.NTX
     tel
             q
E.NTX
    addr
             }

h  ɼgk

$1.gXY
                         B        w  B  z  t   
$2.eX

 m  W ʧO Ʀr    q                                    }   

                                                                    

$3.wqCӪťճBLXơ]@wnPťհϪƥج۵^
NAME   $mW
SEX
ttt  $ռƦr
TEL
ADDR   $ }
$4.wqƿJ榡AĤ@q'======'ܿṳ̀WC
$  䤤'~~~~~~~'ܥHUOĤGJ榡C
$  ĤGq'======'wqA'*' ƿJ}lB
===================================================================





          iiiiiiiiiiiiiiiiiiiiiiiiiiiii
          iߢi
          im  W*                                         i
          ii
          i  *             q  *                 i
          ii
          i  *              test *                 i
          ii
          i  }*                                         i
          ii
          iiiiiiiiiiiiiiiiiiiiiiiiiiiii
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

          iiiiiiiiiiiiiiiiiiiiiiiiiiiii
          iߢi
          i  *                                         i
          iiiiiiiiiiiiiiiiiiiiiiiiiiiii
=======================================================================
$5.wqJơ]ѥWkUAP'*'ӼƬ۵^
name
sex
tel
birth
TTT
addr
test

h  Lɼgk

$1.wXɮתɦW]LX]ƿɮ׮ɥΡ^
main.out
$2.*********wqҦCLW***************************************
$   2.1 Cס]YJ0 h^
60
$   2.2 XӼҤñ
1
$   2.3 ҤZH
2
$   2.4 ҫZH
3
$   2.5 emX]XLΡ^
~x6l10g2
$   2.6 Ұ?
3
$   2.7 Ҥe?r
40
$   2.8 CҤe]ƭnP 2.6 wq@ˡ^
name+'   '+sex+''
chr(13)
addr
$3.*******************wqCLW**********************
$   3.1 Cס]YJ0 h^
60
$   3.2 emX
~x6l12g2  ~jfhsdkj
$   3.3 CƦX
2
$   3.4 Y
BͦC
$   3.5 W

 m  W ʧO     q                                    }   

$   3.6 ء]ƭnP 3.3 ҩwq@, '*'OCL}lB^
*       *   *       *               *                               
*                   *                                               
$   3.7 

$   3.8 ؤCLơ]ӼƭnP 3.6 '*'ӼƤ@ˡAťճB̦n[J
$                     space(n)񺡤AHDbLئCLɸƤi^
name
sex
BIRTH
TEL
ADDR
tel
addr
$4. *********************wqHʦCLW*******************
$   4.1 Cס]YJ0 h^
60
$   4.2 XӫHʨñ
3
$   4.3 HʤZH
2
$   4.4 HʫZH
1
$   4.5 emX
~x6l12g2
$   4.6 Hʰ?
4
$   4.7 Hʤe?r
40
$   4.8 CHʤe
name+'   '+sex+''
chr(13)
addr
tel
$5.*******************wqJdCLW**********
$   5.1 Cס]YJ0 h^
60
$   5.2 Xӥdñ
3
$   5.3 dZH
2
$   5.4 dZH
1
$   5.5 emX
~x6l12g2
$   5.6 Ұ?
4
$   5.7 de?r
40
$   5.8 Cde
name+'   '+sex+''
chr(13)
addr
tel
$

BzGYƿäpХҢݢUAJ DEL *.NTXAAsiJC
`@  NGnNDBASEJΧƮwɡC


h  pwqɼgk

$ɮשwqpɸ
$קO@ơ]קɭnO@lɪpA~|}aDɡ^
1
$pɼƥء]lɭnXӥDɫإp^
1
$pɩwqɦW]wqɤɦWOWAYtϺнsPؿW^
d:\tjm\add\main.def
$pȡ]lɥΤƻPDp^
name
$@ӯɬODޡH]Dɥέ@ӯɩMlp^
1
$XӭnQspH]ѤlɿJsƮɡAiݭnsDɡ^
2
$p@
name
$
name
$pG
remark
$
if(at('',add->remark)<>0,ADD->REMARK,''+ADD->REMARK)
wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww
 zwwwwwwwwww{
 x   \श   x
 |wwwwwwwwww}

\@GѸƮw@Υ\

\GGɮwUثO@AH@ƦwC

\TGOƭקɶC


@GYBɽd

$Y
3
$Y
zwwwwwswwwwwwswwwwwswwww{
x      x  test      x  mW    x  }  x
uwwwwwqwwwwwwqwwwwwqwwwwt


$
3
$
|wwwwwrwwwwwwrwwwwwrwwww}
նΫ
դ
