home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS 1
/
BBS#1.iso
/
document
/
rebus.arj
/
G6.DOC
< prev
next >
Wrap
Text File
|
1988-03-15
|
100KB
|
3,064 lines
â ï Ç é Ç 6.
ö ô ì è û ê ê
êæÅÄï£çÄéÇìêà öôìèûêë
öπ¡¬µ¿¿ óδ»«½¡∩εΓ ß»Ñµ¿á½¿º¿α«óá¡¡δÑ «»Ñαᵿ¿, ¬«Γ«αδÑ αáßΦ¿α∩εΓ ¿
πß¿½¿óáεΓ ¬«¼á¡ñδ ß¿ßΓѼδ Éàüôæ.
Ä¡¿ ¿ß»«½∞ºπεΓß∩ ñ½∩ á¡á½¿ºá ¿½¿ »αÑ«íαẫóá¡¿∩ ñá¡¡δσ ¿ ó«ºóαáΘáεΓ
αѺπ½∞ΓáΓ.
éßÑ Σπ¡¬µ¿¿ ß¿ßΓѼδ Éàüôæ ¿¼ÑεΓ () - «Γ¬αδóáεΘ¿Ñ ¿ ºá¬αδóáεΘ¿Ñ ß¬«í¬¿
»«ß½Ñ ¿¼Ñ¡¿ Σπ¡¬µ¿¿ (ºá ¿ß¬½ετÑ¡¿Ñ¼ ¼á¬α« Σπ¡¬µ¿¿ &). äá¡¡δÑ ó¡πΓα¿ ß¬«í«¬
¼«úπΓ π¬áºδóáΓ∞ß∩ ¿½¿ ¡Ñ π¬áºδóáΓ∞ß∩.
é ñá¡¡«⌐ ú½áóÑ ß«ñÑαªáΓß∩ á½Σáó¿Γ¡δÑ ß»¿ß¬¿ ¿¼ÑεΘ¿σß∩ ó ß¿ßΓÑ¼Ñ Éàüôæ
Σπ¡¬µ¿⌐. èáªñδ⌐ ß»¿ß«¬ ß«ñÑαª¿Γ ß¿¡Γá¬ß¿ß, π¬áºá¡¿∩ »« ¿ß»«½∞º«óá¡¿ε ¿, úñÑ
¡Ñ«íσ«ñ¿¼«, »α¿¼Ñαδ.
ÅÉêîàùÇìêà:
é αáí«τ¿σ »α¿¼Ñαáσ Σπ¡¬µ¿⌐ ß¿ßΓѼδ Éàüôæ, »α¿óÑñÑ¡¡δσ ó ú½áóÑ,
¿ß»«½∞ºπεΓß∩ Σá⌐½δ ¬«¡Γα«½∞¡«ú« »α¿¼Ñαá. éßÑ »α¿¼Ñαδ »«ñαáºπ¼ÑóáεΓ, τΓ«
αáí«Γá óÑñÑΓß∩ ß ¡ÑΓα«¡πΓ«⌐ óÑαß¿Ñ⌐ ¿ßσ«ñ¡«ú« Σá⌐½á.
ÆêÅ¢ éòÄäì¢ò ê é¢òÄäì¢ò äÇìì¢ò
çá ¿ß¬½ετÑ¡¿Ñ¼ Σπ¡¬µ¿¿ ¼á¬α«»«ñßΓá¡«ó¬¿ (&), π¬áºδóáÑΓß∩ ¿¼∩ Σπ¡¬µ¿¿,
ßαáºπ ºá ¬«Γ«αδ¼ ¿ñπΓ óσ«ñ¡δÑ ñá¡¡δÑ ñ½∩ Σπ¡¬µ¿¿, ºá¬½ετÑ¡¡δÑ ó ߬«í¬¿.
æ¬«í¬¿ «í∩ºáΓѽ∞¡δ ¡Ñºáó¿ß¿¼« «Γ Γ«ú«, ΓαÑíπεΓß∩ ñ½∩ Σπ¡¬µ¿¿ óσ«ñ¡δÑ ñá¡¡δÑ
¿½¿ ¡ÑΓ, ß ΓѼ, τΓ«íδ ß¿ßΓѼá Éàüôæ ¼«ú½á αáß»«º¡áΓ∞ Σπ¡¬µ¿ε. öπ¡¬µ¿¿
óßÑúñá ó«ºóαáΘáεΓ º¡áτÑ¡¿∩ ¿ ñ«½ª¡δ ¿ß»«½∞º«óáΓ∞ß∩ ó ¬áτÑßΓóÑ óδαáªÑ¡¿∩ ¿½¿
ó ß«ßΓáóÑ óδαáªÑ¡¿∩, ¬«Γ«α«Ñ ß½ÑñπÑΓ ºá ¬«¼á¡ñ«⌐.
öπ¡¬µ¿¿ ¿ Γ¿»δ ñá¡¡δσ, ¬«Γ«αδÑ «¡¿ óδαáíáΓδóáεΓ »ÑαÑτ¿ß½Ñ¡δ ó
á½Σáó¿Γ¡«¼ »«α∩ñ¬Ñ ó ¡¿ªÑß½ÑñπεΘÑ⌐ Γáí½¿µÑ:
+---------+-------------------------------------+------------+-----------+
| ìáºóá¡¿Ñ| Ä»¿ßá¡¿Ñ Σπ¡¬µ¿¿ |Æ¿» óδσ«ñ¡δσ|Æ¿» óσ«ñ¡δσ|
| Σπ¡¬µ¿¿ | | ñá¡¡δσ | ñá¡¡δσ |
+---------+-------------------------------------+------------+-----------+
| 1 | 2 | 3 | 4 |
+---------+-------------------------------------+------------+-----------+
|& |îá¬α«»«ñßΓá¡«ó¬á | C, D, N, L | C |
|ABS |Çíß«½εΓ¡á∩ óѽ¿τ¿¡á | N | N |
|ASC |Å«½πτÑ¡¿Ñ ¬«ñá ASCII ß¿¼ó«½á | N | C |
|AT |Å«¿ß¬ »«ñßΓ᫬¿ | C | C |
|BOF |ìáτὫ Σá⌐½á | L | * |
|CDOW |ìáºóá¡¿Ñ ñ¡∩ ¡Ññѽ¿ | C | D |
|CHR |Å«½πτÑ¡¿Ñ ß¿¼ó«½á »« ¬«ñπ ASCII | C | N |
|CMONTH |èá½Ñ¡ñáα¡δ⌐ ¼Ñß∩µ | C | D |
|COL |쫼Ñα ΓѬπΘÑ⌐ ¬«½«¡¬¿ ¡á φ¬αá¡Ñ | N | * |
|CTOD |ÅαÑ«íαẫóá¡¿Ñ ñáΓδ ¿º ß¿¼ó«½∞¡«ú« | | |
| |Σ«α¼áΓá ó Σ«α¼áΓ D. | D | C |
|DATE |æ¿ßΓѼ¡á∩ ñáΓá | D | * |
|DAY |ù¿ß½« ¼Ñß∩µá | N | D |
|DBF |ê¼∩ ΓѬπΘÑú« Σá⌐½á íáºδ ñá¡¡δσ | C | * |
|DELETED |çỿß∞ πñá½Ñ¡á ¿½¿ ¡ÑΓ | L | * |
|DISKSPACE|æó«í«ñ¡«Ñ ¼ÑßΓ« ¡á ñ¿ß¬Ñ ó íá⌐Γáσ | N | * |
|DOW |쫼Ñα ñ¡∩ ¡Ññѽ¿ | N | D |
+---------+-------------------------------------+------------+-----------+
| 1 | 2 | 3 | 4 |
+---------+-------------------------------------+------------+-----------+
|DTOC |ÅαÑ«íαẫóá¡¿Ñ ñáΓδ ¿º Σ«α¼áΓá D ó | | |
| |ß¿¼ó«½∞¡δ⌐ Σ«α¼áΓ | C | D |
|EOF |諡ѵ Σá⌐½á | L | * |
|ERROR |è«ñ «Φ¿í¬¿, óδºóáóΦÑ⌐ πß½«ó¿Ñ ON ER- | | |
| |ROR | N | * |
|EXP |¥¬ß»«¡Ñ¡Γá | N | N |
|FIELD |ê¼∩ »«½∩ ó Σá⌐½Ñ íáºδ ñá¡¡δσ | C | N |
|FILE |öá⌐½ ßπΘÑßΓóπÑΓ ¿½¿ ¡ÑΓ | L | C |
|FKLABEL |ìáºóá¡¿Ñ Σπ¡¬µ¿«¡á½∞¡δσ ¬½ετÑ⌐ | C | N |
|FKMAX |îá¬ß¿¼á½∞¡«Ñ ¬«½¿τÑßΓó« »α«úαá¼¼¿απ- | | |
| |Ѽδσ Σπ¡¬µ¿«¡á½∞¡δσ ¬½ετÑ⌐ ¡á ΓÑନ- | | |
| |¡á½Ñ | N | * |
|FOUND |ÉѺπ½∞ΓáΓ »«¿ß¬á Σá⌐½á íáºδ ñá¡¡δσ | L | * |
|GETENV |ÅÑαѼѡ¡á∩, ß«ñÑαªáΘá∩ ¿¡Σ«α¼áµ¿ε «í | | |
| |«»Ñαᵿ«¡¡«⌐ ßαÑñÑ | æ | æ |
|IIF |Äñ¡« ¿½¿ ñαπú«Ñ óδαáªÑ¡¿Ñ ó ºáó¿ß¿- | | |
| |¼«ßΓ¿ «Γ πß½«ó¿∩ | C, D, N | C, D, N |
|INKEY |è«ñ ¡áªáΓ«ú« ó« óαѼ∩ αáí«Γδ »α«úαá¼-| | |
| |¼δ ¬½ετá | N | C |
|INT |ûѽ«Ñ τ¿ß½« | N | N |
|ISALPHA |Åα«óÑન ¡á íπ¬óπ | L | * |
|ISCOLOR |Åα«óÑα¬á ¡á µóÑΓ¡«⌐ αѪ¿¼ | L | * |
|ISLOWER |Åα«óÑα¬á ¡á ¡¿ª¡¿⌐ αÑú¿ßΓα | L | C |
|ISUPPER |Åα«óÑα¬á ¡á óÑασ¡¿⌐ αÑú¿ßΓα | L | C |
|LEFT |éδí«α »«ñßΓ᫬¿ ß½Ñóá ¡á»αáó« | C | C |
|LEN |使¡á ßΓ᫬¿ ß¿¼ó«½«ó | N | C |
|LOG |ï«úáα¿Σ¼ | N | N |
|LOWER |ÅÑαÑσ«ñ ß óÑασ¡Ñú« ¡á ¡¿ª¡¿⌐ αÑú¿ßΓα | C | C |
|LTRIM |ôñá½Ñ¡¿Ñ óÑñπΘ¿σ »α«íѽ«ó | C | C |
|LUPDATE |Å«ß½Ññ¡ÑÑ «í¡«ó½Ñ¡¿Ñ Σá⌐½á íáºδ ñá¡- | | |
| |¡δσ | D | * |
|MAX |Ä»αÑñѽѡ¿Ñ í«½∞ΦÑú« ¿º ñóπσ º¡áτÑ¡¿⌐| N | N |
|MESSAGE |æ««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ | C | * |
|MIN |Ä»αÑñѽѡ¿Ñ ¼Ñ¡∞ΦÑú« ¿º ñóπσ º¡áτÑ¡¿⌐| N | N |
|MOD |î«ñπ½∞ | N | N |
|MONTH |îÑß∩µ ú«ñá | N | D |
|NDX |ê¼Ñ¡á «Γ¬αδΓδσ ¿¡ñѬߡδσ Σá⌐½«ó | C | N |
|OS |ìáºóá¡¿Ñ «»Ñαᵿ«¡¡«⌐ ß¿ßΓѼδ | C | * |
|PCOL |쫼Ñα ¬«½«¡¬¿ ¡á »α¿¡ΓÑαÑ | N | * |
|PROW |쫼Ñα ßΓ᫬¿ ¡á »α¿¡ΓÑαÑ | N | * |
|READKEY |Ä»αÑñѽѡ¿Ñ ¬½ετá ñ½∩ óδσ«ñá ¿º »«½- | | |
| |¡«φ¬αá¡¡«⌐ ¬«¼á¡ñδ | N | * |
|RECCOUNT |諽¿τÑßΓó« ºá»¿ßÑ⌐ ó Σá⌐½Ñ íáºδ ñá¡- | | |
| |¡δσ | N | * |
|RECNO |쫼Ñα ΓѬπΘÑ⌐ ºá»¿ß¿ | N | * |
|RECSIZE |ÉẼÑα ºá»¿ß¿ | N | * |
|REPLICATE|Å«óΓ«αÑ¡¿Ñ ß¿¼ó«½∞¡«ú« óδαáªÑ¡¿∩ | C | C |
|RIGHT |éδí«α »«ñßΓ᫬¿ ß»αáóá ¡á½Ñó« | C | C |
|ROUND |Ĭαπú½Ñ¡¿Ñ τ¿ß½á | N | N |
|ROW |쫼Ñα ΓѬπΘÑ⌐ ßΓ᫬¿ ¡á φ¬αá¡Ñ | N | * |
|RTRIM |ôñá½Ñ¡¿Ñ σó«ßΓ«óδσ »α«íѽ«ó | C | C |
|SPACE |âÑ¡Ñαᵿ∩ »α«íѽ«ó | C | N |
|SQRT |èóáñαáΓ¡δ⌐ ¬«αÑ¡∞ | N | N |
|STR |ÅαÑ«íαẫóá¡¿Ñ τ¿ß½á ó ß¿¼ó«½ | C | N |
|STUFF |çá¼Ñ¡á τáßΓ¿ ßΓ᫬¿ | C | C |
|SUBSTR |éδí«α »«ñßΓ᫬¿ | C | C |
+---------+-------------------------------------+------------+-----------+
| 1 | 2 | 3 | 4 |
+---------+-------------------------------------+------------+-----------+
|TIME |æ¿ßΓѼ¡«Ñ óαѼ∩ | C | * |
|TRANSFORM|ÅαÑñßΓáó½Ñ¡¿Ñ ß¿¼ó«½«ó/µ¿Σα ó Σ«α¼áΓÑ| | |
| |PICTURE | C | C, N |
|TRIM |ôñá½Ñ¡¿Ñ σó«ßΓ«óδσ »α«íѽ«ó | C | C |
|TYPE |Åα«óÑα¬á Γ¿»á óδαáªÑ¡¿∩ | C | C |
|UPPER |ÅÑαÑσ«ñ ß ¡¿ª¡Ñú« ¡á óÑασ¡¿⌐ αÑú¿ßΓα | C | C |
|VAL |ÅαÑ«íαẫóá¡¿Ñ ß¿¼ó«½á ó τ¿ß½« | N | C |
|VERSION |éÑαß¿∩ ß¿ßΓѼδ Éàüôæ | C | * |
|YEAR |â«ñ | N | D |
+---------+-------------------------------------+------------+-----------+
* «º¡áτáÑΓ, τΓ« ó ñá¡¡«¼ ß½πτáÑ Γ¿» óσ«ñ¡δσ ñá¡¡δσ πßΓá¡áó½¿óáÑΓß∩
áóΓ«¼áΓ¿τÑ߬¿
èïÇææêöêèÇûêƒ
öπ¡¬µ¿¿ ¬½áßß¿Σ¿µ¿α«óá¡δ »« úαπ»»á¼. âαπ»»δ Σπ¡¬µ¿⌐ »α¿ó«ñ∩Γß∩ ó
¡¿ªÑß½ÑñπεΘÑ⌐ Γáí½¿µÑ.
+---------------+----------------+---------------------------------------+
|ìáºóá¡¿Ñ ¬½áßßá|ìáºóá¡¿Ñ Σπ¡¬µ¿¿| Ä»¿ßá¡¿Ñ Σπ¡¬µ¿¿ |
| Σπ¡¬µ¿⌐ | | |
+---------------+----------------+---------------------------------------+
| 1 | 2 | 3 |
+---------------+----------------+---------------------------------------+
|öπ¡¬µ¿¿, αáí«- |CDOW |äÑ¡∞ ¡Ññѽ¿ |
|ΓáεΘ¿Ñ ß ñáΓἿ|CMONTH |èá½Ñ¡ñáα¡δ⌐ ¼Ñß∩µ |
| |CTOD |ÅαÑ«íαẫóá¡¿Ñ ñáΓδ ¿º ß¿¼ó«½∞¡«ú« Σ«α-|
| | |¼áΓá ó Σ«α¼áΓ D |
| |DATE |æ¿ßΓѼ¡á∩ ñáΓá |
| |DAY |ù¿ß½« ¼Ñß∩µá |
| |DOW |쫼Ñα ñ¡∩ ¡Ññѽ¿ |
| |DTOC |ÅαÑ«íαẫóá¡¿Ñ ñáΓδ ¿º Σ«α¼áΓá D ó ß¿¼-|
| | |ó«½∞¡δ⌐ Σ«α¼áΓ |
| |MONTH |îÑß∩µ ú«ñá |
| |TIME |æ¿ßΓѼ¡«Ñ óαѼ∩ |
| |YEAR |â«ñ |
|öπ¡¬µ¿¿, αáí«- |AT |Å«¿ß¬ »«ñßΓ᫬¿ |
|ΓáεΘ¿Ñ ß ß¿¼ó«-|LEFT |éδí«α »«ñßΓ᫬¿ ß½Ñóá ¡á»αáó« |
|½á¼¿ |LOWER |ÅÑαÑσ«ñ ß óÑασ¡Ñú« ¡á ¡¿ª¡¿⌐ αÑú¿ßΓα |
| |LTRIM |ôñá½Ñ¡¿Ñ óÑñπΘ¿σ »α«íѽ«ó |
| |REPLICATE |Å«óΓ«αÑ¡¿Ñ ß¿¼ó«½∞¡«ú« óδαáªÑ¡¿∩ |
| |RIGHT |éδí«α »«ñßΓ᫬¿ ß»αáóá ¡á½Ñó« |
| |RTRIM |ôñá½Ñ¡¿Ñ σó«ßΓ«óδσ »α«íѽ«ó |
| |SPACE |âÑ¡Ñαᵿ∩ »α«íѽ«ó |
| |STUFF |çá¼Ñ¡á τáßΓ¿ ßΓ᫬¿ |
| |SUBSTR |éδí«α »«ñßΓ᫬¿ |
| |TRANSFORM |ÅαÑñßΓáó½Ñ¡¿Ñ ß¿¼ó«½«ó/µ¿Σα ó Σ«α¼áΓÑ |
| | |PICTURE |
| |TRIM |ôñá½Ñ¡¿Ñ σó«ßΓ«óδσ »α«íѽ«ó |
| |UPPER |ÅÑαÑσ«ñ ß ¡¿ª¡Ñú« ¡á óÑασ¡¿⌐ αÑú¿ßΓα |
|îáΓѼáΓ¿τÑ߬¿Ñ |ABS |Çíß«½εΓ¡á∩ óѽ¿τ¿¡á |
|Σπ¡¬µ¿¿ |EXP |¥¬ß»«¡Ñ¡Γá |
| |INT |ûѽ«Ñ τ¿ß½« |
| |LOG |ï«úáα¿Σ¼ |
| |MAX |Ä»αÑñѽѡ¿Ñ í«½∞ΦÑú« ¿º ñóπσ º¡áτÑ¡¿⌐ |
+---------------+----------------+---------------------------------------+
| 1 | 2 | 3 |
+---------------+----------------+---------------------------------------+
| |MOD |î«ñπ½∞ |
| |ROUND |Ĭαπú½Ñ¡¿Ñ τ¿ß½á |
| |SQRT |èóáñαáΓ¡δ⌐ ¬«αÑ¡∞ |
|öπ¡¬µ¿¿ »αÑ«í- |ASC |Å«½πτÑ¡¿Ñ ¬«ñá ASCII ß¿¼ó«½á |
|αẫóá¡¿⌐ |CHR |Å«½πτÑ¡¿Ñ ß¿¼ó«½á »« ¬«ñπ ASCII |
| |CTOD |ÅαÑ«íαẫóá¡¿Ñ ñáΓδ ¿º ß¿¼ó«½∞¡«ú« Σ«α-|
| | |¼áΓá ó Σ«α¼áΓ D |
| |DTOC |ÅαÑ«íαẫóá¡¿Ñ ñáΓδ ¿º Σ«α¼áΓá D ó ß¿¼-|
| | |ó«½∞¡δ⌐ Σ«α¼áΓ |
| |LOWER |ÅÑαÑσ«ñ ß óÑασ¡Ñú« ¡á ¡¿ª¡¿⌐ αÑú¿ßΓα |
| |STR |ÅαÑ«íαẫóá¡¿Ñ τ¿ß½á ó ß¿¼ó«½ |
| |UPPER |ÅÑαÑσ«ñ ß ¡¿ª¡Ñú« ¡á óÑασ¡¿⌐ αÑú¿ßΓα |
| |VAL |ÅαÑ«íαẫóá¡¿Ñ ß¿¼ó«½á ó τ¿ß½« |
|öπ¡¬µ¿¿ ߻ѵ¿á-|BOF |ìáτὫ Σá⌐½á |
|½∞¡δσ »α«óÑ᫬ |COL |쫼Ñα ΓѬπΘÑ⌐ ¬«½«¡¬¿ |
| |DELETED |çỿß∞ πñá½Ñ¡á ¿½¿ ¡ÑΓ |
| |DISKSPACE |æó«í«ñ¡«Ñ ¼ÑßΓ« ¡á ñ¿ß¬Ñ ó íá⌐Γáσ |
| |EOF |諡ѵ Σá⌐½á |
| |ERROR |è«ñ «Φ¿í¬¿ »« πß½«ó¿ε ON ERROR |
| |FILE |öá⌐½ ßπΘÑßΓóπÑΓ ¿½¿ ¡ÑΓ |
| |FOUND |ÉѺπ½∞ΓáΓ »«¿ß¬á Σá⌐½á íáºδ ñá¡¡δσ |
| |IIF |Äñ¡« ¿½¿ ñαπú«Ñ óδαáªÑ¡¿Ñ ó ºáó¿ß¿¼«ßΓ¿|
| | |«Γ πß½«ó¿∩ |
| |ISALPHA |Åα«óÑα¬á ¡á íπ¬óπ |
| |ISCOLOR |Åα«óÑα¬á ¡á µóÑΓ¡«⌐ αѪ¿¼ |
| |ISLOWER |Åα«óÑα¬á ¡á ¡¿ª¡¿⌐ αÑú¿ßΓα |
| |ISSUPPER |Åα«óÑα¬á ¡á óÑασ¡¿⌐ αÑú¿ßΓα |
| |LEN |使¡á ßΓ᫬¿ ß¿¼ó«½«ó |
| |LUPDATE |Å«ß½Ññ¡ÑÑ «í¡«ó½Ñ¡¿Ñ Σá⌐½á íáºδ ñá¡¡δσ |
| |MESSAGE |æ««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ |
| |PCOL |쫼Ñα ¬«½«¡¬¿ ¡á »α¿¡ΓÑαÑ |
| |PROW |쫼Ñα ßΓ᫬¿ ¡á »α¿¡ΓÑαÑ |
| |RECCOUNT |諽¿τÑßΓó« ºá»¿ßÑ⌐ ó Σá⌐½Ñ íáºδ ñá¡¡δσ |
| |RECNO |쫼Ñα ΓѬπΘÑ⌐ ºá»¿ß¿ |
| |RECSIZE |ÉẼÑα ºá»¿ß¿ |
| |ROW |쫼Ñα ΓѬπΘÑ⌐ ßΓ᫬¿ ¡á φ¬αá¡Ñ |
| |TYPE |Åα«óÑα¬á Γ¿»á óδαáªÑ¡¿∩ |
|öπ¡¬µ¿¿ ¿ñÑ¡Γ¿-|DBF |ê¼∩ ΓѬπΘÑú« Σá⌐½á |
|Σ¿¬áµ¿¿ |FIELD |ê¼∩ »«½∩ ó Σá⌐½Ñ íáºδ ñá¡¡δσ |
| |FKLABEL |ìáºóá¡¿∩ Σπ¡¬µ¿«¡á½∞¡δσ ¬½ετÑ⌐ |
| |FKMAX |îá¬ß¿¼á½∞¡«Ñ ¬«½¿τÑßΓó« »α«úαá¼¼¿απѼδσ|
| | |Σπ¡¬µ¿«¡á½∞¡δσ ¬½ετÑ⌐ ¡á ΓÑନ¡á½Ñ |
| |GETENV |ÅÑαѼѡ¡á∩, ß«ñÑαªáΘá∩ ¿¡Σ«α¼áµ¿ε «í |
| | |«»Ñαᵿ«¡¡«⌐ ßαÑñÑ |
| |NDX |ê¼Ñ¡á «Γ¬αδΓδσ ¿¡ñѬߡδσ Σá⌐½«ó |
| |OS |ìáºóá¡¿Ñ «»Ñαᵿ«¡¡«⌐ ß¿ßΓѼδ |
| |VERSION |éÑαß¿∩ ß¿ßΓѼδ Éàüôæ |
|öπ¡¬µ¿¿ óó«ñá |INKEY |è«ñ ¡áªáΓ«ú« ó« óαѼ∩ αáí«Γδ »α«úαá¼¼δ |
| | |¬½ετá |
| |READKEY |Ä»αÑñѽѡ¿Ñ ¬½ετá ñ½∩ óδσ«ñá ¿º »«½¡«- |
| | |φ¬αá¡¡«⌐ ¬«¼á¡ñδ |
+---------------+----------------+---------------------------------------+
|& îÇèÉÄÅÄäæÆÇìÄéèÇ
|& ÑßΓ∞ Σπ¡¬µ¿∩ ¼á¬α«»«ñßΓá¡«ó¬¿, ¬«Γ«αá∩ ºá¼ÑΘáÑΓ ß«ñÑন¼«Ñ
óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐. üѺ ÑÑ π¬áºá¡¿∩ ß¿ßΓѼá Éàüôæ ó«ß»α¿¡¿¼áÑΓ ¿¼∩
»ÑαѼѡ¡«⌐ íπ¬óá½∞¡«. ¥Γπ Σπ¡¬µ¿ε ¼«ª¡« ¿ß»«½∞º«óáΓ∞ Γ«½∞¬« ñ½∩
ß¿¼ó«½∞¡δσ »ÑαѼѡ¡δσ. 諡ѵ ¼á¬α«αáßΦ¿αÑ¡¿∩ «í«º¡áτáÑΓß∩ Γ«τ¬«⌐.
æêìÆÇèæêæ:
|& <ß¿¼ó«½∞¡á∩ »ÑαѼѡ¡á∩> [. <óδα. C>]
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ ¼á¬α«»«ñßΓá¡«ó¬¿ ¿ß»«½∞ºπÑΓß∩ ñ½∩ »«½πτÑ¡¿∩ ß«ñÑন¼«ú«
ß¿¼ó«½∞¡«⌐ óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐ ó ΓÑσ ß½πτá∩σ, ¬«úñá ß¿ßΓѼá Éàüôæ
«ª¿ñáÑΓ ½¿ΓÑαá½∞¡«Ñ º¡áτÑ¡¿Ñ, á ¡Ñ ß¿¼ó«½∞¡«Ñ óδαáªÑ¡¿Ñ. Ä¡á ¼«ªÑΓ
Γá¬ªÑ ¿ß»«½∞º«óáΓ∞ß∩ ñ½∩ »αÑ«íαẫóá¡¿∩ ß¿¼ó«½∞¡«⌐ óαѼѡ¡«⌐
»ÑαѼѡ¡«⌐ ó τ¿ß½«. Åα¿¼ÑαἿ ¬«¼á¡ñ, ¬«úñá ß¿ßΓѼá Éàüôæ «ª¿ñáÑΓ
½¿ΓÑαá½∞¡«Ñ º¡áτÑ¡¿Ñ, ∩ó½∩εΓß∩ FIND, USE ¿ ñαπú¿Ñ ¬«¼á¡ñδ,
¿ß»«½∞ºπεΘ¿Ñ ¿¼Ñ¡á Σá⌐½«ó. 諼á¡ñδ ¿ ¿σ ¬½ετÑóδÑ ß½«óá Γá¬ªÑ ∩ó½∩εΓß∩
½¿ΓÑαá½∞¡δ¼¿ º¡áτÑ¡¿∩¼¿.
ÄæÄü¢à æïôùÇê:
ê¼Ñ¡á »«½Ñ⌐ «íδτ¡« ¿¼ÑεΓ »α¿«α¿ΓÑΓ ¡áñ óαѼѡ¡δ¼¿ »ÑαѼѡ¡δ¼¿, ¬«úñá
¿σ ¿¼Ñ¡á ß«ó»áñáεΓ. Å«φΓ«¼π ¿ß»«½∞ºπÑΓß∩ ß¿¡Γá¬ß¿ß m-> <óαѼѡ¡á∩
»ÑαѼѡ¡á∩>, ¬«úñá ¡áñ« τΓ«íδ ó¡áτá½Ñ «íαáíáΓδóá½áß∞ óαѼѡ¡á∩
»ÑαѼѡ¡á∩, ¿¼ÑεΘá∩ Γ« ªÑ ¿¼∩, τΓ« ¿ ¿¼∩ »«½∩. ū߬«½∞¬π Σπ¡¬µ¿∩ &
óßÑúñá «ª¿ñáÑΓ óαѼѡ¡πε »ÑαѼѡ¡πε ó ¬áτÑßΓóÑ áαúπ¼Ñ¡Γá, Γ« φΓ«Γ
ß¿¡Γá¬ß¿ß ¡Ñ ¡πªÑ¡.
ÅÉêîàÉ¢:
êß»«½∞º«óá¡¿Ñ ¬«¼á¡ñδ FIND ß óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐:
. STORE 'Loftus'TO mname
Loftus
. USE Clients INDEX Cnames
. FIND &mname
. DISPLAY Lastname
çỿß∞# Lastname
4 åáíÑ¡¬«
Äíδτ¡« ß¿ßΓѼá Éàüôæ ó«ß»α¿¡¿¼áÑΓ ßΓ᫬π ß¿¼ó«½«ó, ß½ÑñπεΘπε ºá FIND,
íπ¬óá½∞¡«. üѺ ¼á¬α«»«ñßΓá¡«ó¬¿ &, ß¿ßΓѼá Éàüôæ ¿ΘÑΓ ó íáºÑ ñá¡¡δσ
ßΓ᫬π ß¿¼ó«½«ó mname, á ¡Ñ Loftus. çá¼Ñ¡á ß«ñÑন¼«ú« óαѼѡ¡«⌐
»ÑαѼѡ¡«⌐, óσ«ñ∩ΘÑ⌐ ó ßΓ᫬π ß¿¼ó«½«ó:
. STORE 'åáíÑ¡¬«'TO name
åáíÑ¡¬«
. STORE 'Åα¿óÑΓ &Name' TO greeting
Åα¿óÑΓ åáíÑ¡¬«
. ? greeting
Åα¿óÑΓ åáíÑ¡¬«
éßΓáó¬á ß«ñÑন¼«ú« óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐ ó ß»½«Φ¡πε ßΓ᫬π ß¿¼ó«½«ó
(íѺ »α«íѽ«ó):
. STORE 'X'TO alpha
X
. STORE '12alpha ' TO show
12X34
. ? show
12X34
é ß½πτáÑ ñ«íáó½Ñ¡¿∩ ¬ ß«ñÑন¼«¼π óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐ ñαπú¿σ
ß¿¼ó«½«ó (¡Ñ »α«íѽ«ó), ¬«¡Ñµ ¿¼Ñ¡¿ óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐ «í«º¡áτáÑΓß∩
Γ«τ¬«⌐.
êß»«½∞º«óá¡¿Ñ íáºδ ñá¡¡δσ, ¿¼∩ ¬«Γ«α«⌐ σαá¡¿Γß∩ ó« óαѼѡ¡«⌐
»ÑαѼѡ¡«⌐ Dname:
. dname = 'Clients'
. USE &dname
. ? DBF()
B: Clients.dbf
öôìèûêƒ ABS
öπ¡¬µ¿∩ ABS ó«ºóαáΘáÑΓ áíß«½εΓ¡«Ñ º¡áτÑ¡¿Ñ τ¿ß½«ó«ú« óδαáªÑ¡¿∩.
æêìÆÇèæêæ:
ABS(<óδα.N>)
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ ABS »«ºó«½∩ÑΓ «»αÑñѽ¿Γ∞ αạ¿µπ ñóπσ τ¿ßѽ, ¡Ñ »α«óÑα∩∩
¬á¬«Ñ ¿º ¡¿σ í«½∞ΦÑ. ÉѺπ½∞ΓáΓ«¼ óßÑúñá ∩ó½∩ÑΓß∩ »«½«ª¿Γѽ∞¡«Ñ τ¿ß½«.
ÅÉêîàÉ¢:
Ä»αÑñѽѡ¿Ñ áíß«½εΓ¡«ú« º¡áτÑ¡¿∩ τ¿ß½«ó«ú« óδαáªÑ¡¿∩:
. i = 15
. j = 60
. ? ABS(i - j)
45
. ? ABS(j - i)
45
öôìèûêƒ ASC
öπ¡¬µ¿∩ ASC αáßß¼áΓα¿óáÑΓ ½Ñóδ⌐ ß¿¼ó«½ ßΓ᫬¿ ¿ ó«ºóαáΘáÑΓ º¡áτÑ¡¿Ñ
¬«ñá αáßΦ¿αÑ¡¡«ú« ¡áí«αá ß¿¼ó«½«ó IBM. è«ñδ ASCII (ñÑß∩Γ¿τ¡δÑ «Γ 0 ñ«
127) ∩ó½∩εΓß∩ »«ñ¡áí«α«¼ φΓ«ú« ¡áí«αá (ñÑß∩Γ¿τ¡δÑ «Γ 0 ñ« 255).
æêìÆÇèæêæ:
ASC(<óδαæ>)
ÅÉêîàÉ¢:
. ASC('Nestle')
78
. STORE '123' TO number
123
. ? ASC(number)
49
öôìèûêƒ AT
AT - Σπ¡¬µ¿∩ »«¿ß¬á »«ñßΓ᫬¿. ÉѺπ½∞ΓáΓ«¼ Σπ¡¬µ¿¿ ∩ó½∩ÑΓß∩ ¡«¼Ñα
»«º¿µ¿¿, ß ¬«Γ«α«⌐ ¡áτ¿¡áÑΓß∩ »«ñßΓ᫬á ó« óΓ«α«¼ ß¿¼ó«½∞¡«¼
óδαáªÑ¡¿¿. àß½¿ »«ñßΓα«¬á ¡Ñ ß«ñÑনΓß∩ ó ß¿¼ó«½∞¡«¼ óδαáªÑ¡¿¿, Γ«
αѺπ½∞ΓáΓ Σπ¡¬µ¿⌐ - (0).
æêìÆÇèæêæ:
AT(<óδαæ1>,<óδαæ2>)
ÅÉêîàÉ¢:
. ? AT('O K', '¥Γ« ¬«Γ')
3
Å«ñßΓ᫬á "Ä è" ¡áτ¿¡áÑΓß∩ ß ΓαÑΓ∞Ñú« ß¿¼ó«½á ßΓ᫬¿ "¥Γ« ¬«Γ".
. STORE '¥Γ« ¬«Γ' TO alpha
¥Γ« ¬«Γ
. STORE 'Γ«' TO beta
ÆÄ
. ? AT(beta,alpha)
2
ìá⌐Γ¿ ó Σá⌐½Ñ Clients ó »«½Ñ "öἿ½¿∩" »«ñßΓ᫬π üπᬫóá:
. USE Clients
. ? AT('üπᬫóá', Lastname) <> O
.T.
. SKIP
çỿß∞# 2
. ? AT('üπᬫóá', Lastname) <> O
.F.
æî. ÆÇèåà:
SUBSTR(), LEFT(), RIGHT()
öôìèûêƒ BOF
öπ¡¬µ¿∩ BOF «»αÑñѽ∩ÑΓ ¡áτὫ Σá⌐½á. öπ¡¬µ¿∩ ¡πª¡á ó ΓÑσ »α¿¬½áñ¡δσ
ß¿ßΓѼáσ, úñÑ íáºá ñá¡¡δσ τ¿ΓáÑΓß∩ ó «íαáΓ¡«¼ »«α∩ñ¬Ñ. ÉѺπ½∞ΓáΓ«¼
∩ó½∩ÑΓß∩ ½«ú¿τÑ߬«Ñ º¡áτÑ¡¿Ñ êßΓ¿¡á (. Æ.), ¬«úñá ñѽáÑΓß∩ »«»δΓ¬á
πßΓá¡«ó¿Γ∞ π¬áºáΓѽ∞ ºá»¿ß¿ »ÑαÑñ »Ñαó«⌐ ½«ú¿τÑ߬«⌐ ºá»¿ß∞ε á¬Γ¿ó¡«ú«
Σá⌐½á.
æêìÆÇèæêæ:
BOF()
ÅÉêîàÉ¢:
Åα«óÑα¬á ¡á ¡áτὫ Σá⌐½á:
. USE Clients
. ? BOF()
.F.
. SKIP -1
çỿß∞# 1
. ? BOF()
.T.
Åα«óÑα¬á ¡á ¡áτὫ Σá⌐½á ó »α«µÑßßÑ »α«ß¼«Γαá íáºδ ñá¡¡δσ ó «íαáΓ¡«¼
»«α∩ñ¬Ñ ó »«¿ß¬áσ «»αÑñѽѡ¡«⌐ ΣἿ½¿¿ (ñá½ÑÑ ß½ÑñπÑΓ ßÑú¼Ñ¡Γ
¬«¼á¡ñ¡«ú« Σá⌐½á):
USE Clients
GO Bottom
DO WHILE .NOT. BOF()
IF Lastname = 'ïêæÆÄé'
? RECNO()
ENDIF
SKIP -1
ENDDO
æî. ÆÇèåà:
EOF()
öôìèûêƒ CDOW
CDOW ß½πª¿Γ ñ½∩ «»αÑñѽѡ¿∩ ¡áºóá¡¿∩ ñ¡∩ ¡Ññѽ¿ ó óδαáªÑ¡¿¿ Γ¿»á ñáΓδ
(óδαD).
æêìÆÇèæêæ:
CDOW(<óδαD>)
êæÅÄï£çÄéÇìêà:
éδαáªÑ¡¿Ñ¼ Γ¿»á ñáΓδ ¼«ªÑΓ íδΓ∞ óαѼѡ¡á∩ »ÑαѼѡ¡á∩, »«½Ñ ¿½¿
Σπ¡¬µ¿∩ «»αÑñѽѡ¿∩ ß¿ßΓѼ¡«⌐ ñáΓδ.
ÅÉêîàÉ¢:
àß½¿ ß¿ßΓѼ¡á∩ ñáΓá - 05/15/84:
. ? CDOW(DATE())
Tuesday
çừ¼¡¿Γ∞ ¡áºóá¡¿Ñ ñ¡∩ ¡Ññѽ¿ ß¿ßΓѼ¡«⌐ ñáΓδ ó« óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐
Dayofweek:
. STORE CDOW(DATE)) TO Dayofweek
Tuesday
. ? Dayofweek
Tuesday
ÅÑαÑóÑßΓ¿ ñáΓπ ó ¡áºóá¡¿Ñ ñ¡∩ ¡Ññѽ¿ ñ½∩ ¿ß»«½∞º«óá¡¿∩ Ñú« ó
ßΓá¡ñáαΓ¡«¼ ΓѬßΓÑ:
. ? DATE()
05/15/84
. STORE DATE()+9 TO testdate
05/24/84
. ? 'We will visit you a week from '+CDOW(testdate)
We will visit you a week from 'Thursday
æî. ÆÇèåà:
DOW(), DAY()
öôìèûêƒ CHR
CHR φΓ« Σπ¡¬µ¿∩ »αÑ«íαẫóá¡¿∩ τ¿ß½á ó ß¿¼ó«½, ¬«Γ«αá∩ »«ºó«½∩ÑΓ
¿ß»«½∞º«óáΓ∞ ߻ѵ¿á½∞¡δÑ φΣΣѬΓδ, ¿¼ÑεΘ¿Ñß∩ ¡á »α¿¡ΓÑαÑ ¿/¿½¿ φ¬αá¡Ñ
ñ¿ß»½Ñ∩, ß »«¼«Θ∞ε »ÑαÑñáτ¿ º¡áτÑ¡¿⌐ ¬«ñ«ó ASCII, ß««ΓóÑΓßΓóπεΘ¿σ
¬½ετá¼ ¬½áó¿áΓπαδ ¿ ß¿¼ó«½á¼, ¡Ñ ¿¼ÑεΘ¿¼ φ¬ó¿óá½Ñ¡Γ«ó ¡á ¬½áó¿áΓπαÑ.
æêìÆÇèæêæ:
CHR(<óδαN>)
êæÅÄï£çÄéÇìêà:
<óδαN> ñ«½ª¡« íδΓ∞ µÑ½δ¼ τ¿ß½«¼ «Γ 1 ñ« 255. ÉѺπ½∞ΓáΓ«¼ Σπ¡¬µ¿¿
CHR (0) ∩ó½∩ÑΓß∩ ß¿¼ó«½ 0 ¿ «¡ ¡Ñ ¼«ªÑΓ íδΓ∞ »ÑαÑñá¡ ¡¿ ¡á «ñ¡«
πßΓα«⌐ßΓó«, ó¬½ετá∩ »α¿¡ΓÑα. Äñ¡á¬«, ¡Ñ¬«Γ«αδÑ »α¿¡ΓÑαδ ó«ß-
»α¿¡¿¼áεΓ αѺπ½∞ΓáΓ Σπ¡¬µ¿¿ CHR (128) ¬á¬ CHR (0) àß½¿ »α¿¡ΓÑα
ó«ß»α¿¡¿¼áÑΓ 8 í¿Γ«óδÑ ß¿¼ó«½δ, Γ« ñ« »«ß佬¿ CHR (128) ß½ÑñπÑΓ
ßíα«ß¿Γ∞ 8-⌐ í¿Γ. Åα¿ »α«óÑα¬áσ, Σπ¡¬µ¿∩ CHR (0) ñ«½ª¡á ßΓ«∩Γ∞ ó
½Ñó«⌐ τáßΓ¿ π»αáó½Ñ¡¿∩. è«úñá ß¿ßΓѼá Éàüôæ ßαáó¡¿óáÑΓ ßΓ᫬¿
ß¿¼ó«½«ó, «¡á ß¡áτá½á τ¿ΓáÑΓ Γ«, τΓ« ßΓ«¿Γ ß»αáóá. àß½¿ íδ CHR (0)
ßΓ«∩½á ß»αáóá, Γ« ß¿ßΓѼá Éàüôæ »αѬαáΓ¿½á íδ τΓÑ¡¿Ñ ¿ óÑα¡π½á
½«ú¿τÑ߬«Ñ º¡áτÑ¡¿Ñ "êßΓ¿¡á" (. Æ.).
ÅÉêîàÉ¢:
é«ß»α«¿ºóÑßΓ¿ ß¿¼ó«½ ASCII, τÑ⌐ ¬«ñ αáóÑ¡ 65:
. ? CHR(65)
A && è«ñ ASCII ºáú½áó¡«⌐ íπ¬óδ A ÑßΓ∞ 65
ô í«½∞Φ¿¡ßΓóá ß¿ßΓѼ ºóπ¬«ó«⌐ ß¿ú¡á½ αáºñáÑΓß∩ »« ¬«ñπ ASCII 7.
鬽ετÑ¡¿Ñ ºóπ¬«ó«ú« ß¿ú¡á½á:
. ? CHR(7) && ä½∩ CHR(7) ¡ÑΓ ¬½áó¿Φ¿
鬽ετ¿Γ∞ ºóπ¬«ó«⌐ ß¿ú¡á½ ¿ ¡á»¿ßáΓ∞ »«∩ß¡¿Γѽ∞¡δ⌐ ΓѬßΓ ¡á φ¬αá¡Ñ:
. ? CHR(7)+'ÄæÆÄÉÄåìÄ'
ÄæÆÄÉÄåìÄ
öπ¡¬µ¿∩ CHR »«ºó«½∩ÑΓ ó«ß»α«¿ºó«ñ¿Γ∞ ß¿¼ó«½δ, ñ½∩ ¬«Γ«αδσ ¡ÑΓ
φ¬ó¿óá½Ñ¡Γ¡δσ ¬½áó¿Φ. ìá»α¿¼Ñα, Σπ¡¬µ¿∩ CHR (24) ó«ß»α«¿ºó«ñ¿Γ
ßΓαѽ¬π óóÑασ.
.? CHR (24)
æαáó¡Ñ¡¿Ñ óδαáªÑ¡¿∩, ó ¬«Γ«α«Ñ óσ«ñ¿Γ CHR (0):
. Mem = 'abc'
. ? Mem = CHR(0) && éßÑúñá
.T.
. ? Mem = "" && éßÑúñá
.T.
. ? CHR(0) = Mem && äáÑΓ »αáó¿½∞¡δ⌐ «ΓóÑΓ
.F.
. ? Mem = ""
.F.
æî. ÆÇèåà:
ASC(), INKEY()
öôìèûêƒ CMONTH
öπ¡¬µ¿∩ CMONTH ß½πª¿Γ ñ½∩ «»αÑñѽѡ¿∩ ¡áºóá¡¿∩ ¼Ñß∩µá ó óδαáªÑ¡¿¿
Γ¿»á ñáΓδ.
æêìÆÇèæêæ:
CMONTH(<óδαD>)
êæÅÄï£çÄéÇìêà:
éδαáªÑ¡¿Ñ¼ Γ¿»á ñáΓδ ¼«ªÑΓ íδΓ∞ óαѼѡ¡á∩ »ÑαѼѡ¡á∩, »«½Ñ ¿½¿
Σπ¡¬µ¿∩ «»αÑñѽѡ¿∩ ß¿ßΓѼ¡«⌐ ñáΓδ.
ÅÉêîàÉ¢:
àß½¿ ß¿ßΓѼ¡á∩ ñáΓá - 05/15/87:
? CMONTH(DATE())
MAY
çừ¼¡¿Γ∞ ¡áºóá¡¿Ñ ¼Ñß∩µá ß¿ßΓѼ¡«⌐ ñáΓδ ó« óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐
mmonth:
. STORE CMONTH(DATE()) To mmonth
Ma⌐
. ? mmonth
Ma⌐
Ä»αÑñѽ¿Γ∞ ¬á¬«⌐ íπñÑΓ ¼Ñß∩µ τÑαѺ 76 ñ¡Ñ⌐ «Γ ΓѬπΘÑ⌐ ñáΓδ:
. ? CMONTH(DATE()+76)
¿ε½∞
. ? 'îδ »«ßÑΓ¿¼ óáß ó'+ CMONTH(DATE()+76)
îδ »«ßÑΓ¿¼ óáß ó ¿ε½Ñ
æî. ÆÇèåà:
MONTH()
öôìèûêƒ COL
öπ¡¬µ¿∩ COL ß½πª¿Γ ñ½∩ «»αÑñѽѡ¿∩ ΓѬπΘÑú« ¡«¼Ñαá ¬«½«¡¬¿, ¡á
¬«Γ«α«⌐ αáß»«½áúáÑΓß∩ ¬παß«α. öπ¡¬µ¿∩ COL «í½ÑúτáÑΓ π»αáó½Ñ¡¿Ñ
¬παß«α«¼ ¿º »α«úαá¼¼δ.
æêìÆÇèæêæ:
COL()
êæÅÄï£çÄéÇìêà:
¡« ºá»«¼¡¿Γ∞ º¡áτÑ¡¿Ñ Σπ¡¬µ¿¿ COL () ó« óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐.
ÉѺπ½∞ΓáΓ Σπ¡¬µ¿¿ COL () ¼«ª¡« ¿ß»«½∞º«óáΓ∞ ñ½∩ «Γ¡«ß¿Γѽ∞¡«⌐
áñαÑßᵿ¿. ìá»α¿¼Ñα, @ 1, COL () + 5 ¿ @ 1, $ + 5 ñáεΓ «ñ¿¡ ¿ ëà ªÑ
αѺπ½∞ΓáΓ, Γ. Ñ. πßΓá¡áó½¿óáεΓ ¬παß«α ¡á »∩Γ∞ ¬«½«¡«¬ »αáóÑÑ ΓѬπΘÑ⌐
»«º¿µ¿¿.
ÅÉêîàÉ¢:
êß»«½∞º«óá¡¿Ñ Σπ¡¬µ¿¿ COL () ó »α«úαá¼¼Ñ ñ½∩ «»αÑñѽѡ¿∩ ΓѬπΘÑú«
»«½«ªÑ¡¿∩ ¬παß«αá ¡á φ¬αá¡Ñ. ìá»α¿¼Ñα, Ñß½¿ ¡πª¡« óδ⌐Γ¿ ¿º µ¿¬½á ó
ëà ¼«¼Ñ¡Γ ¬«úñá ¬παß«α «¬áªÑΓß∩ ó ¬«½«¡¬Ñ 70, Γ« ñ½∩ φΓ«ú« ß½ÑñπÑΓ
¡á»¿ßáΓ∞ ß½ÑñπεΘÑÑ:
DO WHILE COL()< 70
|@ 5,COL() + 5
ENDDO
ÅÑαÑñó¿¡πΓ∞ ¬παß«α ¡á π¬áºá¡¡«Ñ τ¿ß½« ¬«½«¡«¬ «Γ¡«ß¿Γѽ∞¡« Ñú«
ΓѬπΘÑú« »«½«ªÑ¡¿∩:
|@ 1, COL () +5 SAY '¥Γ« «Γ¡«ß¿Γѽ∞¡á∩ áñαÑßᵿ∩'
æî. ÆÇèåà:
|@, ROW (), PROW (), PCOL ()
öôìèûêƒ CTOD
CTOD - φΓ« Σπ¡¬µ¿∩ »αÑ«íαẫóá¡¿∩ ñáΓδ ¿º ß¿¼ó«½∞¡«ú« Σ«α¼áΓá ó
Σ«α¼áΓ D. éóÑñÑ¡¡á∩ ¿½¿ ºá»«¼¡Ñ¡¡á∩ ß¿¼ó«½∞¡á∩ ßΓα«¬á »αÑ«íαáºπÑΓß∩ ó
º¡áτÑ¡¿Ñ »ÑαѼѡ¡«⌐ Γ¿»á D.
ö«α¼áΓ ß¿¼ó«½∞¡«⌐ ßΓ᫬¿ «»αÑñѽѡ ¬«¼á¡ñἿ SET DATE ¿ SET CENTURY ¿
¿¼ÑÑΓ ó¿ñ îî/ää/ââ.
æêìÆÇèæêæ:
CTOD(<óδαæ>)
ÅÄ ôîÄïùÇìê₧:
àß½¿ ñ½∩ π¬áºá¡¿∩ ú«ñá ¿ß»«½∞ºπεΓß∩ ñóÑ µ¿Σαδ, Γ« »«ñαáºπ¼ÑóáÑΓß∩,
τΓ« ñáΓá «Γ¡«ß¿Γß∩ ¬ 20 óѬπ.
êæÅÄï£çÄéÇìêà:
濼ó«½∞¡á∩ ßΓ᫬á, ¿ß»«½∞ºπѼá∩ Σπ¡¬µ¿Ñ⌐ CTOD, ¼«ªÑΓ ½ÑªáΓ∞ ó
ñ¿á»áº«¡Ñ «Γ "1/1/100" ñ« "12/31/ 9999". ï¿ΓÑαá½∞¡δσ ßΓ᫬ Γ¿»á ñáΓδ
(D) ¡Ñ ßπΘÑßΓóπÑΓ. é« óßÑσ ¬«¼á¡ñáσ ßαáó¡Ñ¡¿∩ ¿ »α¿ßó«Ñ¡¿∩
¿ß»«½∞ºπÑΓß∩ Σπ¡¬µ¿∩ CTOD () ñ½∩ »αÑ«íαẫóá¡¿∩ ½¿ΓÑαá½∞¡δσ ßΓ᫬ ó
»ÑαѼѡ¡δÑ Γ¿»á ñáΓδ (D).
ÅÉêîàÉ¢:
çừ¼¡¿Γ∞ ß¿¼ó«½∞¡πε ßΓ᫬π 01/01/80 ó« óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐
Γ¿»á D:
. STORE CTOD('01/01/80) TO Testdate
01/01/80
. ? Testdate
01/01/80
æαáó¡¿Γ∞ ß¿¼ó«½∞¡πε ßΓ᫬π ß »ÑαѼѡ¡«⌐ Γ¿»á D:
. STORE '01/01/80'TO Testdate
01/01/80
. ? TYPE('Testdate')
C
. STORE CTOD(Testdate) TO Testdate
01/01/80
D
æî. ÆÇèåà:
DTOC(), SET CENTURY, SET DATE
öôìèûêƒ DATE
öπ¡¬µ¿∩ DATE ó«ºóαáΘáÑΓ ß¿ßΓѼ¡πε ñáΓπ ó Σ«α¼áΓÑ îî/ää/ââ, Ñß½¿ φΓ«Γ
Σ«α¼áΓ ¡Ñ ¿º¼Ñ¡Ñ¡ ¬«¼á¡ñἿ SET CENTURY ¿ SET DATE.
æêìÆÇèæêæ:
DATE()
ÅÉêîàùÇìêƒ:
æ¿ßΓѼ¡á∩ ñáΓá ñ«½ª¡á íδΓ∞ πßΓá¡«ó½Ñ¡á ¡á πα«ó¡Ñ «»Ñαᵿ«¡¡«⌐
ß¿ßΓѼδ.
ÅÉêîàÉ¢:
é«ß»α«¿ºóÑßΓ¿ ¡á φ¬αá¡Ñ ß¿ßΓѼ¡πε ñáΓπ:
. ? DATE()
05/06/87
çừ¼¡¿Γ∞ ß¿ßΓѼ¡πε ñáΓπ ó« óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐ mdate:
. STORE DATE() TO mdate
05/06/87
¿½¿
. Mdate = DATE()
05/06/87
æî. ÆÇèåà:
SET CENTURY, SET DATE
öôìèûêƒ DAY
öπ¡¬µ¿∩ DAY «»αÑñѽ∩ÑΓ τ¿ß½« ¼Ñß∩µá »« óδαáªÑ¡¿ε Γ¿»á ñáΓδ.
æêìÆÇèæêæ:
DAY(<óδαD>)
êæÅÄï£çÄéÇìêà:
éδαáªÑ¡¿Ñ¼ Γ¿»á ñáΓδ (D) ¼«ªÑΓ íδΓ∞ óαѼѡ¡á∩ »ÑαѼѡ¡á∩,
»«½Ñ ¿½¿ Σπ¡¬µ¿∩ ß¿ßΓѼ¡«⌐ ñáΓδ.
ÅÉêîàÉ¢:
àß½¿ ß¿ßΓѼ¡á∩ ñáΓá 05/15/87:
? DAY(DATE())
15
çừ¼¡¿Γ∞ τ¿ß½« ¼Ñß∩µá ¿º ß¿ßΓѼ¡«⌐ ñáΓδ ó« óαѼѡ¡«⌐
»ÑαѼѡ¡«⌐ mday:
. STORE DAY(DATE()) TO mday
15
. ? mday
15
. ? TYPE('mday')
N
æî. ÆÇèåà:
CDOW(), DOW()
öôìèûêƒ DBF
öπ¡¬µ¿∩ DBF ó«ºóαáΘáÑΓ ¿¼∩ Σá⌐½á íáºδ ñá¡¡δσ, ¡áσ«ñ∩ΘÑú«ß∩ ó ΓѬπΘ¿⌐
¼«¼Ñ¡Γ ó óδíαá¡¡«⌐ αáí«τÑ⌐ «í½áßΓ¿.
æêìÆÇèæêæ:
DBF()
ÅÄ ôîÄïùÇìê₧:
àß½¿ ó óδíαá¡¡«⌐ ó ΓѬπΘ¿⌐ ¼«¼Ñ¡Γ αáí«τÑ⌐ «í½áßΓ¿ ¡ÑΓ «Γ¬αδΓ«ú« Σá⌐½á
íáºδ ñá¡¡δσ, Γ« DBF () ó«ºóαáΘáÑΓ ¡π½Ñóπε ßΓ᫬π.
êæÅÄï£çÄéÇìêà:
¥Γá Σπ¡¬µ¿∩ ñáÑΓ ó«º¼«ª¡«ßΓ∞ »α«úαá¼¼Ñ αáí«ΓáΓ∞ ß Σá⌐½«¼, ¬«Γ«αδ⌐ íδ½
á¬Γ¿ó¡δ¼ ñ« ¡áτá½á αáí«Γδ »α«úαá¼¼δ.
ÅÉêîàÉ¢:
Ä»αÑñѽѡ¿Ñ á¬Γ¿ó¡«ú« Σá⌐½á »α¿ αáí«ΓÑ ó αѪ¿¼Ñ ¿¡ΓÑα»αÑΓᵿ¿ ¬«¼á¡ñ:
. SET DEFAULT TO B
. USE Clients
. ? DBF()
B: Clients.dbf
. CLOSE DATABASES
. ? DBF()
Åα«óÑα¬á á¬Γ¿ó¡«ßΓ¿ Σá⌐½á ¿º »α«úαá¼¼δ:
Null = ""
IF Null < DBF()
Old_file = DBF()
Use Clients
<commands>
USE &Old_file
ENDIF
æî. ÆÇèåà:
FIELD(), LUPDATE(), NDX(), RECCOUNT(), RECSIZE()
öôìèûêƒ DELETED
öπ¡¬µ¿∩ DELETED «í¡áαπª¿óáÑΓ »«¼ÑτÑ¡¡δÑ ñ½∩ ¿ß¬½ετÑ¡¿∩ ºá»¿ß¿ ¿
ó«ºóαáΘáÑΓ ½«ú¿τÑ߬«Ñ "êßΓ¿¡á" (. Æ.), Ñß½¿ ΓѬπΘá∩ ºá»¿ß∞ ñ«½ª¡á íδΓ∞
πñá½Ñ¡á.
æêìÆÇèæêæ:
DELETED()
ÅÉêîàÉ¢:
éδóÑßΓ¿ óßÑ ºá»¿ß¿ á¬Γ¿ó¡«ú« Σá⌐½á íáºδ ñá¡¡δσ, »«¼ÑτÑ¡¡δÑ ñ½∩
¿ß¬½ετÑ¡¿∩:
. ? DELETED()
.T. && çỿß∞ ñ«½ª¡á íδΓ∞ πñá½Ñ¡á
¿½¿
. ? DELETED()
.F. && çỿß∞ ¡Ñ ñ«½ª¡á íδΓ∞ πñá½Ñ¡á
æî. ÆÇèåà:
SET DELETED ON
öôìèûêƒ DISKSPACE
öπ¡¬µ¿∩ DISKSPACE «»αÑñѽ∩ÑΓ τ¿ß½« ßó«í«ñ¡δσ íá⌐Γ«ó ¡á á¬Γ¿ó¡«¼
ñ¿ß¬Ñ.
æêìÆÇèæêæ:
DISKSPACE()
æÄéàÆ¢:
ÉѬ«¼Ñ¡ñπÑΓß∩ ¿ß»«½∞º«óáΓ∞ Σπ¡¬µ¿ε DISKSPACE () ß«ó¼ÑßΓ¡« ß Σπ¡¬µ¿∩¼¿
RECCOUNT () ¿ RECSIZE () ó »α¿¬½áñ¡δσ »α«úαá¼¼áσ, »αÑñ¡áº¡áτÑ¡¡δσ ñ½∩
áóΓ«¼áΓ¿τÑ߬«ú« ßΓαáσ«ó«ú« ¬«»¿α«óá¡¿∩ Σá⌐½«ó íáºδ ñá¡¡δσ. Æᬿ¼
ß»«ß«í«¼ úáαá¡Γ¿απÑΓß∩, τΓ« ÑßΓ∞ ñ«ßΓáΓ«τ¡«Ñ ¼ÑßΓ« ¡á ñ¿ß¬Ñ ñ½∩
ßΓαáσ«ó«⌐ ¬«»¿¿ Σá⌐½á.
漫Γα¿ »α¿¼Ñα ó «»¿ßá¡¿¿ Σπ¡¬µ¿¿ RECSIZE ().
ÅÉêîàÉ¢:
Åα«óÑα¿Γ∞ ñ«ßΓáΓ«τ¡« ½¿ ¼ÑßΓá ¡á ñ¿ß¬Ñ ñ½∩ ß«ºñá¡¿∩ ¡«ó«ú«
«Γß«αΓ¿α«óá¡¡«ú« ¡á ñ¿ß¬Ñ é: Σá⌐½á, ¬«Γ«αδ⌐ Σ«α¼¿απÑΓß∩ ¿º á¬Γ¿ó¡«ú«
Σá⌐½á αẼÑα«¼ 100000 íá⌐Γ:
STORE 100000 TO mfilesize
IF DISKSPACE() > mfilesize*2
SORT ON Last_name TO Newfile
ELSE
|@ 22,16 SAY "ìÑΓ ¼ÑßΓá ñ½∩ ß«αΓ¿α«ó¬¿ Σá⌐½á"
ENDIF
æî. ÆÇèåà:
GETENV (), OS (), RECCOUNT (), RECSIZE (), VERSION ()
öôìèûêƒ DOW
öπ¡¬µ¿∩ DOW «»αÑñѽ∩ÑΓ ¡«¼Ñα ñ¡∩ ¡Ññѽ¿ ó óδαáªÑ¡¿¿ Γ¿»á ñáΓδ (D).
é«ß¬αÑßÑ¡∞Ñ - »Ñαóδ⌐ ñÑ¡∞ ¡Ññѽ¿.
æêìÆÇèæêæ:
DOW(<óδαD>)
êæÅÄï£çÄéÇìêà:
éδαáªÑ¡¿Ñ¼ Γ¿»á ñáΓδ ¼«ªÑΓ íδΓ∞ óαѼѡ¡á∩ »ÑαѼѡ¡á∩, »«½Ñ ¿½¿
Σπ¡¬µ¿∩ ß¿ßΓѼ¡«⌐ ñáΓδ.
ÅÉêîàÉ¢:
àß½¿ ß¿ßΓѼ¡á∩ ñáΓá 05/15/84:
. ? DOW(DATE())
3 && 3 φΓ« éΓ«α¡¿¬
çừ¼¡¿Γ∞ ¡«¼Ñα ñ¡∩ ¡Ññѽ¿ ß¿ßΓѼ¡«⌐ ñáΓδ ó« óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐
Dayofweek:
. ? DOW(DATE()) + 197)
4 && 4 æαÑñá
æî. ÆÇèåà:
CDOW(), DAY()
öôìèûêƒ DTOC
öπ¡¬µ¿∩ DTOC »αÑ«íαáºπÑΓ óδαáªÑ¡¿Ñ Γ¿»á ñáΓδ (D) ó ß¿¼ó«½∞¡«Ñ
óδαáªÑ¡¿Ñ.
æêìÆÇèæêæ:
DTOC(<óδαD>)
ÅÉêîàÉ¢:
çừ¼¡¿Γ∞ ß¿ßΓѼ¡πε ñáΓπ ó« óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐ ß¿¼ó«½∞¡«ú« Γ¿»á:
. STORE DTOC(DATE()) TO testdate
05/15/84
. ? TYPE('testdate')
C && Testdate φΓ« ß¿¼ó«½∞¡á∩ »ÑαѼѡ¡á∩
Åα¿ß«Ññ¿¡¿Γ∞ »ÑαѼѡ¡πε Γ¿»á ñáΓδ ¬ ß¿¼ó«½∞¡«⌐ ßΓα«¬Ñ ñ½∩
¿ß»«½∞º«óá¡¿∩ ó ΓѬßΓÑ:
. STORE DATE() TO testdate
05/15/87
. ? TYPE('testdate')
D
. STORE "æÑú«ñ¡∩: "+DTOC(testdate) TO text
æÑú«ñ¡∩: 05/15/87
æî. ÆÇèåà:
CTOD(), SET CENTURY
öôìèûêƒ EOF
öπ¡¬µ¿∩ EOF «»αÑñѽ∩ÑΓ ¬«¡Ñµ Σá⌐½á. ÉѺπ½∞ΓáΓ«¼ ∩ó½∩ÑΓß∩ ½«ú¿τÑ߬«Ñ
"êßΓ¿¡á" (. Æ.), ¬«úñá »α«⌐ñÑ¡á »«ß½Ññ¡∩∩ ½«ú¿τÑ߬á∩ ºá»¿ß∞ á¬Γ¿ó¡«ú«
Σá⌐½á íáºδ ñá¡¡δσ.
æêìÆÇèæêæ:
EOF ()
êæÅÄï£çÄéÇìêà:
è«úñá αѺπ½∞ΓáΓ«¼ EOF () ∩ó½∩ÑΓß∩ ½«ú¿τÑ߬«Ñ "êßΓ¿¡á", º¡áτÑ¡¿Ñ
RECNO() αáó¡« º¡áτÑ¡¿ε RECCOUNT () + 1. èα«¼Ñ Γ«ú«, ¡Ñ¬«Γ«αδÑ
¬«¼á¡ñδ, ¡á»α¿¼Ñα SKIP, óδñáεΓ ß««íΘÑ¡¿∩ «í «Φ¿í¬Ñ "Äí¡áαπªÑ¡ ¬«¡Ñµ
Σá⌐½á".
ÅÉêîàÉ¢:
Åα«óÑα¿Γ∞ ¡á ¬«¡Ñµ Σá⌐½á:
. USE Tours
. GO BOTTOM
. ? EOF()
.F. && ô¬áºáΓѽ∞ ºá»¿ß¿ ¡Ñ ó ¬«¡µÑ Σá⌐½á
. SKIP
çỿß∞ # 31
. ? EOF()
.T. && ô¬áºáΓѽ∞ ºá»¿ß¿ ó ¬«¡µÑ Σá⌐½á
æî. ÆÇèåà:
BOF(), FOUND(), ERROR()
öôìèûêƒ ERROR
öπ¡¬µ¿∩ ERROR ó«ºóαáΘáÑΓ ¬«ñ, ß««ΓóÑΓßΓóπεΘ¿⌐ «Φ¿í¬Ñ, óδºδóáÑΓ
󫺡¿¬¡«óÑ¡¿Ñ πß½«ó¿∩ ON ERROR
æêìÆÇèæêæ:
ERROR()
êæÅÄï£çÄéÇìêà:
ERROR () óδ½áó½¿óáÑΓ «Φ¿í¬¿ ó »α«úαá¼¼áσ, ß ΓѼ τΓ«íδ ¼«ª¡« í佫
»αÑñ»α¿¡∩Γ∞ ñÑ⌐ßΓó¿∩ »« ¿σ ¿ß»αáó½Ñ¡¿ε, Ñß½¿ φΓ« 󫺼«ª¡«.
äÑ⌐ßΓó¿∩ »« ¿ß»αáó½Ñ¡¿ε «Φ¿í«¬ ¼«úπΓ ºá¬½ετáΓ∞ß∩ ó ºá¬αδΓ¿¿ Σá⌐½«ó,
ß¼Ñ¡Ñ ñ¿ß¬«ó, πñá½Ñ¡¿¿ Σá⌐½«ó ñ½∩ «ßó«í«ªñÑ¡¿∩ ¼ÑßΓá ¡á ñ¿ß¬Ñ ¿½¿ ó
óδó«ñÑ ¼Ñ¡ε ñ½∩ óδí«αá ñαπú¿σ «»µ¿⌐.
ìѬ«Γ«αδÑ «Φ¿í¬¿, ¬«¡Ñτ¡«, íδóáεΓ ¡Ñ¿ß»αáó¿¼δ¼¿.
ì«α¼á½∞¡«Ñ ºáóÑαΦÑ¡¿Ñ αáí«Γδ ñѽáÑΓß∩ »« ¬«¼á¡ñÑ CANCEL.
çáóÑαΦÑ¡¿Ñ αáí«Γδ ó αѪ¿¼Ñ «Γ½áñ¬¿ ñѽáÑΓß∩ »« ¬«¼á¡ñÑ SUSPEND.
ä½∩ ¬áªñ«ú« ¬«ñá «Φ¿í¬¿, ó«ºóαáΘáѼ«ú« Σπ¡¬µ¿Ñ⌐ ERROR (), ¿¼ÑÑΓß∩
ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ.
ÅÉêîàùÇìêà:
ä½∩ Γ«ú« τΓ«íδ φΓá Σπ¡¬µ¿∩ ßαáí«Γá½á, ¡Ñ«íσ«ñ¿¼«, τΓ«íδ íδ½á á¬Γ¿ó¡«⌐
¬«¼á¡ñá ON ERROR. 諼á¡ñδ RETURN ¿ RETRY ºá¡π½∩εΓ Σπ¡¬µ¿ε ERROR.
ÅÉêîàÉ¢:
çñÑß∞ »α¿ó«ñ¿Γß∩ «íαáºÑµ »α«µÑñπαδ «íαáí«Γ¬¿ «Φ¿í¬¿, ¬«Γ«αá∩ óδó«ñ¿Γ
ß««ΓóÑΓßΓóπεΘÑÑ ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ:
*MAIN.PRG
ON ERROR DO Err_Prog WITH ERROR()
.
.
.
*EOF:MAIN.PRG
Err_Prog.PRG
PARAMETERS Error_no
IF Error_no = 54
* éδó«ñ τáßΓ¿ ß««íΘÑ¡¿∩ «í «Φ¿í¬Ñ
|@ 24,0 SAY 'ERROR m ' + SUBSTR(MESSAGE(),4)
ENDIF
IF Error_no = 5
* çừ¼¡¿Γ∞ ß««íΘÑ¡¿Ñ ó »ÑαѼѡ¡«⌐
errr_msg = MESSAGE()
DO Err_proc WITH err_msg
ENDIF
æî. ÆÇèåà:
ON ERROR, RETRY, MESSAGE()
öôìèûêƒ EXP
öπ¡¬µ¿∩ EXP «»αÑñѽ∩ÑΓ º¡áτÑ¡¿Ñ óδαáªÑ¡¿∩ e ó ßΓѻѡ¿ σ.
æêìÆÇèæêæ:
EXP(<óδαN>)
êæÅÄï£çÄéÇìêà:
ù¿ß½«ó«Ñ óδαáªÑ¡¿Ñ - φΓ« º¡áτÑ¡¿Ñ φ¬ß»«¡Ñ¡Γδ σ ó παáó¡Ñ¡¿¿ Ñ ó
ßΓѻѡ¿ σ.
ÅÉêîàÉ¢:
Ä»αÑñѽ¿Γ∞ º¡áτÑ¡¿Ñ Ñ ó ßΓѻѡ¿ 1000:
. ? EXP(1000)
. 2.718
. STORE 1000 TO y
1000
. ? EXP(y)
2.712
æî. ÆÇèåà:
SET DECIMALS
öôìèûêƒ FIELD
öπ¡¬µ¿∩ FIELD ó«ºóαáΘáÑΓ ¿¼∩ »«½∩, ß««ΓóÑΓßΓóπεΘÑÑ Ñú« ¡«¼Ñαπ »«
»«α∩ñ¬π ó ßΓαπ¬ΓπαÑ á¬Γ¿ó¡«ú« Σá⌐½á íáºδ ñá¡¡δσ.
æêìÆÇèæêæ:
FIELD(<óδαN>)
êæÅÄï£çÄéÇìêà:
æ¿ßΓѼá Éàüôæ ó«ºóαáΘáÑΓ ¡π½Ñóπε ßΓ᫬π, Ñß½¿ τ¿ß½«ó«Ñ óδαáªÑ¡¿Ñ ó
Σπ¡¬µ¿¿ FIELD ¡Ñ ½Ñª¿Γ ó ñ¿á»áº«¡Ñ «Γ 1 ñ« 128, ¿½¿ Ñß½¿ τ¿ß½«ó«Ñ
óδαáªÑ¡¿Ñ «Γ¡«ß¿Γß∩ ¬ ¡ÑßπΘÑßΓóπεΘÑ¼π »«½ε, ¡á»α¿¼Ñα, ¬«úñá ó
ßΓαπ¬ΓπαÑ ºá»¿ß¿ ¿¼ÑÑΓß∩ 28 ¿¼Ñ¡ »«½Ñ⌐, á ºá»αáΦ¿óáÑΓß∩ ¿¼∩ 29-ú«
»«½∩.
ÇñαÑßπ∩ß∞ ¬ ¬áªñ«¼π »«½ε »« Ñú« ¡«¼Ñαπ, Σπ¡¬µ¿∩ FIELD »«ºó«½∩ÑΓ
αáí«ΓáΓ∞ ß »«½∩¼¿ ¬á¬ ß óÑ¬Γ«α«¼. éßÑ ¿¼Ñ¡á óδó«ñ∩Γß∩ ºáú½áó¡δ¼¿
íπ¬óἿ.
ÅÉêîàÉ¢:
äá½ÑÑ ñѼ«¡ßΓα¿απÑΓß∩ αáí«Γá φΓ«⌐ Σπ¡¬µ¿¿:
. USE Clients
. ? FIELD(3) && ê¼∩ ΓαÑΓ∞Ñú« »«½∩?
ADDRESS
. ? FIELD(4) = 'CITY' && ¥Γ« τÑΓóÑαΓ«Ñ »«½Ñ "CITY"
.T.
. ? FIELD(4) = 'City'
.F.
. number = 2
2
. ? FIELD(number) && ê¼∩ »«½∩ 2?
LASTNAME
. fld = FIELD(number+2) && ê¼∩ »«½∩ +4?
CITY
ìỿßáΓ∞ »α«úαá¼¼π, ¬«Γ«αá∩ «»αÑñѽ∩ÑΓ τ¿ß½« »«½Ñ⌐ ó Σá⌐½Ñ:
USE Clients
num_fields = 0
null = ""
DO WHILLE null < Field(num_fields + 1)
num_fields = num_fields + 1
ENDDO
? num_fields
æî. ÆÇèåà:
DBF(), LUPDATE(), NDX(), RECCOUNT(), RECSIZE()
öôìèûêƒ FILE
öπ¡¬µ¿∩ FILE »α«óÑα∩ÑΓ ßπΘÑßΓó«óá¡¿Ñ π¬áºá¡¡«ú« Σá⌐½á. ÉѺπ½∞ΓáΓ«¼
Σπ¡¬µ¿¿ ∩ó½∩ÑΓß∩ ½«ú¿τÑ߬«Ñ "êßΓ¿¡á" (. Æ.), Ñß½¿ Σá⌐½ ßπΘÑßΓóπÑΓ.
æêìÆÇèæêæ:
FILE(<¿¼∩ Σá⌐½á>)
êæÅÄï£çÄéÇìêà:
ê¼∩ Σá⌐½á ñ«½ª¡« ß«ñÑαªáΓ∞ αáßΦ¿αÑ¡¿Ñ ¿¼Ñ¡¿. àß½¿ Σá⌐½ αáß»«½«ªÑ¡ ¡á
«Γ½¿τ¡«¼ «Γ á¬Γ¿ó¡«ú« ñ¿ß¬Ñ ¿½¿ ñ¿αÑ¬Γ«α¿¿, Γ« «¡¿ ñ«½ª¡δ íδΓ∞
π¬áºá¡δ ó ¿¼Ñ¡¿ Σá⌐½á.
ê¼∩ Σá⌐½á ñ«½ª¡« íδΓ∞ ó ¬áóδτ¬áσ ¿½¿ ñ«½ª¡« σαá¡¿Γ∞ß∩ ó« óαѼѡ¡«⌐
»ÑαѼѡ¡«⌐.
ÅÉêîàÉ¢:
àß½¿ Σá⌐½ Clients ¡áσ«ñ¿Γß∩ ¡á ñ¿ß¬Ñ é:, á á¬Γ¿óÑ¡ ñ¿ß¬ Ç:
. ? FILE('Clients.dbf')
.F. && öá⌐½ ¡Ñ ¡á ñ¿ß¬Ñ Ç
. ? FILE('B:Clients')
.F. && ÄΓßπΓßΓóπÑΓ ¿ñÑ¡Γ¿Σ¿¬áΓ«α Γ¿»á Σá⌐½á
. ? FILE('B:Clients.dbf')
.T.
. STORE 'B:Clients.dbf'TO test
B:Clients.dbf
. ? FILE(test)
.T.
öôìèûêƒ FKLABEL
öπ¡¬µ¿∩ FKLABEL ó«ºóαáΘáÑΓ ¿¼∩ Σπ¡¬µ¿«¡á½∞¡«ú« ¬½ετá, ¬«Γ«α«Ñ
ß««ΓóÑΓßΓóπÑΓ π¬áºá¡¡«¼π τ¿ß½«ó«¼π óδαáªÑ¡¿ε.
æêìÆÇèæêæ:
FKLABEL (<óδα N>)
êæÅÄï£çÄéÇìêà:
ìá αạδσ Å¥éî Σπ¡¬µ¿«¡á½∞¡δÑ ¬½ετ¿ «»αÑñѽѡδ αẽ¿τ¡δ¼ «íαẫ¼.
ìá»α¿¼Ñα, ¡á ¡Ñ¬«Γ«αδσ ¿º ¡¿σ ñ½∩ φΓ«⌐ µÑ½¿ ¿ß»«½∞ºπεΓß∩ µ¿Σαδ «Γ 1
ñ« 10, á ¡á ñαπú¿σ «»¿ßáΓѽ∞¡δÑ ¼ÑΓ¬¿, Γá¬¿Ñ ¬á¬ SETUP.
öπ¡¬µ¿∩ FKLABEL »«ºó«½∩ÑΓ »α«úαá¼¼¿ßΓá¼ ¿ß»«½∞º«óáΓ∞ ¬«¼á¡ñπ SET
FUNCTION ñ½∩ »ÑαÑ«»αÑñѽѡ¿∩ »α«úαá¼¼¿απѼδσ Σπ¡¬µ¿«¡á½∞¡δσ ¬½ετÑ⌐, π
¬«Γ«αδσ ¼ÑΓ¬¿ - ¡Ñτ¿ß½«óδÑ. ä«»π߬áεΓß∩ ½εíδÑ τ¿ß½á ó ñ¿á»áº«¡Ñ «Γ 1
ñ« FKMAX (). FKLABEL (1) ß««ΓóÑΓßΓóπÑΓ óΓ«α«¼π Σπ¡¬µ¿«¡á½∞¡«¼π ¬½ετπ
¡á ¬½áó¿áΓπαÑ, úñÑ ¡ÑΓ «Γñѽ∞¡«⌐ ¬½áó¿Φ¿ Å«¼«Θ¿.
ÅÉêîàÉ¢:
Ä»αÑñѽ¿Γ∞ ¬«½¿τÑßΓó« »α«úαá¼¼¿απѼδσ Σπ¡¬µ¿«¡á½∞¡δσ ¬½ετÑ⌐ ¡á Å¥éî ¿
ß««ΓóÑΓßΓóÑ¡¡« πßΓá¡«ó¿Γ∞ ¿σ:
i = 1
DO WHILE i <= FKMAX()
ACCEPT "SET" + FKLABEL(i) + " TO " TO String
SET FUNCTION FKLABEL(i) TO String
i = i+1
ENDDO
*
* éδóÑßΓ¿ ¡«óδÑ º¡áτÑ¡¿∩...
LIST STATUS
æî. ÆÇèåà:
FKMAX(), SET FUNCTION
öôìèûêƒ FKMAX
öπ¡¬µ¿∩ FKMAX ó«ºóαáΘáÑΓ τ¿ß½« »α«úαá¼¼¿απѼδσ Σπ¡¬µ¿«¡á½∞¡δσ ¬½ετÑ⌐
¡á ¬½áó¿áΓπαÑ Å¥éî.
æêìÆÇèæêæ:
FKMAX()
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ FKMAX »«ºó«½∩ÑΓ »α«úαá¼¼¿ßΓá¼ πßΓá¡«ó¿Γ∞ Σπ¡¬µ¿«¡á½∞¡δÑ ¬½ετ¿
Γá¬, τΓ«íδ «¡¿ »«ñσ«ñ¿½¿ ¬ ¿ß»«½∞ºπѼ«⌐ Å¥éî.
ÅÉêîàÉ¢:
Ä»αÑñѽ¿Γ∞ ¬«½¿τÑßΓó« »α«úαá¼¼¿απѼδσ Σπ¡¬µ¿«¡á½∞¡δσ ¬½ετÑ⌐ ¿
πßΓá¡«ó¿Γ∞ ¿σ ß««ΓóÑΓßΓóÑ¡¡«:
i = 1
DO WHILE i <= FKMAX()
ACCEPT "SET " + FKLABEL(i) + " TO " TO String
SET FUNCTION FKLABEL(i) TO String
i = i+1
ENDDO
*
* éδóÑßΓ¿ ¡«óδÑ º¡áτÑ¡¿∩
LIST STATUS
æî. ÆÇèåà:
FKLABEL(), SET FUNCTION
öôìèûêƒ FOUND
ÉѺπ½∞ΓáΓ«¼ Σπ¡¬µ¿¿ FOUND íπñÑΓ ½«ú¿τÑ߬«Ñ "êßΓ¿¡á" (. Æ.), Ñß½¿
»αÑñδñπΘ¿Ñ ¬«¼á¡ñδ FIND, SEEK, LOCATE ¿½¿ CONTINUE óδ»«½¡¿½¿ß∞
πß»ÑΦ¡«.
æêìÆÇèæêæ:
FOUND()
ÅÉêîàùÇìêƒ:
Äíδτ¡« Σπ¡¬µ¿∩ FOUND ¿ß»«½∞ºπÑΓß∩ ó »α«úαá¼¼¿α«óá¡¿¿ ñ½∩ «»αÑñѽѡ¿∩
»« ¬á¬«⌐ óÑ⪥ »α«úαá¼¼δ ¿ñΓ¿, ó ºáó¿ß¿¼«ßΓ¿ «Γ Γ«ú«, ¡á⌐ñÑΓ ½¿
»«¿ß¬«óá∩ ¬«¼á¡ñá ¡πª¡δÑ ñá¡¡δÑ.
ìá ¬áªñπε αáí«τπε «í½áßΓ∞ ¡πª¡á «ñ¡á Σπ¡¬µ¿∩ FOUND ().
àß½¿ Σá⌐½δ ßó∩ºá¡δ ¬«¼á¡ñ«⌐ SET RELATION, ß¿ßΓѼá Éàüôæ πßΓá¡áó½¿óáÑΓ
Σπ¡¬µ¿ε FOUND () ó ßó∩ºá¡¡«⌐ αáí«τÑ⌐ «í½áßΓ¿, ¬«úñá π¬áºáΓѽ∞ ºá»¿ß¿
ñó¿úáÑΓß∩ »« ΓѬπΘѼπ Σá⌐½π íáºδ ñá¡¡δσ, ß¿ßΓѼá Éàüôæ ß«óÑαΦáÑΓ
¡Ñ∩ó¡δ⌐ »«¿ß¬ ó ¡Ñßó∩ºá¡¡δσ ß ¡¿¼ Σá⌐½áσ íáºδ ñá¡¡δσ.
àß½¿ π¬áºáΓѽ∞ ºá»¿ß¿ »ÑαÑñó¿úáÑΓß∩ ½εí«⌐ ñαπú«⌐ ¬«¼á¡ñ«⌐ ¬α«¼Ñ FIND,
LOCATE, SEEK, ¿½¿ CONTINUE, Γ« αѺπ½∞ΓáΓ«¼ Σπ¡¬µ¿¿ FOUND () íπñÑΓ
½«ú¿τÑ߬«Ñ "﫪∞" (. F.).
ÅÉêîàÉ¢:
é »α¿¼ÑαÑ ¿ß»«½∞ºπÑΓß∩ Σá⌐½ Travel.
Åα«óÑα¿Γ∞ αѺπ½∞ΓáΓ »«¿ß¬á ¡á ¡Ñ¿¡ñѬ߿α«óá¡¡«¼ Σá⌐½Ñ:
LOCATE FOR Agent = 'êÆ'
DO WHILE FOUND()
? Agent
CONTINUE
ENDDO
Åα«óÑα¿Γ∞ αѺπ½∞ΓáΓ »«¿ß¬á ¡á Σá⌐½Ñ, ¿¡ñѬ߿α«óá¡¡«¼ »« »«½ε Agent:
SEEK 'êÆ'
IF FOUND()
DO WHILE Agent = 'êÆ'
? Agent
SKIP
ENDDO
ENDIF
æî. ÆÇèåà:
CONTINUE, EOF(), FIND, LOCATE, SEEK, SET RELATION
öôìèûêƒ GETENV
öπ¡¬µ¿∩ GETENV ó«ºóαáΘáÑΓ ß«ñÑন¼«Ñ π¬áºá¡¡«⌐ »ÑαѼѡ¡«⌐, ß«ñÑαªáΘÑ⌐
¿¡Σ«α¼áµ¿ε «í «»Ñαᵿ«¡¡«⌐ ßαÑñÑ, ó ó¿ñÑ ß¿¼ó«½∞¡«⌐ ßΓ᫬¿.
æêìÆÇèæêæ:
GETENV(<óδα.æ>)
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ GETENV »«ºó«½∩ÑΓ »α«úαá¼¼¿ßΓπ »α«óÑα¿Γ∞ ß«ñÑন¼«Ñ »ÑαѼѡ¡δσ
«»Ñαᵿ«¡¡«⌐ ß¿ßΓѼδ, ó¬½ετáεΘ¿σ ¿¡Σ«α¼áµ¿ε «í «»Ñαᵿ«¡¡«⌐ ßαÑñÑ
(«¬απªÑ¡¿¿).
àß½¿ ß¿¼ó«½∞¡«Ñ óδαáªÑ¡¿Ñ ¡Ñ ¡á⌐ñÑ¡«, Γ« ß¿ßΓѼá Éàüôæ ó«ºóαáΘáÑΓ
¡π½Ñóπε ßΓ᫬π.
ü«½ÑÑ »«ñα«í¡πε ¿¡Σ«α¼áµ¿ε « ¬«¼á¡ñÑ SET ¿ »ÑαѼѡ¡δσ, ó¬½ετáεΘ¿σ
ñá¡¡δÑ «í «»Ñαᵿ«¡¡«⌐ ßαÑñÑ, ¼«ª¡« ¡á⌐Γ¿ ó απ¬«ó«ñßΓóÑ »«
«»Ñαᵿ«¡¡«⌐ ß¿ßΓѼÑ.
ÅÉêîàÉ¢:
ìá⌐Γ¿ ß«ñÑন¼«Ñ »áαá¼ÑΓα«ó SET «»Ñαᵿ«¡¡«⌐ ß¿ßΓѼδ DOS:
. ? GETENV("COMSPEC")
C:\bin\command.com
. ? GETENV("PATH")
\bin;D:\;A:\
æî. ÆÇèåà:
DISKSPACE(), OS(), VERSION()
öôìèûêƒ IIF
öπ¡¬µ¿∩ IIF «íÑß»Ñτ¿óáÑΓ ßαÑñßΓóá ß«ºñá¡¿∩ πß½«ó¡«ú« óδαáªÑ¡¿∩, ¡Ñ
¿ß»«½∞ºπ∩ ßΓαπ¬Γπαπ IF... ENDIF. öπ¡¬µ¿∩ αáí«ΓáÑΓ ¬á¬ ó αѪ¿¼Ñ
¿¡ΓÑα»αÑΓᵿ¿ ¬«¼á¡ñ, »« ºá»α«ßπ ¡á óó«ñ, Γᬠ¿ ó¡πΓα¿ »α«úαá¼¼δ.
æêìÆÇèæêæ:
IIF(<óδαL><óδα1><óδα2>)
êæÅÄï£çÄéÇìêà:
àß½¿ ½«ú¿τÑ߬«Ñ óδαáªÑ¡¿Ñ ÑßΓ∞ "êßΓ¿¡á", Σπ¡¬µ¿∩ IIF () ó«ºóαáΘáÑΓ
»Ñαó«Ñ óδαáªÑ¡¿Ñ, ¿¡áτÑ «¡á ó«ºóαáΘáÑΓ óΓ«α«Ñ óδαáªÑ¡¿Ñ.
<óδα1> ¿ <óδα2> ¼«úπΓ íδΓ∞ ß¿¼ó«½∞¡δ¼¿, τ¿ß½«ó묨 ¿½¿ óδαáªÑ¡¿∩¼¿
Γ¿»á ñáΓδ. Äñ¡á¬«, «íá óδαáªÑ¡¿∩ ñ«½ª¡δ íδΓ∞ «ñ¡«ú« ¿ Γ«ú« ªÑ Γ¿»á.
ÉѺπ½∞ΓáΓ Σπ¡¬µ¿¿ Γ«ú« ªÑ Γ¿»á, τΓ« ¿ «íá óδαáªÑ¡¿∩.
öπ¡¬µ¿ε IIF () ¼«ª¡« »α¿¼Ñ¡∩Γ∞ ó ¬«¼á¡ñáσ MODIFY REPORT ¿ MODIFY
LABEL ñ½∩ πß½«ó¡«ú« «»αÑñѽѡ¿∩ ß«ñÑন¼«ú« »«½Ñ⌐.
ÅÉàêîôÖàæÆéÇ:
çá¼Ñ¡á ßΓαπ¬Γπαδ IF... ENDIF ó »α«úαá¼¼Ñ ¡á Σπ¡¬µ¿ε IIF () π½πτΦáÑΓ
óαѼ∩ óδ»«½¡Ñ¡¿∩ »α«úαá¼¼δ.
ÅÉêîàÉ¢:
é ß½ÑñπεΘÑ⌐ »α«úαá¼¼Ñ ¼«ª¡« ºá¼Ñ¡¿Γ∞ »Ñαóδ⌐ ¡áí«α ¬«¼á¡ñ «ñ¡«⌐
¬«¼á¡ñ¡«⌐ ßΓ᫬«⌐ ß IIF:
IF Sex = 'å'
Mname = 'âαáªñᡬá' + Last_name
ELSE
Mname = 'âαáªñá¡¿¡' + Last_name
ENDIF
äá½ÑÑ ß½ÑñπÑΓ «ñ¡á ßΓ᫬á, ¬«Γ«αá∩ ºá¼Ñ¡∩ÑΓ »αÑñδñπΘ¿Ñ ¬«¼á¡ñδ:
Mname = IIF(Sex='å','âαáªñᡬá','âαáªñá¡¿¡') + Last_name
àß½¿ ó Σá⌐½Ñ íáºδ ñá¡¡δσ ÑßΓ∞ »«½Ñ ß ñáΓ«⌐ ¡áτá½á ¿ ß ñáΓ«⌐ ¬«¡µá, Γ«
¬«¡Ñτ¡πε ñáΓπ ¼«ª¡« »α«ñ½¿Γ∞, ¡á»α¿¼Ñα, ¡á 30 ñ¡Ñ⌐ ß½ÑñπεΘ¿¼ «íαẫ¼:
. LIST IIF(End_date > DATE(), End date, End_date + 30)
ÅαÑñ»«½«ª¿¼ ¿¼ÑÑΓß∩ ½«ú¿τÑ߬á∩ »ÑαѼѡ¡á∩ Is_error.
æ½ÑñπεΘá∩ ¬«¼á¡ñ¡á∩ ßΓα«¬á »αÑ«íαáºπÑΓ »ÑαѼѡ¡πε ó τ¿ß½«, ºáΓѼ
ºá»«¼¿¡áÑΓ Ñú« ó τ¿ß½«ó«⌐ óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐ Error_code. àß½¿
º¡áτÑ¡¿Ñ »ÑαѼѡ¡«⌐ Is_error - "êßΓ¿¡á", Γ« ß«ñÑন¼δ¼ ¡«ó«⌐
óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐ íπñÑΓ 1, ¿¡áτÑ 0.
Error_code = IIF(Is_error, 1, 0)
öôìèûêƒ INKEY
öπ¡¬µ¿∩ INKEY ó«ºóαáΘáÑΓ µÑ½«Ñ τ¿ß½«, ∩ó½∩εΘÑÑß∩ ¬«ñ«¼ ASCII
»«ß½Ññ¡Ñ⌐ ¬½áó¿Φ¿, ¡áªáΓ«⌐ «»ÑαáΓ«α«¼ ¡á ¬½áó¿áΓπαÑ. Ä¡á ¡Ñ
«ßΓá¡áó½¿óáÑΓ óδ»«½¡Ñ¡¿Ñ »α«úαá¼¼δ.
æêìÆÇèæêæ:
INKEY()
ÅÉêîàùÇìêƒ:
öπ¡¬µ¿∩ INKEY ó«ºóαáΘáÑΓ µÑ½«Ñ τ¿ß½« ó ñ¿á»áº«¡Ñ «Γ 0 ñ« 255, Ñß½¿ ó
íπΣÑαÑ πªÑ ÑßΓ∞ ¡Ñ߬«½∞¬« ß¿¼ó«½«ó, Σπ¡¬µ¿∩ INKEY () ó«ºóαáΘáÑΓ ¬«ñ
»Ñαó«ú« óóÑñÑ¡¡«ú« ß¿¼ó«½á, »α¿ φΓ«¼ «¡ ¡Ñ πñá½∩ÑΓß∩ ¿º íπΣÑαá. àß½¿
¡¿ «ñ¡«⌐ ¬½áó¿Φ¿ ¡Ñ í佫 ¡áªáΓ«, Σπ¡¬µ¿∩ INKEY () ó«ºóαáΘáÑΓ ¡π½Ñóπε
ßΓ᫬π. öπ¡¬µ¿∩ INKEY ó«ºóαáΘáÑΓ Γá¬ªÑ φ¬ó¿óá½Ñ¡Γ ߻ѵ¿á½∞¡δσ
π»αáó½∩εΘ¿σ ¬½ετÑ⌐, Γᬿσ ¬á¬ ¬½ετ¿ π»αáó½Ñ¡¿∩ ¬παß«α«¼ ¿
<Ctrl>-<Home>. ùáßΓ« Σπ¡¬µ¿∩ ¿ß»«½∞ºπÑΓß∩ ó »α«úαá¼¼Ñ ¬á¬ πß½«ó¿Ñ ñ½∩
»ÑαÑñáτ¿ π»αáó½Ñ¡¿∩. Ä¡á »«ºó«½∩ÑΓ ¿ß»«½∞º«óáΓ∞ ó¡πΓα¿ »α«úαá¼¼δ
ß¿ßΓѼδ Éàüôæ ¬½ετ¿ π»αáó½Ñ¡¿∩ ¬παß«α«¼ ¿ ñαπú¿Ñ ¡Ñ»ÑτáΓ¡δÑ ¬½ετ¿.
é ß½ÑñπεΘÑ⌐ Γáí½¿µÑ »α¿óÑñÑ¡δ ¡áºóá¡¿∩ ¬½ετÑ⌐ (¬½áó¿Φ) ¬½áó¿áΓπαδ ¿
ß««ΓóÑΓßΓóπεΘ¿Ñ ¿¼ º¡áτÑ¡¿∩ Σπ¡¬µ¿¿ INKEY ():
+------------------------+-----------------------+----------------------+
| æ»Ñµ¿á½∞¡δÑ | ǽ∞ΓÑα¡áΓ¿ó¡δÑ |ç¡áτÑ¡¿∩, ó«ºαáΘáѼδÑ |
| ¬½ετ¿ | ¬½ετ¿ | INKEY |
+------------------------+-----------------------+----------------------+
| <ó»αáó«> | Ctrl-D | 4 |
| <ó½Ñó«> | Ctrl-S | 19 |
| <óóÑασ> | Ctrl-E | 5 |
| <󡿺> | Ctrl-X | 24 |
| Ctrl-<ó»αáó«> | Ctrl-B | 2 |
| Ctrl-<ó½Ñó«> | Ctrl-Z | 26 |
| Ins | Ctrl-V | 22 |
| Del | Ctrl-G | 7 |
| Home | Ctrl-A | 1 |
| End | Ctrl-F | 6 |
| PgUp | Ctrl-R | 18 |
| PgDn | Ctrl-C | 3 |
| Home | Ctrl-] | 29 |
| End | Ctrl-W | 23 |
| Ctrl-PgUp | Ctrl-- | 31 |
| Ctrl-PgDn | Ctrl-^ | 30 |
+------------------------+-----------------------+----------------------+
ÅÉêîàùÇìêà
<ó½Ñó«> ¿½¿ <Ctrl>-<S> ¼«úπΓ íδΓ∞ ó«ß»α¿¡∩Γδ ß¿ßΓѼ«⌐ ¬á¬ ¬«¼á¡ñá ñ½∩
«ßΓá¡«ó¬¿ ß¬á¡¿α«óá¡¿∩ φ¬αá¡á. æ½ÑñπÑΓ ¿ß»«½∞º«óáΓ∞ ¬«¼á¡ñπ SET
ESCAPE OFF, τΓ«íδ »α¿ ¡Ñ«íσ«ñ¿¼«ßΓ¿ φΓ«ú« ¿ºíѪáΓ∞.
ÅÉêîàÉ¢:
éδó«ñ¿Γ∞ óαѼ∩ ¡Ñ»αÑαδó¡« ó ΓÑτÑ¡¿Ñ «ª¿ñá¡¿∩ óδí«αá ¿º ¼Ñ¡ε:
DO WHILE .T.
*
<óδó«ñ «»µ¿⌐ ¼Ñ¡ε>
*
i = 0
DO WHILE i = 0
@ 1,72 SAY TIME()
i = INKEY()
ENDDO
*
DO CASE
CASE CHR(i) $ "Qq0"
RETURN
CASE CHR(i) $ "Aa1"
DO <procedure 1>
CASE CHR(i) $ "Bb2"
DO <procedure 2>
CASE CHR(i) $ "Cc3"
DO <procedure 3>
ENDCASE
ENDDO
æî. ÆÇèåà:
ON KEY, READ, SET TYPEAHEAD, CHR(), READKEY()
öôìèûêƒ INT
öπ¡¬µ¿∩ INT »αÑ«íαáºπÑΓ µ¿Σα«ó«Ñ óδαáªÑ¡¿Ñ ó µÑ½«Ñ τ¿ß½« »πΓѼ
«Γíαáßδóá¡¿∩ óßÑσ µ¿Σα ß»αáóá «Γ ñÑß∩Γ¿τ¡«⌐ Γ«τ¬¿.
æêìÆÇèæêæ:
INT(<óδαN>)
ÅÉêîàÉ¢:
ÅαÑóαáΓ¿Γ∞ τ¿ß½« 10. 23 ó µÑ½«Ñ:
. ? INT(10`23)
10
. STORE 10.23 TO x
. ? INT(x)
10
. STORE INT(10.23) TO x
10
öôìèûêƒ ISALPHA
ÉѺπ½∞ΓáΓ«¼ Σπ¡¬µ¿¿ ISALPHA ∩ó½∩ÑΓß∩ ½«ú¿τÑ߬«Ñ "êßΓ¿¡á", Ñß½¿
π¬áºá¡¡«Ñ ß¿¼ó«½∞¡«Ñ óδαáªÑ¡¿Ñ ¡áτ¿¡áÑΓß∩ ß íπ¬óδ.
æêìÆÇèæêæ:
ISALPHA(<óδαæ>)
êæÅÄï£çÄéÇìêà:
üπ¬óá ¼«ªÑΓ íδΓ∞ ºáú½áó¡«⌐ ¿½¿ ßΓα«τ¡«⌐ «Γ Ç ñ« Z. ¥Γá Σπ¡¬µ¿∩
»α¿ñáÑΓ í«½∞Φπε ú¿í¬«ßΓ∞ ó αáí«ΓÑ ß ß¿¼ó«½∞¡δ¼¿ ßΓα«¬á¼¿.
ÅÉêîàÉ¢:
Åα«óÑα¿Γ∞, ¡áτ¿¡áÑΓß∩ ½¿ ßΓ᫬á ß¿¼ó«½«ó ß íπ¬óδ:
. ? ISALPHA('abc123`)
.T.
. ? ISALPHA('ABC123`)
.T.
. ? ISALPHA('123abc')
.F.
æî. ÆÇèåà:
ISLOWER(), ISUPPER(), LOWER(), UPPER()
öôìèûêƒ ISCOLOR
ÉѺπ½∞ΓáΓ«¼ Σπ¡¬µ¿¿ ∩ó½∩ÑΓß∩ ½«ú¿τÑ߬«Ñ "êßΓ¿¡á", Ñß½¿ ß¿ßΓѼá Éàüôæ
αáí«ΓáÑΓ ó µóÑΓ¡«¼ αѪ¿¼Ñ, ¿ ½«ú¿τÑ߬«Ñ "﫪∞", Ñß½¿ «¡á αáí«ΓáÑΓ ó
¼«¡«σα«¼¡«¼ αѪ¿¼Ñ.
æêìÆÇèæêæ:
ISCOLOR()
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ ISCOLOR () ñáÑΓ ó«º¼«ª¡«ßΓ∞ αáºαáí«Γτ¿¬á¼ »α¿¬½áñ¡δσ ß¿ßΓѼ
¿ß»«½∞º«óáΓ∞ óßÑ »αÑ¿¼πΘÑßΓóá µóÑΓ¡«ú« ¿½¿ ¼«¡«σα«¼¡«ú« αѪ¿¼á ¿
πßΓá¡áó½¿óáΓ∞ SET COLOR ó ¡π½Ñó«Ñ º¡áτÑ¡¿Ñ.
ìÑ óßÑ Å¥éî, αáí«ΓáεΘ¿Ñ ó µóÑΓ¡«¼ αѪ¿¼Ñ, ¿ß»«½∞ºπεΓ »αÑ¿¼πΘÑßΓóá
óßÑσ 󫺼«ª¡«ßΓÑ⌐ ¬«¼á¡ñδ SET COLOR, σ«Γ∩ «¡¿ ó«ºóαáΘáεΓ º¡áτÑ¡¿Ñ
"êßΓ¿¡á" ó «ΓóÑΓ ¡á Σπ¡¬µ¿ε ISCOLOR ().
ÉѺπ½∞ΓáΓ ºáó¿ß¿Γ «Γ ßΓáΓπßá ¬«¼á¡ñδ SET COLOR ON/OFF, ¿½¿ «Γ Γ«ú«, ó
¬á¬«¼ αѪ¿¼Ñ íδ½á ¼áΦ¿¡á, ¬«úñá ¡áτá½á αáí«Γπ ß¿ßΓѼá Éàüôæ.
ÅÉêîàÉ¢:
ôßΓá¡«ó¿Γ∞ µóÑΓ¡«⌐ αѪ¿¼ αáí«Γδ ¿º »α«úαá¼¼δ, ó ºáó¿ß¿¼«ßΓ¿ «Γ Γ«ú«,
ó ¬á¬«¼ αѪ¿¼Ñ ¿ñÑΓ αáí«Γá:
IF ISCOLOR()
SET COLOR TO GR/B, W/R, GR
ELSE
SET COLOR TO W+
ENDIF
æî. ÆÇèåà:
SET COLOR
öôìèûêƒ ISLOWER
öπ¡¬µ¿∩ ISLOWER ó«ºóαáΘáÑΓ ½«ú¿τÑ߬«Ñ "êßΓ¿¡á", Ñß½¿ π¬áºá¡¡«Ñ
ß¿¼ó«½∞¡«Ñ óδαáªÑ¡¿Ñ ¡áτ¿¡áÑΓß∩ ß« ßΓα«τ¡«⌐ íπ¬óδ.
æêìÆÇèæêæ:
ISLOWER(<óδαæ>)
êæÅÄï£çÄéÇìêà:
æΓα«τ¡«⌐ íπ¬ó«⌐ ¼«ªÑΓ íδΓ∞ ½εíá∩ íπ¬óá «Γ A ñ« Z. öπ¡¬µ¿∩ ISLOWER
«íÑß»Ñτ¿óáÑΓ í«½∞Φπε ú¿í¬«ßΓ∞ ó αáí«ΓÑ ß ß¿¼ó«½á¼¿.
ÉѺπ½∞ΓáΓ«¼ Σπ¡¬µ¿¿ ISLOWER () ∩ó½∩ÑΓß∩ "﫪∞", ¬«úñá »Ñαóδ¼ ß¿¼ó«½«¼
ó ßΓα«¬Ñ ∩ó½∩ÑΓß∩ ¡Ñ íπ¬óá ¿½¿ ºáú½áó¡á∩ íπ¬óá.
ÅÉêîàÉ¢:
Åα«óÑα¿Γ∞ ¡áτ¿¡áÑΓß∩ ½¿ ßΓ᫬á ß« ßΓα«τ¡«⌐ íπ¬óδ:
. ? ISLOWER('abc123`)
.T.
. ? ISLOWER('ABC123`)
.F.
. ? ISLOWER('12abc`)
æî. ÆÇèåà:
ISALPHA(), ISUPPER(), LOWER(), UPPER()
öôìèûêƒ ISUPPER
ÉѺπ½∞ΓáΓ«¼ Σπ¡¬µ¿¿ ISUPPER ∩ó½∩ÑΓß∩ ½«ú¿τÑ߬«Ñ "êßΓ¿¡á", Ñß½¿
π¬áºá¡¡«Ñ ß¿¼ó«½∞¡«Ñ óδαáªÑ¡¿Ñ ¡áτ¿¡áÑΓß∩ ß ºáú½áó¡«⌐ íπ¬óδ.
æêìÆÇèæêæ:
ISUPPER(<óδα.æ>)
êæÅÄï£çÄéÇìêà:
çáú½áó¡«⌐ íπ¬ó«⌐ ¼«ªÑΓ íδΓ∞ íπ¬óá «Γ Ç ñ« Z.
öπ¡¬µ¿∩ ISUPPER »αÑñ«ßΓáó½∩ÑΓ í«½∞Φπε ú¿í¬«ßΓ∞ »α¿ αáí«ΓÑ ß« ßΓα«¬á¼¿
ß¿¼ó«½«ó.
ÉѺπ½∞ΓáΓ«¼ Σπ¡¬µ¿¿ ISUPPER () ∩ó½∩ÑΓß∩ ½«ú¿τÑ߬«Ñ "﫪∞", Ñß½¿
»Ñαóδ¼ ß¿¼ó«½«¼ ó ßΓα«¬Ñ ∩ó½∩ÑΓß∩ ¡Ñ íπ¬óá ¿½¿ ßΓα«τ¡á∩ íπ¬óá.
ÅÉêîàÉ¢:
Åα«óÑα¿Γ∞ ¡áτ¿¡áÑΓß∩ ½¿ ßΓ᫬á ß ºáú½áó¡«⌐ íπ¬óδ:
. ? ISUPPER('ABC123`)
.T.
. ? ISUPPER('abc123`)
.F.
. ? ISUPPER('123ABC')
.F.
æî. ÆÇèåà:
ISALPHA(), ISLOWER(), LOWER(), UPPER()
öôìèûêƒ LEFT
öπ¡¬µ¿∩ LEFT ó«ºóαáΘáÑΓ π¬áºá¡¡«Ñ τ¿ß½« ß¿¼ó«½«ó, óßÑúñá ¡áτ¿¡á∩ ß
ßἫú« ½Ñó«ú« ß¿¼ó«½á.
æêìÆÇèæêæ:
LEFT(<óδαæ>,<óδαN>
êæÅÄï£çÄéÇìêà:
ù¿ß½«ó«Ñ óδαáªÑ¡¿Ñ «»αÑñѽ∩ÑΓ ¬«½¿τÑßΓó« ß¿¼ó«½«ó, ¬«Γ«α«Ñ ¡πª¡«
óδñѽ¿Γ∞ ¿º ß¿¼ó«½∞¡«ú« óδαáªÑ¡¿∩. öπ¡¬µ¿∩ LEFT »«ºó«½∩ÑΓ óδñѽ¿Γ∞
»Ñαóπε τáßΓ∞ ß¿¼ó«½∞¡«⌐ ßΓ᫬¿. ¥Γ« Γ« ªÑ ßἫÑ, τΓ« ñѽáÑΓ Σπ¡¬µ¿∩
SUBSTR ß »«º¿µ¿¿ 1 ¿ ¬«½¿τÑßΓó«¼ ß¿¼ó«½«ó, π¬áºá¡¡«¼ ó <óδαN>. àß½¿
τ¿ß½«ó«Ñ óδαáªÑ¡¿Ñ αáó¡« 0 ¿½¿ «Γα¿µáΓѽ∞¡«, Γ« ß¿ßΓѼá Éàüôæ
ó«ºóαáΘáÑΓ ¡π½Ñóπε ßΓ᫬π. àß½¿ µ¿Σα«ó«Ñ º¡áτÑ¡¿Ñ í«½∞ΦÑ, τѼ ñ½¿¡á
ß¿¼ó«½∞¡«ú« óδαáªÑ¡¿∩, Γ« ß¿ßΓѼá Éàüôæ ó«ºóαáΘáÑΓ óßε ßΓ᫬π.
ÅÉêîàÉ¢:
éδñѽ¿Γ∞ »ÑαóδÑ Γα¿ ß¿¼ó«½á ¿º ß¿¼ó«½∞¡«ú« óδαáªÑ¡¿∩:
. ? LEFT('abcdef`,3)
abc
æî. ÆÇèåà:
AT(), LTRIM(), RIGHT(), RTRIM(), STUFF(), SUBSTR(), TRIM()
öôìèûêƒ LEN
öπ¡¬µ¿∩ «»αÑñѽ∩ÑΓ τ¿ß½« ß¿¼ó«½«ó ó π¬áºá¡¡«¼ ß¿¼ó«½∞¡«¼ óδαáªÑ¡¿¿.
æêìÆÇèæêæ:
LEN(<óδαæ>)
êæÅÄï£çÄéÇìêà:
使¡á ¡π½Ñó«⌐ ßΓ᫬¿ ÑßΓ∞ 0.
ÅÉêîàÉ¢:
Ä»αÑñѽ¿Γ∞ τ¿ß½« ß¿¼ó«½«ó ó ßΓα«¬Ñ " ":
. ? LEN('¥Γ« ¬«Γ')
7
. STORE '¥Γ« ¬«Γ' TO alpha
¥Γ« ¬«Γ
. ? LEN(alpha)
7
é Σá⌐½Ñ Clients. dbf ¿¼ÑÑΓß∩ ß¿¼ó«½∞¡«Ñ »«½Ñ Address ñ½¿¡«⌐ 25
ß¿¼ó«½«ó. Ä»αÑñѽ¿Γ∞ τ¿ß½« ß¿¼ó«½«ó ó Σá¬Γ¿τÑ߬«¼ áñαÑßÑ (î«ß¬óá,
æ¿óáΦ߬á∩ 4-2):
. USE Clients
. ? LEN(Address)
25 && ¥Γ« ñ½¿¡á »«½∩
. ? LEN(TRIM(Address))
21 && ¥Γ« ñ½¿¡á áñαÑßá
öôìèûêƒ LOG
öπ¡¬µ¿∩ ó«ºóαáΘáÑΓ ¡áΓπαá½∞¡δ⌐ ½«úáα¿Σ¼ π¬áºá¡¡«ú« τ¿ß½á.
æêìÆÇèæêæ:
LOG(<óδαN>)
êæÅÄï£çÄéÇìêà:
Äß¡«ó᡿Ѽ ¡áΓπαá½∞¡«ú« ½«úáα¿Σ¼á ∩ó½∩ÑΓß∩ Ñ. öπ¡¬µ¿∩ LOG ó«ºóαáΘáÑΓ
φ¬ß»«¡Ñ¡Γπ ß½ÑñπεΘÑú« παáó¡Ñ¡¿∩: Ñ ó ßΓѻѡ¿ σ αáó¡« π.
N - τ¿ß½«ó«Ñ óδαáªÑ¡¿Ñ, ¿ß»«½∞ºπѼ«Ñ ó Σπ¡¬µ¿¿ LOG.
ÅÉêîàÉ¢:
Ä»αÑñѽ¿Γ∞ ¡áΓπαá½∞¡δ⌐ ½«úáα¿Σ¼ τ¿ß½á 2. 71828:
. ? LOG(2.71828)
1.00000
. STORE 2.71828 TO x
2.71828
. ? LOG(x)
1.00000
Ä»αÑñѽ¿Γ∞ ¡áΓπαá½∞¡δ⌐ ½«úáα¿Σ¼ óδαáªÑ¡¿∩ 4*2:
. x = 4
4
. y = 2
2
. LOG(x * y)
2.08
æî. ÆÇèåà:
EXP(), SET DECIMALS, SET FIXED
öôìèûêƒ LOWER
öπ¡¬µ¿∩ LOWER »αÑ«íαáºπÑΓ ºáú½áó¡δÑ íπ¬óδ ó ßΓα«τ¡δÑ.
æêìÆÇèæêæ:
LOWER(<óδαæ>)
ÅÉêîàÉ¢:
. LOWER('æàâÄäìƒ òÄÉÄÿêë äàì£')
ßÑú«ñ¡∩ σ«α«Φ¿⌐ ñÑ¡∞
. STORE 'æàâÄäìƒ òÄÉÄÿêë äàì£' TO niceday
. ? niceday
æàâÄäìƒ òÄÉÄÿêë äàì£
. ? niceday = 'ßÑú«ñ¡∩ σ«α«Φ¿⌐ ñÑ¡∞'
.F.
. ? LOWER(niceday)='ßÑú«ñ¡∩ σ«α«Φ¿⌐ ñÑ¡∞'
.T.
. STORE '125512 îÄæèéÇ, π½. ÅàÆÉÄéèÇ 10'TO street
125512 îÄæèéÇ, π½. ÅàÆÉÄéèÇ 10
. LOWER(street)
125512 ¼«ß¬óá, π½. »ÑΓα«ó¬á 10
æî. ÆÇèåà:
ISALPHA(), ISLOWER(), ISUPPER(), UPPER()
öôìèûêƒ LTRIM
öπ¡¬µ¿∩ LTRIM πñá½∩ÑΓ óÑñπΘ¿Ñ »α«íÑ½δ ¿º ß¿¼ó«½∞¡«ú« óδαáªÑ¡¿∩.
æêìÆÇèæêæ:
LTRIM(<óδαæ>)
ÅÉêîàùÇìêƒ:
êß»«½∞º«óáΓ∞ Σπ¡¬µ¿ε LTRIM αѬ«¼Ñ¡ñπÑΓß∩ ñ½∩ πñá½Ñ¡¿∩ óÑñπΘ¿σ
»α«íѽ«ó, ¬«Γ«αδÑ »«½πτáεΓß∩ ó αѺπ½∞ΓáΓÑ Σπ¡¬µ¿¿ STR.
ÅÉêîàÉ¢:
ôñ὿Γ∞ óÑñπΘ¿Ñ »α«íÑ½δ ¿º ß¿¼ó«½∞¡«ú« óδαáªÑ¡¿∩, ßΣ«α¼¿α«óá¡¡«ú« ¿º
τ¿ß½«ó«ú« óδαáªÑ¡¿∩:
. ? STR(11.95,8,2)
11.95
. ? LTRIM(STR(11.95,8,2))
11.95
æî. ÆÇèåà:
LEFT(), RIGHT(), RTRIM(), STR(), SUBSTR(), TRIM()
öôìèûêƒ LUPDATE
öπ¡¬µ¿∩ LUPDATE ó«ºóαáΘáÑΓ ñáΓπ »«ß½Ññ¡Ñú« «í¡«ó½Ñ¡¿∩ ΓѬπΘÑú« Σá⌐½á
íáºδ ñá¡¡δσ. ÉѺπ½∞ΓáΓ«¼ ∩ó½∩ÑΓß∩ ñáΓá ó Σ«α¼áΓÑ ñáΓδ.
æêìÆÇèæêæ:
LUPDATE()
ÅÉêîàùÇìêƒ:
öπ¡¬µ¿∩ »«ºó«½∩ÑΓ «»αÑñѽ¿Γ∞ ¼«¼Ñ¡Γ »«ß½Ññ¡Ñú« «í¡«ó½Ñ¡¿∩ Σá⌐½á íáºδ
ñá¡¡δσ.
ÅÉêîàÉ¢:
Åα«óÑα¿Γ∞ ¡Ñ óó«ñ∩Γß∩ ½¿ ¬ó¿Γᡵ¿¿ í«½ÑÑ «ñ¡«ú« αáºá ó ñÑ¡∞:
IF LUPDATE() < DATE()
Do_entry = '?'
@ 5,1 SAY 'Å«ß½Ññ¡¿⌐ αẠ¬ó¿Γᡵ¿¿ óóÑñÑ¡δ' +
DTOC(LUPDATE()) + 'éó«ñ¿Γ∞'? (Y\N);
GET Do_entry PICTURE 'Y'
READ
IF Do_entry = 'Y'
DO <»α«µÑñπαá óó«ñá>
ENDIF
æî. ÆÇèåà:
DBF(), FIELD(), NDX(), RECCOUNT(), RECSIZE()
öôìèûêƒ MAX
öπ¡¬µ¿∩ MAX ó«ºóαáΘáÑΓ í«½∞ΦÑÑ ¿º ñóπσ º¡áτÑ¡¿⌐ τ¿ß½«óδσ óδαáªÑ¡¿⌐
æêìÆÇèæêæ:
MAX(<óδαN1>,<óδαN2>)
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ »«ºó«½∩ÑΓ πßΓá¡«ó¿Γ∞ ¡¿ª¡¿⌐ »αÑñѽ τ¿ß½«ó«ú« óδαáªÑ¡¿∩.
ÅÉêîàÉ¢:
êß»«½∞ºπ∩ Σá⌐½ Tours, «»αÑñѽ¿Γ∞ τΓ« í«½∞ΦÑ - ßΓ«¿¼«ßΓ∞ (Unitcost)
¿½¿ 800:
. USE Tours
. low Limit = 800
. LIST Unitcost, MAX(Low_limit, Unitcost)
çỿß∞# Unitcost MAX(Low_limit, Unitcost)
1 1378.00 1378.00
2 279.00 800.00
3 579.00 800.00
4 1969.00 1969.00
5 759.00 800.00
6 759.00 800.00
7 1049.00 1049.00
BROKEN
. USE
Ä»αÑñѽ¿Γ∞ ¡á¿í«½∞Φπε ßΓ«¿¼«ßΓ∞ Unitcost ó Σá⌐½e Tours:
USE Tours
PUBLIC last_max
last_max = Unitcost
DO WHILE .NOT. EOF()
last_max = MAX(last_max, Unitcost)
SKIP
ENDDO
USE
RETURN
ÉѺπ½∞ΓáΓ:
. ? last_max
3625.00
æî. ÆÇèåà:
MIN()
öôìèûêƒ MESSAGE
öπ¡¬µ¿∩ MESSAGE ó«ºóαáΘáÑΓ ßΓ᫬π ß¿¼ó«½«ó, ß«ñÑαªáΘπε ß««íΘÑ¡¿Ñ «í
«Φ¿í¬Ñ.
æêìÆÇèæêæ:
MESSAGE()
êæÅÄï£çÄéÇìêà:
æΓ᫬π ß¿¼ó«½«ó, ß«ñÑαªáΘπε ß««íΘÑ¡¿Ñ «í «Φ¿í¬Ñ, ¼«ª¡« óδóÑßΓ¿ ¡á
φ¬αá¡, ºá»«¼¡¿Γ∞ ó »«½Ñ »ÑαѼѡ¡«⌐ ¿½¿ ¿ß»«½∞º«óáΓ∞ ¬á¬¿¼ - ½¿í« ¿¡δ¼
ß»«ß«í«¼.
æî. ÆÇèåà:
ERROR()
öôìèûêƒ MIN
öπ¡¬µ¿∩ MIN ó«ºóαáΘáÑΓ ¼Ñ¡∞ΦÑÑ º¡áτÑ¡¿Ñ ¿º ñóπσ τ¿ß½«óδσ óδαáªÑ¡¿⌐.
æêìÆÇèæêæ:
MIN(<óδαN1>,<óδαN2>)
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ MIN ¿ß»«½∞ºπÑΓß∩ ñ½∩ πßΓá¡«ó½Ñ¡¿∩ óÑασ¡Ñú« »αÑñѽá ñ½∩
τ¿ß½«ó«ú« óδαáªÑ¡¿∩.
ÅÉêîàÉ¢:
êß»«½∞ºπ∩ Σá⌐½ Travel, ¼«ª¡« «»αÑñѽ¿Γ∞ τΓ« ¼Ñ¡∞ΦÑ, ßΓ«¿¼«ßΓ∞
(º¡áτÑ¡¿Ñ »«½∩ Cost) ¿½¿ 1. 500:
.USE Travel
. High_limit = 1500
1500
. LIST Next 4 cost, MIN (High_limit, Cost)
çỿß∞# Cost MIN (High_limit, Cost)
1 1199.00 1199.00
2 1378.00 1378.00
3 3195.00 1500.00
4 1969.00 1500.00
.USE
æî. ÆÇèåà:
MAX()
öôìèûêƒ MOD
öπ¡¬µ¿∩ MOD ó«ºóαáΘáÑΓ «ßΓáΓ«¬ «Γ ñѽѡ¿∩. Äß«íÑ¡¡« «¡á »«½Ñº¡á »α¿
»αÑ«íαẫóá¡¿∩σ, ¡á»α¿¼Ñα ßá¡Γ¿¼ÑΓα«ó ó ¼ÑΓαδ.
æêìÆÇèæêæ:
MOD(<óδαN1>,<óδαN2>)
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ MOD óδñáÑΓ τ¿ß½«, ∩ó½∩εΘÑÑß∩ «ßΓáΓ¬«¼ «Γ ñѽѡ¿∩ <óδαN1> ¡á
<óδαN2>. <óδαN1> - ñѽ¿¼«Ñ <óδαN2>-1 ÑßΓ∞ óÑασ¡¿⌐ »αÑñѽ
MOD(), Ñß½¿ <óδαN2> ∩ó½∩ÑΓß∩ »«½«ª¿Γѽ∞¡δ¼ µÑ½δ¼ τ¿ß½«¼.
MOD () ñáÑΓ »«½«ª¿Γѽ∞¡δ⌐ αѺπ½∞ΓáΓ, Ñß½¿ <óδαN2> »«½«ª¿Γѽ∞¡« ¿
«Γα¿µáΓѽ∞¡δ⌐ αѺπ½∞ΓáΓ, Ñß½¿ <óδαN2> «Γα¿µáΓѽ∞¡«.
ö«α¼π½á ¼«ñπ½∩ ¿¼ÑÑΓ ß½ÑñπεΘ¿⌐ ó¿ñ: <óδαN1>-floor (<óδαN1>/<óδαN2>) *
<óδαN2>, úñÑ floor - φΓ« ¡á¿í«½∞ΦÑÑ µÑ½«Ñ τ¿ß½«, ¼Ñ¡∞ΦÑÑ ¿½¿ αáó¡«Ñ
áαúπ¼Ñ¡Γπ. öπ¡¬µ¿∩ INT «Γ½¿τáÑΓß∩ «Γ floor ΓѼ, τΓ« INT () »α«ßΓ«
«ΓíαáßδóáÑΓ ñÑß∩Γ¿τ¡δÑ º¡á¬¿. Floor ¡Ñ ∩ó½∩ÑΓß∩ Σπ¡¬µ¿Ñ⌐ ß¿ßΓѼδ
Éàüôæ.
Åα¿¼ÑαἿ ¡á¿í«½ÑÑ αáß»α«ßΓαá¡Ñ¡¡«ú« ¿ß»«½∞º«óá¡¿∩ ¼«ñπ½Ñ⌐ ∩ó½∩εΓß∩:
¬«½¿τÑßΓó« ñε⌐¼«ó ó ∩αñÑ »αÑñßΓáó½∩ÑΓß∩ ¼«ñπ½Ñ¼ 36, á τ¿ß½« ¼Ñß∩µÑó ó
ú«ñπ ¼«ñπ½Ñ¼ 12.
ÅÉêîàÉ¢:
Ä»αÑñѽ¿Γ∞ «ßΓáΓ«¬ ñѽѡ¿∩ ñóπσ τ¿ß½«óδσ óδαáªÑ¡¿⌐:
. ? MOD(14,12)
2
. ? MOD(0,32)
0
. ? MOD(0,-432)
0
. ? MOD(1,-3)
-2
. ? MOD(-2,3)
1
. ? MOD(-4,-3)
-1
ÅαÑ«íαẫóá¡¿Ñ ßá¡Γ¿¼ÑΓα«ó ó ¼ÑΓαδ:
. ? INT(304/100), '¼ÑΓαá`, MOD(304/100), 'ß¼.`
3 ¼ÑΓαá 4 ß¼.
ÅαÑ«íαẫóá¡¿Ñ ¼¿¡πΓ ó ñ¡¿, τáßδ ¿ ¼¿¡πΓδ:
. t=36500
36500
. ¼¿¡πΓδ=MOD(t,60)
20
. h=INT(t/60)
608
. τáßδ=MOD(h,24)
8
. ñ¡¿=INT(h/24)
25
. ? t,"¼¿¡πΓ φΓ«:", ñ¡¿, "ñ¡Ñ⌐", τáßδ, "τáß«ó", ¼¿¡πΓδ,
"¼¿¡πΓ"
36500 ¼¿¡πΓ φΓ«: 25 ñ¡Ñ⌐ 8 τáß«ó 20 ¼¿¡πΓ
öôìèûêƒ MONTH
öπ¡¬µ¿∩ MONTH «»αÑñѽ∩ÑΓ ¡«¼Ñα ¼Ñß∩µá ¿º óδαáªÑ¡¿∩ Γ¿»á ñáΓδ.
æêìÆÇèæêæ:
MONTH(<óδαD>)
êæÅÄï£çÄéÇìêà:
éδαáªÑ¡¿Ñ¼ Γ¿»á ñáΓδ ¼«ªÑΓ íδΓ∞ óαѼѡ¡á∩ »ÑαѼѡ¡á∩, »«½Ñ ¿½¿
Σπ¡¬µ¿∩ ß¿ßΓѼ¡«⌐ ñáΓδ.
ÅÉêîàÉ¢:
àß½¿ ß¿ßΓѼ¡á∩ ñáΓá 05/15/87:
. ? MONTH(DATE())
5
çừ¼¡¿Γ∞ ¡«¼Ñα ¼Ñß∩µá ó« óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐:
. STORE MONTH(DATE()) TO mmonth
5
. ? mmonth
5
. ? TYPE('mmonth`)
N
æî. ÆÇèåà:
CMONTH, DAY(), YEAR()
öôìèûêƒ NDX
öπ¡¬µ¿∩ ó«ºóαáΘáÑΓ ¿¼Ñ¡á á¬Γ¿ó¡δσ ¿¡ñѬߡδσ Σá⌐½«ó ó óδíαá¡¡«⌐ ó
ΓѬπΘ¿⌐ ¼«¼Ñ¡Γ αáí«τÑ⌐ «í½áßΓ¿.
æêìÇèæêæ
NDX(<óδαN>)
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ »«ºó«½∩ÑΓ αáí«ΓáΓ∞ ó »α«úαá¼¼Ñ ß «Γ¬αδΓ묨 ¿¡ñÑ¬ß¡δ¼¿
Σá⌐½á¼¿, ¡Ñ º¡á∩ ¿¼Ñ¡á Σá⌐½«ó. ù¿ß½«ó«Ñ óδαáªÑ¡¿Ñ «ΓαáªáÑΓ »«½«ªÑ¡¿Ñ
«Γ¬αδΓδσ ¿¡ñѬߡδσ Σá⌐½«ó ó ß»¿ß¬Ñ ¿¡ñѬߡδσ Σá⌐½«ó ó óδíαá¡¡«⌐ ó
ñá¡¡δ⌐ ¼«¼Ñ¡Γ αáí«τÑ⌐ «í½áßΓ¿.
ù¿ß½«ó«Ñ óδαáªÑ¡¿Ñ ñ«½ª¡« íδΓ∞ ó ñ¿á»áº«¡Ñ «Γ 1 ñ« 7. àß½¿ ó
π¬áºá¡¡«¼ ¼ÑßΓÑ ¡ÑΓ Σá⌐½á, Γ« ß¿ßΓѼá Éàüôæ ó«ºóαáΘáÑΓ ¡π½Ñóπε
ßΓ᫬π.
ÅÉêîàÉ¢:
éδóÑßΓ¿ ß»¿ß«¬ óßÑσ «Γ¬αδΓδσ ¿¡ñѬߡδσ Σá⌐½«ó:
i = 1
Null = ""
DO WHILE Null < NDX(i) .AND. i <= 7
? NDX(i)
i = i +1
ENDDO
æî. ÆÇèåà:
DBF(), FIELD(), LUPDATE(), RECCOUNT(), RECSIZE(), SET INDEX,
SET ORDER TO
öôìèûêƒ OS
öπ¡¬µ¿∩ ó«ºóαáΘáÑΓ ¿¼∩ «»Ñαᵿ«¡¡«⌐ ß¿ßΓѼδ, ó ßαÑñÑ ¬«Γ«α«⌐ αáí«ΓáÑΓ
ß¿ßΓѼá Éàüôæ.
æêìÆÇèæêæ:
OS()
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ OS ñáÑΓ ó«º¼«ª¡«ßΓ∞ ßñѽáΓ∞ »α«úαá¼¼π »ÑαÑ¡«ß¿¼«⌐ ¿º ßαÑñδ
DOS ó ßαÑñπ UNIX »πΓѼ ¿¡Σ«α¼¿α«óá¡¿∩ »α«úαá¼¼δ « Γ«¼, ß ¬á¬«⌐
«»Ñαᵿ«¡¡«⌐ ß¿ßΓѼ«⌐ αáí«ΓáÑΓ ß¿ßΓѼá Éàüôæ.
æî. ÆÇèåà:
DISKSPACE (), GETENV (), VERSION ()
öôìèûêƒ PCOL
öπ¡¬µ¿∩ PCOL ó«ºóαáΘáÑΓ ¡«¼Ñα ΓѬπΘÑ⌐ ¬«½«¡¬¿ ¡á »α¿¡ΓÑαÑ. é
»α«úαá¼¼Ñ «¡á »«¼«úáÑΓ «Γ߽Ѫ¿óáΓ∞ ß ¬á¬«⌐ ¬«½«¡¬«⌐ ¿ñÑΓ αáí«Γá.
æêìÆÇèæêæ:
PCOL()
êæÅÄï£çÄéÇìêà:
¡« ºá»«¼¡¿Γ∞ º¡áτÑ¡¿Ñ PCOL () ó« óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐.
öπ¡¬µ¿ε ¼«ª¡« ¿ß»«½∞º«óáΓ∞ ñ½∩ «Γ¡«ß¿Γѽ∞¡«⌐ áñαÑßᵿ¿.
ìá»α¿¼Ñα, @ 1, PCOL () + 5 ñáßΓ Γ« ªÑ, τΓ« 1, $ + 5. ÄíÑ ºá»¿ß¿
»ÑαÑó«ñ∩Γ »α¿¡ΓÑα ¡á 5 ¬«½«¡«¬ ºá ΓѬπΘÑ⌐ ¬«½«¡¬«⌐. öπ¡¬µ¿∩ PCOL ()
πñ«í¡á, ¬«úñá ¡ÑªÑ½áΓѽ∞¡« ¿ß»«½∞º«óáΓ∞ º¡áτÑ¡¿Ñ, ºá»«¼¡Ñ¡¡«Ñ
óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐.
Åα¿ ¿ß»«½∞º«óá¡¿¿ Σπ¡¬µ¿¿ ó ¿¡ΓÑαá¬Γ¿ó¡«¼ αѪ¿¼Ñ ß ¬«¼á¡ñ«⌐ SET
PRINTER ON, αѺπ½∞ΓáΓ«¼ óßÑúñá íπñÑΓ 0.
ÅÉêîàÉ¢:
ìáτáΓ∞ »ÑτáΓ∞ ß« ßñó¿ú«¼ ¡á ¡πª¡«Ñ τ¿ß½« ¬«½«¡«¬ «Γ »«ß½Ññ¡Ñ⌐
»«º¿µ¿¿:
. SET DEVICE TO PRINT
. @ 1,PCOL() + 5 SAY 'Åα¿¼Ñα «Γ¡«ß¿Γѽ∞¡«⌐ áñαÑßᵿ¿'
. SET DEVICE TO SCREEN
Ä»αÑñѽ¿Γ∞ ΓѬπΘπε »«º¿µ¿ε ¡á »α¿¡ΓÑαÑ:
. ? PCOL()
10 && Åα¿¡ΓÑα πßΓá¡«ó½Ñ¡ ¡á 10 ¬«½«¡¬Ñ
. X = PCOL()
14 && Åα¿¡ΓÑα πßΓá¡«ó½Ñ¡ ¡á 14 ¬«½«¡¬Ñ
æî. ÆÇèåà:
@, PROW(), COL(), ROW()
öôìèûêƒ PROW
öπ¡¬µ¿∩ PROW «»αÑñѽ∩ÑΓ ¡«¼Ñα ΓѬπΘÑ⌐ ßΓ᫬¿ ¡á »α¿¡ΓÑαÑ.
æêìÆÇèæêæ:
PROW()
ÅÉêîàÉ¢:
Ä»αÑñѽ¿Γ∞ ¡«¼Ñα ΓѬπΘÑ⌐ ßΓ᫬¿ ¡á »α¿¡ΓÑαÑ:
. ? PROW()
10 && Åα¿¡ΓÑα πßΓá¡«ó½Ñ¡ ¡á 10 ßΓ᫬Ñ
. X = PROW()
14 && Åα¿¡ΓÑα πßΓá¡«ó½Ñ¡ ¡á 14 ßΓ᫬Ñ
ìá»ÑτáΓáΓ∞ "Åα¿¼Ñα «Γ¡«ß¿Γѽ∞¡«⌐ áñαÑßᵿ¿" ¡á »∩Γ∞ ßΓ᫬ ¡¿ªÑ
ΓѬπΘÑ⌐ ßΓ᫬¿. (ÆѬπΘÑÑ º¡áτÑ¡¿Ñ PROW () ñ«½ª¡« íδΓ∞ ¼Ñ¡∞ΦÑ 249):
. SET DEVICE TO PRINT
. @ PROW()+5,1 SAY 'Åα¿¼Ñα «Γ¡«ß¿Γѽ∞¡«⌐ áñαÑßᵿ¿'
. SET DEVICE TO SCREEN
ÄΓα¿µáΓѽ∞¡á∩ «Γ¡«ß¿Γѽ∞¡á∩ áñαÑßᵿ∩ ¡Ñ󫺼«ª¡á.
æî. ÆÇèåà:
@, COL(), PCOL(), ROW()
öôìèûêƒ READKEY
öπ¡¬µ¿∩ READKEY ó«ºóαáΘáÑΓ µÑ½«Ñ τ¿ß½«, «»αÑñѽ∩εΘÑÑ ¬«ñ ¬½ετá
¬½áó¿áΓπαδ, ¡áªáΓ«ú« ñ½∩ «ßπΘÑßΓó½Ñ¡¿∩ óδσ«ñá ¿º »«½¡«φ¬αá¡¡«⌐
¬«¼á¡ñδ.
öπ¡¬µ¿∩ READKEY »«¬áºδóáÑΓ, Γá¬ªÑ í뫨 ½¿ ¿º¼Ñ¡Ñ¡δ ¬á¬¿Ñ-½¿í« ñá¡¡δÑ.
æêìÆÇèæêæ:
READKEY()
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ READKEY »«¼«úáÑΓ »α«úαá¼¼¿ßΓπ «»αÑñѽ¿Γ∞ τΓ« ñѽáΓ∞ »«ß½Ñ
Γ«ú«, ¬á¬ «»ÑαáΓ«α óδσ«ñ¿Γ ¿º «ñ¡«⌐ ¿º »«½¡«φ¬αá¡¡δσ ¬«¼á¡ñ: APPEND,
BROWSE, CHANGE, CREATE, EDIT, INSERT, MODIFY ¿½¿ READ.
é »α«úαá¼¼Ñ ¼«ª¡« ß«ºñáΓ∞ »ÑαѼѡ¡δÑ, ß««ΓóÑΓßΓóπεΘ¿Ñ µÑ½δ¼ τ¿ß½á¼,
τΓ« ñѽáÑΓ »α«úαá¼¼π í«½ÑÑ τ¿Γáíѽ∞¡«⌐ ¿ «í½ÑúτáÑΓ αáí«Γπ ß ¡Ñ⌐, σ«Γ∩
∩ó¡«Ñ ¿ß»«½∞º«óá¡¿Ñ τ¿ßѽ ΓᬠªÑ »αáó«¼Ñα¡« ¬á¬ ¿ ¿ß»«½∞º«óá¡¿Ñ ¿¼Ñ¡
»ÑαѼѡ¡δσ. ì¿ªÑ »α¿ó«ñ¿Γß∩ Γáí½¿µá, ó ¬«Γ«α«⌐ »α¿óÑñÑ¡δ τ¿ß½«óδÑ
º¡áτÑ¡¿∩ ¿ »αÑñ½áúáѼδÑ ¿¼Ñ¡á óαѼѡ¡δσ »ÑαѼѡ¡δσ ñ½∩ ¬áªñ«ú«
ß»«ß«íá óδσ«ñá ¿º »«½¡«φ¬αá¡¡«⌐ ¬«¼á¡ñδ αÑñá¬Γ¿α«óá¡¿∩. èáªñ«¼π
¡áªáΓ¿ε ¬½áó¿Φ¿ ß««ΓóÑΓßΓóπÑΓ ñóá 󫺼«ª¡δσ ¬«ñá. àß½¿ ñá¡¡δÑ ¡Ñ
¿º¼Ñ¡∩½¿ß∞, ¬«ñ íπñÑΓ ¿¼ÑΓ∞ º¡áτÑ¡¿∩ «Γ 0 (¡π½∩) ñ« 36 àß½¿ ñá¡¡δÑ
¿º¼Ñ¡∩½¿ß∞, Γ« ¬«ñ íπñÑΓ πóѽ¿τÑ¡ ¡á 256. ê¼Ñ¡á »ÑαѼѡ¡δσ
»αÑñπß¼«ΓαÑ¡δ Γ«½∞¬« ñ½∩ ¬«ñ«ó «Γ 0 ñ« 36 ¿ 256. ä½∩ «í«º¡áτÑ¡¿∩
¡áªáΓ¿∩ ¬½áó¿Φ¿ ¿ Γ«ú« Σá¬Γá, τΓ« ¿¼Ñ½« ¼ÑßΓ« «í¡«ó½Ñ¡¿Ñ, ß½ÑñπÑΓ
π¬áºáΓ∞ ¿¼∩ »ÑαѼѡ¡«⌐ »½εß ¿¼∩ rc_update. ìá»α¿¼Ñα, ºá»¿ß∞
rc_forchr+rc_update φ¬ó¿óá½Ñ¡Γ¡á ºá»¿ß¿ τ¿ß½á 259.
+---------------+-------+-----------+----------------------------------+
| ÅαÑñ½áúáѼ«Ñ | è«ñ | ìáºóá¡¿Ñ | |
|¿¼∩ »ÑαѼѡ¡«⌐ | «í¡«ó-| ¡áªáΓ«ú« | ç¡áτÑ¡¿Ñ ¬½ετá |
|ñ½∩ ¬«ñ«ó 0-256| ½Ñ¡¿∩ | ¬½ετá | |
+---------------+-------+-----------+----------------------------------+
|rc_bakchr 0 | | Ctrl-H |ìáºáñ ¡á «ñ¿¡ ß¿¼ó«½ |
| | | Ctrl-S | |
| | |Backspace | |
|rc_update | 256 | Ctrl-H |ìáºáñ ¡á «ñ¿¡ ß¿¼ó«½ |
| | | Ctrl-S | |
| | | Backspace | |
|rc_forchr 1 | 257 | Ctrl-D |é»ÑαÑñ ¡á «ñ¿¡ ß¿¼ó«½ |
| | | Ctrl-L | |
|rc_bakwrd 2 | 258 | Ctrl-A |ìáºáñ ¡á «ñ¡« ß½«ó« |
|rc_forwrd 3 | 259 | Ctrl-F |é»ÑαÑñ ¡á «ñ¡« ß½«ó« |
|rc_bakfld 4 | 260 | Ctrl-E |ìáºáñ ¡á «ñ¡« »«½Ñ |
| | | Ctrl-K | |
|rc_forfld 5 | 261 | Ctrl-J |é»ÑαÑñ ¡á «ñ¡« »«½Ñ |
| | | Ctrl-X |é»ÑαÑñ ¡á «ñ¡« »«½Ñ |
|rc_bakscr 6 | 262 | Ctrl-R |ìáºáñ ¡á «ñ¿¡ φ¬αá¡ |
|rc_forscr 7 | 263 | Ctrl-C |é»ÑαÑñ ¡á «ñ¿¡ φ¬αá¡ |
|rc_bakpan 8 | 264 | Ctrl-Z |鿺π὿ºáµ¿∩ ½Ñó«⌐ τáßΓ¿ φ¬αá¡á |
|rc_forpan 9 | 265 | Ctrl-B |鿺π὿ºáµ¿∩ »αáó«⌐ τáßΓ¿ φ¬αá¡á |
|rc_delete 10 | 266 | Ctrl-U |ôñ὿Γ∞ τΓ«-½¿í« |
|rc_insert 11 | 267 | Ctrl-N |éßΓáó¿Γ∞ τΓ«-½¿í« |
|rc_quit 12 | 268 | Ctrl-Q |çᬫ¡τ¿Γ∞ αáí«Γπ íѺ ºá»«¼¿¡á¡¿∩ |
| | | Esc | |
|return code 13 | ìÑ ¿ß»«½∞ºπÑΓß∩ |
|rc_write 14 | 270 | Ctrl-W |çᬫ¡τ¿Γ∞ αáí«Γπ ß ºá»«¼¿¡á¡¿Ñ¼ |
| | | Ctrl-End | |
|rc_filled 15 | 271 | Ctrl-M | |
| | |(past end) |ÅÑτáΓ∞ ó ¬«¡µÑ ºá»«½¡Ñ¡¡«ú« »«½∩ |
|rc_return 16 | 272 | <- |APPEND, |
| | |(at start) |MODIFY STRUCTURE/REPORT |
|rc_menu 33 | 289 | Ctrl-Home |ÅÑαѬ½ετáΓѽ∞ óδó«ñá ¼Ñ¡ε |
|rc_zomout 34 | 290 | Ctrl-PgUp |ÄΓ¬½ετÑ¡¿Ñ αáßΦ¿αÑ¡¿∩ «í½áßΓ¿ óó«-|
| | | |ñá |
|rc_zomin 35 | 291 | Ctrl-PgDn |ÉáßΦ¿αÑ¡¿Ñ «í½áßΓ¿ óó«ñá |
|rc_help 36 | 292 | F1 |öπ¡¬µ¿«¡á½∞¡δ⌐ ¬½ετ ÅÄîÄÖ£ |
+---------------+-------+-----------+----------------------------------+
滿߫¬ ¬½ετÑ⌐ ¬½áó¿áΓπαδ ¿ ß««ΓóÑΓßΓóπεΘ¿Ñ º¡áτÑ¡¿∩ READKEY():
+------------------+----------------------+----------------------------+
|æ»Ñµ¿á½∞¡δÑ ¬½ετ¿ | ǽ∞ΓÑα¡áΓ¿ó¡δÑ ¬½ετ¿ |ÉѺπ½∞ΓáΓ Σπ¡¬µ¿¿ READKEY() |
+------------------+----------------------+----------------------------+
| <ó»αáó«> | Ctrl-D | 1 |
| <ó½Ñó«> | Ctrl-S | 0 |
| <óóÑασ> | Ctrl-E | 4 |
| <󡿺> | Ctrl-X | 5 |
| Ctrl-<ó»αáó«>| Ctrl-B | 9 |
| Ctrl-<ó½Ñó«> | Ctrl-Z | 8 |
| Ins | Ctrl-V | N/A |
| Del | Ctrl-G | N/A |
| Home | Ctrl-A | 2 |
| End | Ctrl-F | 3 |
| PgUp | Ctrl-R | 6 |
| PgDn | Ctrl-C | 7 |
| Ctrl-Home | Ctrl-J | 33 |
| Ctrl-End | Ctrl-W | 14 |
| Ctrl-PgUp | Ctrl-- | 34 |
| Ctrl-PgDn | Ctrl-^ | 35 |
+------------------+----------------------+----------------------------+
ÅÉêîàÉ¢:
Ä»αÑñѽ¿Γ∞ óó«ñ¿½¿ß∞ ½¿ ¿º¼Ñ¡Ñ¡¿∩ ó« óαѼѡ¡πε »ÑαѼѡ¡πε ¿ ºá¼Ñ¡¿Γ∞
ÑÑ ß«ñÑন¼«Ñ, Ñß½¿ «¡¿ í뫨 ßñѽá¡δ.
IF READKEY() = rc_write + rc_update
REPLACE Name WITH Mname
ENDIF
æñѽáΓ∞ Γ« ªÑ ßἫÑ, ¡« ß ¿ß»«½∞º«ó᡿Ѽ ¬«ñá ó¼ÑßΓ« ¿¼Ñ¡¿ »ÑαѼѡ¡«⌐,
¬«Γ«αá∩ Ñú« ß«ñÑনΓ.
IF READKEY() = 270
REPLACE Name WITH Mname
ENDIF
æî. ÆÇèåà:
INKEY(), ON KEY, READ
öôìèûêƒ RECCOUNT
öπ¡¬µ¿∩ RECCOUNT ó«ºóαáΘáÑΓ τ¿ß½« ºá»¿ßÑ⌐ ó ΓѬπΘѼ Σá⌐½Ñ íáºδ ñá¡¡δσ.
æêìÆÇèæêæ:
RECCOUNT()
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ RECCOUNT αáí«ΓáÑΓ íδßΓαÑÑ, τѼ φ¬ó¿óá½Ñ¡Γ¡á∩
»«ß½Ññ«óáΓѽ∞¡«ßΓ∞ ¬«¼á¡ñδ GO BOTTOM ¿ Σπ¡¬µ¿¿ RECNO () ñ½∩
»«ß½Ññ«óáΓѽ∞¡«ú« Σá⌐½á.
àß½¿ ¡ÑΓ ¡¿ «ñ¡«ú« á¬Γ¿ó¡«ú« Σá⌐½á, Γ« αѺπ½∞ΓáΓ«¼ Σπ¡¬µ¿¿ RECCOUNT ()
íπñÑΓ 0.
RECCOUNT () πτ¿ΓδóáÑΓ óßÑ ºá»¿ß¿, ñáªÑ Ñß½¿ πßΓá¡«ó½Ñ¡á ¬«¼á¡ñá SET
DELETED ó ON ¿½¿ Ñß½¿ ñÑ⌐ßΓóπÑΓ ¬«¼á¡ñá SET FILTER.
æÄéàÆ¢:
ÉѬ«¼Ñ¡ñπÑΓß∩ ¿ß»«½∞º«óáΓ∞ Σπ¡¬µ¿¿ RECCOUNT(), RECSIZE() ¿ DISKSPACE()
ó »α¿¬½áñ¡δσ »α«úαá¼¼áσ, ¬«Γ«αδÑ áóΓ«¼áΓ¿τÑ߬¿ ñѽáεΓ ßΓαáσ«óπε ¬«»¿ε
Σá⌐½«ó íáºδ ñá¡¡δσ. Ä¡¿ »«ºó«½∩εΓ «»αÑñѽ¿Γ∞ ñ«- ßΓáΓ«τ¡« ½¿ ¼ÑßΓá ¡á
ñ¿ß¬Ñ ñ½∩ ßΓαáσ«ó«⌐ ¬«»¿¿ Σá⌐½á. æ¼. »α¿¼Ñα, «»¿ßá¡¡δ⌐ ñ½∩ Σπ¡¬µ¿¿
RECSIZE ().
ÅÉêîàÉ¢:
ìá⌐Γ¿ τ¿ß½« ºá»¿ßÑ⌐ ó Σá⌐½Ñ.
. USE Tours
. ? RECCOUNT()
30
. USE
æî. ÆÇèåà:
DBF(), DISKSPACE(), FIELD(), NDX(), RECSIZE()
öôìèûêƒ RECNO
öπ¡¬µ¿∩ RECNO »«ºó«½∩ÑΓ »«½πτ¿Γ∞ ñ«ßΓπ» ¬ ¡«¼Ñαπ ΓѬπΘÑ⌐ ºá»¿ß¿
óδíαá¡¡«ú« Σá⌐½á.
æêìÆÇèæêæ:
RECNO()
ÅÄ ôîÄïùÇìê₧::
àß½¿ ó Σá⌐½Ñ íáºδ ñá¡¡δσ ¡ÑΓ ºá»¿ßÑ⌐, Γ« RECNO () =1, á EOF () =. T.
ôèÇçÇÆàï£ çÇÅêæê:
àß½¿ π¬áºáΓѽ∞ ºá»¿ß¿ »ÑαÑñó¿úáÑΓß∩ ºá »«ß½Ññ¡εε ºá»¿ß∞ ó Σá⌐½Ñ (¿ EOF
() ñáÑΓ ½«ú¿τÑ߬«Ñ êæÆêìÇ), Γ« RECNO () íπñÑΓ ¡á Ññ¿¡¿µπ í«½∞ΦÑ, τѼ
¬«½¿τÑßΓó« ºá»¿ßÑ⌐ ó Σá⌐½Ñ. àß½¿ π¬áºáΓѽ∞ ºá»¿ß¿ »ÑαÑñó¿úáÑΓß∩ ¡áºáñ ¿
ßΓá¡«ó¿Γß∩ »ÑαÑñ »Ñαó«⌐ ºá»¿ß∞ε ó Σá⌐½Ñ (¿ BOF () ñáÑΓ. T.), Γ« RECNO ()
íπñÑΓ 1.
ÅÉêîàÉ¢:
éδóÑßΓ¿ ¡«¼Ñα ΓѬπΘÑ⌐ ºá»¿ß¿
. USE Clients
. ? RECNO()
1
. SKIP -1
Record no. 1
. ? BOF()
.T.
. GO BOTTOM
. ? RECNO()
49
. SKIP
Record No. 50
. .? EOF()
.T.
¡« ºá»«¼¡¿Γ∞ º¡áτÑ¡¿Ñ RECNO () ó« óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐.
. STORE RECNO() TO recnbr
50
öôìèûêƒ RECSIZE
öπ¡¬µ¿∩ RECSIZE ó«ºóαáΘáÑΓ αẼÑα ºá»¿ß¿ ó óδíαá¡¡«¼ ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ
Σá⌐½Ñ íáºδ ñá¡¡δσ.
æêìÆÇèæêæ:
RECSIZE()
êæÅÄï£çÄéÇìêà:
àß½¿ ¡¿ «ñ¿¡ Σá⌐½ ¡Ñ ¿ß»«½∞ºπÑΓß∩, Σπ¡¬µ¿∩ RECSIZE () ñáßΓ 0. öπ¡¬µ¿∩
ñáÑΓ ó«º¼«ª¡«ßΓ∞ »α«úαá¼¼Ñ αáí«ΓáΓ∞ ß Σá⌐½á¼¿, ¬«Γ«αδÑ í«½∞ΦÑ, τѼ
¿¼ÑεΘÑÑß∩ ¡á ñ¿ß¬Ñ ¼ÑßΓ«.
ÅÉêîàùÇìêƒ
ûѽÑß««íαạ« ¿ß»«½∞º«óáΓ∞ Σπ¡¬µ¿¿ RECSIZE (), RECCOUNT() ¿ DISKSIZE()
ó »α¿¬½áñ¡δσ »α«úαá¼¼áσ, ¬«Γ«αδÑ áóΓ«¼áΓ¿τÑ߬¿ ¬«»¿απεΓ Σá⌐½δ íáºδ
ñá¡¡δσ. Ä¡¿ »«ºó«½∩εΓ «»αÑñѽ¿Γ∞ ñ«ßΓáΓ«τ¡« ½¿ ¼ÑßΓá ¡á ñ¿ß¬Ñ ñ½∩
ßΓαáσ«ó«⌐ ¬«»¿¿ Σá⌐½á. æ½ÑñπÑΓ Γá¬ªÑ º¡áΓ∞ αẼÑα ºáú«½«ó¬á, ¬«Γ«αδ⌐
»«ñßτ¿ΓδóáÑΓß∩ ¿º ß½ÑñπεΘÑú«: 32*<τ¿ß½« »«½Ñ⌐>+35 0
ÅÉêîàÉ¢:
欫»¿α«óáΓ∞ í«½∞Φ«⌐ Σá⌐½ ß ªÑßΓ¬«ú« ñ¿ß¬á ¡á ¡Ñ߬«½∞¬« ú¿í¬¿σ ñ¿ß¬ÑΓ
¡á ñ¿ß¬«ó«ñÑ é:
USE File
SET DEFAULT TO B
DO WHILE .NOT. EOF()
WAIT 'éßΓáó∞ΓÑ ¡«óδ⌐ ñ¿ß¬ ¡á é ¿ ¡áª¼¿ΓÑ ¬½áó¿Φπ...'
COPY NEXT (DISKSPACE() - <αẼÑα ºáú«½«ó¬á>/RECSIZE() ;
TO Backup
SKIP
ENDDO
USE
æî. ÆÇèåà:
DBF(), DISKSPACE(), FIELD(), NDX(), RECCOUNT()
öôìèûêƒ REPLICATE
öπ¡¬µ¿∩ REPLICATE »«óΓ«α∩ÑΓ ß¿¼ó«½∞¡«Ñ óδαáªÑ¡¿Ñ π¬áºá¡¡«Ñ τ¿ß½« αáº.
æêìÆÇèæêæ:
REPLICATE(<óδαæ>,<óδαN>)
êæÅÄï£çÄéÇìêà:
濼ó«½∞¡«Ñ óδαáªÑ¡¿Ñ «»αÑñѽ∩ÑΓ ¬á¬πε ß¿¼ó«½∞¡πε ßΓ᫬𠻫óΓ«α¿Γ∞.
ù¿ß½«ó«Ñ óδαáªÑ¡¿Ñ ß««íΘáÑΓ Σπ¡¬µ¿¿ REPLICATE ߬«½∞¬« αẠ»«óΓ«α¿Γ∞
ß¿¼ó«½. öπ¡¬µ¿∩ REPLICATE ó«º∞¼ÑΓ Γ«½∞¬« µÑ½πε τáßΓ∞ τ¿ß½á,
»«½πτÑ¡¡«ú« ¿º τ¿ß½«ó«ú« óδαáªÑ¡¿∩.
Å«½πτÑ¡¡«Ñ ß¿¼ó«½∞¡«Ñ óδαáªÑ¡¿Ñ ¡Ñ ñ«½ª¡« ß«ñÑαªáΓ∞ í«½ÑÑ 254
ß¿¼ó«½«ó. Å«φΓ«¼π τ¿ß½«ó«Ñ óδαáªÑ¡¿Ñ ñ«½ª¡« ñáΓ∞ τ¿ß½« ¼Ñ¡∞ΦÑ, τѼ
254, ñѽѡ¡«Ñ ¡á τ¿ß½« ß¿¼ó«½«ó ó <óδα. æ>. öπ¡¬µ¿∩ REPLICATE
»«ºó«½∩ÑΓ »«ßΓα«¿Γ∞ ñ¿áúαá¼¼π. Ä¡á »«½Ñº¡á óßÑúñá, ¬«úñá ¡áñ«
»«óΓ«α¿Γ∞ ß¿¼ó«½.
ÅÉêîàÉ¢:
ìáτÑαΓ¿Γ∞ ñ¿áúαá¼¼π
. USE Tours
. LIST NEXT 5 Percent, REPLICATE('*',Percent)
çỿß∞# Percent REPLICATE('*',Percent)
1 10.000 **********
2 7.500 *******
3 5.000 *****
4 10.000 **********
5 7.500 *******
öôìèûêƒ RIGHT
öπ¡¬µ¿∩ RIGHT ó«ºóαáΘáÑΓ π¬áºá¡¡«Ñ τ¿ß½« ß¿¼ó«½«ó, óßÑúñá ¡áτ¿¡á∩ ß
ßἫú« »Ñαó«ú« ß¿¼ó«½á.
æêìÆÇèæêæ:
RIGHT(<óδαæ>,<óδαN>)
êæÅÄï£çÄéÇìêà:
ù¿ß½«ó«Ñ óδαáªÑ¡¿Ñ «»αÑñѽ∩ÑΓ τ¿ß½« ß¿¼ó«½«ó, ¬«Γ«αδÑ ¡áñ« ¿ºó½Ñτ∞ ¿º
ß¿¼ó«½∞¡«ú« óδαáªÑ¡¿∩.
öπ¡¬µ¿∩ »«ºó«½∩ÑΓ óδñѽ¿Γ∞ σó«ßΓ«óπε τáßΓ∞ ß¿¼ó«½∞¡«⌐ ßΓ᫬¿.
àß½¿ τ¿ß½«ó«Ñ óδαáªÑ¡¿Ñ αáó¡« 0 ¿½¿ «Γα¿µáΓѽ∞¡«, Σπ¡¬µ¿∩ ó«ºóαáΘáÑΓ
¡π½Ñóπε ßΓ᫬π.
àß½¿ τ¿ß½«ó«Ñ óδαáªÑ¡¿Ñ í«½∞ΦÑ τѼ ñ½¿¡á ß¿¼ó«½∞¡«ú« óδαáªÑ¡¿∩,
Σπ¡¬µ¿∩ RIGHT () ó«ºóαáΘáÑΓ óßε ßΓ᫬π.
ôñ«í¡« »α¿¼Ñ¡∩Γ∞ Σπ¡¬µ¿ε RIGHT ñ½∩ ºá¼Ñ¡δ ¡á ñαπú¿Ñ ß¿¼ó«½δ óÑñπΘ¿σ
»α«íѽ«ó, »«½πτ¿óΦ¿σß∩ ó αѺπ½∞ΓáΓÑ αáí«Γδ Σπ¡¬µ¿¿ STR. æ½ÑñπÑΓ
π¬áºáΓ∞ Γ« ªÑ ßá¼«Ñ τ¿ß½« ß¿¼ó«½«ó ñ½∩ ñ«íáó½Ñ¡¿∩ ¬ óÑ- ñπΘ¿¼
»α«íѽá¼, τΓ« ¿ «íΘá∩ ñ½¿¡á ßΓ᫬¿, ¬«Γ«απε ó«ºóαáΘáÑΓ STR ().
ÅÉêîàÉ¢:
éδñѽ¿Γ∞ Γα¿ »«ß½Ññ¡¿σ ß¿¼ó«½á ¿º ß¿¼ó«½∞¡«ú« óδαáªÑ¡¿∩:
. ? RIGHT('abcdef`,3)
def
ä«íáó¿Γ∞ ¬ óÑñπΘ¿¼ »α«íѽá¼, »«½πτ¿óΦ¿¼ß∩ ó αѺπ½∞ΓáΓÑ Σπ¡¬µ¿¿ STR:
. Padding = '0000000000'
. ? RIGHT(Padding + LTRIM(STR(15,10)), 10)
0000000015
. Padding = '**********'
. ? RIGHT(Padding + LTRIM(STR(2334,10)), 10)
******2334
æî. ÆÇèåà:
LEFT(), LTRIM(), STUFF(), SUBSTR, RTRIM(), TRIM()
öôìèûêƒ ROUND
öπ¡¬µ¿∩ ROUND «¬απú½∩ÑΓ τ¿ß½á ñ« ºáñá¡¡«ú« ¬«½¿τÑßΓóá º¡á¬«ó »«ß½Ñ
ºá»∩Γ«⌐.
æêìÆÇèæêæ:
ROUND(<óδα.N1>,<óδα.N2>)
êæÅÄï£çÄéÇìêà:
<óδαN1> τ¿ß½« ¿½¿ τ¿ß½«ó«Ñ óδαáªÑ¡¿Ñ, »«ñ½ÑªáΘÑÑ «¬απú½Ñ¡¿ε.
àß½¿ <óδαN2> «Γα¿µáΓѽ∞¡«, Σπ¡¬µ¿∩ ROUND () ó«ºóαáΘáÑΓ «¬απú½Ñ¡¡«Ñ ñ«
µÑ½«ú« τ¿ß½á.
ÅÉêîàÉ¢:
. ? ROUND(14.746321,2)
14.750000
. ? ROUND(17.321111,3)
17.321000
. STORE 10.7654321 TO x
10.7654321
. ? ROUND(x,0)
11.0000000
. ? ROUND(x,1)
10.8000000
öôìèûêƒ ROW
öπ¡¬µ¿∩ ROW ó«ºóαáΘáÑΓ ¡«¼Ñα ΓѬπΘÑ⌐ ßΓ᫬¿ ¡á ¬«Γ«α«⌐ αáß»«½«ªÑ¡
¬παß«α.
æêìÆÇèæêæ:
ROW()
êæÅÄï£çÄéÇìêà:
ìá¿í«½∞Φπε »«½∞ºπ φΓá Σπ¡¬µ¿∩ »α¿¡«ß¿Γ ó »α«úαá¼¼áσ, úñÑ ¡áñ«
«Γ߽Ѫ¿óáΓ∞ αáí«Γπ ß« ßΓα«¬á¼¿ ¿ ΓαÑíπÑΓß∩ «Γ¡«ß¿Γѽ∞¡á∩ áñαÑßᵿ∩.
ÅÉêîàÉ¢:
¡« «»αÑñѽ¿Γ∞ ΓѬπΘÑÑ »«½«ªÑ¡¿Ñ ¬παß«αá ß½ÑñπεΘ¿¼ «íαẫ¼, σ«Γ∩
Σá¬Γ¿τÑ߬á∩ αÑᬵ¿∩ ºáó¿ß¿Γ «Γ Γ«ú«, úñÑ ¡áσ«ñ¿Γß∩ ó ñá¡¡δ⌐ ¼«¼Ñ¡Γ
¬παß«α ¡á φ¬αá¡Ñ.
. ? ROW()
10 && èπαß«α ó ßΓα«¬Ñ 10
. x = ROW()
. ? x
14 && èπαß«α ó ßΓα«¬Ñ 14
諼á¡ñ¡á∩ ßΓ᫬á: óδóÑßΓ¿ "¥Γ« »α¿¼Ñα «Γ¡«ß¿Γѽ∞¡«⌐ áñαÑßᵿ¿" ¡á »∩Γ∞
ßΓ᫬ ¡¿ªÑ ΓѬπΘÑú« »«½«ªÑ¡¿∩ ¬παß«αá ¡á φ¬αá¡Ñ (¬παß«α ñ«½ªÑ¡ íδΓ∞ ¡á
φ¬αá¡Ñ óδΦÑ 19 ßΓ᫬¿) @ ROW () +5, 1 SAY '¥Γ« »α¿¼Ñα «Γ¡«ß¿Γѽ∞¡«⌐
áñαÑßᵿ¿.
æî. ÆÇèåà:
@, COL(), PROW(), PCOL()
öôìèûêƒ RTRIM
öπ¡¬µ¿∩ RTRIM πí¿αáÑΓ σó«ßΓ«óδÑ »α«íÑ½δ ¿º ß¿¼ó«½∞¡«ú« óδαáªÑ¡¿∩.
æêìÆÇèæêæ:
RTRIM(<óδα.æ>)
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ RTRIM αáí«ΓáÑΓ ¿ñÑ¡Γ¿τ¡« Σπ¡¬µ¿¿ TRIM.
æî. ÆÇèåà:
LEFT(), LTRIM(), RIGHT(), TRIM()
öôìèûêƒ SPACE
öπ¡¬µ¿∩ SPACE úÑ¡Ñα¿απÑΓ ßΓ᫬π ß¿¼ó«½«ó, ß«ßΓ«∩Θπε ¿º π¬áºá¡¡«ú«
¬«½¿τÑßΓóá »α«íѽ«ó.
æêìÆÇèæêæ:
SPACE(<óδαN>)
êæÅÄï£çÄéÇìêà:
îá¬ß¿¼á½∞¡«Ñ ¬«½¿τÑßΓó« »α«íѽ«ó, ¬«Γ«α«Ñ ¼«ªÑΓ ßúÑ¡Ñα¿α«óáΓ∞ «ñ¡á
Σπ¡¬µ¿∩ SPACE () αáó¡« 254.
ÅÉêîàÉ¢:
櫺ñáΓ∞ óαѼѡ¡πε »ÑαѼѡ¡πε, ß«ñÑαªáΘπε 20 »α«íѽ«ó.
. STORE SPACE(20) TO blanks
. ? '*'+ blanks + '*'
* *
öôìèûêƒ SQRT
öπ¡¬µ¿∩ SQRT ó«ºóαáΘáÑΓ º¡áτÑ¡¿Ñ ¬óáñαáΓ¡«ú« ¬«α¡∩ Γ«½∞¬«
»«½«ª¿Γѽ∞¡δσ τ¿ßѽ.
æêìÆÇèæêæ:
SQRT(<óδαN>)
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ SQRT () ó«ºóαáΘáÑΓ τ¿ß½« ß ¬«½¿τÑßΓó«¼ º¡á¬«ó »«ß½Ñ ºá»∩Γ«⌐,
»αÑñπß¼«ΓαÑ¡¡δ¼ »« π¼«½τá¡¿ε ¿½¿ ß Γᬿ¼ ªÑ ¬«½¿τÑßΓó«¼ º¡á¬«ó »«ß½Ñ
ºá»∩Γ«⌐, τΓ« ¿ ó óδαáªÑ¡¿¿, ß¼«Γα∩ ¬á¬«Ñ τ¿ß½« í«½∞ΦÑ.
ÅÉêîàÉ¢:
éδτ¿ß½¿Γ∞ ¬«αÑ¡∞ ¬óáñαáΓ¡δ⌐ ¿º 4
. ? SQRT(4)
2.00
. ? SQRT(2*2)
2.00
. STORE 4.000 TO number
4.000
. ? SQRT(number)
2.000
æî. ÆÇèåà:
SET DECIMAL, SET FIXED.
öôìèûêƒ STR
öπ¡¬µ¿∩ STR »αÑ«íαáºπÑΓ τ¿ß½«ó«Ñ óδαáªÑ¡¿Ñ ó ß¿¼ó«½∞¡πε ßΓ᫬π.
æêìÆÇèæêæ:
STR(<óδαN>[<ñ½¿¡á>],[<ñÑß∩Γ¿τ¡.º¡á¬¿>])
ÅÄ ôîÄïùÇìê₧:
àß½¿ ñ½¿¡á ¡Ñ π¬áºá¡á, Γ« íÑαÑΓß∩ ñ½¿¡á 10.
àß½¿ ¡Ñ π¬áºá¡« τ¿ß½« º¡á¬«ó »«ß½Ñ ºá»∩Γ«⌐, Γ« τ¿ß½« «¬απú½∩ÑΓß∩ ñ«
µÑ½«ú« º¡áτÑ¡¿∩.
êæÅÄï£çÄéÇìêà:
使¡á »«¬áºδóáÑΓ «íΘÑÑ τ¿ß½« ß¿¼ó«½∞¡δσ º¡á¬«ó, ¬«Γ«αδÑ íπñπΓ óδóÑñÑ¡δ
Σπ¡¬µ¿Ñ⌐ STR, ó¬½ετá∩ ñÑß∩Γ¿τ¡πε Γ«τ¬π, º¡á¬ ¼¿¡πß (Ñß½¿ «¡ ÑßΓ∞) ¿
¬«½¿τÑßΓó« ñÑß∩Γ¿τ¡δσ º¡á¬«ó (Ñß½¿ «¡¿ ÑßΓ∞). äÑß∩Γ¿τ¡δÑ º¡á¬¿
«»αÑñѽ∩εΓ τ¿ß½« óδó«ñ¿¼δσ ñÑß∩Γ¿τ¡δσ º¡á¬«ó »«ß½Ñ ºá»∩Γ«⌐.
àß½¿ ó ñ½¿¡Ñ π¬áºá¡« ¼Ñ¡∞ΦÑÑ τ¿ß½« º¡á¬«ó, τѼ ßΓ«¿Γ ß½Ñóá «Γ ºá»∩Γ«⌐,
Γ« ß¿ßΓѼá Éàüôæ ó«ºóαáΘáÑΓ ºóѺñ«τ¬¿ ó¼ÑßΓ« τ¿ß½á.
àß½¿ π¬áºá¡« ¼Ñ¡∞ΦÑ ñÑß∩Γ¿τ¡δσ º¡á¬«ó »«ß½Ñ ºá»∩Γ«⌐, τѼ ÑßΓ∞ ó
τ¿ß½«ó«¼ óδαáªÑ¡¿¿, Γ« ß¿ßΓѼá Éàüôæ «¬απú½∩ÑΓ αѺπ½∞ΓáΓ ñ« π¬áºá¡¡«ú«
¬«½¿τÑßΓóá º¡á¬«ó »«ß½Ñ ºá»∩Γ«⌐.
ÅÉêîàÉ¢:
éδóÑßΓ¿ τ¿ß½« 11. 14 ó ó¿ñÑ ßΓ᫬¿ ß¿¼ó«½«ó
. ? STR(11.14,5,2)
11.14
éδóÑßΓ¿ τ¿ß½« 11. 14*10 ó ó¿ñÑ ßΓ᫬¿ ß¿¼ó«½«ó
. STORE 11.14 TO x
11.14
. STORE STR(x*10,5) TO y
111
. ? Y
111
. STORE STR(X*10,5,2) TO y
111.4
. ? Y
111.4
. STORE STR(X*10,5,1) TO y
111.4
. ? Y
111.4
. STORE STR(X*10,6,2) TO y
111.40
. ? Y
111.40
æî. ÆÇèåà:
VAL()
öôìèûêƒ STUFF
öπ¡¬µ¿∩ STUFF ¿º¼Ñ¡∩ÑΓ ½εíπε τáßΓ∞ ßΓ᫬¿ ß¿¼ó«½«ó, ¡Ñ ΓαÑíπ∩
¿º¼Ñ¡Ñ¡¿∩ óßÑ⌐ ßΓ᫬¿.
æêìÆÇèæêæ:
STUFF(<óδαæ1>,<¡áτá½∞¡á∩ »«º¿µ¿∩>,<τ¿ß½« ß¿¼ó«½«ó>,<óδαæ2>)
êæÅÄï£çÄéÇìêà:
<óδαæ1> φΓ« ΓѬπΘá∩ ßΓ᫬á, ¬«Γ«απε ¡áñ« ¼Ñ¡∩Γ∞ <óδαæ2> φΓ« ºá¼Ñ¡∩εΘÑÑ
óδαáªÑ¡¿Ñ.
<¡áτá½∞¡á∩ »«º¿µ¿∩> φΓ« τ¿ß½«ó«Ñ óδαáªÑ¡¿Ñ, «í«º¡áτáεΘÑÑ ¼ÑßΓ«, ß
¬«Γ«α«ú« ¡áñ« ¡áτáΓ∞ ºá¼Ñ¡π.
<τ¿ß½« ß¿¼ó«½«ó> φΓ« τ¿ß½«ó«Ñ óδαáªÑ¡¿Ñ, «í«º¡áτáεΘÑÑ ß¬«½∞¬« ß¿¼ó«½«ó
¡áñ« πñ὿Γ∞ ¿º ¿ßσ«ñ¡«⌐ ßΓ᫬¿ ß¿¼ó«½«ó.
àß½¿ τ¿ß½« ß¿¼ó«½«ó αáó¡« 0, Γ« óΓ«α«Ñ ß¿¼ó«½∞¡«Ñ óδαáªÑ¡¿Ñ
óßΓáó½∩ÑΓß∩ ó π¬áºá¡¡«Ñ ¼ÑßΓ« ¿ ¡¿ «ñ¿¡ ß¿¼ó«½ ¿º <óδαæ2> ¡Ñ
πñá½∩ÑΓß∩.
àß½¿ <óδαæ2> ∩ó½∩ÑΓß∩ ¡π½Ñó«⌐ ßΓ᫬«⌐, Γ« ß¿ßΓѼá Éàüôæ πñá½∩ÑΓ ¿º
<óδαæ1> π¬áºá¡¡«Ñ τ¿ß½« ß¿¼ó«½«ó ¡¿τÑú« ó ¡Ñú« ¡Ñ ñ«íáó½∩∩.
ì«óá∩ ßΓ᫬á ß¿¼ó«½«ó íπñÑΓ «Γ½¿τáΓ∞ß∩ »« αẼÑαπ «Γ ¿ßσ«ñ¡«⌐, Ñß½¿
π¬áºá¡¡«Ñ τ¿ß½« ß¿¼ó«½«ó «Γ½¿τáÑΓß∩ «Γ Σá¬Γ¿τÑ߬«ú« ¬«½¿τÑßΓóá
ß¿¼ó«½«ó ó <óδαæ2>.
ÅÉêîàÉ¢:
çá¼Ñ¡¿Γ∞ ßΓ᫬π:
. ? STUFF('abc',2,1,'xyz')
axyzc
. ? STUFF('abc',2,1,"") && ôñ὿Γ∞ óΓ«α«⌐ ß¿¼ó«½
ac
. ? STUFF('abc',2,0,'xyz')
axyzcbc
æñѽáΓ∞ ºá¼Ñ¡π ó »«½Ñ ÇñαÑßá ó Σá⌐½Ñ 轿ѡΓδ:
. new street = 'Lithe'
Lithe
. USE Clients
. GO 5
. ? Address
1960 Lindley Ave.
. REPLACE Address WITH STUFF(Address,6,7, new_street)
1 ºá»¿ß∞ ºá¼Ñ¡Ñ¡á
. ? Address
1960 Lithe Ave.
. CLOSE DATABASES
æî. ÆÇèåà:
LEFT(), RIGHT(), SUBSTR()
öôìèûêƒ SUBSTR
öπ¡¬µ¿∩ SUBSTR óδñѽ∩ÑΓ π¬áºá¡¡πε τáßΓ∞ ó ßΓα«¬Ñ ß¿¼ó«½«ó.
æêìÆÇèæêæ:
SUBSTR(<óδαæ>),<¡áτá½∞¡á∩ »«º¿µ¿∩>[<τ¿ß½« ß¿¼ó«½«ó>])
ÅÄ ôîÄïùÇìê₧:
àß½¿ <τ¿ß½« ß¿¼ó«½«ó> ¡Ñ π¬áºá¡«, Γ« óδσ«ñ¡á∩ ßΓα«¬á ¡áτ¿¡áÑΓß∩ ß
π¬áºá¡¡«⌐ »«º¿µ¿¿ ¿ ºá¬á¡τ¿óáÑΓß∩ »«ß½Ññ¡¿¼ ß¿¼ó«½«¼ ¿ßσ«ñ¡«⌐ ßΓ᫬¿.
êæÅÄï£çÄéÇìêà:
àß½¿ π¬áºá¡¡«Ñ <τ¿ß½« ß¿¼ó«½«ó> í«½∞ΦÑ, τѼ τ¿ß½« ß¿¼ó«½«ó ¼Ñªñπ
¡áτá½∞¡«⌐ »«º¿µ¿Ñ⌐ ¿ ¬«¡µ«¼ ¿ßσ«ñ¡«⌐ ßΓ᫬¿, Γ« óδσ«ñ¡á∩ ßΓ᫬á
¡áτ¡ÑΓß∩ ß π¬áºá¡¡«⌐ »«º¿µ¿¿ ¿ ºá¬«¡τ¿Γß∩ »«ß½Ññ¡¿¼ ß¿¼ó«- ½«¼
¿ßσ«ñ¡«⌐ ßΓ᫬¿. ìáτá½∞¡á∩ »«º¿µ¿∩ ñ«½ª¡á íδΓ∞ »«½«ª¿Γѽ∞¡δ¼ τ¿ß½«¼.
ÅÉêîàÉ¢:
éδñѽ¿Γ∞ »«ñßΓ᫬π "59" ¿º ßΓ᫬¿ "1958 1959 1960"
. ? SUBSTR('1958 1959 1960',8,2)
59
. .STORE 'Ç¡ú½¿⌐߬¿⌐ êß»á¡ß¬¿⌐ êΓá½∞∩¡ß¬¿⌐ ìѼѵ¬¿⌐' TO
language Ç¡ú½¿⌐߬¿⌐ êß»á¡ß¬¿⌐ êΓá½∞∩¡ß¬¿⌐ ìѼѵ¬¿⌐
. ? SUBSTR(Language,12,9)
Spanish
. STORE SUBSTR(Language,22,11) TO L1
êΓá½∞∩¡ß¬¿⌐
. ? L1
êΓá½∞∩¡ß¬¿⌐
æî. ÆÇèåà:
AT(), LEFT(), RIGHT(), STR(), STUFF()
öôìèûêƒ TIME
öπ¡¬µ¿∩ TIME ó«ºóαáΘáÑΓ ß¿ßΓѼ¡«Ñ óαѼ∩ ó ó¿ñÑ ß¿¼ó«½∞¡«⌐ ßΓ᫬¿
Σ«α¼áΓá ττ:¼¼:ßß.
æêìÆÇèæêæ:
TIME()
êæÅÄï£çÄéÇìêà:
ùΓ«íδ ¿ß»«½∞º«óáΓ∞ TIME () ó αáßτÑΓáσ, ¡áñ« »αÑ«íαẫóáΓ∞ αѺπ½∞ΓáΓ
Σπ¡¬µ¿¿ ó τ¿ß½«ó«Ñ º¡áτÑ¡¿Ñ.
ÅÉêîàÉ¢:
. ? TIME()
21:22:23
. STORE TIME() TO mtime && mtime - ß¿¼ó«½∞¡á∩ »ÑαÑ-
&& ¼Ñ¡¡á∩
21:22:23
. ? mtime
21:22:23
öôìèûêƒ TRANSFORM
öπ¡¬µ¿∩ TRANSFORM »«ºó«½∩ÑΓ ºáñáóáΓ∞ Φáí½«¡ Σ«α¼áΓá ß¿¼ó«½«ó ¿ τ¿ßѽ
íѺ ¬«¼á¡ñδ @... SAY.
æêìÆÇèæêæ:
TRANSFORM(<óδα1>,<óδαæ>)
êæÅÄï£çÄéÇìêà:
濼ó«½∞¡«Ñ óδαáªÑ¡¿Ñ (æ) «»αÑñѽ∩ÑΓ Φáí½«¡ óδαáªÑ¡¿∩ 1.
öπ¡¬µ¿∩ TRANSFORM »«ºó«½∩ÑΓ »α¿¼Ñ¡¿Γ∞ Σ«α¼áΓ PICTURE ñ½∩ ß¿¼ó«½«ó ¿
τ¿ßѽ ¿ß»«½∞ºπ∩?,??, DISPLAY, LABEL, LIST ¿ REPORT.
ê¡Σ«α¼áµ¿ε « 󫺼«ª¡«ßΓ∩σ PICTURE ß¼. ó ¬«¼á¡ñÑ @.
ÅÉêîàÉ¢:
éδóÑßΓ¿ ß¿¼ó«½∞¡«Ñ »«½Ñ (öἿ½¿∩) Φ¿α¿¡«⌐ 20 ß¿¼ó«½«ó ¿º Σá⌐½á
ÅπΓÑΦÑßΓó¿∩ ß αáºα∩ñ¬«⌐.
. USE Travel
. LIST NEXT 4 TRANSFORM(Lastname,
@R X X X X X X X X X X X X X X X X X X X X')
çỿß∞# TRANSFORM(Lastname, @RX X X X X X X X X X X X X
X X X X X X X')
1 ü π α ¬ « ó á
2 ï ¿ ß Γ « ó
3 ü ¿ í á ∩ ¡
4 å á í Ñ ¡ ¬ «
éδóÑßΓ¿ τ¿ß½«ó«Ñ »«½Ñ (æΓ«¿¼«ßΓ∞) Φ¿α¿¡«⌐ 10 ß¿¼ó«½«ó ¿º Σá⌐½á
πΓÑΦÑßΓó¿∩ ß ºá»∩Γ묨:
. LIST NEXT 4 TRANSFORM(cost,'#,###,###.##')
çỿß∞# TRANSFORM(Cost,'#,###,###.##')
4 1,969.00
5 988.00
6 3,195.00
7 988.00
. USE
æî. ÆÇèåà:
@...PICTURE
öôìèûêƒ TRIM
öπ¡¬µ¿∩ TRIM «íαѺáÑΓ σó«ßΓ«óδÑ »α«íÑ½δ ¿º ßΓ᫬¿ ß¿¼ó«½«ó.
æêìÆÇèæêæ:
TRIM(<óδαæ>)
êæÅÄï£çÄéÇìêà:
諼á¡ñδ LIST ¿½¿ DISPLAY TRIM (<»«½Ñ1>), TRIM (<»«½Ñ2>) ¡Ñ πñá½∩εΓ
σó«ßΓ«óδÑ »α«íÑ½δ ¼Ñªñπ »«½∩¼¿. ä½∩ πñá½Ñ¡¿∩ »α«íѽ«ó ¼Ñªñπ »«½∩¼¿
¬«¼á¡ñἿ LIST ¿½¿ DISPLAY, ß½ÑñπÑΓ ¿ß»«½∞º«óáΓ∞ óδαáªÑ¡¿Ñ TRIM
(<»«½Ñ1>+<»«½Ñ2>.
Äñ¡á¬«, σ«Γ∩ φΓá ºá»¿ß∞ ¿ »«ºó«½∩ÑΓ "«íαѺáΓ∞" ßἫ óδαáªÑ¡¿Ñ, Φ¿α¿¡á
¬«½«¡¬¿ íπñÑΓ óßÑ αáó¡« Γᬫ⌐, ¬á¬ ßπ¼¼áα¡á∩ Φ¿α¿¡á óßÑσ »«½Ñ⌐,
πτáßΓóπεΘ¿σ ó óδαáªÑ¡¿¿.
ÅÉêîàÉ¢:
é íáºÑ 轿ѡΓδ ÑßΓ∞ »«½∩ öἿ½¿∩ ¿ ÇñαÑß.
. USE Clients
. ? Lastname, Address
üπᬫóá Äαѽ æ¿óáΦ߬á∩ 4-2-14
ÇñαÑß «Γñѽѡ «Γ ΣἿ½¿¿ σó«ßΓ«ó묨 »α«íѽἿ »«½∩ öἿ½¿∩. ôñ὿Γ∞
»α«íÑ½δ ¼Ñªñπ öἿ½¿Ñ⌐ ¿ ÇñαÑß«¼.
. TRIM(Lastname), Address
üπᬫóá Äαѽ æ¿óáΦ߬á∩ 4-2-14
àñ¿¡ßΓóÑ¡¡δ⌐ »α«íѽ, αáºñѽ∩εΘ¿⌐ ΓÑ»Ñα∞ ¿¼∩ ¿ áñαÑß »«∩ó¿½ß∩ ¿º-ºá
ºá»∩Γ«⌐ ó Σ«α¼áΓÑ ¬«¼á¡ñδ.
. DISPLAY TRIM(Lastname) + ','+ Firstname, Address && Notice no space
çỿß∞# TRIM(Lastname) + ','+ Firstname, Address
1 üπᬫóá,éÑαá Äαѽ æ¿óáΦ߬á∩ 4-2-14
îÑßΓ«, ºá¡¿¼áѼ«Ñ ¿¼Ñ¡á¼¿ ¿ ¿ñπΘ¿¼¿ ºá ¡¿¼¿ »α«íѽἿ, αáó¡« ßπ¼áα¡«⌐
Φ¿α¿¡Ñ »«½Ñ⌐ öἿ½¿∩ ¿ ê¼∩.
æî. ÆÇèåà:
LTRIM(),RTRIM()
öôìèûêƒ TYPE
öπ¡¬µ¿∩ TYPE »α«óÑα∩ÑΓ óδαáªÑ¡¿Ñ ¿ ó αѺπ½∞ΓáΓÑ ñáÑΓ «ñ¡π ºáú½áó¡πε
íπ¬óπ, ¬«Γ«αá∩ «í«º¡áτáÑΓ Γ¿» óδαáªÑ¡¿∩ (ß¿¼ó«½∞¡«Ñ, τ¿ß½«ó«Ñ,
½«ú¿τÑ߬«Ñ, »α¿¼Ñτá¡¿Ñ ¿½¿ ¡Ñ«»αÑñѽѡ¡δ⌐). ¥Γ« »α«óÑα¬á ¡á
ßπΘÑßΓó«óá¡¿Ñ »ÑαѼѡ¡«⌐ ¿/¿½¿ »αáó¿½∞¡«ßΓ∞ óδαáªÑ¡¿∩.
æêìÆÇèæêæ:
TYPE(<óδαæ>)
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ TYPE ¡Ñ »α«óÑα∩ÑΓ ¼á¬α«. ìá»α¿¼Ñα, ¡Ñ½∞º∩ ¡á»¿ßáΓ∞? TYPE
(&memvar).
Åαáó¿½∞¡«: ? TYPE("MEMVAR").
髺¼«ª¡δÑ º¡áτÑ¡¿∩ TYPE():
濼ó«½∞¡«Ñ = C
ù¿ß½«ó«Ñ = N
ï«ú¿τÑ߬«Ñ = L
Åα¿¼Ñτá¡¿∩ = M
ìÑ«»αÑñѽѡ¡«Ñ = U
ÅÉêîàÉ¢:
Åα«óÑα¿Γ∞ ßπΘÑßΓó«óá¡¿Ñ »ÑαѼѡ¡«⌐ (¿¼∩ »ÑαѼѡ¡«⌐ «úαá¡¿τÑ¡«
¬áóδτ¬á¼¿):
. TYPE('ΓÑßΓ')
U && ÅÑαѼѡ¡á∩ ¡Ñ ßπΘÑßΓóπÑΓ
. STORE 'ΓÑßΓ 1 2 3'TO test
ΓÑßΓ 1 2 3
. ? TYPE('test')
C && ÅÑαѼѡ¡á∩ ßπΘÑßΓóπÑΓ
Åα«óÑα¿Γ∞ óδαáªÑ¡¿Ñ test\100 ¿ «»αÑñѽ¿Γ∞ Ñú« »αáó¿½∞¡«ßΓ∞ (φΓ«
¿ß»«½∞ºπÑΓß∩ ñ½∩ »α«óÑન ß¿¡Γá¬ß¿ßá):
. STORE '»α¿óÑΓ'TO test
hello
. ? TYPE('test/100')
U && 濼ó«½∞¡á∩ ßΓα«¬á ¡Ñ ñѽ¿Γß∩ ¡á τ¿ß½«
. STORE 5 TO x
5
. STORE 7 TO x
7
. ? TYPE('x*y/4)
N && ¥Γ« óÑα¡«Ñ óδαáªÑ¡¿Ñ
ä½∩ »α«óÑન »αáó¿½∞¡«ßΓ¿ óδαáªÑ¡¿∩ ßαáó¡¿Γ∞ αѺπ½∞ΓáΓ Σπ¡¬µ¿¿ TYPE ()
ß ºáú½áó¡«⌐ íπ¬ó«⌐, «í«º¡áτáεΘÑ⌐ Γ¿» óδαáªÑ¡¿∩:
. TYPE('1 + 2) = 5') = 'L'
.T.
è«úñá «úαá¡¿τ¿Γѽ¿ «»πΘÑ¡δ, TIPE »α«óÑα∩ÑΓ »ÑαѼѡ¡πε, Γ. Ñ.
ß«ñÑন¼«Ñ ¡áºóá¡¡«⌐ »ÑαѼѡ¡«⌐.
é ß½ÑñπεΘѼ »α¿¼ÑαÑ óδαáªÑ¡¿∩ 'Sample` ¡Ñ ¡πªñáÑΓß∩ ó «úαá¡¿τ¿Γѽ∩σ.
. STORE 5 TO cat
5
. STORE '¬«Γ'TO sample
Cat
. ? TYPE(sample)
N && 'è«Γ' ¡áσ«ñ¿Γß∩ ó Sample ¿ ∩ó½∩ÑΓß∩ ¿¼Ñ¡Ñ¼
&& τ¿ß½«ó«⌐ »ÑαѼѡ¡«⌐
öôìèûêƒ UPPER
öπ¡¬µ¿∩ UPPER »αÑ«íαáºπÑΓ ßΓα«τ¡δÑ íπ¬óδ ó ºáú½áó¡δÑ.
æêìÆÇèæêæ:
UPPER(<óδαæ>)
ÅÉêîàÉ¢:
. ? UPPER('æÑú«ñ¡∩ τπñÑß¡δ⌐ ñÑ¡∞')
æàâÄäìƒ ùôäàæì¢ë äàì£
. STORE 'æÑú«ñ¡∩ τπñÑß¡δ⌐ ñÑ¡∞'TO niceday
æÑú«ñ¡∩ τπñÑß¡δ⌐ ñÑ¡∞
. ? niceday
æÑú«ñ¡∩ τπñÑß¡δ⌐ ñÑ¡∞
éδóÑßΓ¿ »ÑαѼѡ¡πε ºáú½áó¡δ¼¿ íπ¬óἿ:
. ? UPPER(niceday)
æàâÄäìƒ ùôäàæì¢ë äàì£
. ? niceday='æàâÄäìƒ ùôäàæì¢ë äàì£'
.F.
. ? UPPER(niceday)='æàâÄäìƒ ùôäàæì¢ëë äàì£'
.T.
æî. ÆÇèåà:
ISLOWER(), ISSUPPER(), LOWER()
öôìèûêƒ VAL
öπ¡¬µ¿∩ VAL »αÑ«íαáºπÑΓ τ¿ß½á, »αÑñßΓáó½Ñ¡¡δÑ ó ß¿¼ó«½∞¡«¼ Σ«α¼áΓÑ, ó
τ¿ß½«ó«Ñ óδαáªÑ¡¿Ñ.
æêìÆÇèæêæ:
VAL(<óδαæ>)
êæÅÄï£çÄéÇìêà:
àß½¿ óδαáªÑ¡¿Ñ ß«ßΓ«¿Γ ¿º óÑñπΘ¿σ ¡Ñ µ¿Σα«óδσ ß¿¼ó«½«ó (¬α«¼Ñ
»α«íѽ«ó), ß¿ßΓѼá Éàüôæ ó«ºóαáΘáÑΓ º¡áτÑ¡¿Ñ 0.
öπ¡¬µ¿∩ VAL () óδó«ñ¿Γ ñÑß∩Γ¿τ¡πε τáßΓ∞ τ¿ß½á Γá¬, ¬á¬ «»αÑñѽѡ«
¬«¼á¡ñ«⌐ SET DECIMALS.
ÅÉêîàÉ¢:
ç¡áτÑ¡¿Ñ ¡Ñτ¿ß½«ó«ú« ß¿¼ó«½á ÑßΓ∞ ¡«½∞:
. ? VAL('ABC')
0
. SET DECIMALS TO 1
. ? VAL('123.45')
123.5
. STORE '123.45'TO x
123.45 && 123.45 - ß¿¼ó«½∞¡á∩ ßΓ᫬á
.STORE VAL(x) TO y
123.5
. ? y
123.5
. DISPLAY MEMORY
x pub C "123.45"
y pub N 123.5 ( 123.45000000)
2 »ÑαѼѡ¡δσ, 17 íá⌐Γ ¿ß»«½∞º«óá¡«
254 »ÑαѼѡ¡δσ ßó«í«ñ¡«, 5983 íá⌐Γ ßó«í«ñ¡«
öπ¡¬µ¿∩ VAL () óδó«ñ¿Γ º¡áτÑ¡¿Ñ 123. 5, á ºá»«¼¿¡áÑΓ ó« óαѼѡ¡«⌐
»ÑαѼѡ¡«⌐ º¡áτÑ¡¿Ñ 123. 45.
. SET DECIMALS TO 0
. ? STR(Y,6,2)
123.45
. ? 0.00 + Y
123.45
. ? VAL(' A=1231)
0
. ? VAL(' 123=A1)
123
æî. ÆÇèåà:
SET DECIMALS, STR
öôìèûêƒ VERSION
öπ¡¬µ¿∩ VERSION ó«ºóαáΘáÑΓ ßΓ᫬π ß¿¼ó«½«ó, ß«ñÑαªáΘπε ¡«¼Ñα óÑαß¿¿
ß¿ßΓѼδ Éàüôæ, ß ¬«Γ«α«⌐ ¿ñÑΓ αáí«Γá.
æêìÆÇèæêæ:
VERSION()
êæÅÄï£çÄéÇìêà:
öπ¡¬µ¿∩ ß««íΘáÑà ëà ¡«¼Ñα óÑαß¿¿, ¬«Γ«αδ⌐ »«∩ó½∩ÑΓß∩ ó
αÑú¿ßΓαᵿ«¡¡«¼ ß««íΘÑ¡¿¿ ß¿ßΓѼδ Éàüôæ
¥Γ« ¼«ª¡« ¿ß»«½∞º«óáΓ∞ »α¿ αáºαáí«Γ¬Ñ »α¿¬½áñ¡δσ ß¿ßΓѼ, πτ¿ΓδóáεΘ¿σ
«ß«íÑ¡¡«ßΓ¿ ¡πª¡«⌐ óÑαß¿¿ ß¿ßΓѼδ Éàüôæ.
ÅÉêîàÉ¢:
Ä»αÑñѽ¿Γ∞ ¡«¼Ñα óÑαß¿¿:
. ? VERSION()
Éàüôæ óÑαß¿∩ 1.1
æî. ÆÇèåà:
DISKSPACE(), GETENV(), OS()
öôìèûêƒ YEAR
öπ¡¬µ¿∩ YEAR ó«ºóαáΘáÑΓ τ¿ß½«ó«Ñ º¡áτÑ¡¿Ñ ú«ñá, óº∩Γ«Ñ ¿º óδαáªÑ¡¿∩
Γ¿»á äáΓá.
æêìÆÇèæêæ:
YEAR(<óδαD>)
êæÅÄï£çÄéÇìêà:
¡« óÑßΓ¿ ¿¡ñѬ߿α«óá¡¿Ñ »« ñáΓÑ ¿ ß¿¼ó«½∞¡«¼π »«½ε «ñ¡«óαѼѡ¡«.
ìá»α¿¼Ñα, Ñß½¿ ¡áñ« »α«¿¡ñѬ߿α«óáΓ∞ ºá»¿ß¿ »« »«½ε ñáΓδ ó
σα«¡«½«ú¿τÑ߬«¼ »«α∩ñ¬Ñ ¿ ñ½∩ ¬áªñ«⌐ ñáΓδ ¿¼ÑΓ∞ ΣἿ½¿¿ ó á½Σáó¿Γ¡«¼
»«α∩ñ¬Ñ, Γ« ß½ÑñπÑΓ ¡á»¿ßáΓ∞:
INDEX ON STR(YEAR(<äáΓá>),4) + STR(MONTH(<äáΓá>),2)
STR(DAY(<>),2 + öἿ½¿∩
ÅÉêîàÉ¢:
àß½¿ ß¿ßΓѼ¡á∩ ñáΓá 05/15/87:
. ? YEAR(DATE())
1987
çừ¼¡¿Γ∞ ú«ñ ¿º ß¿ßΓѼ¡«⌐ ñáΓδ ó« óαѼѡ¡«⌐ »ÑαѼѡ¡«⌐ myear:
. STORE YEAR(DATE()) TO myear
1987
. ? myear
1987
. ? TYPE('myear')
N
ôóѽ¿τ¿Γ∞ ΓѬπΘ¿⌐ ú«ñ ¡á 56 ¿ ºá»«¼¡¿Γ∞ αѺπ½∞ΓáΓ ó τ¿ß½«ó«⌐ óαѼѡ¡«⌐
»ÑαѼѡ¡«⌐ Newyear:
. STORE YEAR(DATE()) + 56 TO newyear
2043