home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS 1
/
BBS#1.iso
/
document
/
rebus.arj
/
G8.DOC
< prev
next >
Wrap
Text File
|
1980-01-03
|
69KB
|
1,391 lines
â ï Ç é Ç 8
ÅàÉàòÄä ÄÆ æêæÆàî¢ îêèÉÄ - Éæ è æêæÆàîà Éàüôæ
ìáßΓ«∩Θá∩ ú½áóá ∩ó½∩ÑΓß∩ ¬αáΓ¬¿¼ απ¬«ó«ñßΓó«¼ ñ½∩ »α«úαá¼¼¿ßΓ«ó ¿½¿
»«½∞º«óáΓѽÑ⌐ ß¿ßΓѼδ î¿¬α« - Éæ, ªÑ½áεΘ¿σ πº¡áΓ∞ « í«½ÑÑ ¼«Θ¡«⌐ ß¿ßΓѼÑ
Éàüôæ. çñÑß∞ »α¿óÑñÑ¡δ «ß¡«ó¡δÑ αẽ¿τ¿∩ ß¿ßΓѼ. î¿¬α« - Éæ ∩ó½∩ÑΓß∩
»αÑñΦÑßΓóÑ¡¡¿µÑ⌐ ß¿ßΓѼδ Éàüôæ.
é ú½áóÑ »«¬áºá¡« ¬á¬ »«½∞º«óáΓ∞ß∩ »α«úαá¼¼«⌐ dCONVERT ñ½∩
»αÑ«íαẫóá¡¿∩ Σ«α¼áΓ«ó Σá⌐½«ó ß¿ßΓѼδ î¿¬α« - Éæ ó Σ«α¼áΓδ ß¿ßΓѼδ Éàüôæ.
é ß¿ßΓÑ¼Ñ Éàüôæ ¡Ñ½∞º∩ ¿ß»«½∞º«óáΓ∞ Σá⌐½δ ß¿ßΓѼδ î¿¬α« - Éæ íѺ
»αÑñóáα¿Γѽ∞¡«ú« »αÑ«íαẫóá¡¿∩ Σ«α¼áΓ«ó »α«úαá¼¼«⌐ dCONVERT.
é« ¿ºíÑªá¡¿Ñ ñπí½¿α«óá¡¿∩, ó φΓ«⌐ ú½áóÑ »«ñτÑભπΓδ Γ«½∞¬« ¿º¼Ñ¡Ñ¡¿∩,
á « ß«óÑαΦÑ¡¡« ¡«óδσ 󫺼«ª¡«ßΓ∩σ íπñÑΓ αáß߬áºá¡« ó ñαπú«⌐ ú½áóÑ. êº ¡ÑÑ
¼«ª¡« íπñÑΓ πº¡áΓ∞ « ¡«ó«¼ ¿¡ΓÑαΣÑ⌐ßÑ ß »«½∞º«óáΓѽѼ ó ¬«¼á¡ñáσ
»«½¡«φ¬αá¡¡«ú« αÑñá¬Γ¿α«óá¡¿∩, « ¡«óδσ 󫺼«ª¡«ßΓ∩σ ¿¡ΓÑαá¬Γ¿ó¡«⌐ «Γ½áñ¬¿ ¿
« ¼¡«ú¿σ ¡«óδσ ¬«¼á¡ñáσ ¿ Σπ¡¬µ¿∩σ ß¿ßΓѼδ Éàüôæ, á Γá¬ªÑ « ¡«óδσ ¬«¼á¡ñáσ
CREATE/MODIFY QUERY, CREATE/MODIFY VIEW ¿ CREATE/MODIFY SCREEN.
èÇè ÅÄï£çÄéÇÆ£æƒ ìÇæÆăÖàë âïÇéÄë
¥Γá ú½áóá αáºñÑ½Ñ¡á ¡á Γα¿ τáßΓ¿. é »Ñαó«⌐ τáßΓ¿ «»¿ßá¡δ ¡á¿í«½ÑÑ
º¡áτ¿Γѽ∞¡δÑ ¿º¼Ñ¡Ñ¡¿∩, »α«¿ºóÑñÑ¡¡δÑ ó ß¿ßΓÑ¼Ñ Éàüôæ, »« ßαáó¡Ñ¡¿ε ß
ß¿ßΓѼ«⌐ î¿¬α« - Éæ. é« óΓ«α«⌐ τáßΓ¿ ñáÑΓß∩ «íΩ∩ß¡Ñ¡¿Ñ ¬á¬ »«½∞º«óáΓ∞ß∩
»α«úαá¼¼«⌐ dCONVERT. é »«ß½Ññ¡Ñ⌐ τáßΓ¿ »ÑαÑτ¿ß½Ñ¡δ 󫺼«ª¡«ßΓ¿ ß¿ßΓѼδ
Éàüôæ, ¬«Γ«αδσ ¡ÑΓ ó ß¿ßΓÑ¼Ñ î¿¬α« - Éæ ¿ ¬«¼á¡ñδ î¿¬α« - Éæ, ¬«Γ«αδσ ¡ÑΓ ó
ß¿ßΓÑ¼Ñ Éàüôæ.
Äü êçîàìàìêƒò
Å«½∞º«óáΓѽ∩¼ ß¿ßΓѼδ î¿¬α« - Éæ ¼¡«ú«Ñ íπñÑΓ º¡á¬«¼« ó ß¿ßΓѼÑ
Éàüôæ. ü«½∞Φ¿¡ßΓó« ¬«¼á¡ñ î¿¬α« - Éæ αáí«ΓáεΓ Γ«τ¡« Γá¬ªÑ ó ß¿ßΓÑ¼Ñ Éàüôæ.
ü«½ÑÑ Γ«ú«, dCONVERT ¼¡«ú¿Ñ ¿º¼Ñ¡Ñ¡¿∩ «íαáí«ΓáÑΓ áóΓ«¼áΓ¿τÑ߬¿.
ê¼ÑÑΓß∩ Γα¿ Γ¿»á ¿º¼Ñ¡Ñ¡¿⌐ ¬«¼á¡ñ ¿ Σπ¡¬µ¿⌐ ó ß¿ßΓÑ¼Ñ Éàüôæ: ¡«óδÑ
¡áºóá¡¿∩ ¬«¼á¡ñ ¿ Σπ¡¬µ¿⌐, ¡«ó«Ñ ó αáí«ΓÑ ¡Ñ¬«Γ«αδσ ¬«¼á¡ñ ¿ Σπ¡¬µ¿⌐ ¿
¡Ñ¬«Γ«αδÑ πß«óÑαΦÑ¡ßΓó«óá¡¿∩, πóѽ¿τ¿óáεΘ¿Ñ ó«º¼«ª¡«ßΓ¿ »α«úαá¼¼. éßÑ φΓ¿
¿º¼Ñ¡Ñ¡¿∩ ñѽ὿ß∞ ñ½∩ Γ«ú«, τΓ«íδ ñ«ßΓ¿τ∞ ß½ÑñπεΘ¿σ µÑ½Ñ⌐: ºáßΓáó¿Γ∞
ß¿ßΓѼπ Éàüôæ αáí«ΓáΓ∞ íδßΓαÑÑ ¿ φΣΣÑ¬Γ¿ó¡ÑÑ τѼ î¿¬α« - Éæ,
ßΓá¡ñáαΓ¿º«óáΓ∞ αáí«Γ𠬫¼á¡ñ ¿ Σπ¡¬µ¿⌐ ¿ ßñѽáΓ∞ »α«úαá¼¼δ, ¡á»¿ßá¡¡δÑ ¡á
∩ºδ¬Ñ ß¿ßΓѼδ Éàüôæ í«½ÑÑ τ¿Γáíѽ∞¡δ¼¿.
ê¼ÑεΓ ¼ÑßΓ« ¿º¼Ñ¡Ñ¡¿∩ ó ßΓαπ¬ΓπαÑ Σá⌐½«ó íáºδ ñá¡¡δσ, ó ¬«½¿τÑßΓóÑ
Γ¿»«ó »«½Ñ⌐, á Γá¬ªÑ πóѽ¿τÑ¡¡á∩ ¼«Θ¡«ßΓ∞ »α«úαá¼¼. èα«¼Ñ Γ«ú«, ó ß¿ßΓѼÑ
Éàüôæ ¿¼ÑÑΓß∩ ú«αáºñ« í«½∞ΦÑ ¬«¼á¡ñ ¿ Σπ¡¬µ¿⌐, τѼ ó î¿¬α« - Éæ.
ìÄé¢à ìÇçéÇìêƒ
ìѬ«Γ«αδÑ ¿º ¬«¼á¡ñ ¿ Σπ¡¬µ¿⌐ î¿¬α« - Éæ ¿¼ÑεΓ ¡«óδÑ ¡áºóá¡¿∩.
ìá»α¿¼Ñα, »α«óÑα¬á πñá½Ñ¡á ºá»¿ß∞ ¿½¿ ¡ÑΓ ¡áºδóáÑΓß∩ ΓÑ»Ñα∞ DELETED ()
ó¼ÑßΓ« *. éßÑ Σπ¡¬µ¿¿ ß¿ßΓѼδ Éàüôæ ºá¬á¡τ¿óáεΓß∩ ñó«⌐¡δ¼¿ ߬«í¬á¼¿. çá¼Ñ¡π
φΓ¿σ ¿¼Ñ¡ »α«¿ºóÑñÑΓ »α«úαá¼¼á dCONVERT.
ìÄéÄà é ÉÇüÄÆà èÄîÇìä
ê¼ÑÑΓß∩ ¡Ñ߬«½∞¬« ñ«ú«ó«αÑ¡¡«ßΓÑ⌐ « αѺπ½∞ΓáΓáσ αáí«Γδ ¬«¼á¡ñ.
ìá»α¿¼Ñα, ó î¿¬α« - Éæ, ¬«úñá ¬«¼á¡ñá FIND ¡Ñ ¼«ªÑΓ «í¡áαπª¿Γ∞ Γ«, τΓ«
ΓαÑíπÑΓß∩, ¡«¼Ñα ºá»¿ß¿ πßΓá¡áó½¿óáÑΓß∩ αáó¡δ¼ ¡π½ε. é ß¿ßΓÑ¼Ñ Éàüôæ ó φΓ«¼
ß½πτáÑ ¡«¼Ñα ºá»¿ß¿ íπñÑΓ αáóÑ¡ τ¿ß½π ºá»¿ßÑ⌐ ó Σá⌐½Ñ íáºδ ñá¡¡δσ »½εß
«ñ¿¡, á αѺπ½∞ΓáΓ Σπ¡¬µ¿¿ ¬«¡Ñµ Σá⌐½á íπñÑΓ αáóÑ¡ ½«ú¿τÑ߬«¼π êæÆêìÇ. Æᬿ¼
«íαẫ¼ αѺπ½∞ΓáΓ ¬«¼á¡ñδ FIND íπñÑΓ ß«ó»áñáΓ∞ ß αѺπ½∞ΓáΓ«¼ ¬«¼á¡ñδ
LOCATE.
äαπú«⌐ ¡«óδ⌐ ¼«¼Ñ¡Γ ºá¬½ετáÑΓß∩ ó Γ«¼, τΓ« ß¿ßΓѼá Éàüôæ »« ñαπú«¼π
¿ß»«½∞ºπÑΓ Σπ¡¬µ¿ε "諡ѵ Σá⌐½á". Æá¬¿Ñ ¿º¼Ñ¡Ñ¡¿∩ ó ½«ú¿¬Ñ ¿½¿ ó
ñ«ú«ó«αÑ¡¡«ßΓ∩σ ¡Ñ ¼«úπΓ íδΓ∞ «í¡áαπªÑ¡δ »α«úαá¼¼«⌐ dCONVERT ¿ »«φΓ«¼π φΓ¿
»αÑ«íαẫóá¡¿∩ ¡Ñ«íσ«ñ¿¼« »α«¿ºó«ñ¿Γ∞ óαπτ¡πε.
ÉÇæÿêÉàìêà éÄçîÄåìÄæÆàë
Å«ß½Ññ¡¿⌐ Γ¿» ¿º¼Ñ¡Ñ¡¿⌐ ºá¬½ετáÑΓß∩ ó αáßΦ¿αÑ¡¿¿ ßπΘÑßΓóπεΘ¿σ
󫺼«ª¡«ßΓÑ⌐. ìá¿í«½ÑÑ «τÑó¿ñ¡δ φΓ¿ ¿º¼Ñ¡Ñ¡¿∩ ó «Γ¡«ΦÑ¡¿¿ «úαá¡¿τÑ¡¿⌐ ¡á
Σá⌐½δ ¿ »ÑαѼѡ¡δÑ. é «ñ¡«¼ Σá⌐½Ñ íáºδ ñá¡¡δσ ¼«ªÑΓ íδΓ∞ ñ« 128 »«½Ñ⌐, á
óαѼѡ¡δσ »ÑαѼѡ¡δσ ¼«ªÑΓ íδΓ∞ «ñ¡«óαѼѡ¡« 256. Åα«úαá¼¼á dCONVERT
»αÑñßΓáó½∩ÑΓ óßÑ ñ«»«½¡¿Γѽ∞¡δÑ ó«º¼«ª¡«ßΓ¿ óßѼ Γ¿»á¼ Σá⌐½«ó, ñ½∩ ¬«Γ«αδσ
«¡¿ ¿¼ÑεΓß∩.
èÄîÇìä¢ ÅÄïìÄ¥èÉÇììÄâÄ ÉàäÇèÆêÉÄéÇìêƒ
é ß¿ßΓÑ¼Ñ Éàüôæ ¿ß»«½∞ºπεΓß∩ óßÑ ñÑß∩Γ∞ Σπ¡¬µ¿«¡á½∞¡δσ ¬½ετÑ⌐ ¿ ¬½ετ¿
π»αáó½Ñ¡¿∩ ¬παß«α«¼ ñ½∩ »«½¡«φ¬αá¡¡«ú« αÑñá¬Γ¿α«óá¡¿∩. ê¼ÑÑΓß∩ Γá¬ªÑ ¡áí«α
¡«óδσ ¬«¼á¡ñ αÑñá¬Γ¿α«óá¡¿∩, Γᬿσ ¬á¬ <Ctrl>-<K><F> ñ½∩ »«¿ß¬á ßΓ᫬¿
ß¿¼ó«½«ó ¿ <Ctrl>-<K><B> ñ½∩ »ÑαÑΣ«α¼áΓ¿α«óá¡¿∩ »áαáúαáΣá. Åα¿ ªÑ½á¡¿¿
¼«ª¡« »«-»αѪ¡Ñ¼π »«½∞º«óáΓ∞ß∩ ¬«¼á¡ñἿ αÑñá¬Γ¿α«óá¡¿∩ î¿¬α« - Éæ.
ìÄé¢ë êìÆàÉöàëæ æ ÅÄï£çÄéÇÆàïàî
ìѬ«Γ«αδÑ ¬«¼á¡ñδ »«½¡«φ¬αá¡¡«ú« αÑñá¬Γ¿α«óá¡¿∩: Γá¬¿Ñ ¬á¬ ASSIST ¿
CREATE/MODIFY REPORT »« ¡«ó«¼π αáí«ΓáεΓ ß »«½∞º«óáΓѽѼ - ß »«¼«Θ∞ε ¼Ñ¡ε ¿
¿¡Σ«α¼áµ¿«¡¡δσ «í½áßΓÑ⌐ ¡á φ¬αá¡Ñ. Å«ñα«í¡ÑÑÑ « ¡¿σ íπñÑΓ αáß߬áºá¡« ó
ñαπú«⌐ ú½áóÑ.
ö Ç ë ï ¢ ü Ç ç ¢ ä Ç ì ì ¢ ò
æìêåàìêà ÄâÉÇìêùàìêë
é ß¿ßΓÑ¼Ñ Éàüôæ º¡áτ¿Γѽ∞¡« ß¡¿ªÑ¡δ «úαá¡¿τÑ¡¿∩ ñ½∩ Σá⌐½«ó íáºδ
ñá¡¡δσ. ì¿ªÑ »α¿óÑñÑ¡δ ßαáó¡¿Γѽ∞¡δÑ σáαá¬ΓÑα¿ßΓ¿¬¿.
î¿¬α« - Éæ Éàüôæ
諽¿τÑßΓó« »«½Ñ⌐ ó ºá»¿ß¿ 32 128
諽¿τÑßΓó« ß¿¼ó«½«ó ó ºá»¿ß¿ 1000 4000
諽¿τÑßΓó« ºá»¿ßÑ⌐ 65535 1000000000
ù¿ß½« «Γ¬αδΓδσ Σá⌐½«ó íáºδ
ñá¡¡δσ 2 10
Æ«τ¡«ßΓ∞ ó µ¿Σα«óδσ »«½∩σ 10 16
êîàìÇ ÅÄïàë
Åα¿Ñ¼½Ñ¼δÑ ß¿¼ó«½δ ñ½∩ ¿¼Ñ¡ »«½Ñ⌐ Σá⌐½«ó íáºδ ñá¡¡δσ «ßΓáεΓß∩
»αѪ¡¿¼¿, ¡« αáºñѽ¿ΓѽѼ ó¡πΓα¿ ¿¼Ñ¡¿ »«½∩ »« π¼«½τá¡¿ε ßΓá½ ß¿¼ó«½
»«ñτÑનóá¡¿∩ ó¼ÑßΓ« ñó«ÑΓ«τ¿∩. dCONVERT áóΓ«¼áΓ¿τÑ߬¿ ºá¼Ñ¡¿Γ ñó«ÑΓ«τ¿∩ ¡á
ß¿¼ó«½ »«ñτÑનóá¡¿∩ ¬á¬ ó ¬«¼á¡ñ¡δσ Σá⌐½áσ, Γᬠ¿ ó Σá⌐½áσ ñá¡¡δσ. Æá¬,
»«½Ñ Amount_due ó î¿¬α« - Éæ íπñÑΓ ¿¼ÑΓ∞ ó¿ñ Amount_due ó ß¿ßΓÑ¼Ñ Éàüôæ.
æÆÉôèÆôÉÇ öÇëïÄé üÇç¢ äÇìì¢ò
êº - ºá c¡¿ªÑ¡¿∩ «úαá¡¿τÑ¡¿⌐ ñ½∩ Σá⌐½«ó íáºδ ñá¡¡δσ, ß½ÑñπÑΓ
»αÑ«íαẫóáΓ∞ íáºδ ñá¡¡δσ î¿¬α« Éæ ó Σ«α¼áΓδ ß¿ßΓѼδ Éàüôæ. ¥Γ« ñѽáÑΓß∩
»α«úαá¼¼«⌐ dCONVERT áóΓ«¼áΓ¿τÑ߬¿. Åα¿ »«»δ⪥ ¿ß»«½∞º«óáΓ∞ Σá⌐½ î¿¬α« - Éæ
ó ß¿ßΓÑ¼Ñ Éàüôæ, íπñÑΓ óδñá¡« ß««íΘÑ¡¿Ñ "üáºá ñá¡¡δσ ¡Ñ «Γ¡«ß¿Γß∩ ¬ ß¿ßΓѼÑ
Éàüôæ".
ìÄîàÉ çÇÅêæê
Äñ¡«⌐ ¿º Σπ¡¬µ¿⌐, »«½πτ¿óΦ¿σ ¡«ó«Ñ ¡áºóá¡¿Ñ, ∩ó½∩ÑΓß∩ Σπ¡¬µ¿∩ "쫼Ñα
ºá»¿ß¿". é¼ÑßΓ« # «¡á ΓÑ»Ñα∞ ¡áºδóáÑΓß∩ RECNO (). ü½áú«ñáα∩ φΓ«¼π ¡Ñ íπñÑΓ
»α«¿ßσ«ñ¿Γ∞ »πΓá¡¿µδ ó ¬á¬¿σ ß½πτá∩σ º¡á¬ # «í«º¡áτáÑΓ Σπ¡¬µ¿ε, á ó ¬á¬¿σ
«»ÑαáΓ«α ¡ÑαáóÑ¡ßΓóá < >.
î¿¬α« - Éæ Éàüôæ
. USE Names <Ret> . USE Names <Ret>
. ? # <Ret> . ? RECNO() <Ret>
1 1
Åα¿ »αÑ«íαẫóá¡¿¿ »α«úαá¼¼ ß½ÑñπÑΓ »α«óÑα¿Γ∞ óßÑ ß½πτá¿
¿ß»«½∞º«óá¡¿∩ º¡á¬á # ó ¬áτÑßΓóÑ «»ÑαáΓ«αá ¡ÑαáóÑ¡ßΓóá. Åα«úαá¼¼á dCONVERT
ó ñ«ßΓáΓ«τ¡«⌐ ßΓѻѡ¿ αáß»«º¡áÑΓ αạ¿µπ ó ¿ß»«½∞º«óá¡¿¿ º¡á¬á # ó¬áτÑßΓóÑ
Σπ¡¬µ¿¿ ¿½¿ «»ÑαáΓ«αá ¡ÑαáóÑ¡ßΓóá, ¡« 󫺼«ª¡« ó ¡Ñ¬«Γ«αδσ ß½πτá∩σ φΓπ
ºá¼Ñ¡π »α¿ñÑΓß∩ ßñѽáΓ∞ óαπτ¡πε.
çÇÅêæê, ÅÄäïàåÇÖêà ôäÇïàìê₧
ï«ú¿τÑ߬á∩ »α«óÑα¬á ¡á½¿τ¿∩ «Γ¼ÑΓ¬¿ «í πñá½Ñ¡¿¿ ºá»¿ß¿ íδ½á ¿º¼Ñ¡Ñ¡á.
é¼ÑßΓ« º¡á¬á * ¿ß»«½∞ºπÑΓß∩ ß½«ó« DELETED (). ¥Γ« »αÑ«íαẫóá¡¿Ñ »α«úαá¼¼á
dCONVERT ñѽáÑΓ áóΓ«¼áΓ¿τÑ߬¿.
î¿¬α« - Éæ Éàüôæ
. DELETE <Ret> . DELETE <Ret>
00001 ºá»¿ßÑ⌐ ¿ß¬½ετÑ¡« 1 ºá»¿ßÑ⌐ πñá½Ñ¡«
. ? * <Ret> . ? DELETED() <Ret>
.T. .T.
èÄìàû öÇëïÇ
Åα«úαá¼¼á dCONVERT ºá¼Ñ¡¿Γ »α«óÑα¬π ¡á ¬«¡Ñµ Σá⌐½á ß EOF (). Æᬿ¼
«íαẫ¼ »«∩ó¿Γß∩ ß«ú½áß«óá¡¡«ßΓ∞ φΓ«⌐ Σπ¡¬µ¿¿ ß ñαπú¿¼¿, Γᬿ¼¿ ¬á¬ DATE ()
¿ RECNO ().
î¿¬α« - Éæ Éàüôæ
. GOTO BOTTOM <Ret> . GOTO BOTTOM <Ret>
. SKIP <Ret> . SKIP <Ret>
ºá»¿ß∞: 00006 ºá»¿ß∞ NO
. ? EOF <Ret> . ? EOF() <Ret>
.T. .T.
ÅàÉàòÄä è ÅÉàä¢äôÖàë çÇÅêæê é ÅÄïÄåàìêê ìÇùÇïÄ öÇëïÇ
Å« ¬«¼á¡ñÑ SKIP-1 π¬áºáΓѽ∞ ºá»¿ß¿ πßΓá¡áó½¿óáÑΓß∩ ¡á »αÑñδñπΘπε
ºá»¿ß∞. é î¿¬α« - Éæ »α¿ »«»δ⪥ »ÑαÑ⌐Γ¿ ¬ ºá»¿ß¿, ½ÑªáΘÑ⌐ »ÑαÑñ ¡áτὫ¼
Σá⌐½á, ΓѬπΘ¿⌐ ¡«¼Ñα ºá»¿ß¿ ßΓá¡ÑΓ αáó¡δ¼ 0. é ß¿ßΓÑ¼Ñ Éàüôæ »«∩ó¿½áß∞
¡«óá∩ Σπ¡¬µ¿∩ - ìáτὫ Σá⌐½á BOF (), ¿ «¡á óδñáÑΓ º¡áτÑ¡¿∩ êæÆêìÇ »α¿
»«»δ⪥ óδ»«½¡¿Γ∞ SKIP-1 ó »«½«ªÑ¡¿¿ "ìáτὫ Σá⌐½á".
î¿¬α« - Éæ Éàüôæ
. GOTO TOP <Ret> . GOTO TOP <Ret>
. ? # <Ret> . ? RECNO()
1 1
. SKIP -1 <Ret> . SKIP -1 <Ret>
. ? # <Ret> . ? RECNO()
0 1
. ? BOF() <Ret>
.T.
ì¿ªÑ »α¿óÑñÑ¡δ ñóá »α¿¼Ñαá »α«úαá¼¼δ ó î¿¬α« - Éæ ¿ ó ß¿ßΓÑ¼Ñ Éàüôæ,
¬«Γ«αδÑ »ÑαÑσ«ñ∩Γ ¬ »αÑñδñπΘÑ⌐ ºá»¿ß¿ ñ« ΓÑσ »«α, »«¬á ¡Ñ 󫺡¿¬¡ÑΓ πß½«ó¿Ñ
"ìáτὫ Σá⌐½á".
î¿¬α« - Éæ Éàüôæ
* BOF.PRG * BOF.PRG
SET TALK OFF SET TALK OFF
USE Names USE Names
GOTO BOTTOM GOTO BOTTOM
DO WHILE # <> 0 DO WHILE .NOT. BOF()4
DISPLAY DISPLAY
SKIP -1 SKIP -1
ENDDO ENDDO
é ßó∩º¿ ß ΓѼ, τΓ« ¡«¼Ñα ºá»¿ß¿ ó φΓ«⌐ ß¿Γπᵿ¿ ¡Ñ íπñÑΓ αáóÑ¡ 0,
ß½ÑñπÑΓ ¿º¼Ñ¡¿Γ∞ ½«ú¿¬π »α«úαá¼¼δ, ¬«Γ«αá∩ φëà ¼«¼Ñ¡Γ »αÑñ»«½áúáÑΓ.
Åα«úαá¼¼á dCONVERT Γá¬πε ºá¼Ñ¡π áóΓ«¼áΓ¿τÑ߬¿ ¡Ñ ñѽáÑΓ.
æ½ÑñπÑΓ »«¼¡¿Γ∞, τΓ« Σπ¡¬µ¿¿ BOF () ¿ EOF () φΓ« ¡Ñ Γ« ªÑ ßἫÑ, τΓ«
TOP ¿ BOTTOM íáºδ ñá¡¡δσ. Å«¡∩Γ¿∩ TOP ¿ BOTTOM «Γ¡«ß∩Γß∩ ¬ »Ñαó«⌐ ¿
»«ß½Ññ¡Ñ⌐ ºá»¿ß∩¼ ó íáºÑ ñá¡¡δσ ß««ΓóÑΓßΓóÑ¡¡«, á BOF () ¿ EOF () «Γ¡«ß∩Γß∩
ó ßó«ε «τÑαÑñ∞ ¬ ¡áτá½π Σá⌐½á ñ« »Ñαó«⌐ ºá»¿ß¿ ¿ ¬ ¬«¡µπ Σá⌐½á »«ß½Ñ
»«ß½Ññ¡Ñ⌐ ºá»¿ß¿.
ìÄé¢à ÆêÅ¢ ÅÄïàë
é ß¿ßΓÑ¼Ñ Éàüôæ »«∩󿽿ß∞ ñóá ¡«óδσ Γ¿»á »«½Ñ⌐ - »α¿¼Ñτá¡¿∩ ¿ ñáΓδ.
Å«½Ñ Γ¿»á »α¿¼Ñτá¡¿∩, φΓ« ß¿¼ó«½∞¡δ⌐ Σá⌐½ »ÑαѼѡ¡«⌐ ñ½¿¡δ, ß ¬«Γ«αδ¼
ß¿ßΓѼá Éàüôæ αáí«ΓáÑΓ »«τΓ¿ ¡Ñó¿ñ¿¼«, ¬á¬ ß Σá⌐½«¼ óΓ«α¿τ¡δ¼ »« «Γ¡«ΦÑ¡¿ε
¬ Σá⌐½π íáºδ ñá¡¡δσ. ÉáßΦ¿αÑ¡¿Ñ¼ Σá⌐½«ó »α¿¼Ñτá¡¿⌐ ∩ó½∩ÑΓß∩ .dbt.
Åαáó¿½∞¡δ⌐ ¡«¼Ñα ºá»¿ß¿ ¬á¬ ñ½∩ Σá⌐½á íáºδ ñá¡¡δσ, Γᬠ¿ ñ½∩ Σá⌐½á
»α¿¼Ñτá¡¿⌐ »«ññÑনóáÑΓß∩ ó¡πΓαÑ¡¡¿¼ π¬áºáΓѽѼ.
æ«ñÑন¼«Ñ «ñ¡«ú« »«½∩ »α¿¼Ñτá¡¿⌐ ¼«ªÑΓ ºá¡¿¼áΓ∞ ñ« 4000 íá⌐Γ, Ñß½¿
ñ½∩ Ñú« ß«ºñá¡¿∩ ¿ß»«½∞ºπÑΓß∩ ΓѬßΓ«óδ⌐ αÑñá¬Γ«α, óßΓα«Ñ¡¡δ⌐ ó ß¿ßΓѼπ
Éàüôæ, ¿½¿ «¡« ¼«ªÑΓ íδΓ∞ ¡Ñ«úαá¡¿τÑ¡¡δσ αẼÑα«ó, Ñß½¿ ¿ß»«½∞ºπÑΓß∩ ñαπú«⌐
ΓѬßΓ«óδ⌐ αÑñá¬Γ«α »áαá½Ñ½∞¡« ß ß¿ßΓѼ«⌐ Éàüôæ.
ä½∩ «»αÑñѽѡ¿∩ ΓѬßΓ«ó«ú« αÑñá¬Γ«αá, ¬«Γ«αδ⌐ íπñÑΓ ¿ß»«½∞º«óáΓ∞ß∩ »«
π¼«½τá¡¿ε, ß½ÑñπÑΓ π¬áºáΓ∞ Ñú« ó ߻ѵ¿á½∞¡«¼ Σá⌐½Ñ CONFIG. DB.
諼á¡ñδ APPEND ¿ EDIT αáí«ΓáεΓ ß »«½∩¼¿ »α¿¼Ñτá¡¿⌐ ¡Ñ Γá¬, ¬á¬ ß
ß¿¼ó«½∞¡δ¼¿ »«½∩¼¿.
é »α«µÑßßÑ αÑñá¬Γ¿α«óá¡¿∩ íáºδ ñá¡¡δσ, ó ß«ßΓáóÑ ¬«Γ«α«⌐ ¿¼ÑεΓß∩ »«½∩
»α¿¼Ñτá¡¿⌐, ¡á φ¬αá¡Ñ »«∩ó½∩ÑΓß∩ ß½«ó« MEMO ó ß««ΓóÑΓßΓóπεΘѼ »«½ε ¼ÑßΓÑ.
ôßΓá¡«ó¿ó ¬παß«α ¡á »«½Ñ »α¿¼Ñτá¡¿∩, ß½ÑñπÑΓ ¡áªáΓ∞ ¬½áó¿Φπ <Ctrl>-<PgDn>,
ó αѺπ½∞ΓáΓÑ τÑú« »«½∞º«óáΓѽ∞ óσ«ñ¿Γ ó« óßΓα«Ñ¡¡δ⌐ ó ß¿ßΓѼπ Éàüôæ
αÑñá¬Γ«α ¿ »«½πτáÑΓ ó«º¼«ª¡«ßΓ∞ ñ«íáó¿Γ∞ ¿½¿ «ΓαÑñá¬Γ¿α«óáΓ∞ ñá¡¡δÑ ó »«½Ñ
»α¿¼Ñτá¡¿∩. ìáªáΓ¿Ñ¼ ¬½áó¿Φ¿ <Ctrl>-<PgUp> «ΓαÑñá¬Γ¿α«óá¡¡«Ñ »«½Ñ
ºá»«¼¿¡áÑΓß∩. 諼á¡ñá DISPLAY ¿ REPORT »«ºó«½∩εΓ óδóÑßΓ¿ »«½∩ »α¿¼Ñτá¡¿⌐.
î¡«ú¿Ñ ¬«¼á¡ñδ, αáí«ΓáεΘ¿Ñ ß »«½∩¼¿ ß¿¼ó«½∞¡«ú« Γ¿»á ¿ ß óαѼѡ¡δ¼¿
»ÑαѼѡ¡δ¼¿, ¡Ñ αáí«ΓáεΓ ß »«½∩¼¿ »α¿¼Ñτá¡¿⌐. èα«¼Ñ Γ«ú«, ¡Ñ ßπΘÑßΓóπÑΓ
óαѼѡ¡δσ »ÑαѼѡ¡δσ Γ¿»á »α¿¼Ñτá¡¿Ñ. Å«½∩ »α¿¼Ñτá¡¿⌐ ¡Ñ½∞º∩ ¿ß»«½∞º«óáΓ∞
ñ½∩ ß«αΓ¿α«ó¬¿ ¿½¿ ¿¡ñѬ߿α«óá¡¿∩ »« ¡¿¼, á Γá¬ªÑ ñ½∩ »«¿ß¬á ó ¡¿σ
»«ñßΓ᫬¿ ¿½¿ ߵѻ½Ñ¡¿∩ ßΓ᫬. è φΓ¿¼ »«½∩¼ ¡ÑΓ ñ«ßΓπ»á ¬«¼á¡ñá¼ @... SAY
¿½¿ @... GET.
ì«óδ⌐ Γ¿» »«½∩ DATA ¿ß»«½∞ºπÑΓß∩ ñ½∩ Γ«ú«, τΓ«íδ σαá¡¿Γ∞ ñáΓπ ó Γᬫ¼
Σ«α¼áΓÑ, ß ¬«Γ«αδ¼ ¼«ª¡« »α«¿ºó«ñ¿Γ∞ αáßτÑΓδ ¿ ó Γ« ªÑ óαѼ∩, ¬«Γ«αδ⌐ ¼«ª¡«
ó«ß»α«¿ºó«ñ¿Γ∞ ó º¡á¬«¼«¼ ó¿ñÑ ¼¼/ññ/úú.
äáΓδ ó ß¿ßΓÑ¼Ñ Éàüôæ αáßß¼áΓα¿óáεΓß∩ ¬á¬ «ß«íδÑ τ¿ß½á. é ß¿ßΓѼπ
ñ«íáó½Ñ¡« ¡Ñ߬«½∞¬« Σπ¡¬µ¿⌐, ¬«Γ«αδÑ »«ºó«½∩εΓ »« - αạ«¼π óδó«ñ¿Γ∞ ñá¡¡δÑ
Γ¿»á DATA. ì¿ªÑ íπñÑΓ »«ñα«í¡« αáß߬áºá¡« « αáí«ΓÑ ß ñáΓἿ.
æÄòÉÇììÄæÆ£ æôÖàæÆéô₧Öêò öÇëïÄé
ü«½∞Φ¿¡ßΓó« ¬«¼á¡ñ î¿¬α« - Éæ »«ºó«½∩ÑΓ »ÑαѺỿßδóáΓ∞ ßπΘÑßΓóπεΘ¿Ñ
Σá⌐½δ. æ µÑ½∞ε »αÑñ«ΓóαáΘÑ¡¿∩ ß½πτá⌐¡«⌐ »«ατ¿ ó ß¿ßΓÑ¼Ñ Éàüôæ »«∩ó¿½áß∞
󫺼«ª¡«ßΓ∞ »αÑñπ»αѪñÑ¡¿∩ « ΓÑσ ß½πτá∩σ, ¬«úñá ¬á¬á∩ - Γ« ¬«¼á¡ñá »δΓáÑΓß∩
»ÑαѺỿßáΓ∞ Σá⌐½.
î¿¬α« - Éæ Éàüôæ
. USE Names <- . USE Names <-
. SORT ON Name TO Temp <- . SORT ON Name TO Temp <-
. USE Names <Ret> . USE Names <Ret>
. SORT ON Name TO Temp <Ret> . SORT ON Name TO Temp <Ret>
SORT ÄèÄìùàìÇ 100% ÄΓß«αΓ
6 ºá»¿ßÑ⌐ «Γß«αΓ¿α«óá¡«
. SORT ON Name TO Temp <- . SORT ON Name TO Temp
. SORT ON Name TO Temp <Ret> . SORT ON Name TO Temp
SORT COMPLETE öá⌐½ πªÑ ßπΘÑßΓ-Γ.
ÅÑαѺỿßδóáΓ∞ ? (Y/N)
é ßó∩º¿ ß ΓѼ, τΓ« φΓ« ß««íΘÑ¡¿Ñ »αÑαδóáÑΓ ¡«α¼á½∞¡«Ñ óδ»«½¡Ñ¡¿Ñ
»α«úαá¼¼δ, ¼«ª¡« Ñú« »«ñáó¿Γ∞, ñ«íáó¿ó ¬«¼á¡ñπ SET SAFETY OFF ó «í½áßΓ∞
πßΓá¡«ó¬¿ »áαá¼ÑΓα«ó ó »α«úαá¼¼Ñ »«½∞º«óáΓѽ∩.
æÄÉÆêÉÄéèÇ çÇÅêæàë
諼á¡ñá SORT ó ß¿ßΓÑ¼Ñ Éàüôæ αáí«ΓáÑΓ ú«αáºñ« íδßΓαÑÑ, τѼ ó î¿¬α« -
Éæ. ìá»α¿¼Ñα, ß«αΓ¿α«ó¬á 1000 ºá»¿ßÑ⌐ ¡á ú¿í¬«¼ ñ¿ß¬Ñ ºá¡¿¼áÑΓ ¼Ñ¡∞ΦÑ
¼¿¡πΓδ. çá «ñ¿¡ »α«σ«ñ ß¿ßΓѼá Éàüôæ ¼«ªÑΓ «Γß«αΓ¿α«óáΓ∞ ºá»¿ß¿ »«
¡Ñ߬«½∞¬¿¼ »«½∩¼. ¥Γ« ú«αáºñ« »α«ΘÑ, τѼ ß«αΓ¿α«ó¬á ºá ¡Ñ߬«½∞¬« »α«σ«ñ«ó
»« ó«ºαáßΓá¡¿ε ¿½¿ πíδóá¡¿ε ó î¿¬α« - Éæ.
ÅÄêæè çÇÅêæê
Éẽ¿τ¡δÑ αѺπ½∞ΓáΓδ ó ß½πτá∩σ, ¬«úñá ºá»¿ß∞ ¡Ñ ¡á⌐ñÑ¡á.
é î¿¬α« - Éæ, »α¿ ¡Ñπñáτ¡«⌐ »«»δ⪥ ¡á⌐Γ¿ ºá»¿ß∞, ¡«¼Ñα ΓѬπΘÑ⌐
ºá»¿ß¿ ßΓá¡«ó¿Γß∩ αáó¡δ¼ 0. é ß¿ßΓÑ¼Ñ Éàüôæ φëà »«α∩ñ«¬ íδ½ ¿º¼Ñ¡Ñ¡ ñ½∩
Γ«ú«, τΓ«íδ ¬«¼á¡ñá FIND ß«ú½áß«óδóá½áß∞ ß ¬«¼á¡ñ«⌐ LOCATE. ÆÑ»Ñα∞, »α¿
¡Ñπñáτ¡«¼ »«¿ß¬Ñ, ó αѺπ½∞ΓáΓÑ αáí«Γδ ¬«¼á¡ñδ FIND ΓѬπΘá∩ ºá»¿ß∞ íπñÑΓ
¡áσ«ñ¿Γß∩ ó ¬«¡µÑ Σá⌐½á, á Σπ¡¬µ¿∩ EOF () ñáßΓ º¡áτÑ¡¿Ñ êæÆêìÇ. Æᬠ¬á¬ ¿º
- ºá φΓ«ú« ¡πª¡« ¿º¼Ñ¡¿Γ∞ ½«ú¿¬π αáí«Γδ »α«úαá¼¼δ, dConvert ¡Ñ íπñÑΓ φΓ«
ñѽáΓ∞ áóΓ«¼áΓ¿τÑ߬¿.
î¿¬α« - Éæ Éàüôæ
. USE Names <Ret> . USE Names <Ret>
. INDEX ON Name TO Names <Ret> . INDEX ON Name TO Names <Ret>
00006 çÇÅêæàë ÅÉÄêìäàèæêÉÄéÇìÄ 6 ºá»¿ßÑ⌐ »α«¿¡ñѬß
. USE Names INDEXED Names <Ret> . USE Names INDEXED Names <Ret>
. LIST <Ret> . LIST
çỿß∞# NAME ACCOUNT
00001 æáΦá 100 1 æáΦá 100
00003 ü«α∩ 102 3 ü«α∩ 102
00005 åÑ¡∩ 104 5 åÑ¡∩ 104
00004 å«αá 103 4 å«αá 103
00006 ïÑ¡∩ 105 6 ïÑ¡∩ 105
00002 æÑ¡∩ 101 2 æÑ¡∩ 101
. FIND FRED <- . FIND FRED <-
. FIND öÑñ∩ <Ret> . FIND öÑñ∩ <Ret>
çÇÅêæ£ ìà ìÇëäàìÇ ìÑ ¡á⌐ñ
. ? # <- . ? RECNO()<-
. ? # <Ret> . ? RECNO () <Ret>
0 7
. ? EOF <- . ? EOF() <-
.F. .T.
. ? EOF <Ret> . ? EOF() <Ret>
.F. .T.
ÅÄêæè ê ôæÆÇìÄéèÇ
Åα¿ ¿ß»«½∞º«óá¡¿¿ ¬«¼á¡ñδ FIND ß óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐, »ÑαѼѡ¡á∩
π¬áºδóáÑΓß∩ ß ¼á¬α«»«ñßΓá¡«ó¬«⌐ ¬á¬ ó î¿¬α« - Éæ, Γᬠ¿ ó ß¿ßΓÑ¼Ñ Éàüôæ.
î¿¬α« - Éæ Éàüôæ
. USE Names INDEX Names . USE Names INDEX Names
. STORE "ü«α∩" TO Key <Ret> . STORE "ü«α∩" TO Key <Ret>
ü«α∩ ü«α∩
. FIND Key <Ret> . FIND Key <Ret>
çỿß∞ ¡Ñ ¡á⌐ñÑ¡á ìÑ ¡á⌐ñ
. FIND &Key <Ret> . FIND &Key <Ret>
. DISPLAY . DISPLAY
00003 ü«α∩ 102 çỿß∞# ê¼∩ ACCOUNT
3 ü«α∩ 102
ÅαÑ«íαẫóá¡¿Ñ ñ½∩ ¬«¼á¡ñδ FIND ¡Ñ ΓαÑíπÑΓß∩, ¡« ó ß¿ßΓÑ¼Ñ Éàüôæ
»«∩ó¿½áß∞ ¡«óá∩ ¬«¼á¡ñá πßΓá¡«ó¬¿ ¡á ¡πª¡πε ºá»¿ß∞ -SEEK, ¬«Γ«αá∩ π»α«ΘáÑΓ
φΓπ »α«µÑñπαπ.
ÆÑ»Ñα∞ FIND ∩ó½∩ÑΓß∩ »«ñ¡áí«α«¼ SEEK. 諼á¡ñá SEEK αáí«ΓáÑΓ Γá¬ªÑ ß
¿¡ñѬßἿ, ¡« »α¿ φΓ«¼ ßτ¿ΓáÑΓ, τΓ« Ñ⌐ ¡áºóá¡á »ÑαѼѡ¡á∩. Äß«íÑ¡¡« πñ«í¡«
Ñε »«½∞º«óáΓ∞ß∩ ñ½∩ τ¿ß½«óδσ ¬½ετÑ⌐ ¿½¿ óδαáªÑ¡¿⌐.
î¿¬α« - Éæ Éàüôæ
. USE Names . USE Names
. INDEX ON Acount to Account . INDEX ON Acount to Account
000006 ºá»¿ßÑ⌐ »α«¿¡ñ 100% »α«¿¡ñ 6 ºá»¿ßÑ⌐ »α«¿¡ñ
. STORE STR(101,3) TO Maccount . STORE '101' TO Maccount
101 101
. FIND &Maccount . SEEK Maccount
. DISPLAY . DISPLAY
000002 æÑ¡∩ 101 çỿß∞# NAME ACCOUNT
2 æÑ¡∩ 101
æéƒç£ ìàæèÄï£èêò öÇëïÄé
ÄÆïêùêƒ é é¢üÄÉà ÉÇüÄùêò ÄüïÇæÆàë
é ß¿ßΓÑ¼Ñ Éàüôæ ¼«ª¡« «Γ¬αδΓ∞ «ñ¡«óαѼѡ¡« ñ« 10 Σá⌐½«ó íáºδ ñá¡¡δσ ¿
ßó∩ºá¡¡δσ ß ¡¿¼¿ ¿¡ñѬ߫ó, á Γá¬ªÑ Σá⌐½«ó Σ«α¼áΓ«ó. ä½∩ π»α«ΘÑ¡¿∩ «íαáΘÑ¡¿⌐
¬ ¬áªñ«⌐ «í½áßΓ¿ ñá¡¡δσ, ó ß¿ßΓÑ¼Ñ Éàüôæ ºá¼Ñ¡Ñ¡δ ß½«óá PRIMARY ¿ SECONDARY
¡á τ¿ß½á 1, 2, 3 ñ« 10. Åα«ßΓ«Ñ »αÑ«íαẫóá¡¿Ñ ¿¼Ñ¡ ñѽáÑΓß∩ áóΓ«¼áΓ¿τÑ߬¿
»α«úαá¼¼«⌐ dCONVERT.
é ßó∩º¿ ß ΓѼ, τΓ« »α«úαá¼¼δ ß ¡Ñ߬«½∞¬¿¼¿ Σá⌐½á¼¿ αáí«ΓáεΓ
º¡áτ¿Γѽ∞¡« íδßΓαÑÑ, ¬«úñá óßÑ Σá⌐½δ ó »á¼∩Γ¿ «Γ¬αδΓδ, µÑ½Ñß««íαạ«
»ÑαÑ»¿ßáΓ∞ »α«úαá¼¼δ Γá¬, τΓ«íδ «¡¿ «ñ¡«óαѼѡ¡« ¼«ú½¿ αáí«ΓáΓ∞ í«½ÑÑ τѼ ß
ñóπ¼∩ Σá⌐½á¼¿.
î¿¬α« - Éæ Éàüôæ
. SELECT PRIMARY <Ret> . SELECT 1 <Ret>
. USE Names <Ret> . USE Names <Ret>
. SELECT SECONDARY <Ret> . SELECT 2 <Ret>
. USE Jobs <Ret> . USE Jobs
ôèÇçÇÆàïê ìÇ ÅÄïƒ é ÉÇçì¢ò ÉÇüÄùêò ÄüïÇæƃò
é î¿¬α« - Éæ ¿¼ÑÑΓß∩ 󫺼«ª¡«ßΓ∞ ßó«í«ñ¡«ú« «íαáΘÑ¡¿∩ ¬ »«½∩¼ ¬á¬ ó
«í½áßΓ¿ PRIMARY, Γᬠ¿ ó «í½áßΓ¿ SECONDARY. àß½¿ ¿¼∩ »«½∩ ¿ß»«½∞ºπÑΓß∩ ó
«íÑ¿σ «í½áßΓ∩σ »á¼∩Γ¿, ¼«ª¡« »«½∞º«óáΓ∞ß∩ »αÑΣ¿¬ßἿ P. ¿½¿ S. ñ½∩
«í«º¡áτÑ¡¿∩ »ÑαѼѡ¡δσ, ñ½∩ ¿σ ¿ñÑ¡Γ¿Σ¿¬áµ¿¿. é ß¿ßΓÑ¼Ñ Éàüôæ, ¬«úñá
óδí¿αáÑΓß∩ αáí«τá∩ «í½áßΓ∞ ¬«¼á¡ñ«⌐ SELECT ¿ ¿ñÑΓ αáí«Γá ß Σá⌐½«¼, ¿¼∩
Σá⌐½á ß½ÑñπÑΓ ¿ß»«½∞º«óáΓ∞ ó ¬áτÑßΓóÑ »αÑΣ¿¬ßá ñ½∩ ½εí«ú« »«½∩, ¬«Γ«α«Ñ ¡Ñ
¡áσ«ñ¿Γß∩ ó óδíαá¡¡«⌐ αáí«τÑ⌐ «í½áßΓ¿. é φΓ«¼ ß½πτáÑ ¿¼∩ Σá⌐½á ¡áºδóáÑΓß∩
»ßÑóñ«¡¿¼«¼ - ALIAS.
ä½∩ π½πτΦÑ¡¿∩ ß«ú½áß«óá¡¡«ßΓ¿ »ßÑóñ«¡¿¼«ó ¼«ª¡« ¿ß»«½∞º«óáΓ∞ ßἫ ¿¼∩
Σá⌐½á ó ¬áτÑßΓóÑ »αÑѼ½Ñ¼«⌐ ºá¼Ñ¡δ ñ½∩ ¡«¼Ñαá óδí¿αáѼ«⌐ «í½áßΓ¿ ñá¡¡δσ.
é¼ÑßΓ« Γ«τ¬¿ »«ß½Ñ »ßÑóñ«¡¿¼á ¼«ª¡« ¿ß»«½∞º«óáΓ∞ π¬áºáΓѽ∞ ->.
î¿¬α« - Éæ Éàüôæ
. ? JOB <Ret> . ? JOB <Ret>
îƒæìêè îƒæìêè
. ? P.Name <Ret> . ? P.Name <Ret>
æáΦá ÅÑαѼѡ¡á∩ ¡Ñ ¡á⌐ñÑ¡á
?
. ? Name
ìÑ«íσ«ñ¿¼á »«¼«Θ∞ ? (Y/N) N
æáΦá
. SELECT PRIMARY <Ret> . SELECT Names <Ret>
. SKIP <Ret> . SKIP <Ret>
çÇÅêæ£: 00002 çỿß∞ N. 2
. ? Account <Ret> . ? Account <Ret>
101 101
. ? S.Account <Ret> . ? Jobs->Account <Ret>
100 100
. SELECT SECONDARY <Ret> . SELECT Jobs <Ret>
. ? Account <Ret> . ? Account <Ret>
100 100
. ? P.Account <Ret> . ? Names->Account <Ret>
101 101
ÅßÑóñ«¡¿¼δ (ALIAS) ∩ó½∩εΓß∩ á½∞ΓÑα¡áΓ¿ó¡δ¼¿ ¿¼Ñ¡á¼¿, ¬«Γ«αδÑ
ß«óÑαΦÑ¡ßΓóπεΓ ó«º¼«ª¡«ßΓ∞ ¿ñÑ¡Γ¿Σ¿µ¿α«óáΓ∞ αáí«τ¿Ñ «í½áßΓ¿ ¿ »«½∩. äá½ÑÑ
ß½ÑñπÑΓ »α¿¼Ñα, ñѼ«¡ßΓα¿απεΘ¿⌐ αáí«Γπ ß »ßÑóñ«¡¿¼á¼¿.
. USE Names ALIAS F1 <Ret>
. SELECT 2 <Ret>
. USE Rentals ALIAS F2 <Ret>
. SELECT F1 <Ret>
. F2->Last_name <Ret>
ÅßÑóñ«¡¿¼δ, »αÑñπß¼«ΓαÑ¡¡δÑ »« π¼«½τá¡¿ε, ¼«ª¡« ¿º¼Ñ¡¿Γ∞ ¬«¼á¡ñ«⌐
USE.
. USE Jobs ALIAS Work <Ret>
. ? Work->Job <Ret>
î∩ß¡¿¬
êñÑ∩ ¿ß»«½∞º«óá¡¿∩ »ßÑóñ«¡¿¼«ó ñáÑΓ »αÑ¿¼πΘÑßΓóá ó Γ«¼, τΓ« »α«úαá¼¼δ
ßΓá¡«ó∩Γß∩ ¡Ñºáó¿ß¿¼δ¼¿ «Γ «»αÑñѽѡ¡δσ αáí«τ¿σ «í½áßΓÑ⌐. è«úñá »α«úαá¼¼á
»« π¼«½τá¡¿ε ¿ß»«½∞ºπÑΓ »ßÑóñ«¡¿¼ Jobs ñ½∩ «í«º¡á«í«º¡áτÑ¡¿∩ ¿¼Ñ¡ »«½Ñ⌐ ¿
óδí¿αáÑΓ φëà »ßÑóñ«¡¿¼, Γ« «¡á αáí«ΓáÑΓ ¡Ñºá¡Ñºáó¿ß¿¼« «Γ αáí«τÑ⌐ «í½áßΓ¿,
ó ¬«Γ«α«⌐ ¡áσ«ñ¿Γß∩ Σá⌐½ Jobs. êΓá¬, »α«úαá¼¼δ ßΓá¡«ó∩Γß∩ »ÑαÑ¡«ß¿¼δ¼¿ ó
½εíπε «í½áßΓ∞ ñá¡¡δσ.
ä½∩ «í«º¡áτÑ¡¿∩ ¿¼Ñ¡ Σá⌐½«ó ¡Ñ½∞º∩ ¿ß»«½∞º«óáΓ∞ Ññ¿¡¿τ¡δÑ íπ¬óδ «Γ A
ñ« J, Γ. ¬. «¡¿ ºáαѺÑαó¿α«óá¡δ ñ½∩ »ßÑóñ«¡¿¼«ó.
Åα«úαá¼¼á dCONVERT ¼«ªÑΓ ºá¼Ñ¡¿Γ∞ SELECT PRIMARY ¡á SELECT 1 ¿ SELECT
SECONDARY ¡á SELECT 2, ¡« «¡á ¡Ññ«ßΓáΓ«τ¡« π¼¡á ñ½∩ Γ«ú«, τΓ«íδ »α¿¼Ñ¡¿Γ∞
»«ñσ«ñ∩Θ¿Ñ »ßÑóñ«¡¿¼δ.
ôÅÉÄÖàììǃ æéƒç£ öÇëïÄé æ ÅÄîÄÖ£₧ SET RELATION
ä½∩ ßó∩º¿ ñóπσ «Γ¬αδΓδσ Σá⌐½«ó íáºδ ñá¡¡δσ »« ¬½ετÑó«¼π óδαáªÑ¡¿ε
¼«ª¡« ¿ß»«½∞º«óáΓ∞ ¬«¼á¡ñπ SET RELATION TO. æ¿¡Γá¬ß¿ß ¬«¼á¡ñδ:
SET RELATION TO <óδαáªÑ¡¿Ñ> INTO <»ßÑóñ«¡¿¼>
ÄΓ¡«ΦÑ¡¿Ñ - φΓ« »«½Ñ ó ßó∩ºá¡¡«⌐ íáºÑ ñá¡¡δσ, ¬«Γ«αá∩
»α«¿¡ñѬ߿α«óá¡á »« φΓ«¼π »«½ε.
Å« ¬«¼á¡ñÑ SET RELATION TO π¬áºáΓѽ¿ ºá»¿ßÑ⌐ ó «í«¿σ Σá⌐½áσ
áóΓ«¼áΓ¿τÑ߬¿ óδαáó¡¿óáεΓß∩. è«úñá π¬áºáΓѽ∞ ºá»¿ß¿ ó óδíαá¡¡«⌐ íáºÑ ñá¡¡δσ
πßΓá¡«ó½Ñ¡, π¬áºáΓѽ∞ ºá»¿ß¿ ó íáºÑ ñá¡¡δσ INTO áóΓ«¼áΓ¿τÑ߬¿
πßΓá¡áó½¿óáÑΓß∩ ¡á »Ñαóπε ºá»¿ß∞, ¬«Γ«αá∩ ß««ΓóÑΓßΓóπÑΓ ß«ñÑন¼«¼π
¬½ετÑó«ú« óδαáªÑ¡¿∩ ó óδíαá¡¡«⌐ íáºÑ ñá¡¡δσ.
î¿¬α« - Éæ Éàüôæ
. SELECT PRIMARY <Ret> . SELECT 2 <Ret>
. USE Names <Ret> . USE Jobs INDEX Jobs <Ret>
. STORE STR(Account,4) TO Key <Ret> . SELECT 1 <Ret>
101 . USE Names <Ret>
. SELECT SECONDARY <Ret> . SET RELATION TO Account INTO Jobs
. USE Jobs INDEX Jobs <Ret> . SELECT 2 <Ret>
. FIND &Key <Ret> . DISPLAY <Ret>
. DISPLAY <Ret> . çÇÅêæ£# ACCOUNT JOB
00002 101 üπ½«τ¡¿¬ 2 101 üπ½«τ¡¿¬
î¿¬α« - Éæ Éàüôæ
* LIST2.PRG * LIST2.PRG
SET TALK OFF SET TALK OFF
SELECT PRIMARY SELECT 1
USE Names USE Names
SELECT SECONDARY SELECT 2
USE Jobs INDEX Jobs USE Jobs INDEX Jobs
SELECT PRIMARY SELECT 1
DO WHILE .NOT. EOF SET RELATION TO Account INTO Jobs
STORE STR(Account,4) TO Key DO WHILE .NOT. EOF()
SELECT SECONDARY ? Account, Name, Jobs ->Job
FIND &Key SKIP
? Account, Name, Job ENDDO
SELECT PRIMARY
SKIP
ENDDO
î¿¬α« - Éæ Éàüôæ
. DO List2 <Ret> . DO List2 <Ret>
çỿß∞# ACCOUNT JOB
100 AL îƒæìêè 100 æáΦá îƒæìêè
101 SALLY üôïÄùìêè 101 æÑ¡∩ üôïÄùìêè
102 BOB èÇîàìÖêè 102 ü«α∩ èÇîàìÖêè
103 JOHN ÇäéÄèÇÆ 103 å«αá ÇäéÄèÇÆ
104 JIM ÅêæÇÆàï£ 104 åÑ¡∩ ÅêæÇÆàï£
105 JOHN éÉÇù 105 ïÑ¡∩ éÉÇù
æΓáαδ⌐ ¼ÑΓ«ñ »α«ñ«½ªáÑΓ αáí«ΓáΓ∞ ¿ ó ß¿ßΓÑ¼Ñ Éàüôæ, ¡« «¡ ¡Ñ
¡áßΓ«½∞¬« φ½Ñúá¡ΓÑ¡ ¿ φΣΣÑ¬Γ¿óÑ¡, ¬á¬ ¿ß»«½∞º«óá¡¿Ñ SET RELATION. é ßó∩º¿ ß
ΓѼ, τΓ« »«∩ó¿½áß∞ 󫺼«ª¡«ßΓ∞ αáí«Γδ ß í«½ÑÑ τѼ ñóπ¼∩ αáí«τ¿¼¿ «í½áßΓ∩¼¿,
¬«¼á¡ñá î¿¬α« - Éæ SET LINKAGE »«ΓÑα∩½á ßó«⌐ ß¼δß½. Åα«úαá¼¼¿ßΓ ñ«½ªÑ¡ ßá¼
ºá¼Ñ¡¿Γ∞ ÑÑ ¡á ¬«¼á¡ñπ SET RELATION TO ß ß««ΓóÑΓßΓóπεΘÑ⌐ αáí«τÑ⌐ «í½áßΓ∞ε
¿½¿ »ßÑóñ«¡¿¼«¼.
éÉàîàìì¢à ÅàÉàîàìì¢à
æìêåàìêà ÄâÉÇìêùàìêë ìÇ ÅÇîƒÆ£
Å«ñ«í¡« «úαá¡¿τÑ¡¿∩¼ ñ½∩ Σá⌐½«ó, ñ½∩ óαѼѡ¡δσ »ÑαѼѡ¡δσ ΓᬪÑ
ßπΘÑßΓóÑ¡¡« ß¡¿ªÑ¡δ «úαá¡¿τÑ¡¿∩.
î¿¬α« - Éæ Éàüôæ
îá¬ß¿¼á½∞¡«Ñ τ¿ß½«
óαѼѡ¡δσ »ÑαѼѡ¡δσ 64 256
îá¬ß¿¼á½∞¡«Ñ τ¿ß½« íá⌐Γ ó«
óßÑσ óαѼѡ¡δσ »ÑαѼѡ¡δσ 1526 6000
Åα«úαá¼¼á dCONVERT »αÑ«íαáºπÑΓ »«½∩ ó »á¼∩Γ¿ ¿º Σ«α¼áΓá
î¿¬α« - Éæ ó Σ«α¼áΓ ß¿ßΓѼδ Éàüôæ.
êîàìÇ ÅàÉàîàìì¢ò
Åα«úαá¼¼á dCONVERT ºá¼Ñ¡¿Γ ñó«ÑΓ«τ¿∩ ¡á º¡á¬ »«ñτÑનóá¡¿∩ ó«
óαѼѡ¡δσ »ÑαѼѡ¡δσ, óßΓαÑτÑ¡¡δσ ó ¬«¼á¡ñ¡δσ Σá⌐½áσ ¿ ó Σá⌐½áσ óαѼѡ¡δσ
»ÑαѼѡ¡δσ.
ìÄé¢ë æÅÄæÄü êìêûêÇïêçÇûêê ÅàÉàîàìì¢ò
é ß¿ßΓÑ¼Ñ Éàüôæ πñ«í¡ÑÑ ¿¡¿µ¿á½¿º¿α«óáΓ∞ »ÑαѼѡ¡δÑ, τѼ ó« ¼¡«ú¿σ
ñαπú¿σ ∩ºδ¬áσ »α«úαá¼¼¿α«óá¡¿∩. 諼á¡ñá STORE αáí«ΓáÑΓ »«- »αѪ¡Ñ¼π, Γá¬
τΓ« ¼«ñ¿Σ¿¬áµ¿∩ »α«úαá¼¼δ ¡Ñ ΓαÑíπÑΓß∩.
î¿¬α« - Éæ Éàüôæ
. STORE "öàäƒ" TO name <Ret> . STORE "öàäƒ" TO name <Ret>
öàäƒ öàäƒ
. name = "îÇèæêî" <Ret>
îÇèæêî
éÉàîàìì¢à ÅàÉàîàìì¢à, ìà ƒéïƒ₧Öêàæƒ âïÄüÇï£ì¢îê ÅÄ ôîÄïùÇìê₧
é î¿¬α« - Éæ óßÑ óαѼѡ¡δÑ »ÑαѼѡ¡δÑ ñ«ßΓπ»¡δ óßѼ ¬«¼á¡ñ¡δ¼ Σá⌐½á¼.
Ä¡¿ ∩ó½∩εΓß∩ ú½«íá½∞¡δ¼¿ »ÑαѼѡ¡δ¼¿. é ß¿ßΓÑ¼Ñ Éàüôæ ú½«íá½∞¡δÑ »ÑαѼѡ¡δÑ
¡áºδóáεΓß∩ PUBLIC. Äñ¡á¬«, »« π¼«½τá¡¿ε ó ß¿ßΓÑ¼Ñ Éàüôæ óαѼѡ¡δÑ
»ÑαѼѡ¡δÑ ßτ¿ΓáεΓß∩ ½«¬á½∞¡δ¼¿, Γ. Ñ. PRIVATE »α«úαá¼¼δ, Ñß½¿ ¡ÑΓ ∩ó¡«ú«
π¬áºá¡¿∩ ¡á Γ«, τΓ« »ÑαѼѡ¡á∩ - ú½«íá½∞¡á∩ Γ. Ñ. PUBLIC.
ÄíΩ∩ó½Ñ¡¿Ñ »ÑαѼѡ¡«⌐ ú½«íá½∞¡«⌐ (PUBLIC) ñ«½ª¡« »α«¿ßσ«ñ¿Γ∞ ñ« ÑÑ
¿¡¿µ¿á½¿ºáµ¿¿. ÅÑαѼѡ¡δÑ, ¬«Γ«αδÑ ¿¡¿µ¿á½¿º¿απεΓß∩ »« ºá»α«ßπ ¡á óó«ñ,
óßÑúñá PUBLIC.
äÑ⌐ßΓó¿Ñ ½«¬á½∞¡δσ »ÑαѼѡ¡δσ αáß»α«ßΓαá¡∩ÑΓß∩ ¡á »α«úαá¼¼π, ó
¬«Γ«α«⌐ «¡¿ «íΩ∩ó½Ñ¡δ ¿ ¡á ºáó¿ß¿¼δÑ «Γ ¡ÑÑ »α«úαá¼¼δ. æ¿ßΓѼá Éàüôæ
«ßó«í«ªñáÑΓ ½«¬á½∞¡δÑ »ÑαѼѡ¡δÑ ó ¬«¡µÑ »α«úαá¼¼δ, ¬«Γ«αá∩ ¿σ ß«ºñá½á.
⽫íá½∞¡δÑ »ÑαѼѡ¡δÑ áóΓ«¼áΓ¿τÑ߬¿ ¡Ñ «ßó«í«ªñáεΓß∩, ñ½∩ φΓ«ú« ¡áñ« ñáΓ∞
«ñ¡π ¿º ß½ÑñπεΘ¿σ ¬«¼á¡ñ: CLEAR MEMORY, CLEAR ALL ¿½¿ RELEASE <ß»¿ß«¬
óαѼѡ¡δσ »ÑαѼѡ¡δσ>.
é¡¿ªÑ »α¿óÑñÑ¡¡«¼ »α¿¼ÑαÑ, ¡Ñß¼«Γα∩ ¡á Γ«, τΓ« »ÑαѼѡ¡á∩ y «íΩ∩ó½Ñ¡á
ó »«ñ»α«úαá¼¼Ñ, «¡á ∩ó½∩ÑΓß∩ ú½«íá½∞¡«⌐ (PUBLIC) ñ½∩ óßÑσ »α«úαá¼¼.
Åα«úαá¼¼á Ç óδñáÑΓ ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ, ¬«úñá «¡á »δΓáÑΓß∩ óδóÑßΓ¿ ¡á φ¬αá¡
»ÑαѼѡ¡πε z, Γᬠ¬á¬ z ∩ó½∩ÑΓß∩ ½«¬á½∞¡«⌐ (PRIVATE) ó »α«úαá¼¼Ñ B. ¥Γπ
»ÑαѼѡ¡πε »α«úαá¼¼á Ç ¡á⌐Γ¿ ¡Ñ ¼«ªÑΓ.
* A.PRG
SET TALK OFF
x = 10
DO B mmmm> * B.PRG
? x PUBLIC y
? y y = 5
? z z = 36
RETURN DO C mmmm> * C.PRG
RETURN ? x
? y
? z
RETURN
. DO A <Ret>
10
5
36
10
5
ÅÑαѼѡ¡á∩ ¡Ñ ¡á⌐ñÑ¡á
?
? z
ÅαѬαáΓ¿Γ∞ (æ), êú¡«α¿α«óáΓ∞ (I), ÄßΓá¡«ó¿Γ∞ (S)
ÄßΓá¡«ó½Ñ¡«
漫Γα¿ ¡¿ªÑ ¡«ó«Ñ ß««íΘÑ¡¿Ñ, ¬«úñá »α«¿º«⌐ñÑΓ «Φ¿í¬á ó »α«úαá¼¼Ñ.
éαѼѡ¡πε »ÑαѼѡ¡πε ¼«ª¡« ßñѽáΓ∞ ¡Ññ«ßΓπ»¡«⌐ ñ½∩ ó¡ÑΦ¡Ñ⌐ »α«úαá¼¼δ,
ß«ñÑαªáΘÑ⌐ «»αÑñѽѡ¿Ñ ß ΓѼ ªÑ ßá¼δ¼ ¿¼Ñ¡Ñ¼, τΓ«íδ ¡Ñ í佫 ¬«¡Σ½¿¬Γá ß
ΓѬπΘÑ⌐ »α«úαá¼¼«⌐ ¿½¿ ß ó맮óἿ ó¡ÑΦ¡¿σ »αúαá¼¼ ¿º ñαπú¿σ »α«úαá¼¼. ¥Γ«
ñѽáÑΓß∩ ß »«¼«Θ∞ε «íΩ∩ó½Ñ¡¿∩ »ÑαѼѡ¡«⌐ PRIVATE.
* A.PRG
SET TALK OFF
x = 10
DO B mmmm> * B.PRG
? x PRIVATE x
RETURN x = 15
DO C mmmm> * C.PRG
RETURN ? x
RETURN
DO A <Ret>
15
10
çñÑß∞ »ÑαѼѡ¡á∩ x «íΩ∩ó½Ñ¡á ó »α«úαá¼¼Ñ B ¬á¬ PRIVATE. àÑ
»Ñαó«¡áτá½∞¡«Ñ º¡áτÑ¡¿Ñ ¡Ñ ¼«ªÑΓ íδΓ∞ ¿ß»«½∞º«óá¡« ó B ¿½¿ C. è«úñá
π»αáó½Ñ¡¿Ñ ó«ºóαáΘáÑΓß∩ ¬ »α«úαá¼¼Ñ Ç, »ÑαѼѡ¡á∩ x »α¿¡¿¼áÑΓ ßó«Ñ
»Ñαó«¡áτá½∞¡«Ñ º¡áτÑ¡¿Ñ 10. ç¡áτÑ¡¿Ñ óαѼѡ¡« ¡Ññ«ßΓπ»¡«⌐ »ÑαѼѡ¡«⌐ ¡Ñ
ß«σαá¡∩ÑΓß∩, ¬«úñá π»αáó½Ñ¡¿Ñ ó«ºóαáΘáÑΓß∩ óδºδóáεΘÑ⌐ »α«úαá¼¼Ñ, ß«ñÑαªáΘÑ⌐
¿ßσ«ñ¡«Ñ º¡áτÑ¡¿Ñ »ÑαѼѡ¡«⌐.
ÑΓ »«ΓαÑí«óáΓ∞ß∩ «íΩ∩ó¿Γ∞ »ÑαѼѡ¡πε PRIVATE ó »«ñ»α«úαá¼¼Ñ, τΓ«íδ
φΓπ »ÑαѼѡ¡πε ¡Ñ »πΓáΓ∞ ß »ÑαѼѡ¡«⌐ ó¡ÑΦ¡Ñú« πα«ó¡∩, ¿¼ÑεΘÑ⌐ Γ« ªÑ ßἫÑ
¿¼∩. Æᬿ¼ «íαẫ¼ ¼«ª¡« ¡á »α«Γ∩ªÑ¡¿¿ óßÑ⌐ »α«úαá¼¼δ ßΓá¡ñáαΓ¿º¿α«óáΓ∞
¿¼Ñ¡á »ÑαѼѡ¡δσ.
Åα«úαá¼¼á dCONVERT ¡Ñ »«¼«ªÑΓ ó Γᬫ¼ «ß¡«óáΓѽ∞¡«¼ ¿º¼Ñ¡Ñ¡¿¿
ß»«ß«í«ó «íΩ∩ó½Ñ¡¿∩ »ÑαѼѡ¡δσ ó ß¿ßΓÑ¼Ñ Éàüôæ.
àß½¿ »αÑ¿¼πΘÑßΓóá «íΩ∩ó½Ñ¡¿∩ »ÑαѼѡ¡δσ ú½«íá½∞¡δ¼¿ ¿½¿ ½«¬á½∞¡δ¼¿ ¡Ñ
ΓαÑíπεΓß∩, Γ« αѬ«¼Ñ¡ñπÑΓß∩ óßÑ »ÑαѼѡ¡δÑ ß«ºñáóáΓ∞ ó ú½áó¡«⌐ »α«úαá¼¼Ñ. é
φΓ«¼ ß½πτáÑ φΣΣÑ¬Γ αáí«Γδ ß ¡¿¼¿ íπñÑΓ Γᬫ⌐ ªÑ ¬á¬, »α¿ αáí«ΓÑ ß
ú½«íá½∞¡δ¼¿ »ÑαѼѡ¡δ¼¿ ó α«-Éæ.
ÅàÉàäÇùÇ ÅÇÉÇîàÆÉÄé
ÅÑαÑñáτá »áαá¼ÑΓα«ó «º¡áτáÑΓ Γ«, τΓ« «ñ¡á »α«úαá¼¼á ¼«ªÑΓ »ÑαÑñáΓ∞
¿¡Σ«α¼áµ¿ε ñαπú«⌐ »α«úαá¼¼Ñ, ¡Ñ ¿ß»«½∞ºπ∩ ΓÑ ªÑ ¿¼Ñ¡á »ÑαѼѡ¡δσ. Æᬿ¼
«íαẫ¼ ¼«ª¡« ¡á»¿ßáΓ∞ ¼¡«ú« ¼á½Ñ¡∞¬¿σ ¼«ñπ½Ñ⌐ ¡Ñºáó¿ß¿¼« ñαπú «Γ ñαπúá ¿
ºáΓѼ áßßÑ¼í½¿α«óáΓ∞ ¿σ ó «ñ¡π »α«úαá¼¼π.
î¿¬α« - Éæ Éàüôæ
é î¿¬α« - Éæ «ΓßπΓßΓóπÑΓ * PARAMS.PRG
PARAMETERS name
? name
DO Params WITH "âÄÿÇ" <Ret>
âÄÿÇ
. STORE "åÄÉÇ" TO test <Ret>
åÄÉÇ
. DO Params WITH test <Ret>
åÄÉÇ
ÅαÑñ½«ªÑ¡¿Ñ PARAMETERS ñ«½ª¡« ¿ñΓ¿ »Ñαó«⌐ ßΓ᫬«⌐ ó ¼«ñπ½Ñ ¿
»áαá¼ÑΓαδ ñ«½ª¡δ íδΓ∞ »ÑαÑτ¿ß½Ñ¡δ ó Γ«¼ »«α∩ñ¬Ñ, ó ¬«Γ«α«¼ «¡¿ »ÑαÑñáεΓß∩
¬«¼á¡ñ«⌐ DO... WITH.
ÄÆæôÆæÆéêà äéÄàÆÄùêƒ é èÄîÇìäÇò ACCEPT, INPUT ¿½¿ WAIT
é ß¿ßΓÑ¼Ñ Éàüôæ »αÑñ½«ªÑ¡¿∩ ACCEPT, INPUT ¿ WAIT ¡Ñ ßΓáó∩Γ ñó«ÑΓ«τ¿∩
ó ¬«¡µÑ ºá»α«ßá ¡á óó«ñ. é ßó∩º¿ ß φΓ¿¼ ¿º¼Ñ¡Ñ¡¿Ñ¼ ¡¿τÑú« ñѽáΓ∞ ¡Ñ ¡áñ«,
¡« ¼«ªÑΓ ó«º¡¿¬¡πΓ∞ ªÑ½á¡¿Ñ ñ«íáó¿Γ∞ º¡á¬ ó«»α«ßá ó ¬«¡µÑ ºá»α«ß«ó ¡á óó«ñ.
î¿¬α« - Éæ Éàüôæ
. ACCEPT "ê¼∩" TO mname <Ret> . ACCEPT "ê¼∩?" TO mname <Ret>
êîƒ :îÇèæêî êîƒ? îÇèæêî
. ACCEPT "êîƒ: " TO mname
êîƒ: îÇèæêî
èïÇéêÿÇ <Ret> ÅÉÄêçéÄäêÆ çìÇùàìêà ìÄï£.
é î¿¬α« - Éæ ó αѺπ½∞ΓáΓÑ ¡áªáΓ¿∩ ¬½áó¿Φ¿ <- ó «ΓóÑΓ ¡á ºá»α«ß ¡á
óó«ñ ¿½¿ ¡á GET »α«íѽ, úÑ¡Ñα¿απÑΓß∩ «ñ¿¡ »α«íѽ. ¥Γ«ú« ¡Ñ »α«¿ßσ«ñ¿Γ ó
ß¿ßΓÑ¼Ñ Éàüôæ. é »«ß½ÑñπεΘ¿σ ñóπσ »α¿¼Ñαáσ »α«óÑન ¡π½Ñó«Ñ º¡áτÑ¡¿Ñ
»«¬áºá¡ »α«íѽ ¼Ñªñπ ñóπσ «úαá¡¿τ¿ΓѽÑ⌐ ó ßΓα«¬Ñ »α«íѽ ¼Ñªñπ ñóπσ
«úαá¡¿τ¿ΓѽÑ⌐ ó ßΓα«¬Ñ IF answer=" ".
î¿¬α« - Éæ Éàüôæ
* ACCEPT.PRG * ACCEPT.PRG
SET TALK OFF SET TALK OFF
ACCEPT "ùÆÄ?" TO answer ACCEPT "ùÆÄ?" TO answer
IF answer = "äÇ" IF answer ="äÇ"
? "äÇ" ? "äÇ"
ENDIF ENDIF
IF answer = " " IF answer = " "
? "éÄçéÉÇÆ" ? "éÄçéÉÇÆ"
ENDIF ENDIF
. DO Accept <Ret> . DO Accept <Ret>
ùÆÄ?:Y ùÆÄ?Y
äÇ äÇ
. DO Accept <Ret> . DO Accept <Ret>
ùÆÄ?: <Ret> ùÆÄ? <Ret>
éÄçéÉÇÆ
é »α¿¼ÑαÑ ñ½∩ ß¿ßΓѼδ Éàüôæ »α«óÑα¬á IF Answer = " " ß »α«íѽ«¼ ¡Ñ
ßαáí«ΓáÑΓ, Γ. ¬. ¡áªáΓ¿Ñ ¬½áó¿Φ¿ <Ret> ñáßΓ ¡«óδ⌐ ó¿ñ »ÑαѼѡ¡«⌐-¡«½∞. 쫽∞
¼Ñ¡∞ΦÑ τѼ »α«íѽ, «¡ «º¡áτáÑΓ «ΓßπΓßΓó¿Ñ ¬á¬¿σ - ½¿í« ñá¡¡δσ. ìπ½Ñóá∩
»ÑαѼѡ¡á∩ ¼«ªÑΓ íδΓ∞ Γá¬ªÑ «í¡áαπªÑ¡á »α«óÑᬫ⌐ αáó¡á ½¿ ÑÑ ñ½¿¡á ¡π½ε.
ôß½«ó¿Ñ IF "" = Answer φΓ« ÑΘÑ «ñ¿¡ ß»«ß«í »α«óÑન ¡á ¡π½Ñóπε
»ÑαѼѡ¡πε. é φΓ«¼ ß½πτáÑ »α«íѽ ¼Ñªñπ «úαá¡¿τ¿Γѽ∩¼¿ «ΓßπΓßΓóπÑΓ. é
ß¿ßΓÑ¼Ñ Éàüôæ ¡π½Ñóá∩ »ÑαѼѡ¡á∩ »«½πτáÑΓß∩ Γ«½∞¬« ó αѺπ½∞ΓáΓÑ ¡áªáΓ¿∩
¬½áó¿Φ¿ <Ret>. ¥Γ« «í½ÑúτáÑΓ »α«óÑα¬π «»αÑñѽѡ¡«ú« óó«ñá »«½∞º«óáΓѽ∩.
ÅÉàÄüÉÇçÄéÇìêà ÆêÅÄé éÉàîàìì¢ò ÅàÉàîàìì¢ò
é ß¿ßΓÑ¼Ñ Éàüôæ ¿¼ÑÑΓß∩ 󫺼«ª¡«ßΓ∞ ¿º¼Ñ¡Ñ¡¿∩ Γ¿»á óαѼѡ¡«⌐
»ÑαѼѡ¡«⌐ íѺ ¿º¼Ñ¡Ñ¡¿∩ ÑÑ ¿¼Ñ¡¿. é î¿¬α« - Éæ φΓ« ¡Ñ󫺼«ª¡«.
î¿¬α« - Éæ
. STORE 1 TO x <Ret>
1
. STORE STR(x,1) TO x <Ret>
0
. LIST MEMORY <Ret>
X (C) 0
** êÆÄâÄ ** 01 ÅàÉàîàìì¢ò êæÅÄï£çÄéÇìÄ 00002 üÇëÆ êæÅÄï£çÄéÇìÄ
. STORE "1" TO x <Ret>
1
. STORE VAL(x) TO x <Ret>
0
. LIST MEMORY <Ret>
X (N) 0
** éæàâÄ ** 01 ÅàÉàîàìì¢ò êæÅÄï£çÄéÇìÄ 00007 üÇëÆ ÆæÅÄï£çÄéÇìÄ
Éàüôæ
. STORE 1 TO x <Ret>
1
. STORE STR(x,1) TO x <Ret>
0
. LIST MEMORY <Ret>
X pub C "1"
1 »ÑαѼѡ¡δσ «»αÑñѽѡ«, 3 íá⌐Γ ¿ß»«½∞º«óá¡«
255 »ÑαѼѡ¡δσ ñ«ßΓπ»¡«, 5997 íá⌐Γ ñ«ßΓπ»¡«
. STORE "1" TO x <Ret>
1
. STORE VAL(x) TO x <Ret>
1.00
. LIST MEMORY <Ret>
X pub N 1.00 ( 1.00000000)
1 »ÑαѼѡ¡δσ «»αÑñѽѡ«, 9 íá⌐Γ ¿ß»«½∞º«óá¡«
255 »ÑαѼѡ¡δσ ñ«ßΓπ»¡«, 5991 íá⌐Γ ñ«ßΓπ»¡«
ÉÇüÄÆÇ æÄ æÆÉÄèÇîê
ìôïàéǃ ÅàÉàîàììǃ
é ßó∩º¿ ß ΓѼ, τΓ« ó ß¿ßΓÑ¼Ñ Éàüôæ ¡π½Ñóá∩ óαѼѡ¡á∩ »ÑαѼѡ¡á∩
ΓÑσ¡¿τÑ߬¿ ßτ¿ΓáÑΓß∩ ß¿¼ó«½∞¡«⌐ »ÑαѼѡ¡«⌐, ¬ ¡Ñ⌐ ¼«ª¡« »α¿¼Ñ¡∩Γ∞ Σπ¡¬µ¿¿,
αáí«ΓáεΘ¿Ñ ß« ßΓα«¬á¼¿. öπ¡¬µ¿∩ LEN () ßτ¿ΓáÑΓ ¡π½Ñó«⌐ ßΓ᫬¿ αáó¡«⌐ ¡π½ε.
öπ¡¬µ¿∩ TRIM () ó ß¿ΓÑ¼Ñ Éàüôæ ó«ºóαáΘáÑΓ ¡π½Ñóπε ßΓ᫬𠬫úñá Ñ⌐ ¡á óσ«ñ
»«ñáÑΓß∩ ßΓα«¬á »α«íѽ«ó. é
î¿¬α« - Éæ Σπ¡¬µ¿∩ TRIM (), αáí«Γá∩ ß« ßΓ᫬«⌐ »α«íѽ«ó, óδñáÑΓ ó ó
αѺπ½∞ΓáΓÑ «ñ¿¡ »α«íѽ. æ½ÑñπÑΓ óαπτ¡πε »α«óÑα¿Γ∞ ó½¿∩εΓ ½¿ φΓ¿ ¿º¼Ñ¡Ñ¡¿∩
¡á ½«ú¿¬π »α«úαá¼¼δ. ê¡ΓÑαÑß¡δ¼ »αÑ¿¼πΘÑßΓó«¼ φΓ¿σ ¿º¼Ñ¡Ñ¡¿⌐ ∩ó½∩ÑΓß∩
󫺼«ª¡«ßΓ∞ ¡«ó«⌐ »α«óÑન ¡á »πßΓ«Ñ »«½Ñ. àß½¿ Σπ¡¬µ¿∩ LEN (TRIM ()) »«½∩
αáó¡á ¡π½ε, Γ« φΓ« úáαá¡Γ¿∩ Γ«ú«, τΓ« »«½Ñ ß«ßΓ«¿Γ ¿º »α«íѽ«ó.
î¿¬α« - Éæ Éàüôæ
. USE Names <Ret> . USE Names <Ret>
. APPEND BLANK <Ret> . APPEND BLANK <Ret>
. ? LEN(Name) <Ret> . ? LEN(Name) <Ret>
10 10
. ? LEN(TRIM(Name)) <Ret> . ? LEN(TRIM(Name)) <Ret>
1 0
ìѬ«Γ«αδÑ Σπ¡¬µ¿¿, αáí«ΓáεΘ¿Ñ ß« ßΓα«¬á¼¿, ¿¼ÑεΓ ¡«óδÑ ¿¼Ñ¡á. ä½∩
π½πτΦÑ¡¿∩ τ¿Γáíѽ∞¡«ßΓ¿ »α«úαá¼¼, αáí«ΓáεΘ¿σ ó ß¿ßΓÑ¼Ñ Éàüôæ, ¼¡«ú¿¼
ßΓ᫬«óδ¼ Σπ¡¬µ¿∩¼ í뫨 ñá¡δ í«½ÑÑ ú«ó«α∩Θ¿Ñ ¿¼Ñ¡á. Åα«úαá¼¼á dCONVERT
áóΓ«¼áΓ¿τÑ߬¿ »α«¿ºóÑñÑΓ ¡Ñ«íσ«ñ¿¼δÑ ¿º¼Ñ¡Ñ¡¿∩.
î¿¬α« - Éæ Éàüôæ
. ? @ ("A","ABC") <Ret> . ? @ ("A","ABC") <Ret>
1 1
. ? ("abc") <Ret> . ? UPPER("abc") <Ret>
ABC ABC
. ? S("ABC",1,2) <Ret> . ? SUBSTR("ABC"1,2) <Ret>
AB AB
. ? RANK("ABC") <Ret> . ? ASC("ABC") <Ret>
65 65
ìÄé¢à éÄçîÄåìÄæÆê
é ß¿ßΓÑ¼Ñ Éàüôæ »«∩󿽫ß∞ ¼¡«ú« ¡«óδσ Σπ¡¬µ¿⌐, αáí«ΓáεΘ¿σ ß«
ßΓα«¬á¼¿, Γᬿσ ¬á¬ SPACE (), LOWER (). é ¬«¡µÑ ú½áóδ íπñÑΓ ñá¡ ß»¿ß«¬ φΓ¿σ
¡«óδσ Σπ¡¬µ¿⌐.
ùêæïÄé¢à äÇìì¢à
é¢éÄä äàæƒÆêùì¢ò ùêæàï ìôåìÄë ÆÄùìÄæÆê
Å«∩ó½Ñ¡¿Ñ ó ß¿ßΓÑ¼Ñ Éàüôæ ¡«ó«⌐ ¬«¼á¡ñδ SET DECIMALS TO πóѽ¿τ¿½«
󫺼«ª¡«ßΓ∞ αáí«Γδ ß τ¿ß½á¼¿ ó ß¿ßΓѼÑ. é î¿¬α« - Éæ ñ½∩ »«½πτÑ¡¿∩ ¡πª¡«ú«
τ¿ß½á ñÑß∩Γ¿τ¡δσ º¡á¬«ó »α¿σ«ñ¿Γß∩ ߻ѵ¿á½∞¡« πóѽ¿τ¿óáΓ∞ Γ«τ¡«ßΓ∞ «ñ¡«ú«
¿º τ¿ßѽ. é ß¿ßΓÑ¼Ñ Éàüôæ ½Ñú¬« π»αáó½∩Γ∞ ¬«½¿τÑßΓó«¼ óδó«ñ¿¼δσ ñÑß∩Γ¿τ¡δσ
º¡á¬«ó. ä½∩ ¿ß»«½∞º«óá¡¿∩ φΓ¿σ »αÑ¿¼πΘÑßΓó ß½ÑñπÑΓ ¼«ñ¿Σ¿µ¿α«óáΓ∞
»α«úαá¼¼δ, αáí«ΓáεΘ¿Ñ ó ßαÑñÑ î¿¬α« - Éæ.
î¿¬α« - Éæ Éàüôæ
. ? 2/3 <Ret> . ? 2/3
0 0.67
. ? 2/3.00 <Ret> . ? 2/3.00 <Ret>
0.66 0.67
. SET DECIMALS TO 4 <Ret>
. ? 2/3 <Ret>
0.6667
éæÆÉÄàììǃ öôìèûêƒ ÄèÉôâïàìêƒ
öπ¡¬µ¿∩ ROUND() ºá¼Ñ¡∩ÑΓ óßε αáí«Γπ »« «¬απú½Ñ¡¿ε ó α«-Éæ.
î¿¬α« - Éæ Éàüôæ
. ? INT((2/3+.005)*100)/100.00 <Ret> . ? ROUND(2/3,2) <Ret>
0.67 0.67
ôéàïêùàììǃ ÆÄùìÄæÆ£ ùêæïÇ
é î¿¬α« - Éæ ßá¼«Ñ í«½∞Φ«Ñ τ¿ß½« ¼«ú½« ß«ßΓ«∩Γ∞ ¿º 10 µ¿Σα. é ß¿ßΓѼÑ
Éàüôæ «¡« πóѽ¿τ¿½«ß∞ ñ« 16 µ¿Σα.
ìÄé¢à öôìèûêê
æ »«¼«Θ∞ε ¡«óδσ Σπ¡¬µ¿⌐, αáí«ΓáεΘ¿σ ß τ¿ß½á¼¿ ó ß¿ßΓÑ¼Ñ Éàüôæ ¿
»α¿óÑñÑ¡¡δσ ¡¿ªÑ ó φΓ«⌐ ú½áóÑ, ¼«ª¡« ñѽáΓ∞ ßΓáΓ¿ßΓ¿τÑ߬¿Ñ, ¿¡ªÑ¡Ñα¡δÑ ¿
Σ¿¡á¡ß«óδÑ αáßτÑΓδ.
êçîàìàìì¢à êîàìÇ ïÄâêùàæèêò çìÇùàìêë
é î¿¬α« - Éæ ½«ú¿τÑ߬¿Ñ »ÑαѼѡ¡δÑ ¿¡¿µ¿¿α«ó὿ß∞ ß¿¼ó«½á¼¿ T ¿½¿ F,
á óδó«ñ¿½¿ß∞ ¬á¬ .T. ¿½¿ .F. ¥Γ«Γ ¼«¼Ñ¡Γ ¿º¼Ñ¡Ñ¡ ó ß¿ßΓÑ¼Ñ Éàüôæ. ÆÑ»Ñα∞
½«ú¿τÑ߬¿Ñ »ÑαѼѡ¡δÑ ºá»«¼¿¡áεΓß∩ ¬á¬ .T. ¿ .F., á Γá¬ªÑ óδó«ñ∩Γß∩ ó φΓ«¼
ªÑ ó¿ñÑ. ¥Γ« ¿º¼Ñ¡Ñ¡¿Ñ »α«¿ºó«ñ¿Γ »α«úαá¼¼á dCONVERT, ¡« ß½ÑñπÑΓ »αѬαáΓ¿Γ∞
¿ß»«½∞º«óáΓ∞ T ¿½¿ F ß«ó¼ÑßΓ¡« ß ½«ú¿τÑ߬¿¼¿ º¡áτÑ¡¿∩¼¿.
î¿¬α« - Éæ Éàüôæ
. STORE T TO Logical <Ret> . STORE .T. TO Logical <Ret>
.T. .T.
. ? Logical <Ret> . ? Logical <Ret>
.T. .T.
* LOGICAL.PRG * LOGICAL.PRG
SET TALK OFF SET TALK OFF
STORE T TO Logical STORE .T. TO Logical
DO WHILE Logical DO WHILE Logical
? "THIS WILL RUN ONCE" ? THIS "WILL RUN ONCE"
STORE F TO Logical STORE .F. TO Logical
ENDDO ENDDO
. DO Logical <Ret> . DO Logical <Ret>
THIS WILL RUN ONCE THIS WILL RUN ONCE
ÉÇüÄÆÇ æ äÇÆÇîê
é ß¿ßΓÑ¼Ñ Éàüôæ ñáΓδ ¼«úπΓ σαá¡¿Γ∞ß∩ ó »«½∩σ ¿½¿ óαѼѡ¡δσ
»ÑαѼѡ¡δσ. ä½∩ αáí«Γδ ß φΓ¿¼ ¡«óδ¼ Γ¿»«¼ ñá¡¡δσ ó ß¿ßΓѼπ ó¬½ετÑ¡« ¼¡«ú«
Σπ¡¬µ¿⌐, αáí«ΓáεΘ¿σ ß ñáΓἿ.
ÅÉàÄüÉÇçÄéÇìêà æÆÉÄè é äÇÆ¢
é ßó∩º¿ ß ΓѼ, τΓ« ó α«-Éæ ¡Ñ ßπΘÑßΓóπÑΓ »«½Ñ⌐ Γ¿»á äáΓá,
í«½∞Φ¿¡ßΓó« »«½∞º«óáΓѽÑ⌐ σαá¡∩Γ ñáΓδ ó ß¿¼ó«½∞¡δσ »«½∩σ. ū߬«½∞¬π
»α«úαá¼¼á dCONVERT ¡Ñ ¼«ªÑΓ ßá¼á αáß»«º¡áΓ∞, τΓ« ¬á¬«Ñ-Γ« ß¿¼ó«½∞¡«Ñ »«½Ñ ó
Σá⌐½Ñ α«-Éæ ß«ñÑαª¿Γ ñáΓπ, ß½ÑñπÑΓ φΓ« »αÑ«íαẫóá¡¿Ñ »α«¿ºó«ñ¿Γ∞
óαπτ¡πε.
é ¡¿ªÑß½ÑñπεΘѼ »α¿¼ÑαÑ Σá⌐½ Olddate.dbf ó α«-Éæ πªÑ »αÑ«íαẫóá¡
ó Newdates.dbf ó ß¿ßΓÑ¼Ñ Éàüôæ. æ½ÑñπÑΓ, ¿ß»«½∞ºπ∩ ¬«¼á¡ñπ MODIFY
STRUCTURE ñ«íáó¿Γ∞ ¡«ó«Ñ »«½Ñ ñáΓδ. 諼á¡ñá MODIFY STRUCTURE ó ß¿ßΓѼÑ
Éàüôæ ¡Ñ πñá½∩ÑΓ ºá»¿ß¿ íáºδ ñá¡¡δσ.
α«-Éæ
. USE Olddates
. LIST STRUCTURE
æÆÉôèÆôÉÇ öÇëïÇ: A:OLDDATES.DBF
ùêæïÄ çÇÅêæàë: 00003
äÇÆÇ ÄüìÄéïàìêƒ: 01/01/80
ÅàÉéêùìǃ üÇçÇ äÇìì¢ò
ÅÄïà êîƒ ÅÄïƒ ÆêÅ äïêìÇ ÆÄùìÄæÆ£
001 PROJECT C 015
002 DUE C 008
** êÆÄâÄ ** 00024
. LIST
00001 Åα«Ñ¬Γ 1 06/03/84
00002 Åα«Ñ¬Γ 2 5/01/85
00003 Åα«Ñ¬Γ 3 11/04/83
Éàüôæ
. USE Newdates
. LIST STRUCTURE
æΓαπ¬Γπαá Σá⌐½á : A:NEWDATES.dbf
諽¿τÑßΓó« ºá»¿ßÑ⌐ : 3
äáΓá »«ß½Ññ¡Ñú« «í¡«ó½Ñ¡¿∩ : 01/01/80
Å«½Ñ ê¼∩ »«½∩ Æ¿» 使¡á Æ«τ¡
1 PROJECT Character 15
2 DUE Character 8
** êÆÄâÄ ** 24
. LIST
çỿß∞# PROJECT DUE
1 Åα«Ñ¬Γ 1 06/03/84
2 Åα«Ñ¬Γ 2 05/01/85
3 Åα«Ñ¬Γ 3 11/04/83
ÆÑ»Ñα∞ »αÑ«íαáºπѼ »«½Ñ Due ¿º ß¿¼ó«½∞¡«ú« Σ«α¼áΓá ó Σ«α¼áΓ äáΓá.
. MODIFY STRUCTURE
àß½¿ ¿ßσ«ñ¡«Ñ ß¿¼ó«½∞¡«Ñ »«½Ñ ß«ßΓ«¿Γ ¿º 8 ß¿¼ó«½«ó, ¬á¬ ó »α¿¼ÑαÑ,
Γ« ñá¡¡δÑ ¡Ñ íπñπΓ »«ΓÑαÑ¡δ. Å«ß½Ñ ºáóÑαΦÑ¡¿∩ ¼«ñ¿Σ¿¬áµ¿¿ Σá⌐½á íáºδ ñá¡¡δσ
¿ ¡áªáΓ¿∩ ¬½áó¿Φ¿ <Ret>, τΓ«íδ ñ«íáó¿Γ∞ ¿ßσ«ñ¡δÑ ºá»¿ß¿ «íαáΓ¡« ó Σá⌐½,
ß¿ßΓѼá Éàüôæ áóΓ«¼áΓ¿τÑ߬¿ »αÑ«íαáºπÑΓ ß¿¼ó«½∞¡δ⌐ Σ«α¼áΓ ó Σ«α¼áΓ ñáΓδ.
àß½¿ ¿ßσ«ñ¡«Ñ »«½Ñ ß«ßΓ«¿Γ ¿º 6 ß¿¼ó«½«ó, íѺ º¡á¬á ñα«í¿,
αáºñѽ∩εΘÑú« ¼Ñß∩µ, ñÑ¡∞ ¿ ú«ñ, ß½ÑñπÑΓ ß¡áτá½á ß »«¼«Θ∞ε MODIFY STRUCTURE
¿º¼Ñ¡¿Γ∞ ñ½¿¡π »«½∩ ñ« 8.
Å«ß½Ñ φΓ«ú« ó «ΓóÑΓ ¡á ºá»α«ß ¡á óó«ñ ß½ÑñπÑΓ ¡á»ÑτáΓáΓ∞ ß½ÑñπεΘÑÑ,
ºá¼Ñ¡∩∩ ¿¼∩ »«½∩ Due ¡á ΓαÑíπѼ«Ñ:
. REPLACE ALL Due WITH TRANSFORM(Due, "@R 99/99/99") <Ret>
ì«óá∩ Σπ¡¬µ¿∩ TRANSFORM () ¿º¼Ñ¡∩ÑΓ ó¿ñ ß¿¼ó«½∞¡«⌐ ßΓ᫬¿, ¿ß»«½∞ºπ∩
ß¿¼ó«½δ ¿ Σπ¡¬µ¿¿ Φáí½«¡á. öπ¡¬µ¿∩ R ß««íΘáÑΓ ß¿ßΓÑ¼Ñ Éàüôæ, τΓ« ó ßΓ᫬Ñ
¿¼ÑεΓß∩ ½¿ΓÑαá½δ, ó ñá¡¡«¼ ß½πτáÑ ñα«í¿.
é »«½Ñ Due ñá¡¡δÑ »«¼ÑΘÑ¡δ ó »αáó¿½∞¡«¼ Σ«α¼áΓÑ ñáΓδ. ÆÑ»Ñα∞ ¬«¼á¡ñ«⌐
MODIFY STRUCTURE ß½ÑñπÑΓ ¿º¼Ñ¡¿Γ∞ ß¿¼ó«½∞¡δ⌐ Γ¿» »«½∩ ¡á Γ¿» äáΓá.
. LIST STRUCTURE
æΓαπ¬Γπαá Σá⌐½á : A:NEWDATES.dbf
諽¿τÑßΓó« ºá»¿ßÑ⌐ : 3
äáΓá »«ß½Ññ¡Ñú« «í¡«ó½Ñ¡¿∩: 01/01/80
Å«½Ñ ê¼∩ »«½∩ Æ¿» 使¡á Æ«τ¡
1 PROJECT Character 15
2 DUE Character 8
** êÆÄâÄ ** 24
. LIST
çỿß∞# PROJECT DUE
1 Åα«Ñ¬Γ1 06/03/84
2 Åα«Ñ¬Γ2 5/01/85
3 Åα«Ñ¬Γ3 11/04/83
êæÅÄï£çÄéÇìêà äÇÆ
ä½∩ αẼÑΘÑ¡¿∩ ºá»¿ßÑ⌐ ó Σá⌐½Ñ íáºδ ñá¡¡δσ ó σα«¡«½«ú¿τÑ߬«¼ »«α∩ñ¬Ñ
¼«ª¡« »α«ó«ñ¿Γ∞ ¿¡ñѬ߿α«óá¡¿Ñ »« »«½ε ñáΓδ.
α«-Éæ Éàüôæ
. INDEX ON Due TO Olddates . INDEX ON Newdate TO Newdates
00003 çỿßÑ⌐ »α«¿¡ñ 3 çỿßÑ⌐ »α«¿¡ñ
. USE Olddates INDEX Olddates . USE Newdates INDEX Newdates
. LIST . LIST
00001 Åα«Ñ¬Γ1 06/03/84 çỿß∞# PROJECT NEWDATE
00003 Åα«Ñ¬Γ2 11/04/83 3 Åα«Ñ¬Γ3 11/04/83
00002 Åα«Ñ¬Γ2 5/01/85 1 Åα«Ñ¬Γ1 06/03/84
2 Åα«Ñ¬Γ2 05/01/85
é ß¿ßΓÑ¼Ñ Éàüôæ ß »«½∩¼¿ ñáΓ ¿ ß »ÑαѼѡ¡δ¼¿ ¼«ª¡« αáí«ΓáΓ∞ ¬á¬ ß
τ¿ß½«ó묨 »«½∩¼¿, Γ. Ñ. ¼«ª¡« ߬½áñδóáΓ∞ ñáΓδ ¿ óδτ¿ΓáΓ∞.
éß½ÑñßΓó¿Ñ Γ«ú«, τΓ« ó α«-Éæ »«½∩ ñáΓ ∩ó½∩εΓß∩ ß¿¼ó«½∞¡δ¼¿
ßΓα«¬á¼¿, óßÑ »«»δΓ¬¿ »α«¿ºóÑßΓ¿ áα¿Σ¼ÑΓ¿τÑ߬¿Ñ «»Ñαᵿ¿ ¡áñ ¡¿¼¿
¿¡ΓÑα»αÑΓ¿απεΓß∩ ¬á¬ ߵѻ½Ñ¡¿Ñ ßΓ᫬.
α«-Éß Éàüôæ
. GOTO 2 . GOTO 2
.DISPLAY . DISPLAY
00002 Åα«Ñ¬Γ 2 5/01/85 çỿß∞# PROJECT NEWDATE
2 Åα«Ñ¬Γ2 05/01/85
. STORE Due TO mow . STORE Newdate TO mow
5/01/85 05/01/85
. GOTO 3 . GOTO 3
. DISPLAY . DISPLAY
00003 Åα«Ñ¬Γ 3 11/04/83 çỿß∞# PROJECT NEWDATE
3 Åα«Ñ¬Γ 3
11/04/83
. STORE Due TO vacation . STORE Newdate TO vacation
11/04/83 11/04/83
. ? mow - vacation . ? mow - vacation
5/01/8511/04/83 544
Éạ¿µá ó ñáΓáσ αáó¡á∩ 544 ñ¡∩¼ ó »α¿óÑñÑ¡¡«¼ »α¿¼ÑαÑ ñ«¬áºδóáÑΓ, τΓ«
»α¿Φ½« óαѼ∩ «τÑαÑñ¡«ú« «Γ»π߬á. 滿߫¬ ¡«óδσ Σπ¡¬µ¿⌐, αáí«ΓáεΘ¿σ ß ñáΓἿ,
»α¿óÑñÑ¡ ¡¿ªÑ.
ìÄéǃ öôìèûêƒ éÉàîàìê
é ß¿ßΓÑ¼Ñ Éàüôæ ¿¼ÑÑΓß∩ Σπ¡¬µ¿∩ TIME (). ÉѺπ½∞ΓáΓ«¼ αáí«Γδ Σπ¡¬µ¿¿
∩ó½∩ÑΓß∩ ßΓ᫬á ß¿¼ó«½«ó, ¬«Γ«απε ¼«ª¡« ¿ß»«½∞º«óáΓ∞ ó ñαπú¿σ Σπ¡¬µ¿∩σ,
αáí«ΓáεΘ¿σ ß« ßΓα«¬á¼¿.
. TIME()
03:24:21
. ? SUBSTR(TIME(),1,5)
03:24
ÅÄîÄÖ£ ÅÉê æêìÆÇèæêùàæèêò ÄÿêüèÇò
Å« ºá»α«ßπ ¡á óó«ñ ß¿ßΓѼá Éàüôæ óδ½áó½¿óáÑΓ ß¿¡Γá¬ß¿τÑ߬¿Ñ «Φ¿í¬¿ ¿
»αÑñ½áúáÑΓ »«¼«Θ∞. ùΓ«íδ ¿ºíѪáΓ∞ »«∩ó½Ñ¡¿∩ ß««íΘÑ¡¿∩ « »«¼«Θ¿ ó »α«úαá¼¼Ñ,
ß½ÑñπÑΓ ñáΓ∞ ¬«¼á¡ñπ SET HELP OFF.
α«-Éæ Éàüôæ
. UZE Names . UZE Names
*** èÄîÇìäÇ ìàêçéàæÆìÇ ìÑ¿ºóÑßΓ¡á∩ ¬«¼á¡ñá
UZE Names ìÑ«íσ«ñ¿¼á »«¼«Θ∞? (Y/N) No
êæÅÉÇéêÆ£ ê ÅÄéÆÄÉêÆ£? (Y/N) Y
çÇîàìêÆ£? : UZE
ìÇ çìÇùàìêà: USE
USE Names
àÖà êæÅÉÇéïàìêƒ? (Y/N) N
ôÅÉÇéïàìêà ÅÉÄâÉÇîîÄë
è½áó¿Φá Esc »α¿«ßΓá¡áó½¿óáÑΓ óδ»«½¡Ñ¡¿Ñ.
àß½¿ ¬½áó¿Φá Esc íπñÑΓ ¡áªáΓá ó« óαѼ∩ óδ»«½¡Ñ¡¿∩ »α«úαá¼¼δ ß¿ßΓѼδ
Éàüôæ, «¡á »α¿«ßΓá¡áó½¿óáÑΓ αáí«Γπ ¿ ºáñáÑΓ ß½ÑñπεΘ¿⌐ ó«»α«ß:
ùΓ« ñѽáΓ∞? - ÅαѬαáΓ¿Γ∞ (æ), êú¡«α¿α«óáΓ∞ (I), ÄßΓá¡«ó¿Γ∞ (S) ¿½¿
Åα¿«ßΓá¡«ó¿Γ∞?
Ä»µ¿∩ ÄßΓá¡«ó¿Γ∞ ∩ó½∩ÑΓß∩ «ñ¡«⌐ ¿º ¡«óδσ «Γ½áñ«τ¡δσ 󫺼«ª¡«ßΓÑ⌐ ó
ß¿ßΓÑ¼Ñ Éàüôæ. é ¡«ó«¼ ¿ß»«½∞º«óá¡¿¿ ¬½ετá Esc »«∩󿽫ß∞ ¼¡«ú« »αÑ¿¼πΘÑßΓó.
ìá»α¿¼Ñα, ¼«ª¡« «ßΓá¡«ó¿Γ∞ »α«úαá¼¼π »ÑτáΓ¿ ó ß½πτáÑ ºá¼∩Γ¿∩
íπ¼áú¿, »«»αáó¿Γ∞ ÑÑ ¿ ó«º«í¡«ó¿Γ∞ »ÑτáΓ∞ ß Γ«⌐ ªÑ Γ«τ¬¿.
ÅÉÄûàäôÉì¢à öÇëï¢
Åα«µÑñπα¡δÑ Σá⌐½δ »«ºó«½∩εΓ ó¬½ετáΓ∞ ñ« 32 ¬«¼á¡ñ¡δσ Σá⌐½«ó ó «ñ¿¡
Σá⌐½, σαá¡∩Θ¿⌐ß∩ ó á¬Γ¿ó¡«⌐ »á¼∩Γ¿. è«úñá ¬«¼á¡ñ«⌐ SET PROCEDURE TO ß¿ßΓѼÑ
Éàüôæ ß««íΘáÑΓß∩ ¿¼∩ »α«µÑñπα¡«ú« Σá⌐½á, Γ« ¼«ñπ½¿, óσ«ñ∩Θ¿Ñ ó ¡Ñú«
óδ»«½¡∩εΓß∩ íδßΓαÑÑ τѼ »« ¬«¼á¡ñÑ DO.
èáªñδ⌐ ¼«ñπ½∞ PROCEDURE ñ«½ªÑ¡ ¡áτ¿¡áΓ∞ß∩ ß ¬«¼á¡ñ¡«⌐ ßΓ᫬¿
PROCEDURE <¿¼∩ ¼«ñπ½∩>.
Å«½Ñº¡« ¼«ñπ½∞ PROCEDURE ºá¬á¡τ¿óáΓ∞ ¬«¼á¡ñ«⌐ RETURN. Äñ¡«óαѼѡ¡«
¼«ªÑΓ íδΓ∞ «Γ¬αδΓ «ñ¿¡ »α«µÑñπα¡δ⌐ Σá⌐½.
Äßó«í«ªñáÑΓß∩ »α«µÑñπα¡δ⌐ Σá⌐½ »« ¬«¼á¡ñÑ CLOSE PROCEDURE. ¥Γπ
¬«¼á¡ñπ ß½ÑñπÑΓ ó¬½ετ¿Γ∞ ó óδºδóáεΘπε »α«úαá¼¼π, á ¡Ñ ó ßá¼ »α«µÑñπα¡δ⌐
Σá⌐½.
ìÄé¢à ÅÉÄâÉÇîîì¢à éÄçîÄåìÄæÆê
é ß¿ßΓÑ¼Ñ Éàüôæ ¿¼ÑεΓß∩ ¿ ñαπú¿Ñ πß«óÑαΦÑ¡ßΓó«óá¡¿∩ »α«µÑßß«¼
π»αáó½Ñ¡¿∩ »α«úαá¼¼«⌐.
Å« ¬«¼á¡ñÑ EXIT »α«¿ßσ«ñ¿Γ ¡Ñ¼Ññ½Ñ¡¡«Ñ ºáóÑαΦÑ¡¿Ñ αáí«Γδ ¬«¼á¡ñ¡«ú«
Σá⌐½á ¿ π»αáó½Ñ¡¿Ñ »ÑαÑñáÑΓß∩ óδºδóáεΘÑ⌐ »α«úαá¼¼Ñ.
Å« ¬«¼á¡ñÑ RETURN TO MASTER »α«¿ßσ«ñ¿Γ ó«ºóαáΓ ¬ »α«úαá¼¼Ñ, óδºóá¡¡«⌐
ó «ΓóÑΓ ¡á ºá»α«ß ß¿ßΓѼδ Éàüôæ ¡á óó«ñ.
öÄÉî¢ èÄìàùìÄâÄ ÅÄï£çÄéÇÆàïƒ
çÇîàìÇ ÅÉàäïÄåàìêƒ USING ¡á PICTURE
é α«-Éæ ó πΓóÑαªñÑ¡¿¿ @... SAY ΓαÑíπÑΓß∩ »αÑñ½«ªÑ¡¿Ñ USING ñ½∩
Σ«α¼áΓ¿α«óá¡¿∩ óδó«ñ¿¼«⌐ ¿¡Σ«α¼áµ¿¿, á ó πΓóÑαªñÑ¡¿¿ @... GET ΓαÑíπÑΓß∩
»αÑñ½«ªÑ¡¿Ñ PICTURE. ä½∩ í«½∞ΦÑ⌐ ß«ú½áß«óá¡¡«ßΓ¿ ó «í«¿σ πΓóÑαªñÑ¡¿∩σ ó
ß¿ßΓÑ¼Ñ Éàüôæ ΓÑ»Ñα∞ ¿ß»«½∞ºπÑΓß∩ »αÑñ½«ªÑ¡¿Ñ PICTURE. Åα«úαá¼¼á dCONVERT
ñѽáÑΓ φΓ« »αÑ«íαẫóá¡¿Ñ áóΓ«¼áΓ¿τÑ߬¿.
α«-Éæ
. @ 3,1 SAY 1000.00 USING "$9,999.99"
$1,000.00
Éàüôæ
. @ 3,1 SAY 1000.00 PICTURE "$9,999.99"
$1,000.00
é ß¿ßΓÑ¼Ñ Éàüôæ »«∩󿽫ß∞ ¼¡«ú« ¡«óδσ ß¿¼ó«½«ó ¿ Σπ¡¬µ¿⌐ Φáí½«¡á. Äí
¿ß»«½∞º«óá¡¿¿ ß¿¼ó«½á @ »«ñα«í¡«ßΓ¿ ¿º½«ªÑ¡δ ó ú½áóáσ « ¬«¼á¡ñáσ ¿
Σπ¡¬µ¿∩σ.
éæÆÉÄàììǃ ÅÉÄéàÉèÇ äêÇÅÇçÄìÇ é èÄîÇìäà @...GET.
é α«-Éæ τáßΓ« ¡Ñ«íσ«ñ¿¼« »¿ßáΓ∞ ¬«¼á¡ñδ »α«óÑન óσ«ñ¡δσ ñá¡¡δσ,
»« ¬«¼á¡ñÑ @... GET. é ß¿ßΓÑ¼Ñ Éàüôæ ó ¬«¼á¡ñÑ @... GET ¿¼ÑÑΓß∩ «»µ¿∩
RANGE, ¬«Γ«αá∩ »α«óÑα∩ÑΓ »αáó¿½∞¡«ßΓ∞ óσ«ñ¡δσ τ¿ß½«óδσ ñá¡¡δσ ¿ ñáΓ.
Å«½∞º«óáΓѽ∞ ¡Ñ «í«⌐ñÑΓ ¬«¼á¡ñπ GET, ¡Ñ óóÑñ∩ τ¿ß½« ó ΓαÑíπѼ«¼
ñ¿á»«º«¡Ñ. àß½¿ óó«ñ ¡ÑóÑαÑ¡, ß¿ßΓѼá Éàüôæ ñáÑΓ ºóπ¬«ó«⌐ ß¿ú¡á½ ¿ óδó«ñ¿Γ
ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ ó óÑασ¡Ñ⌐ τáßΓ¿ φ¬αá¡á.
é ß¿ßΓÑ¼Ñ Éàüôæ ¼«ª¡« »α¿¼Ñ¡∩Γ∞ Γπ ªÑ ΓÑσ¡¿¬π »α«óÑન, τΓ« ¿ ó
î¿¬α« - Éæ, ¡« »α«úαá¼¼á íπñÑΓ í«½ÑÑ τ¿Γáíѽ∞¡«⌐ ¿ φΣΣÑ¬Γ¿ó¡«⌐ »α¿
¿ß»«½∞º«óá¡¿¿ »αÑñ½«ªÑ¡¿∩ RANGE.
α«-Éæ
* RANGE.PRG
ERASE
STORE O TO amount
STORE F TO done
DO WHILE .NOT. done
@ 5,10 GET amount
READ
IF amount < 1 .OR. amount> 10
? CHR(7)
@ 1,50 SAY ''OUT OF RANGE''
ELSE
STORE T TO done
ENDIF
ENDDO
Éàüôæ
* RANGE.PRG
CLEAR
STORE O TO amount
@ 5,10 GET amount RANGE 1,10
READ
ÅÉÄùêà ìÄé¢à æéÄëæÆéÇ.
é ß¿ßΓÑ¼Ñ Éàüôæ ¿¼ÑÑΓß∩ ¼¡«ú« ñαπú¿σ πß«óÑαΦÑ¡ßΓó«óá¡¿⌐ ñ½∩ óδñáτ¿
Σ«α¼ »«½∞º«óáΓѽ∩, ¡« Γ. ¬. «¡¿ ¡Ñ »«¼ÑΦáεΓ óδ»«½¡Ñ¡¿ε »α«úαá¼¼, ¡á»¿ßá¡¡δσ
¡á α«-Éæ, «¡¿ ó ñá¡¡«⌐ ú½áóÑ ¡Ñ αáßß¼áΓα¿óáεΓß∩.
æòàîì¢à æÉàäæÆéÇ
ôæÆÇìÄéèÇ öôìèûêÄìÇï£ì¢ò èï₧ùàë
é α«-Éæ Σπ¡¬µ¿«¡á½∞¡δÑ ¬½ετ¿ πßΓá¡áó½¿ó὿ß∞ ñÑß∩Γ∞ε αáº¡δ¼¿
¬«¼á¡ñἿ SET F<τ¿ß½«> TO. ÆÑ»Ñα∞ ñ½∩ φΓ«ú« ¿ß»«½∞ºπÑΓß∩ Γ«½∞¬« «ñ¡á
¬«¼á¡ñá SET FUNCTION <τ¿ß½«> TO. ä½∩ «í«º¡áτÑ¡¿∩ ¬½áó¿Φ¿ <- ß½ÑñπÑΓ π¬áºáΓ∞
Γ«τ¬π ß ºá»∩Γ«⌐.
Åα«úαá¼¼á dCONVERT »α«ñѽáÑΓ φΓ« »αÑ«íαẫóá¡¿Ñ áóΓ«¼áΓ¿τÑ߬¿.
öπ¡¬µ¿«¡á½∞¡δ⌐ ¬½ετ 1 «ΓóÑñÑ¡ »«ñ Å«¼«Θ∞ ¿ ¡Ñ ¼«ªÑΓ íδΓ∞ »ÑαѡạáτÑ¡.
ÄÅûêê é¢éÄäÇ
諼á¡ñ«⌐ SET COLOR TO ¼«ª¡« π»αáó½∩Γ∞ áΓα¿íπΓἿ óδó«ñá ¿¡Σ«α¼áµ¿¿:
¿¡ΓÑ¡ß¿ó¡«ßΓ∞ε, »«ñτÑનó᡿Ѽ, ¼¿ú᡿Ѽ, ¿¡óÑαΓ¿α«óá¡δ¼¿ ß¿¼ó«½á¼¿.
諼á¡ñá SET COLOR TO π»αáó½∩ÑΓ «íδτ¡δ¼ ßóÑτÑ¡¿Ñ¼ ß¿¼ó«½«ó »ÑαÑñ¡Ñú« »½á¡á ¿
πß¿½Ñ¡¡δ¼, µóÑΓἿ úαá¡¿µ ¿ Σ«¡á. ä½∩ π»αáó½Ñ¡¿∩ µóÑΓἿ ¿ß»«½∞ºπεΓß∩ íπ¬óδ
ó¼ÑßΓ« µ¿Σα.
üôöàÉ ééÄäÇ
é ß¿ßΓÑ¼Ñ Éàüôæ ¿¼ÑÑΓß∩ 20 ß¿¼ó«½∞¡δ⌐ íπΣÑα óó«ñá ñ½∩
íδßΓα«»ÑτáΓáεΘ¿σ »«½∞º«óáΓѽÑ⌐. àú« ¼«ª¡« πóѽ¿τ¿óáΓ∞ ¿½¿ π¼Ñ¡∞ΦáΓ∞ »«
ªÑ½á¡¿ε.
ìÇæÆÉÄëèÇ æêæÆàî¢ Éàüôæ ìÇ èÄìöêâôÉÇûê₧ ÅÄï£çÄéÇÆàïƒ
æ¿ßΓѼá Éàüôæ ¼«ªÑΓ íδΓ∞ ¡áßΓα«Ñ¡á ¡á ¡πªñδ »«½∞º«óáΓѽ∩ ß »«¼«Θ∞ε
Σá⌐½á, «»¿ßδóáεΘÑú« ¬«¡Σ¿úπαᵿε - CONFIG.DB, ßΓá¡ñáαΓ¡«ú« ΓѬßΓ«ó«ú«
Σá⌐½á ó ¬«ñáσ ASCII, ¬«Γ«αδ⌐ ß«ºñáÑΓß∩ ΓѬßΓ«óδ¼ »α«µÑßß«α«¼. öá⌐½ CONFIG.
DB «»αÑñѽ∩ÑΓ º¡áτÑ¡¿Ñ Σπ¡¬µ¿«¡á½∞¡δσ ¬½ετÑ⌐, ¬«¼á¡ñδ ON/OFF SET,
¼á¬ß¿¼á½∞¡δ⌐ «íΩѼ »á¼∩Γ¿ ñ½∩ ß¿ßΓѼδ Éàüôæ, ¿ß»«½∞ºπѼδ⌐ ß¿ßΓѼ«⌐
ΓѬßΓ«óδ⌐ »α«µÑßß«α, ¼á¬ß¿¼á½∞¡«Ñ ¼ÑßΓ« ó »á¼∩Γ¿ ñ½∩ óαѼѡ¡δσ »ÑαѼѡ¡δσ,
¬«¼á¡ñπ, óδ»«½¡∩Ѽπε »α¿ óσ«ñÑ ó ß¿ßΓѼπ Éàüôæ, αẼÑα HISTORY ¿ íπΣÑαá
óó«ñá.
Åα¿ óσ«ñÑ ó ß¿ßΓѼπ Éàüôæ, Ñß½¿ ßπΘÑßΓóπÑΓ Σá⌐½ CONFIG.DB, º¡áτÑ¡¿∩,
π¬áºá¡¡δÑ ó ¡Ñ¼, ºá¼ÑΘáεΓ º¡áτÑ¡¿∩, »α¿¡∩ΓδÑ ó ß¿ßΓÑ¼Ñ Éàüôæ »« π¼«½τá¡¿ε.
êæÅÄï£çÄéÇìêà ÅÉÄâÉÇîî¢ dCONVERT
ä½∩ Γ«ú« τΓ«íδ ó«ß»«½∞º«óáΓ∞ß∩ »αÑ¿¼πΘÑßΓóἿ ¡«óδσ 󫺼«ª¡«ßΓÑ⌐
ß¿ßΓѼδ, ß½ÑñπÑΓ »αÑ«íαẫóáΓ∞ óßÑ Σá⌐½δ î¿¬α« - Éæ ó ¡«óδÑ Σ«α¼áΓδ. ¥Γ«
«Γ¡«ß¿Γѽ∞¡« »α«ßΓ«⌐ »α«µÑßß ¿, ó í«½∞Φ¿¡ßΓóÑ ß½πτáÑó, óδ»«½¡∩ÑΓß∩ µÑ½¿¬«¼
»α«úαá¼¼«⌐ dCONVERT.
Äß¡«ó¡«Ñ ¡áº¡áτÑ¡¿Ñ »α«úαá¼¼δ dCONVERT - φΓ« »α«τ¿ΓáΓ∞ Σá⌐½ ¿º α«
- Éæ ¿ ß«ºñáΓ∞ ¡«óπε ¬«»¿ε φΓ«ú« Σá⌐½á, «ΓΣ«α¼áΓ¿α«óá¡¡πε ñ½∩ αáí«Γδ ó
ß¿ßΓÑ¼Ñ Éàüôæ.
êßσ«ñ¡δ⌐ Σá⌐½ î¿¬α« - Éæ »ÑαÑ¿¼Ñ¡«óδóáÑΓß∩, á Ñú« ß«ñÑন¼«Ñ «ßΓáÑΓß∩
íѺ ¿º¼Ñ¡Ñ¡¿⌐. ¡« σαá¡¿Γ∞ Ñú« ó íѺ«»áß¡«¼ ¼ÑßΓÑ ¬á¬ ßΓαáσ«óπε ¬«»¿ε.
ìÑ »α«úαá¼¼¿ßΓδ ¿ß»«½∞ºπεΓ »α«úαá¼¼π dCONVERT ñ½∩ »αÑ«íαẫóá¡¿∩
Σá⌐½«ó íáºδ ñá¡¡δσ, ¿¡ñѬߡδσ, Σá⌐½«ó Σ«α¼áΓ«ó ¿ óδσ«ñ¡δσ Σ«α¼.
Åα«úαá¼¼¿ßΓδ ñ«½ª¡δ íπñπΓ »αÑ«íαẫóáΓ∞ Γá¬ªÑ ¬«¼á¡ñ¡δÑ Σá⌐½δ ¿ Σá⌐½δ
óαѼѡ¡δσ »ÑαѼѡ¡δσ.
é¢ÅÄïìàìêà ÅÉÄâÉÇîî¢ dCONVERT
ä½∩ Γ«ú« τΓ«íδ ¡áτáΓ∞ »αÑ«íαẫóá¡¿∩, ß½ÑñπÑΓ óßΓáó¿Γ∞ ñ¿ß¬ÑΓπ ß
»α«úαá¼¼«⌐ dCONVERT ó ñ¿ß¬ Ç: ¿ ¡á»ÑτáΓáΓ∞:
A > convert a: b: <Ret>
¥Γ¿¼ ºáúαπªáÑΓß∩ »α«úαá¼¼á ó »á¼∩Γ∞, úñÑ ¿ «ßΓáÑΓß∩ ¡á óßÑ óαѼ∩
»αÑ«íαẫóá¡¿∩. Å«ß½Ñ φΓ«ú« ¼«ª¡« óδ¡πΓ∞ ñ¿ß¬ÑΓπ ¿º ñ¿ß¬á Ç ¿ óßΓáó¿Γ∞
»Ñαóπε ñ¿ß¬ÑΓπ ß ñá¡¡δ¼¿, ¬«Γ«αδÑ ¡áñ« »αÑ«íαẫóáΓ∞. é ñ¿ß¬ é ß½ÑñπÑΓ
óßΓáó¿Γ∞ »πßΓπε «ΓΣ«α¼áΓ¿α«óá¡¡πε ñ¿ß¬ÑΓπ. ê¼Ñ¡á Ç: ¿ é: ß««íΘáεΓ »α«úαá¼¼Ñ
dCONVERT, τΓ« ¿ßσ«ñ¡δÑ Σá⌐½δ ¡áσ«ñ∩Γß∩ ¡á ñ¿ß¬Ñ Ç, á ¡«óδÑ ñ«½ª¡δ íδΓ∞
»«¼ÑΘÑ¡δ ¡á ñ¿ß¬ é.
¡« αáí«ΓáΓ∞ ß ½εí묨 ñ¿ß¬á¼¿, »α¿ πß½«ó¿¿, τΓ« ó ¬«¼á¡ñÑ π¬áºá¡«:
dCONVERT <¿ßσ«ñ¡δ⌐ ñ¿ß¬:> <óδσ«ñ¡«⌐ ñ¿ß¬:> <Ret>
àß½¿ ¡áñ«, τΓ«íδ ¡«óδÑ Σá⌐½δ í뫨 αáß»«½«ªÑ¡δ ¡á Γ«¼ ªÑ ñ¿ß¬Ñ, τΓ« ¿
¿ßσ«ñ¡δÑ, ß½ÑñπÑΓ »ÑτáΓáΓ∞: dCONVERT<Ret> ¿ »α«úαá¼¼á íπñÑΓ ßτ¿ΓáΓ∞, τΓ« óßÑ
Σá⌐½δ ñ«½ª¡δ íδΓ∞ ¡á Γ«¼ ªÑ ñ¿ß¬Ñ, ß ¬«Γ«α«ú« úαπº¿½áß∞ »α«úαá¼¼á dCONVERT.
Å«½∞º«óáΓѽ¿, ¿¼ÑεΘ¿Ñ ªÑßΓ¬¿⌐ ñ¿ß¬, αáí«ΓáεΓ Γ«½∞¬« ß ñ¿ß¬«¼ æ. é
¡áτá½Ñ αáí«Γδ »α«úαá¼¼á dCONVERT óδó«ñ¿Γ ¼Ñ¡ε, ß«ñÑαªáΘÑÑ óßÑ ó«º¼«ª¡δÑ
Γ¿»δ Σá⌐½«ó, á Γá¬ªÑ «»µ¿¿ ñ½∩ ºá»α«ßá »«¼«Θ¿ ¿ óδσ«ñá ¿º »α«úαá¼¼δ. éδí«α
¿º ¼Ñ¡ε »α«¿ºó«ñ¿Γß∩ π¬áºá¡¿Ñ¼ ¡πª¡«ú« ¿ ¡áªáΓ¿Ñ¼ ¬½áó¿Φ¿ <Ret> ¿½¿ »ÑτáΓ∞ε
ß««ΓóÑΓßΓóπεΘÑú« ¡«¼Ñαá.
Å«ß½Ñ óδí«α¬¿ Γ¿»á Σá⌐½á, dCONVERT »«¬áºδóáÑΓ óßÑ Σá⌐½δ φΓ«ú« Γ¿»á ¡á
ΓѬπΘѼ ñ¿ß¬Ñ ¿ ¬«½¿τÑßΓó« ßó«í«ñ¡«ú« ¼ÑßΓá. Å« ¼ÑαÑ óó«ñá ¬áªñ«ú« ¿¼Ñ¡¿
Σá⌐½á, dCONVERT óδ»«½¡∩ÑΓ Ñú« »αÑ«íαẫóá¡¿Ñ. àß½¿ ΓαÑíπÑΓß∩ »αÑ«íαẫóáΓ∞
í«½ÑÑ «ñ¡«⌐ ñ¿ß¬ÑΓδ, ¼«ª¡« ºá¼Ñ¡¿Γ∞ ñ¿ß¬ÑΓπ ¡á ñ¿ß¬Ñ Ç: ¿ é: ¼Ñªñπ ñóπ¼∩
»α«µÑßßἿ »αÑ«íαẫóá¡¿∩ Σá⌐½á. Å«½∞ºπ∩ß∞ ¼Ñ¡ε, ¡Ñ½∞º∩ π¬áºáΓ∞ ñαπú«⌐
ñ¿ß¬.
Åα«úαá¼¼π dCONVERT ¼«ª¡« óδºóáΓ∞ ¿ óδ»«½¡¿Γ∞ »α∩¼« ¿º DOS. é «ΓóÑΓ ¡á
ºá»α«ß ¡á óó«ñ «Γ «»Ñαᵿ«¡¡«⌐ ß¿ßΓѼδ, ß½ÑñπÑΓ ¡á»ÑτáΓáΓ∞ dconvert <¿¼∩
Σá⌐½á> <óδσ«ñ¡«⌐ ñ¿ß¬: > <Ret> ñ½∩ Γ«ú«, τΓ«íδ ¡áºóá¡¡δ⌐ Σá⌐½ íδ½
»αÑ«íαẫóá¡.
Å«ß½Ñ ºáóÑαΦÑ¡¿∩ »αÑ«íαẫóá¡¿∩ π»αáó½Ñ¡¿Ñ »ÑαÑñáÑΓß∩ DOS. ê¼∩ Σá⌐½á
ñ«½ª¡« ó¬½ετáΓ∞ Γ¿» Σá⌐½á, ¡á»α¿¼Ñα Ç:, Ñß½¿ ñ¿ß¬ «Γ½¿τÑ¡ «Γ ΓѬπΘÑú«.
¥Γ«Γ ¼ÑΓ«ñ ñ«»π߬áÑΓ ß¿¼ó«½δ ¼á߬¿ ó ¿¼Ñ¡¿ Σá⌐½á. ¥Γ¿ ß¿¼ó«½δ
»αÑñßΓáó½Ñ¡δ ºóѺñ«τ¬«⌐ (*) ¿ º¡á¬«¼ ó«»α«ßá (?) ¿ ß½πªáΓ «¡¿ ΓѼ ªÑ µÑ½∩¼,
τΓ« ¿ ó ¬«¼á¡ñÑ DIR.
ÅÉÄûàææ ÅÉàÄüÉÇçÄéÇìêƒ
ÅαÑ«íαẫóá¡¿Ñ í«½∞Φ«ú« Σá⌐½á ¼«ªÑΓ ºá¡∩Γ∞ ¡Ñ¬«Γ«α«Ñ óαѼ∩, »«φΓ«¼π
dCONVERT ß««íΘáÑΓ « ßó«Ñ⌐ αáí«ΓÑ, »ÑτáΓá∩ Γ«τ¬π ¬áªñδÑ ¡Ñ߬«½∞¬« ßѬπ¡ñ. Å«
ºáóÑαΦÑ¡¿¿ »αÑ«íαẫóá¡¿∩ ¿ßσ«ñ¡δ⌐ Σá⌐½ î¿¬α« -Éæ »ÑαÑ¿¼Ñ¡«óδóáÑΓß∩ Γᬿ¼
«íαẫ¼, τΓ« »«ß½Ññ¡Ñ⌐ íπ¬ó«⌐ ó αáßΦ¿αÑ¡¿¿ Σá⌐½á ßΓá¡«ó¿Γß∩ "b", τΓ«
«º¡áτáÑΓ óß»«¼«úáΓѽ∞¡δ⌐ Σá⌐½ (ßΓαáσ«óá∩ ¬«»¿∩).
ìá»α¿¼Ñα, Σá⌐½ íáºδ ñá¡¡δσ î¿¬α« - Éæ íπñÑΓ ¡áºδóáΓ∞ß∩ ó¼ÑßΓ« .dbf
- .dbb, Σá⌐½ óαѼѡ¡δσ »ÑαѼѡ¡δσ ó¼ÑßΓ« .mem - .meb. é ß½πτáÑ πß»ÑΦ¡«ú«
ºáóÑαΦÑ¡¿∩ »αÑ«íαẫóá¡¿∩, ¡«óδ⌐ Σá⌐½ ¿¼ÑÑΓ Γ« ªÑ ßá¼«Ñ αáßΦ¿αÑ¡¿Ñ, τΓ« ¿
¿ßσ«ñ¡δ⌐ Σá⌐½. ä½∩ Γ«ú«, τΓ«íδ dCONVERT ¡Ñ ñѽá½á »áπºπ »«ß½Ñ ¬áªñ«ú«
»αÑ«íαẫóá¡¿∩, ß½ÑñπÑΓ ¡áªáΓ∞ ¬½áó¿Φπ »α«íѽ.
ÅÉàÄüÉÇçÄéÇìêà ìàÅÉÄâÉÇîîì¢ò öÇëïÄé
öá⌐½δ íáºδ ñá¡¡δσ î¿¬α« - Éæ óÑαß¿¿ 2. 4 ¿½¿ í«½ÑÑ »«ºñ¡¿σ, »α«úαá¼¼á
dCONVERT »αÑ«íαáºπÑΓ »«½¡«ßΓ∞ε. äó«ÑΓ«τ¿∩ ó ¿¼Ñ¡áσ »«½Ñ⌐ ºá¼Ñ¡∩εΓß∩ ¡á
ß¿¼ó«½δ »«ñτÑનóá¡¿∩. dCONVERT ¼«ªÑΓ Γá¬ªÑ »αÑ«íαẫóáΓ∞ Σá⌐½δ íáºδ ñá¡¡δσ
ß¿ßΓѼδ Éàüôæ ó Σ«α¼áΓδ î¿¬α« - Éæ »α¿ πß½«ó¿¿, τΓ« ó φΓ¿σ Σá⌐½áσ ¡Ñ
»αÑóδΦÑ¡δ «úαá¡¿τÑ¡¿∩ î¿¬α« -Éæ.
ö«α¼áΓδ ¿¡ñѬߡδσ Σá⌐½«ó ß¿ßΓѼδ Éàüôæ ¡Ñ ¼«úπΓ íδΓ∞ »«½¡«ßΓ∞ε
»αÑ«íαẫóá¡δ »α«úαá¼¼«⌐ dCONVERT. Å«φΓ«¼π, ¬«úñá dCONVERT »α«ß∩Γ
»αÑ«íαẫóáΓ∞ ¿¡ñѬߡδ⌐ Σá⌐½, «¡á ß«ºñáÑΓ ß»Ñµ¿á½∞¡δ⌐ ¬«¼á¡ñ¡δ⌐ Σá⌐½ ß ΓѼ
ªÑ ¿¼Ñ¡Ñ¼, τΓ« ¿ π ¿¡ñѬߡ«ú« Σá⌐½á ¿ ß ¡«óδ¼ αáßΦ¿αÑ¡¿Ñ¼ .RX. æ½ÑñπÑΓ
»«óΓ«α¡« ß«ºñáΓ∞ ¿¡ñѬߡδ⌐ Σá⌐½ ó ß¿ßΓÑ¼Ñ Éàüôæ ß¡áτá½á ¿ß»«½∞ºπ∩
ß««ΓóÑΓßΓóπεΘ¿⌐ ¿¡ñѬßπ Σá⌐½ íáºδ ñá¡¡δσ ¿ ºáΓѼ ¡á»ÑτáΓáó:
DO ¿¼∩ ¿¡ñѬߡ«ú« Σá⌐½á .rx <Ret>.
諼á¡ñá REPORT FORM ó ß¿ßΓÑ¼Ñ Éàüôæ πß«óÑαΦÑ¡ßΓó«óá¡á ¿ «τÑ¡∞ ß¿½∞¡«
«Γ½¿τáÑΓß∩ «Γ á¡á½«ú¿τ¡«⌐ ¬«¼á¡ñδ ó î¿¬α« - Éæ. é ß¿ßΓÑ¼Ñ Éàüôæ Σá⌐½δ
«ΓτÑΓ«ó ß αáßΦ¿αÑ¡¿Ñ¼ .frm πªÑ »αÑñßΓáó½∩εΓ ¿º ßÑí∩ ΓѬßΓ«óδÑ Σá⌐½δ ó ASCII
¬«ñáσ. Åα«úαá¼¼á dCONVERT ßñѽáÑΓ ¡Ñ«íσ«ñ¿¼δÑ »αÑ«íαẫóá¡¿∩. ìѬ«Γ«αδÑ
¿ß»«½∞º«óá¡¡δÑ ¬«¼á¡ñδ î¿¬α« - Éæ Γá¬ªÑ íπñπΓ ºá¼Ñ¡Ñ¡δ ¡á ß««ΓóÑΓßΓóπεΘ¿Ñ
φ¬ó¿óá½Ñ¡Γδ ó ß¿ßΓÑ¼Ñ Éàüôæ.
öá⌐½δ óαѼѡ¡δσ »ÑαѼѡ¡δσ áóΓ«¼áΓ¿τÑ߬¿ »αÑ«íαẫóδóáεΓß∩ ó Σ«α¼áΓδ
ß¿ßΓѼδ Éàüôæ. ì«óδÑ Σá⌐½δ óαѼѡ¡δσ »ÑαѼѡ¡δσ íπñπΓ »α¿¼Ñα¡« ¡á 25%
í«½∞ΦÑ, τѼ ó î¿¬α« - Éæ. ùáßΓ¿τ¡« φΓ« »α«¿º«⌐ñÑΓ ¿º - ºá Γ«ú«, τΓ« íπñÑΓ
πóѽ¿τÑ¡á Γ«τ¡«ßΓ∞ ß 10 º¡á¬«ó ó î¿¬α« - Éæ ¡á 16 º¡á¬«ó ó ß¿ßΓÑ¼Ñ Éàüôæ.
dCONVERT ºá¼Ñ¡∩ÑΓ ñó«ÑΓ«τ¿∩ ó ¿¼Ñ¡áσ óαѼѡ¡δσ »ÑαѼѡ¡δσ ¡á ß¿¼ó«½δ
»«ñτÑનóá¡¿∩.
ÅÉàÄüÉÇçÄéÇìêà ÅÉÄâÉÇîîì¢ò öÇëïÄé
êº - ºá Γ«ú«, τΓ« ß¿¡Γá¬ß¿ß ¬«¼á¡ñ î¿¬α« - Éæ »αÑΓÑα»Ñ½ αẽ¿τ¡δÑ
¿º¼Ñ¡Ñ¡¿∩, »α«úαá¼¼á dCONVERT ¡Ñ ¼«ªÑΓ óδ»«½¡∩Γ∞ ¿σ »αÑ«íαẫóá¡¿Ñ ¡á 100%.
Ä¡á óδ»«½¡∩ÑΓ ¼¡«ú¿Ñ ßΓá¡ñáαΓ¡δÑ »αÑ«íαẫóá¡¿∩ ¿ ñ«íáó½∩ÑΓ ¬«¼¼Ñ¡Γáα¿¿ ó
ºáΓαπñ¡¿Γѽ∞¡δσ ß½πτá∩σ. dCONVERT óßÑúñá ßΓáó¿Γ »ÑαÑñ Γᬿ¼¿ ¬«¼á¡ñἿ *!!
ñ½∩ «íÑß»ÑτÑ¡¿∩ ¿σ «í¡áαπªÑ¡¿∩. ü«½∞Φ¿¡ßΓó« »αÑ«íαẫóá¡¿⌐, «»¿ßá¡¡δσ ó
φΓ«⌐ ú½áóÑ, dCONVERT ñѽáÑΓ áóΓ«¼áΓ¿τÑ߬¿.
Å«ß½Ñ Γ«ú« ¬á¬ dCONVERT ºáóÑαΦ¿Γ αáí«Γπ ß ¬«¼á¡ñ¡δ¼ Σá⌐½«¼,
µÑ½Ñß««íαạ« αáß»ÑτáΓáΓ∞ «íÑ Ñú« óÑαß¿¿, ¬á¬ ñ½∩ î¿¬α« - Éæ, Γᬠ¿ ñ½∩
ß¿ßΓѼδ Éàüôæ. ù¿Γá∩ ¿σ »áαώѽ∞¡«, ¼«ª¡« πó¿ñÑΓ∞ ¬á¬¿Ñ »αÑ«íαẫóá¡¿∩
óδ»«½¡Ñ¡δ áóΓ«¼áΓ¿τÑ߬¿ ¿ ¬á¬¿Ñ ñá¡δ ¬«¼¼Ñ¡Γáα¿¿ »« »«ó«ñπ ¡Ñ«íσ«ñ¿¼δσ
απτ¡δσ »αÑ«íαẫóá¡¿⌐.
ÅÑαó«⌐ ßΓ᫬«⌐ ó »αÑ«íαẫóá¡¡«¼ Σá⌐½Ñ ∩ó½∩ÑΓß∩ ¬«¼¼Ñ¡Γáα¿⌐, ¬«Γ«αδ⌐
π¬áºδóáÑΓ ¡á óÑαß¿ε ¿ß»«½∞º«óá¡¡«⌐ »α«úαá¼¼δ dCONVERT. çáΓѼ ¿ñÑΓ ßΓ᫬á
SET HEADING OFF ó ¡«ó«¼ ¬«¼á¡ñ¡«¼ Σá⌐½Ñ. Äíδτ¡« ß¿ßΓѼá Éàüôæ »«¬áºδóáÑΓ
¿¼Ñ¡á »«½Ñ⌐ ¡áñ ¬«½«¡¬á¼¿ »«½Ñ⌐ »« ¬«¼á¡ñÑ LIST ¿½¿ DISPLAY.
諼á¡ñá SET HEADING OFF »«ñáó½∩ÑΓ φΓ¿ ºáú«½«ó¬¿ ¿¼Ñ¡ »«½Ñ⌐. àß½¿
ΓαÑíπεΓß∩ ¿¼Ñ¡á »«½Ñ⌐, ß½ÑñπÑΓ »α«ßΓ« ßΓÑαÑΓ∞ φΓπ ßΓ᫬π. æ½ÑñπεΘá∩ ßΓ᫬á
ß«ñÑαª¿Γ ¬«¼á¡ñπ SET SAFETY OFF, »« ¬«Γ«α«⌐ «Γ¬½ετáεΓß∩ »αÑñπ»αѪñáεΘ¿Ñ
ß««íΘÑ¡¿∩ « »«»δ⪥ »ÑαÑ»¿ßáΓ∞ Σá⌐½.
ü«½∞Φ¿¡ßΓó« ¡ÑαáºαÑΦ¿¼δσ áóΓ«¼áΓ¿τÑ߬¿ ¼«¼Ñ¡Γ«ó ∩ó½∩εΓß∩ τ¿ßΓ«
ΓÑσ¡¿τÑ߬¿¼¿: óαѼѡ¡δÑ »ÑαѼѡ¡δÑ PUBLIC ¿ PRIVATE, á Γá¬ªÑ »ßÑóñ«¡¿¼δ
ALIAS. éαѼѡ¡δÑ »ÑαѼѡ¡δÑ, ¿¡¿µ¿á½¿º¿α«óá¡¡δÑ ó »α«úαá¼¼¡«¼ Σá⌐½Ñ,
∩ó½∩εΓß∩ PRIVATE »« π¼«½τá¡¿ε ¿ »«φΓ«¼π áóΓ«¼áΓ¿τÑ߬¿ «ßó«í«ªñáεΓß∩ »«
ñ«ßΓ¿ªÑ¡¿¿ RETURN.
Åα«úαá¼¼δ, ¬«Γ«αδÑ óδºδóáεΓ ñαπú¿Ñ Σá⌐½δ ¿ «ª¿ñáεΓ «íαáΓ¡« αѺπ½∞ΓáΓá
ñ« »ÑαÑσ«ñá ó ñαπú«⌐ ¬«¼á¡ñ¡δ⌐ Σá⌐½ ¿½¿ ñ«½ª¡δ «íΩ∩ó¿Γ∞ »ÑαѼѡ¡πε PUBLIC.
àß½¿ ó »α«úαá¼¼Ñ î¿¬α« - Éæ ¿ß»«½∞ºπεΓß∩ óαѼѡ¡δÑ »ÑαѼѡ¡δÑ, ¿¼Ñ¡á
¬«Γ«αδσ ¼«ª¡« ß»πΓáΓ∞ ß ½«ú¿τÑ߬¿¼¿ ¬«¡ßΓá¡ΓἿ Æ, F, Y ¿½¿ N, Γ« »α«úαá¼¼á
dCONVERT ºá¼Ñ¡¿Γ ¿σ ¡á .T. ¿½¿ .F. ¿ ¡πª¡« íπñÑΓ ¼Ñ¡∩Γ∞ ¿σ «íαáΓ¡«, á ½πτΦÑ
»ÑαÑ¿¼Ñ¡«óáΓ∞ Γá¬¿Ñ »ÑαѼѡ¡δÑ.
Åα«úαá¼¼δ, ¬«Γ«αδÑ αáí«ΓáεΓ ß í«½ÑÑ τѼ «ñ¡¿¼ Σá⌐½«¼ «ñ¡«óαѼѡ¡«,
ñ«½ª¡δ »α¿ñÑনóáΓ∞ß∩ ¡«óδσ ñ«ú«ó«αÑ¡¡«ßΓÑ⌐ »« »«ó«ñπ «íαáΘÑ¡¿⌐ ¬ αẽ¿τ¡δ¼
Σá⌐½á¼ ó¼ÑßΓ« ßΓáαδσ PRIMARY ¿ SECONDARY. Æᬿ¼ ¬«¼á¡ñá¼ ¬á¬ JOIN ¿ UPDATE
ΓαÑíπεΓß∩ »ßÑóñ«¡¿¼δ ALIAS.
ê, ¡á¬«¡Ñµ, ß½ÑñπÑΓ íδΓ∞ ó¡¿¼áΓѽ∞¡δ¼ ¬ ¬«¼á¡ñ¡δ¼ Σá⌐½á¼,
¿ß»«½∞ºπεΘ¿¼ ¼á¬α«. ïεíδÑ ß¿¡Γá¬ß¿τÑ߬¿Ñ ¿º¼Ñ¡Ñ¡¼∩ ó ¡¿σ »α¿ñÑΓß∩ óδ»«½¡∩Γ∞
óαπτ¡πε.
Ä»αÑñѽѡ¡δÑ ¬«¼á¡ñδ î¿¬α« - Éæ, Γá¬¿Ñ ¬á¬ TEST, RESET, SET DATE TO ¿
SET RAW, ¡Ñ ¿¼ÑεΓ »α∩¼«ú« ß««ΓóÑΓßΓó¿∩ ó ß¿ßΓÑ¼Ñ Éàüôæ. é ßó∩º¿ ß φΓ¿¼,
Ñß½¿ ó »α«úαá¼¼Ñ ΓαÑíπÑΓß∩ «ñ¡á ¿º φΓ¿σ ¬«¼á¡ñ, ß½ÑñπÑΓ ¡á⌐Γ¿ ¡á¿í«½ÑÑ
»«ñσ«ñ∩Θ¿⌐ Ñ⌐ á¡á½«ú ó ß¿ßΓÑ¼Ñ Éàüôæ.
êçîàìàìì¢à èÄîÇìä¢
Ä»ÑαáΓ«αδ ** ¿½¿ ^ «í«º¡áτáεΓ ó«ºóÑñÑ¡¿Ñ ó ßΓѻѡ∞. é ¬«¼á¡ñÑ @...
GET ΓÑ»Ñα∞ ¼«ª¡« π¬áºδóáΓ∞ «»ÑαáΓ«α RANGE (ñ¿á»«º«¡) ñ½∩ óó«ñ¿¼δσ ñá¡¡δσ.
ìá»α¿¼Ñα, ºá»¿ß∞ ó¿ñá @ 10, 10 GET X RANGE 100, 300 úáαá¡Γ¿απÑΓ, τΓ«
óóÑñÑ¡¡«Ñ º¡áτÑ¡¿Ñ íπñÑΓ ½ÑªáΓ∞ ó ñ¿á»áº«¡Ñ «Γ 100 ñ« 300. àß½¿ ¡ÑΓ, Γ«
¬παß«α ¡Ñ ¼«ªÑΓ íδΓ∞ »ÑαÑñó¿¡πΓ ¬ ß½ÑñπεΘÑ¼π »«½ε.
@ ¿ CLEAR τ¿ßΓ∩Γ φ¬αá¡ ¡Ñ߬«½∞¬¿¼¿ ß»«ß«íἿ:
@ <ßΓ᫬á> <¬«½«¡¬á> CLEAR - τ¿ßΓ¬á ñ« ¬«¡µá φ¬αá¡á
@ <ßΓ᫬á>, 0 - τ¿ßΓ¬á ßΓ᫬¿
諼á¡ñá APPEND ΓÑ»Ñα∞ »«ºó«½∩ÑΓ ñó¿ªÑ¡¿Ñ ¡áºáñ ¬ »αÑñδñπΘÑ⌐ ºá»¿ß¿ ó
íáºÑ ñá¡¡δσ »« ¬½ετπ PgUp.
諼á¡ñá BROWSE ΓÑ»Ñα∞ »«ºó«½∩ÑΓ ºáΣ¿¬ß¿α«óáΓ∞ ¬«½«¡¬¿ ñá¡¡δσ Γá¬, τΓ«
«ñ¡á ¿½¿ í«½ÑÑ ¬«½«¡«¬ «ßΓáÑΓß∩ ¡á ¼ÑßΓÑ ó ½Ñó«⌐ τáßΓ¿ φ¬αá¡á ó Γ« óαѼ∩
¬á¬ ¿¡Σ«α¼áµ¿∩, ½ÑªáΘá∩ ºá »αÑñѽἿ φ¬αá¡á, ú«α¿º«¡Γá½∞¡« ߬᡿απÑΓß∩ ó
«¬¡«. é ¬«¼á¡ñÑ BROWSE ¿¼ÑÑΓß∩ α∩ñ ñαπú¿σ πß«óÑαΦÑ¡ßΓó«óá¡¿⌐, ó Γ«¼ τ¿ß½Ñ
óßΓα«Ñ¡¡δÑ ¼Ñ¡ε, »ÑαÑσ«ñ ¬ ¡πª¡«¼π ¡«¼Ñαπ ºá»¿ß¿ »« GOTO, FIND ñ½∩
¿¡ñѬ߿α«óá¡¡δσ Σá⌐½«ó, »«óδΦÑ¡¡á∩ ߬«α«ßΓ∞ αáí«Γδ ¿ ½πτΦÑÑ ¿º«íαáªÑ¡¿Ñ
¿¡Σ«α¼áµ¿¿.
諼á¡ñá CHANGE ΓÑ»Ñα∞ ∩ó½∩ÑΓß∩ »«½¡«φ¬αá¡¡«⌐, »«ñ«í¡« EDIT, ¡« ÑÑ
ñÑ⌐ßΓó¿Ñ ¼«ª¡« «úαá¡¿τ¿Γ∞ ñ« πα«ó¡∩ π¬áºá¡¡δσ »«½Ñ⌐ ¿ ºá»¿ßÑ⌐. æ¿¡Γá¬ß¿ß
¬«¼á¡ñδ:
CHANGE [FIELD <ß»¿ß«¬ »«½Ñ⌐>] [<τ¿ß½«>] [FOR/WHILE <óδαáªÑ¡¿Ñ>]
諼á¡ñá CLEAR ¿¼ÑÑΓ ¡Ñ߬«½∞¬« Σπ¡¬µ¿⌐. CLEAR «τ¿ΘáÑΓ óÑß∞ φ¬αá¡ ¿½¿
Ñú« τáßΓ∞. CLEAR ALL ºá¬αδóáÑΓ óßÑ Σá⌐½δ, «ßó«í«ªñáÑΓ óßÑ óαѼѡ¡δÑ
»ÑαѼѡ¡δÑ ¿ ¿ºí¿αáÑΓ (SELECT) »Ñαóπε αáí«τπε «í½áßΓ∞.
CLEAR GETS ñѽáÑΓ ΓѬπΘ¿Ñ »ÑαѼѡ¡δÑ, »«½πτÑ¡¡δÑ »« GET ¡Ññ«ßΓπ»¡δ¼¿
ñ½∩ ¬«¼á¡ñδ READ. CLEAR MEMORY «ßó«í«ªñáÑΓ »á¼∩Γ∞ «Γ óßÑσ óαѼѡ¡δσ
»ÑαѼѡ¡δσ, ó¬½ετá∩ PUBLIC.
諼á¡ñá COPY TO ó«ß»α¿¡¿¼áÑΓ «»µ¿ε DELIMITED WITH BLANK ñ½∩
αáßßΓá¡«ó¬¿ »α«íѽ«ó ¼Ñªñπ »«½∩¼¿ ó¼ÑßΓ« ºá»∩Γδσ.
諼á¡ñá DISPLAY ΓÑ»Ñα∞ óδó«ñ¿Γ ºáú«½«ó¬¿ ¬«½«¡«¬ »«½Ñ⌐ ñá¡¡δσ. ¥Γ«
¼«ª¡« «Γ¼Ñ¡¿Γ∞ ¬«¼á¡ñ«⌐ SET HEADING OFF.
諼á¡ñá DISPLAY MEMORY »«¬áºδóáÑΓ ó óδσ«ñ¡«¼ Σ«α¼áΓÑ ß«ñÑন¼«Ñ
τ¿ß½«óδσ óαѼѡ¡δσ »ÑαѼѡ¡δσ ¡áα∩ñπ ß ó¡πΓαÑ¡¡¿¼ »αÑñßΓáó½Ñ¡¿Ñ¼ º¡áτÑ¡¿⌐.
諼á¡ñá DIR αáí«ΓáÑΓ ΓᬠªÑ ¬á¬ ¬«¼á¡ñá DISPLAY FILES ó α«- Éæ ºá
¿ß¬½ετÑ¡¿Ñ¼ «ΓßπΓßΓó¿∩ ó ¬«¼á¡ñÑ ß½«óá ON ¿ ¡Ñ«í∩ºáΓѽ∞¡«ú« »α¿ßπΓßΓó¿∩
¬½ετÑó«ú« ß½«óá LIKE. é ¬«¼á¡ñÑ »α¿¼Ñ¡∩ÑΓß∩ »«ñσ«ñ ¬ »«¬áºπ ñ¿αÑ¬Γ«α¿∩
»«τΓ¿ ¿ñÑ¡Γ¿τ¡δ⌐ ¿ß»«½∞ºπѼ«¼π ó ¬«¼á¡ñÑ DIR «»Ñαᵿ«¡¡«⌐ ß¿ßΓѼδ.
éδó«ñ¿Γß∩ Γá¬ªÑ αẼÑα Σá¬Γ¿τÑ߬¿ ¿ß»«½∞º«óá¡¡«ú« ¼ÑßΓá ¡á ñ¿ß¬Ñ ¿ «íΘ¿⌐
«íΩѼ ßó«í«ñ¡«ú« »α«ßΓαá¡ßΓóá. àß½¿ π¬áºδóáÑΓß∩ ¿¼∩ Σá⌐½á íѺ αáßΦ¿αÑ¡¿∩,
Γ«úñá »ÑαÑτ¿ß½∩εΓß∩ Γ«½∞¬« Σá⌐½δ íáºδ ñá¡¡δσ ß π¬áºá¡¿Ñ¼ ¬«½¿τÑßΓóá ºá»¿ßÑ⌐
¿ ñáΓδ »«ß½Ññ¡Ñú« «í¡«ó½Ñ¡¿∩.
髺¼«ª¡«ßΓ¿ ¬«¼á¡ñδ DO í뫨 αáßΦ¿αÑ¡δ Γá¬, τΓ«íδ ó ß¿ßΓÑ¼Ñ Éàüôæ
¼«ª¡« í佫 »α¿¼Ñ¡∩Γ∞ ΓÑσ¡¿¬π »ÑαÑñáτ¿ »áαá¼ÑΓα«ó ñαπú¿¼ »α«úαá¼¼á¼.
諼á¡ñ¡δÑ Σá⌐½δ ¼«úπΓ »ÑαÑñáóáΓ∞ º¡áτÑ¡¿∩ ß½ÑñπεΘ¿¼ ¬«¼á¡ñ¡δ¼ Σá⌐½á¼ ß
»«¼«Θ∞ε «»µ¿¿ WITH ¬«¼á¡ñδ DO. öá⌐½, »α¿¡¿¼áεΘ¿⌐ »áαá¼ÑΓαδ, ¿ñÑ¡Γ¿Σ¿µ¿απÑΓ
¿σ ¬«¼á¡ñ«⌐ PARAMETRS <ß»¿ß«¬ »áαá¼ÑΓα«ó>. Åáαá¼ÑΓαδ ß½ÑñπÑΓ »ÑαÑñáóáΓ∞ ó
Γ«¼ »«α∩ñ¬Ñ, ó ¬«Γ«α«¼ «¡¿ «ª¿ñáεΓß∩. æΓ᫬á PARAMETERS ∩ó½∩ÑΓß∩ »Ñαó«⌐
ßΓ᫬«⌐ Σá⌐½á, Ñß½¿ Γ«½∞¬« Σá⌐½ ¡Ñ ∩ó½∩ÑΓß∩ »α«µÑñπα¡δ¼ (PROCEDURE).
諼á¡ñá ERASE αáí«ΓáÑΓ á¡á½«ú¿τ¡« DELETE FILE ó î¿¬α« - Éæ.
諼á¡ñá GOTO ΓÑ»Ñα∞ ¼«ªÑΓ ó«ß»α¿¡¿¼áΓ∞ µ¿Σα«ó«Ñ óδαáªÑ¡¿Ñ.
諼á¡ñá HELP íδ½á »«½¡«ßΓ∞ε »ÑαÑαáí«Γá¡á. é ¡«ó«¼ óáα¿á¡ΓÑ ¬«¼á¡ñá
»αÑñßΓáó½∩ÑΓ ñÑαÑó« φ¬αá¡«ó »«¼«Θ¿, ¬ ¬«Γ«αδ¼ ¼«ª¡« »«½πτ¿Γ∞ ñ«ßΓπ» τÑαѺ
¼Ñ¡ε ¿½¿ ¡Ñ»«ßαÑñßΓóÑ¡¡« »« ¿¼Ñ¡¿ φ¬αá¡á ¿½¿ ¡áºóá¡¿ε »αÑñ¼ÑΓá. ¥¬αá¡δ
»«¼«Θ¿ ¼«úπΓ »αÑñ«ßΓáó¿Γ∞ ¡áí«α »«ß½ÑñπεΘ¿σ φ¬αá¡«ó τÑαѺ ¼Ñ¡ε. Å« ñÑαÑóπ
φ¬αá¡«ó ¼«ª¡« óÑα¡πΓ∞ß∩ ¬ ¿ßσ«ñ¡«⌐ Γ«τ¬Ñ ¿ »α«óÑα¿Γ∞ ñαπú¿Ñ óÑΓ¬¿.
é ¬«¼á¡ñÑ MODIFY COMMAND ¿ß»«½∞ºπÑΓß∩ ¬«ñ ΓѬßΓ«ó«ú« »α«µÑßß«αá ñ½∩
»α«úαá¼¼¡«ú« ó«ºóαáΓá ¬áαÑΓ¬¿ ¿½¿ Γ«τ¬¿ ß ºá»∩Γ«⌐ ó ¬áτÑßΓóÑ ß¿¼ó«½á
»α«ñ«½ªÑ¡¿∩ ñ½∩ ñá¡¡δσ ßΓ᫬ ó »α«úαá¼¼¡δσ Σá⌐½áσ.
諼á¡ñá MODIFY STRUCTURE í«½∞ΦÑ ¡Ñ ΓαÑíπÑΓ ß«ºñá¡¿∩ óαѼѡ¡«ú« Σá⌐½á
íáºδ ñá¡¡δσ ñ½∩ ºá»¿ßÑ⌐. 諼á¡ñá ¡á»«¼¿¡áÑΓ, τΓ« Γ«½∞¬« »«½∩ ß ΓѼ¿ ªÑ
¿¼Ñ¡á¼¿ τΓ« ¿ ó ¡«ó«⌐ ßΓαπ¬ΓπαÑ íπñπΓ ß¬«»¿α«óá¡δ ó ¼«ñ¿Σ¿µ¿α«óá¡¡πε íáºπ
ñá¡¡δσ.
諼á¡ñá PACK ΓÑ»Ñα∞ ß««íΘáÑΓ αẼÑα ñ¿ß¬«ó«⌐ »á¼∩Γ¿, ºá¡∩Γ«⌐
πñá½Ñ¡¡δ¼¿ ºá»¿ß∩¼¿.
ÅαѪ¡¿Ñ Σπ¡¬µ¿¿ ¬«¼á¡ñδ REPORT ΓÑ»Ñα∞ óδ»«½¡∩εΓß∩ ¡Ñ߬«½∞¬¿¼¿
¬«¼á¡ñἿ. äóÑ ¬«¼á¡ñδ αáí«ΓáεΓ ó¼ÑßΓÑ (»«½¡«φ¬αá¡¡δÑ): CREATE/MODIFY
REPORT ßΓα«∩Γ ¿ αÑñá¬Γ¿απεΓ Σ«α¼π «ΓτÑΓá.
ôß«óÑαΦÑ¡ßΓó«óá¡¡á∩ ¬«¼á¡ñá REPORT FORM úÑ¡Ñα¿απÑΓ «ΓτÑΓ. ÆÑ»Ñα∞
¬«¼á¡ñá »«ºó«½∩ÑΓ »«ñó«ñ¿Γ∞ »α«¼ÑªπΓ«τ¡δÑ ¿Γ«ú¿ ¡á π¬áºá¡¡δσ πα«ó¡∩σ ¿
úαπ»»¿α«óáΓ∞ óºá¿¼«ßó∩ºá¡¡πε ¿¡Σ«α¼áµ¿ε ΓᬠªÑ ¬á¬ ¿Γ«ú¿.
髺¼«ª¡«ßΓ¿ ¬½ετÑó«ú« ß½«óá TO ó ¬«¼á¡ñÑ REPORT FORM αáßΦ¿αÑ¡δ Γá¬,
τΓ« ¼«ª¡« ¡áα∩ñπ ß TO PRINT π¬áºδóáΓ∞ TO FILE <¿¼∩ Σá⌐½á> ß ΓѼ, τΓ«íδ ΓѬß
«ΓτÑΓá ¼«ú íδΓ∞ »«¼ÑΘÑ¡ ó Σá⌐½ ñ½∩ »«ß½ÑñπεΘÑú« αÑñá¬Γ¿α«óá¡¿∩ ¿ »ÑτáΓ¿.
¡« π¬áºáΓ∞ «»µ¿ε PLAIN ñ½∩ »«ñáó½Ñ¡¿∩ »ÑτáΓ¿ ¡«¼Ñα«ó ßΓαá¡¿µ ¿½¿
ß¿ßΓѼ¡«⌐ ñáΓδ, «»µ¿ε HEADING ñ½∩ Σ«α¼¿α«óá¡¿∩ ºáú«½«ó¬á ¡á ¬áªñ«⌐ ßΓαá¡¿µÑ
¿ «»µ¿ε NOEJECT ñ½∩ »«ñáó½Ñ¡¿∩ »Ñαó«¡áτá½∞¡«⌐ »«ñáτ¿ Σ«α¼δ ¡á »ÑτáΓ∞.
é ¬«¼á¡ñÑ RETURN »«∩ó¿½áß∞ ¡«óá∩ «»µ¿∩ RETURN TO MASTER »« ¬«Γ«α«⌐
»α«¿ßσ«ñ¿Γ »ÑαÑñáτá π»αáó½Ñ¡¿∩ ¬ ¬«¼á¡ñ¡«¼π Σá⌐½π ßἫú« óÑασ¡Ñú« πα«ó¡∩.
é ¬«¼á¡ñÑ SELECT ΓÑ»Ñα∞ ñ«»π߬áεΓß∩ τ¿ß½á «Γ 1 ñ« 10 ¿½¿ ¿¼Ñ¡á
»ßÑóñ«¡¿¼«ó (ALIAS) «Γ A ñ« J ¿½¿ ¿¼Ñ¡á Σá⌐½«ó íáºδ ñá¡¡δσ ñ½∩ »ÑαÑσ«ñá «Γ
«ñ¡«⌐ αáí«τÑ⌐ «í½áßΓ¿ ¬ ñαπú«⌐ ¿º ¿¼ÑεΘ¿σß∩ 10 αáí«τ¿σ «í½áßΓÑ⌐. Ä»µ¿¿
PRIMARY ¿ SECONDARY í«½∞ΦÑ ¡Ñ ¿ß»«½∞ºπεΓß∩.
諼á¡ñá SET ∩ó½∩ÑΓß∩ »«½¡«φ¬αá¡¡«⌐, ¼Ñ¡ε π»αáó½∩Ѽ«⌐. é ß¿ßΓÑ¼Ñ Éàüôæ
»«∩ó¿½ß∩ µÑ½δ⌐ α∩ñ ¡«óδσ «»µ¿⌐ ¬«¼á¡ñδ SET.
é αѺπ½∞ΓáΓÑ ¬«¼á¡ñδ SET ESCAPE ON ß¿ßΓѼá Éàüôæ óδñáÑΓ ß««íΘÑ¡¿Ñ ó
ß½πτáÑ ¡áªáΓ¿∩ ¬½áó¿Φ¿ Esc ó« óαѼ∩ óδ»«½¡Ñ¡¿∩ ¬«¼á¡ñ¡«ú« Σá⌐½á. ê¼ÑεΓß∩
«»µ¿¿ «Γ¼Ñ¡δ, »α¿«ßΓá¡«ó¬¿ ¿½¿ ó«ßßΓá¡«ó½Ñ¡¿∩ αáí«Γδ »α«úαá¼¼δ.
é ¬«¼á¡ñÑ WAIT ¿¼ÑÑΓß∩ ¡Ñ«í∩ºáΓѽ∞¡δ⌐ ºá»α«ß ¡á óó«ñ á¡á½«ú¿τ¡«
¬«¼á¡ñá¼ ACCEPT ¿ INPUT.
êæèï₧ùàìì¢à èÄîÇìä¢ ê öôìèûêê
ìѬ«Γ«αδÑ ¬«¼á¡ñδ ¿ Σπ¡¬µ¿¿ î¿¬α« - Éæ í뫨 ¿ß¬½ετÑ¡δ, σ«Γ∩ ó
í«½∞Φ¿¡ßΓóÑ ß½πτáÑó «¡¿ í뫨 ºá¼Ñ¡Ñ¡δ φ¬ó¿óá½Ñ¡Γ¡δ¼¿ ¬«¼á¡ñἿ ¿ Σπ¡¬µ¿∩¼¿.
ìѬ«Γ«αδÑ ¬«¼á¡ñδ ¿ Σπ¡¬µ¿¿ í뫨 »ÑαÑ¿¼Ñ¡«óá¡δ. æ½ÑñπÑΓ »«¼¡¿Γ∞, τΓ«
¬«¼á¡ñá ERASE ¡áºδóáÑΓß∩ ΓÑ»Ñα∞ CLEAR.
î¿¬α« - Éæ Éàüôæ
# ¡«¼Ñα ºá»¿ß¿ ÅÑαÑ¿¼Ñ¡«óá¡ ó RECNO()
* (»α«óÑα¬á ¡á πñá½Ñ¡¿Ñ) -"- DELETED()
@ () -"- AT()
$ () -"- SUBSTR()
! () -"- UPPER()
RANK () -"- ASC()
CLEAR -"- CLEAR ALL
DELETE FILE -"- ERASE
DISPLAY FILE -"- DIR
ERASE -"- CLEAR
QUIT TO ê߬½ετÑ¡á, ß¼. RUN/!
READ NOUPDATE -"- READ [SAVE]
REMARK -"- @ ¿ @...SAY
RESET ê߬½ετÑ¡á, ¡Ñ ¡πª¡á ó DOS
SET COLON ON ê߬½ετÑ¡á, ß¼. SET DELIMITERS
SET DATE TO -"- SET DATE
SET EJECT ON/OFF -"- REPORT
SET HEADING TO -"- REPORT
SET RAW ON/OFF -"- TRIM()
SET SCREEN ON/OFF -"- SET DEVICE ¿
SET CONSOLE
TEST -"- TYPE()
UPDATE...ADD -"- UPDATE