/ PSION CD 2 / PsionCDVol2.iso / Programs / 602 / Help-FilesOPLDeveloppers.sis

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 6d 00 00 10 | 19 04 00 10 bf d9 96 9d |....m...|........|
|00000010| 96 71 01 00 05 00 00 00 | 00 00 00 00 00 00 00 00 |.q......|........|
|00000020| 64 00 00 00 00 00 00 00 | 01 00 00 00 00 00 00 00 |d.......|........|
|00000030| 44 00 00 00 46 00 00 00 | fa 00 00 00 00 00 00 00 |D...F...|........|
|00000040| fa 00 00 00 01 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 17 00 00 00 02 01 | 00 00 32 00 00 00 19 01 |........|..2.....|
|00000060| 00 00 15 43 00 00 6e 02 | 00 00 00 00 00 00 00 00 |...C..n.|........|
|00000070| 00 00 00 00 00 00 11 00 | 00 00 4b 01 00 00 2c 00 |........|..K...,.|
|00000080| 00 00 5c 01 00 00 f2 3a | 01 00 83 45 00 00 00 00 |..\....:|...E....|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 11 00 00 00 88 01 |........|........|
|000000a0| 00 00 2c 00 00 00 99 01 | 00 00 3d ce 02 00 75 80 |..,.....|..=...u.|
|000000b0| 01 00 00 00 00 00 00 00 | 00 00 00 00 00 00 17 00 |........|........|
|000000c0| 00 00 c5 01 00 00 32 00 | 00 00 dc 01 00 00 33 42 |......2.|......3B|
|000000d0| 00 00 b2 4e 04 00 00 00 | 00 00 01 00 00 00 02 00 |...N....|........|
|000000e0| 00 00 12 00 00 00 0e 02 | 00 00 2d 00 00 00 20 02 |........|..-... .|
|000000f0| 00 00 77 02 00 00 e5 90 | 04 00 21 00 00 00 4d 02 |..w.....|..!...M.|
|00000100| 00 00 43 3a 5c 53 69 73 | 74 65 6d 70 5c 53 35 20 |..C:\Sis|temp\S5 |
|00000110| 4f 50 58 20 65 78 74 72 | 61 21 3a 5c 50 73 69 6f |OPX extr|a!:\Psio|
|00000120| 6e 35 43 44 31 5c 48 65 | 6c 70 2d 46 69 6c 65 73 |n5CD1\He|lp-Files|
|00000130| 4f 50 4c 44 65 76 65 6c | 6f 70 70 65 72 73 5c 53 |OPLDevel|oppers\S|
|00000140| 35 20 4f 50 58 20 65 78 | 74 72 61 43 3a 5c 53 69 |5 OPX ex|traC:\Si|
|00000150| 73 74 65 6d 70 5c 53 35 | 20 4f 50 58 21 3a 5c 50 |stemp\S5| OPX!:\P|
|00000160| 73 69 6f 6e 35 43 44 31 | 5c 48 65 6c 70 2d 46 69 |sion5CD1|\Help-Fi|
|00000170| 6c 65 73 4f 50 4c 44 65 | 76 65 6c 6f 70 70 65 72 |lesOPLDe|velopper|
|00000180| 73 5c 53 35 20 4f 50 58 | 43 3a 5c 53 69 73 74 65 |s\S5 OPX|C:\Siste|
|00000190| 6d 70 5c 53 35 20 4f 50 | 4c 21 3a 5c 50 73 69 6f |mp\S5 OP|L!:\Psio|
|000001a0| 6e 35 43 44 31 5c 48 65 | 6c 70 2d 46 69 6c 65 73 |n5CD1\He|lp-Files|
|000001b0| 4f 50 4c 44 65 76 65 6c | 6f 70 70 65 72 73 5c 53 |OPLDevel|oppers\S|
|000001c0| 35 20 4f 50 4c 43 3a 5c | 53 69 73 74 65 6d 70 5c |5 OPLC:\|Sistemp\|
|000001d0| 53 35 20 43 6f 6e 73 74 | 61 6e 74 73 21 3a 5c 50 |S5 Const|ants!:\P|
|000001e0| 73 69 6f 6e 35 43 44 31 | 5c 48 65 6c 70 2d 46 69 |sion5CD1|\Help-Fi|
|000001f0| 6c 65 73 4f 50 4c 44 65 | 76 65 6c 6f 70 70 65 72 |lesOPLDe|velopper|
|00000200| 73 5c 53 35 20 43 6f 6e | 73 74 61 6e 74 73 43 3a |s\S5 Con|stantsC:|
|00000210| 5c 53 69 73 74 65 6d 70 | 5c 42 69 73 2e 74 78 74 |\Sistemp|\Bis.txt|
|00000220| 21 3a 5c 50 73 69 6f 6e | 35 43 44 31 5c 48 65 6c |!:\Psion|5CD1\Hel|
|00000230| 70 2d 46 69 6c 65 73 4f | 50 4c 44 65 76 65 6c 6f |p-FilesO|PLDevelo|
|00000240| 70 70 65 72 73 5c 42 69 | 73 2e 74 78 74 48 65 6c |ppers\Bi|s.txtHel|
|00000250| 70 2d 46 69 6c 65 73 4f | 50 4c 44 65 76 65 6c 6f |p-FilesO|PLDevelo|
|00000260| 70 70 65 72 73 20 32 39 | 31 2e 36 20 6b 42 50 00 |ppers 29|1.6 kBP.|
|00000270| 00 10 6d 00 00 10 86 00 | 00 10 fe a1 08 55 0c 7d |..m.....|.....U.}|
|00000280| 00 00 00 00 00 00 94 42 | 00 00 0f 0a 09 40 02 00 |.......B|.....@..|
|00000290| 00 00 00 00 00 00 00 0d | 40 86 00 00 10 22 44 61 |........|@...."Da|
|000002a0| 74 61 2e 61 70 70 21 40 | 08 89 00 00 10 05 00 00 |ta.app!@|........|
|000002b0| 00 2e 01 00 10 07 00 00 | 00 31 01 00 10 08 00 00 |........|.1......|
|000002c0| 00 32 01 00 10 09 00 00 | 00 3a 40 69 00 00 10 00 |.2......|.:@i....|
|000002d0| 01 00 00 00 02 1a 54 61 | 62 6c 65 31 08 16 43 6f |......Ta|ble1..Co|
|000002e0| 6c 41 39 0e 00 16 43 6f | 6c 42 39 10 00 1a 43 6f |lA9...Co|lB9...Co|
|000002f0| 6c 41 31 30 0e 00 1a 43 | 6f 6c 42 31 30 10 00 20 |lA10...C|olB10.. |
|00000300| 04 00 00 00 00 5f 40 02 | 00 00 00 00 00 00 00 00 |....._@.|........|
|00000310| 00 00 00 00 02 1a 54 61 | 62 6c 65 31 0a 00 00 00 |......Ta|ble1....|
|00000320| 04 16 4e 61 6d 65 3a 0e | 09 00 00 00 ff ff ff ff |..Name:.|........|
|00000330| 00 00 01 00 04 00 02 00 | 9c ff ff ff 64 00 00 00 |........|....d...|
|00000340| 32 44 65 73 63 72 69 70 | 74 69 6f 6e 3a 0e 0a 00 |2Descrip|tion:...|
|00000350| 00 00 ff ff ff ff 00 00 | 01 00 04 00 02 00 9c ff |........|........|
|00000360| ff ff 64 00 00 00 c0 40 | 04 01 00 09 00 00 00 00 |..d....@|........|
|00000370| 00 01 02 00 0a 00 00 00 | 01 00 01 02 02 4f 00 00 |........|.....O..|
|00000380| 10 00 00 00 00 00 00 00 | 00 00 00 00 00 02 4f 00 |........|......O.|
|00000390| 00 10 00 00 00 00 00 00 | 00 00 00 00 00 00 ff ff |........|........|
|000003a0| 04 01 00 09 00 00 00 00 | 00 01 02 00 0a 00 00 00 |........|........|
|000003b0| 01 00 01 02 02 4f 00 00 | 10 00 00 00 00 29 00 00 |.....O..|.....)..|
|000003c0| 00 19 00 00 00 1a 00 00 | 00 1b 00 21 00 20 00 1c |........|...!. ..|
|000003d0| b3 00 00 00 1d 00 1e 00 | 1f 00 22 08 43 6f 75 72 |........|..".Cour|
|000003e0| 69 65 72 02 18 00 24 00 | 23 03 00 00 00 00 02 4f |ier...$.|#......O|
|000003f0| 00 00 10 00 00 00 00 27 | 00 00 00 19 00 00 00 1a |.......'|........|
|00000400| 00 00 00 1b 00 21 00 20 | 00 1c b4 00 00 00 1d 00 |.....!. |........|
|00000410| 1e 00 1f 00 22 06 41 72 | 69 61 6c 00 18 00 24 00 |....".Ar|ial...$.|
|00000420| 23 03 00 00 00 00 ff ff | 3b 40 4f 06 2e 00 01 00 |#.......|;@O.....|
|00000430| 00 80 00 00 00 00 ff ff | ff 7f 01 00 00 00 e4 00 |........|........|
|00000440| 00 00 00 8f 06 00 00 00 | 00 00 0f 00 00 00 00 00 |........|........|
|00000450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000460| 00 00 ff ff ff 2a 43 54 | 68 65 73 65 20 66 75 6e |.....*CT|hese fun|
|00000470| 63 74 69 6f 6e 73 20 64 | 75 70 6c 69 63 61 74 65 |ctions d|uplicate|
|00000480| 20 74 68 65 20 66 75 6e | 63 74 69 6f 6e 73 20 6f | the fun|ctions o|
|00000490| 66 20 74 68 65 20 73 61 | 6d 65 20 6e 61 6d 65 20 |f the sa|me name |
|000004a0| 69 6e 20 44 62 61 73 65 | 2e 6f 70 78 2e 20 54 68 |in Dbase|.opx. Th|
|000004b0| 65 20 6f 6e 6c 79 20 64 | 69 66 66 65 72 65 6e 63 |e only d|ifferenc|
|000004c0| 65 20 69 73 20 74 68 61 | 74 20 74 68 65 20 66 75 |e is tha|t the fu|
|000004d0| 6e 63 74 69 6f 6e 73 20 | 68 65 72 65 20 63 61 6e |nctions |here can|
|000004e0| 20 61 6c 73 6f 20 62 65 | 20 75 73 65 64 20 77 68 | also be| used wh|
|000004f0| 65 6e 20 73 6f 6d 65 20 | 74 61 62 6c 65 20 6f 66 |en some |table of|
|00000500| 20 74 68 65 20 64 62 61 | 73 65 24 20 69 73 20 63 | the dba|se$ is c|
|00000510| 75 72 72 65 6e 74 6c 79 | 20 6f 70 65 6e 20 69 6e |urrently| open in|
|00000520| 20 79 6f 75 72 20 70 72 | 6f 67 72 61 6d 2e 06 06 | your pr|ogram...|
|00000530| 4e 6f 74 65 20 74 68 61 | 74 20 74 68 65 20 64 6f |Note tha|t the do|
|00000540| 63 75 6d 65 6e 74 61 74 | 69 6f 6e 20 66 6f 72 20 |cumentat|ion for |
|00000550| 74 68 65 20 44 62 47 65 | 74 46 69 65 6c 64 54 79 |the DbGe|tFieldTy|
|00000560| 70 65 26 3a 20 66 75 6e | 63 74 69 6f 6e 20 69 6e |pe&: fun|ction in|
|00000570| 20 74 68 65 20 66 69 72 | 73 74 20 4f 50 4c 20 6d | the fir|st OPL m|
|00000580| 61 6e 75 61 6c 20 68 61 | 73 20 74 68 65 20 74 79 |anual ha|s the ty|
|00000590| 70 65 20 6e 75 6d 62 65 | 72 69 6e 67 20 77 72 6f |pe numbe|ring wro|
|000005a0| 6e 67 2e 20 20 54 68 65 | 20 63 6f 72 72 65 63 74 |ng.  The| correct|
|000005b0| 20 6e 75 6d 62 65 72 73 | 20 61 72 65 3a 06 06 76 | numbers| are:..v|
|000005c0| 61 6c 75 65 20 20 74 79 | 70 65 06 2d 2d 2d 2d 2d |alue  ty|pe.-----|
|000005d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 06 30 20 20 62 69 74 |--------|-.0  bit|
|000005e0| 06 31 20 20 73 69 67 6e | 65 64 20 62 79 74 65 20 |.1  sign|ed byte |
|000005f0| 28 38 20 62 69 74 73 29 | 06 32 20 20 75 6e 73 69 |(8 bits)|.2  unsi|
|00000600| 67 6e 65 64 20 62 79 74 | 65 20 28 38 20 62 69 74 |gned byt|e (8 bit|
|00000610| 73 29 06 33 20 20 69 6e | 74 65 67 65 72 20 28 31 |s).3  in|teger (1|
|00000620| 36 20 62 69 74 73 29 06 | 34 20 20 75 6e 73 69 67 |6 bits).|4  unsig|
|00000630| 6e 65 64 20 69 6e 74 65 | 67 65 72 20 28 31 36 20 |ned inte|ger (16 |
|00000640| 62 69 74 73 29 06 35 20 | 20 6c 6f 6e 67 20 69 6e |bits).5 | long in|
|00000650| 74 65 67 65 72 20 28 33 | 32 20 62 69 74 73 29 06 |teger (3|2 bits).|
|00000660| 36 20 20 75 6e 73 69 67 | 6e 65 64 20 6c 6f 6e 67 |6  unsig|ned long|
|00000670| 20 69 6e 74 65 67 65 72 | 20 28 33 32 20 62 69 74 | integer| (32 bit|
|00000680| 73 29 06 37 20 20 36 34 | 2d 62 69 74 20 69 6e 74 |s).7  64|-bit int|
|00000690| 65 67 65 72 06 38 20 20 | 73 69 6e 67 6c 65 20 70 |eger.8  |single p|
|000006a0| 72 65 63 69 73 69 6f 6e | 20 66 6c 6f 61 74 69 6e |recision| floatin|
|000006b0| 67 2d 70 6f 69 6e 74 20 | 6e 75 6d 62 65 72 20 28 |g-point |number (|
|000006c0| 33 32 20 62 69 74 73 29 | 06 39 20 20 64 6f 75 62 |32 bits)|.9  doub|
|000006d0| 6c 65 20 70 72 65 63 69 | 73 69 6f 6e 20 66 6c 6f |le preci|sion flo|
|000006e0| 61 74 69 6e 67 2d 70 6f | 69 6e 74 20 6e 75 6d 62 |ating-po|int numb|
|000006f0| 65 72 20 28 36 34 20 62 | 69 74 73 29 06 31 30 20 |er (64 b|its).10 |
|00000700| 64 61 74 65 2f 74 69 6d | 65 20 6f 62 6a 65 63 74 |date/tim|e object|
|00000710| 06 31 31 20 41 53 43 49 | 49 20 74 65 78 74 06 31 |.11 ASCI|I text.1|
|00000720| 32 20 55 6e 69 63 6f 64 | 65 20 74 65 78 74 06 31 |2 Unicod|e text.1|
|00000730| 33 20 42 69 6e 61 72 79 | 06 31 34 20 4c 6f 6e 67 |3 Binary|.14 Long|
|00000740| 54 65 78 74 38 06 31 35 | 20 4c 6f 6e 67 54 65 78 |Text8.15| LongTex|
|00000750| 74 31 36 06 31 36 20 4c | 6f 6e 67 42 69 6e 61 72 |t16.16 L|ongBinar|
|00000760| 79 06 06 54 68 65 20 66 | 6f 75 72 20 4f 50 4c 20 |y..The f|our OPL |
|00000770| 74 79 70 65 73 20 61 72 | 65 20 74 79 70 65 73 20 |types ar|e types |
|00000780| 33 2c 20 35 2c 20 39 2c | 20 61 6e 64 20 31 31 2e |3, 5, 9,| and 11.|
|00000790| 06 eb 45 54 68 65 73 65 | 20 74 77 6f 20 66 75 6e |..EThese| two fun|
|000007a0| 63 74 69 6f 6e 73 20 63 | 6f 72 72 65 73 70 6f 6e |ctions c|orrespon|
|000007b0| 64 20 74 6f 20 74 68 65 | 20 62 75 69 6c 74 2d 69 |d to the| built-i|
|000007c0| 6e 20 4f 50 4c 20 63 6f | 6d 6d 61 6e 64 73 20 4f |n OPL co|mmands O|
|000007d0| 50 45 4e 52 20 61 6e 64 | 20 4f 50 45 4e 2e 20 20 |PENR and| OPEN.  |
|000007e0| 54 68 65 20 64 69 66 66 | 65 72 65 6e 63 65 20 69 |The diff|erence i|
|000007f0| 73 20 74 68 61 74 20 74 | 68 65 73 65 20 66 75 6e |s that t|hese fun|
|00000800| 63 74 69 6f 6e 73 20 74 | 61 6b 65 20 74 68 65 20 |ctions t|ake the |
|00000810| 66 69 65 6c 64 20 74 79 | 70 65 73 20 66 72 6f 6d |field ty|pes from|
|00000820| 20 74 68 65 20 73 74 72 | 69 6e 67 20 66 69 65 6c | the str|ing fiel|
|00000830| 64 54 79 70 65 73 24 2c | 20 61 6e 64 20 74 68 61 |dTypes$,| and tha|
|00000840| 74 20 61 6c 6c 20 74 79 | 70 65 73 20 73 75 70 70 |t all ty|pes supp|
|00000850| 6f 72 74 65 64 20 62 79 | 20 45 50 4f 43 2f 33 32 |orted by| EPOC/32|
|00000860| 27 73 20 44 42 4d 53 20 | 61 72 65 20 61 6c 6c 6f |'s DBMS |are allo|
|00000870| 77 65 64 2e 06 06 4c 6f | 67 69 63 61 6c 4e 61 6d |wed...Lo|gicalNam|
|00000880| 65 26 20 69 73 20 61 20 | 6e 75 6d 62 65 72 20 69 |e& is a |number i|
|00000890| 6e 64 69 63 61 74 69 6e | 67 20 74 68 65 20 6c 6f |ndicatin|g the lo|
|000008a0| 67 69 63 61 6c 20 4e 61 | 6d 65 20 74 6f 20 6f 70 |gical Na|me to op|
|000008b0| 65 6e 3a 20 20 30 20 69 | 73 20 41 2c 20 31 20 69 |en:  0 i|s A, 1 i|
|000008c0| 73 20 42 2c 20 32 20 69 | 73 20 43 2c 20 61 6e 64 |s B, 2 i|s C, and|
|000008d0| 20 73 6f 20 6f 6e 2e 06 | 06 46 69 65 6c 64 54 79 | so on..|.FieldTy|
|000008e0| 70 65 73 24 20 6d 75 73 | 74 20 68 61 76 65 20 65 |pes$ mus|t have e|
|000008f0| 78 61 63 74 6c 79 20 6f | 6e 65 20 63 68 61 72 61 |xactly o|ne chara|
|00000900| 63 74 65 72 20 66 6f 72 | 20 65 76 65 72 79 20 66 |cter for| every f|
|00000910| 69 65 6c 64 2c 20 77 69 | 74 68 20 74 68 65 20 66 |ield, wi|th the f|
|00000920| 6f 6c 6c 6f 77 69 6e 67 | 20 6d 65 61 6e 69 6e 67 |ollowing| meaning|
|00000930| 3a 06 20 22 24 22 20 3a | 20 61 6e 20 4f 50 4c 20 |:. "$" :| an OPL |
|00000940| 73 74 72 69 6e 67 20 66 | 69 65 6c 64 06 20 22 25 |string f|ield. "%|
|00000950| 22 20 3a 20 61 6e 20 4f | 50 4c 20 69 6e 74 65 67 |" : an O|PL integ|
|00000960| 65 72 20 66 69 65 6c 64 | 2c 06 20 22 26 22 20 3a |er field|,. "&" :|
|00000970| 20 61 6e 20 4f 50 4c 20 | 6c 6f 6e 67 20 69 6e 74 | an OPL |long int|
|00000980| 65 67 65 72 20 66 69 65 | 6c 64 2c 06 20 22 2e 22 |eger fie|ld,. "."|
|00000990| 20 3a 20 61 6e 20 4f 50 | 4c 20 72 65 61 6c 20 66 | : an OP|L real f|
|000009a0| 69 65 6c 64 2c 06 20 22 | 3f 22 20 3a 20 61 6e 79 |ield,. "|?" : any|
|000009b0| 20 6f 74 68 65 72 20 66 | 69 65 6c 64 2e 06 06 41 | other f|ield...A|
|000009c0| 6e 20 65 78 61 6d 70 6c | 65 3a 20 20 54 68 65 20 |n exampl|e:  The |
|000009d0| 62 75 69 6c 74 2d 69 6e | 20 4f 50 4c 20 6c 69 6e |built-in| OPL lin|
|000009e0| 65 06 06 20 4f 50 45 4e | 20 22 63 3a 5c 74 65 73 |e.. OPEN| "c:\tes|
|000009f0| 74 20 53 45 4c 45 43 54 | 20 6e 61 6d 65 2c 20 61 |t SELECT| name, a|
|00000a00| 67 65 2c 20 69 6e 63 6f | 6d 65 2c 20 68 65 69 67 |ge, inco|me, heig|
|00000a10| 68 74 20 46 52 4f 4d 20 | 45 6d 70 6c 6f 79 65 65 |ht FROM |Employee|
|00000a20| 22 2c 20 43 2c 20 66 31 | 24 2c 20 66 32 25 2c 20 |", C, f1|$, f2%, |
|00000a30| 66 33 26 2c 20 66 34 06 | 06 77 6f 75 6c 64 20 63 |f3&, f4.|.would c|
|00000a40| 6f 72 72 65 73 70 6f 6e | 64 20 74 6f 20 74 68 65 |orrespon|d to the|
|00000a50| 20 4f 50 58 20 66 75 6e | 63 74 69 6f 6e 20 63 61 | OPX fun|ction ca|
|00000a60| 6c 6c 3a 06 06 20 4f 44 | 62 4f 50 45 4e 3a 28 32 |ll:.. OD|bOPEN:(2|
|00000a70| 2c 20 22 43 3a 5c 74 65 | 73 74 20 53 45 4c 45 43 |, "C:\te|st SELEC|
|00000a80| 54 20 6e 61 6d 65 2c 20 | 61 67 65 2c 20 69 6e 63 |T name, |age, inc|
|00000a90| 6f 6d 65 2c 20 68 65 69 | 67 68 74 20 46 52 4f 4d |ome, hei|ght FROM|
|00000aa0| 20 45 6d 70 6c 6f 79 65 | 65 22 2c 20 22 24 25 26 | Employe|e", "$%&|
|00000ab0| 2e 22 29 06 06 54 68 65 | 20 74 77 6f 20 65 78 70 |.")..The| two exp|
|00000ac0| 72 65 73 73 69 6f 6e 73 | 20 61 72 65 20 72 65 61 |ressions| are rea|
|00000ad0| 6c 6c 79 20 63 6f 6d 70 | 6c 65 74 65 6c 79 20 69 |lly comp|letely i|
|00000ae0| 64 65 6e 74 69 63 61 6c | 2e 20 59 6f 75 20 63 61 |dentical|. You ca|
|00000af0| 6e 20 75 73 65 20 43 2e | 46 31 24 2c 20 43 2e 46 |n use C.|F1$, C.F|
|00000b00| 32 25 20 65 74 63 20 74 | 6f 20 61 63 63 65 73 73 |2% etc t|o access|
|00000b10| 20 74 68 65 20 76 61 6c | 75 65 73 20 6f 66 20 74 | the val|ues of t|
|00000b20| 68 65 20 66 69 65 6c 64 | 73 2c 20 6f 72 2c 20 61 |he field|s, or, a|
|00000b30| 6c 74 65 72 6e 61 74 69 | 76 65 6c 79 2c 20 79 6f |lternati|vely, yo|
|00000b40| 75 20 63 61 6e 20 75 73 | 65 20 74 68 65 20 4f 44 |u can us|e the OD|
|00000b50| 62 47 65 74 58 78 78 20 | 61 6e 64 20 4f 44 62 50 |bGetXxx |and ODbP|
|00000b60| 75 74 58 78 78 20 66 75 | 6e 63 74 69 6f 6e 73 20 |utXxx fu|nctions |
|00000b70| 64 65 73 63 72 69 62 65 | 64 20 62 65 6c 6f 77 2e |describe|d below.|
|00000b80| 06 06 4f 6e 20 74 68 65 | 20 6f 74 68 65 72 20 68 |..On the| other h|
|00000b90| 61 6e 64 3a 06 06 20 4f | 44 62 4f 70 65 6e 3a 28 |and:.. O|DbOpen:(|
|00000ba0| 33 2c 20 22 43 3a 5c 74 | 65 73 74 20 53 45 4c 45 |3, "C:\t|est SELE|
|00000bb0| 43 54 20 6e 61 6d 65 2c | 20 6d 61 72 72 69 65 64 |CT name,| married|
|00000bc0| 2c 20 63 68 69 6c 64 72 | 65 6e 2c 20 62 69 72 74 |, childr|en, birt|
|00000bd0| 68 64 61 79 2c 20 63 76 | 20 46 52 4f 4d 20 45 6d |hday, cv| FROM Em|
|00000be0| 70 6c 6f 79 65 65 73 22 | 2c 20 22 24 3f 3f 3f 3f |ployees"|, "$????|
|00000bf0| 22 29 06 06 63 6f 75 6c | 64 20 62 65 20 75 73 65 |")..coul|d be use|
|00000c00| 64 20 69 66 20 6e 61 6d | 65 20 69 73 20 61 20 73 |d if nam|e is a s|
|00000c10| 74 72 69 6e 67 20 66 69 | 65 6c 64 2c 20 6d 61 72 |tring fi|eld, mar|
|00000c20| 72 69 65 64 20 61 20 62 | 6f 6f 6c 65 61 6e 20 66 |ried a b|oolean f|
|00000c30| 69 65 6c 64 20 28 59 65 | 73 2f 4e 6f 29 2c 20 63 |ield (Ye|s/No), c|
|00000c40| 68 69 6c 64 72 65 6e 20 | 61 20 62 79 74 65 20 66 |hildren |a byte f|
|00000c50| 69 65 6c 64 2c 20 62 69 | 72 74 68 64 61 79 20 61 |ield, bi|rthday a|
|00000c60| 20 44 61 74 65 54 69 6d | 65 20 6f 62 6a 65 63 74 | DateTim|e object|
|00000c70| 2c 20 61 6e 64 20 63 76 | 20 61 20 6c 6f 6e 67 20 |, and cv| a long |
|00000c80| 74 65 78 74 20 66 69 65 | 6c 64 2e 20 59 6f 75 20 |text fie|ld. You |
|00000c90| 63 61 6e 20 75 73 65 20 | 44 2e 46 31 24 20 74 6f |can use |D.F1$ to|
|00000ca0| 20 61 63 63 65 73 73 20 | 74 68 65 20 6e 61 6d 65 | access |the name|
|00000cb0| 2c 20 62 75 74 20 79 6f | 75 20 77 69 6c 6c 20 6e |, but yo|u will n|
|00000cc0| 65 65 64 20 74 6f 20 75 | 73 65 20 4f 44 62 47 65 |eed to u|se ODbGe|
|00000cd0| 74 57 6f 72 64 26 3a 2c | 20 20 4f 44 62 47 65 74 |tWord&:,|  ODbGet|
|00000ce0| 49 6e 74 26 3a 2c 20 4f | 44 62 47 65 74 44 61 74 |Int&:, O|DbGetDat|
|00000cf0| 65 54 69 6d 65 3a 2c 20 | 61 6e 64 20 4f 44 62 47 |eTime:, |and ODbG|
|00000d00| 65 74 4c 6f 6e 67 3a 20 | 74 6f 20 72 65 61 64 20 |etLong: |to read |
|00000d10| 74 68 65 20 76 61 6c 75 | 65 73 20 6f 66 20 74 68 |the valu|es of th|
|00000d20| 65 20 6f 74 68 65 72 20 | 66 69 65 6c 64 73 20 69 |e other |fields i|
|00000d30| 6e 20 74 68 69 73 20 64 | 61 74 61 62 61 73 65 2e |n this d|atabase.|
|00000d40| 06 06 55 73 65 20 43 4c | 4f 53 45 20 74 6f 20 63 |..Use CL|OSE to c|
|00000d50| 6c 6f 73 65 20 61 20 64 | 61 74 61 62 61 73 65 20 |lose a d|atabase |
|00000d60| 6f 70 65 6e 65 64 20 75 | 73 69 6e 67 20 74 68 65 |opened u|sing the|
|00000d70| 73 65 20 66 75 6e 63 74 | 69 6f 6e 73 2e 06 75 45 |se funct|ions..uE|
|00000d80| 54 68 65 73 65 20 66 75 | 6e 63 74 69 6f 6e 73 20 |These fu|nctions |
|00000d90| 63 61 6e 20 62 65 20 75 | 73 65 64 20 74 6f 20 63 |can be u|sed to c|
|00000da0| 72 65 61 74 65 20 61 20 | 6e 65 77 20 74 61 62 6c |reate a |new tabl|
|00000db0| 65 20 77 69 74 68 20 6e | 61 6d 65 20 74 61 62 6c |e with n|ame tabl|
|00000dc0| 65 4e 61 6d 65 24 20 69 | 6e 20 74 68 65 20 64 61 |eName$ i|n the da|
|00000dd0| 74 61 62 61 73 65 20 66 | 69 6c 65 4e 61 6d 65 24 |tabase f|ileName$|
|00000de0| 2e 20 20 43 61 6c 6c 20 | 4f 44 62 53 74 61 72 74 |.  Call |ODbStart|
|00000df0| 54 61 62 6c 65 3a 20 66 | 69 72 73 74 20 74 6f 20 |Table: f|irst to |
|00000e00| 73 74 61 72 74 20 73 65 | 74 74 69 6e 67 20 75 70 |start se|tting up|
|00000e10| 20 74 68 65 20 63 72 65 | 61 74 69 6f 6e 20 70 72 | the cre|ation pr|
|00000e20| 6f 63 65 73 73 2e 20 54 | 68 65 6e 20 63 61 6c 6c |ocess. T|hen call|
|00000e30| 20 4f 44 62 54 61 62 6c | 65 46 69 65 6c 64 3a 20 | ODbTabl|eField: |
|00000e40| 6f 6e 63 65 20 66 6f 72 | 20 65 76 65 72 79 20 66 |once for| every f|
|00000e50| 69 65 6c 64 20 69 6e 20 | 74 68 65 20 6e 65 77 20 |ield in |the new |
|00000e60| 74 61 62 6c 65 2e 20 20 | 46 69 65 6c 64 4e 61 6d |table.  |FieldNam|
|00000e70| 65 24 20 69 73 20 74 68 | 65 20 44 42 4d 53 20 6e |e$ is th|e DBMS n|
|00000e80| 61 6d 65 20 6f 66 20 74 | 68 65 20 66 69 65 6c 64 |ame of t|he field|
|00000e90| 2c 20 61 6e 64 20 74 79 | 70 65 26 20 69 74 73 20 |, and ty|pe& its |
|00000ea0| 44 42 4d 53 20 54 79 70 | 65 20 28 74 68 65 73 65 |DBMS Typ|e (these|
|00000eb0| 20 61 72 65 20 74 68 65 | 20 73 61 6d 65 20 6e 75 | are the| same nu|
|00000ec0| 6d 62 65 72 73 20 61 73 | 20 72 65 74 75 72 6e 65 |mbers as| returne|
|00000ed0| 64 20 62 79 20 74 68 65 | 20 44 62 47 65 74 46 69 |d by the| DbGetFi|
|00000ee0| 65 6c 64 54 79 70 65 26 | 3a 20 61 6e 64 20 4f 44 |eldType&|: and OD|
|00000ef0| 62 47 65 74 46 69 65 6c | 64 54 79 70 65 26 3a 20 |bGetFiel|dType&: |
|00000f00| 66 75 6e 63 74 69 6f 6e | 73 2e 20 20 28 50 6c 65 |function|s.  (Ple|
|00000f10| 61 73 65 20 62 65 20 61 | 77 61 72 65 20 74 68 61 |ase be a|ware tha|
|00000f20| 74 20 74 68 65 20 64 6f | 63 75 6d 65 6e 74 61 74 |t the do|cumentat|
|00000f30| 69 6f 6e 20 6f 66 20 44 | 62 47 65 74 46 69 65 6c |ion of D|bGetFiel|
|00000f40| 64 54 79 70 65 26 20 69 | 6e 20 74 68 65 20 4f 50 |dType& i|n the OP|
|00000f50| 4c 20 6d 61 6e 75 61 6c | 20 69 73 20 77 72 6f 6e |L manual| is wron|
|00000f60| 67 21 20 53 65 65 20 61 | 62 6f 76 65 20 66 6f 72 |g! See a|bove for|
|00000f70| 20 74 68 65 20 63 6f 72 | 72 65 63 74 20 6e 75 6d | the cor|rect num|
|00000f80| 62 65 72 73 2e 29 20 20 | 54 68 65 20 6c 65 6e 67 |bers.)  |The leng|
|00000f90| 74 68 26 20 61 72 67 75 | 6d 65 6e 74 20 64 65 74 |th& argu|ment det|
|00000fa0| 65 72 6d 69 6e 65 73 20 | 74 68 65 20 6d 61 78 69 |ermines |the maxi|
|00000fb0| 6d 75 6d 20 6c 65 6e 67 | 74 68 20 6f 66 20 73 74 |mum leng|th of st|
|00000fc0| 72 69 6e 67 20 61 6e 64 | 20 62 69 6e 61 72 79 20 |ring and| binary |
|00000fd0| 66 69 65 6c 64 73 20 28 | 54 79 70 65 73 20 31 31 |fields (|Types 11|
|00000fe0| 20 61 6e 64 20 31 33 29 | 2e 20 46 6f 72 20 61 6c | and 13)|. For al|
|00000ff0| 6c 20 6e 75 6d 65 72 69 | 63 20 74 79 70 65 73 20 |l numeri|c types |
|00001000| 28 54 79 70 65 73 20 30 | 20 74 6f 20 31 30 29 2c |(Types 0| to 10),|
|00001010| 20 74 68 65 20 6c 65 6e | 67 74 68 26 20 61 72 67 | the len|gth& arg|
|00001020| 75 6d 65 6e 74 20 64 65 | 74 65 72 6d 69 6e 65 73 |ument de|termines|
|00001030| 20 77 68 65 74 68 65 72 | 20 74 68 65 20 66 69 65 | whether| the fie|
|00001040| 6c 64 20 63 61 6e 20 62 | 65 20 65 6d 70 74 79 2e |ld can b|e empty.|
|00001050| 20 55 73 65 20 26 30 20 | 69 66 20 69 74 20 63 61 | Use &0 |if it ca|
|00001060| 6e 20 62 65 20 65 6d 70 | 74 79 20 28 74 68 69 73 |n be emp|ty (this|
|00001070| 20 69 73 20 74 68 65 20 | 6e 6f 72 6d 61 6c 20 63 | is the |normal c|
|00001080| 61 73 65 20 66 6f 72 20 | 4f 50 4c 20 64 61 74 61 |ase for |OPL data|
|00001090| 62 61 73 65 73 29 2c 20 | 6f 72 20 26 31 20 69 66 |bases), |or &1 if|
|000010a0| 20 69 74 20 63 61 6e 6e | 6f 74 20 62 65 20 65 6d | it cann|ot be em|
|000010b0| 70 74 79 2e 20 20 53 65 | 74 74 69 6e 67 20 74 68 |pty.  Se|tting th|
|000010c0| 69 73 20 61 72 67 75 6d | 65 6e 74 20 74 6f 20 26 |is argum|ent to &|
|000010d0| 31 20 73 61 76 65 73 20 | 6f 6e 65 20 62 69 74 20 |1 saves |one bit |
|000010e0| 70 65 72 20 66 69 65 6c | 64 20 70 65 72 20 72 6f |per fiel|d per ro|
|000010f0| 77 20 6f 66 20 79 6f 75 | 72 20 64 61 74 61 62 61 |w of you|r databa|
|00001100| 73 65 2e 20 54 68 65 20 | 4f 44 62 43 72 65 61 74 |se. The |ODbCreat|
|00001110| 65 54 61 62 6c 65 3a 20 | 63 61 6c 6c 20 61 63 74 |eTable: |call act|
|00001120| 75 61 6c 6c 79 20 63 72 | 65 61 74 65 73 20 74 68 |ually cr|eates th|
|00001130| 65 20 74 61 62 6c 65 2e | 20 4e 6f 74 65 20 74 68 |e table.| Note th|
|00001140| 61 74 20 74 68 69 73 20 | 66 75 6e 63 74 69 6f 6e |at this |function|
|00001150| 20 44 4f 45 53 20 4e 4f | 54 20 6f 70 65 6e 20 61 | DOES NO|T open a|
|00001160| 20 6e 65 77 20 76 69 65 | 77 20 6f 6e 20 74 68 65 | new vie|w on the|
|00001170| 20 64 61 74 61 62 61 73 | 65 2e 20 20 41 6e 20 65 | databas|e.  An e|
|00001180| 65 6d 70 74 79 20 74 61 | 62 6c 65 20 69 73 20 63 |empty ta|ble is c|
|00001190| 72 65 61 74 65 64 20 69 | 6e 20 74 68 65 20 64 61 |reated i|n the da|
|000011a0| 74 61 62 61 73 65 2e 20 | 49 66 20 79 6f 75 20 77 |tabase. |If you w|
|000011b0| 61 6e 74 20 74 6f 20 77 | 72 69 74 65 20 74 6f 20 |ant to w|rite to |
|000011c0| 69 74 2c 20 79 6f 75 20 | 68 61 76 65 20 74 6f 20 |it, you |have to |
|000011d0| 6f 70 65 6e 20 69 74 20 | 75 73 69 6e 67 20 4f 44 |open it |using OD|
|000011e0| 62 4f 70 65 6e 3a 2e 20 | 20 49 66 20 74 68 65 20 |bOpen:. | If the |
|000011f0| 66 69 6c 65 4e 61 6d 65 | 24 20 64 6f 65 73 20 6e |fileName|$ does n|
|00001200| 6f 74 20 65 78 69 73 74 | 2c 20 69 74 20 69 73 20 |ot exist|, it is |
|00001210| 63 72 65 61 74 65 64 20 | 61 73 20 61 6e 20 4f 50 |created |as an OP|
|00001220| 4c 20 64 61 74 61 62 61 | 73 65 20 66 69 6c 65 2e |L databa|se file.|
|00001230| 20 20 54 68 69 73 20 6d | 65 63 68 61 6e 69 73 6d |  This m|echanism|
|00001240| 20 64 6f 65 73 20 6e 6f | 74 20 68 61 6e 64 6c 65 | does no|t handle|
|00001250| 20 74 68 65 20 53 45 54 | 44 4f 43 20 63 6f 6d 6d | the SET|DOC comm|
|00001260| 61 6e 64 2e 20 20 49 66 | 20 79 6f 75 20 77 61 6e |and.  If| you wan|
|00001270| 74 20 74 6f 20 63 72 65 | 61 74 65 20 61 6e 20 4f |t to cre|ate an O|
|00001280| 50 4c 20 64 6f 63 75 6d | 65 6e 74 20 66 69 6c 65 |PL docum|ent file|
|00001290| 2c 20 79 6f 75 20 77 69 | 6c 6c 20 6e 65 65 64 20 |, you wi|ll need |
|000012a0| 74 6f 20 63 72 65 61 74 | 65 20 69 74 20 75 73 69 |to creat|e it usi|
|000012b0| 6e 67 20 4f 50 4c 27 73 | 20 63 72 65 61 74 65 20 |ng OPL's| create |
|000012c0| 63 6f 6d 6d 61 6e 64 2c | 20 61 6e 64 20 74 68 65 |command,| and the|
|000012d0| 6e 20 61 64 64 20 61 20 | 74 61 62 6c 65 20 75 73 |n add a |table us|
|000012e0| 69 6e 67 20 4f 44 62 43 | 72 65 61 74 65 54 61 62 |ing ODbC|reateTab|
|000012f0| 6c 65 3a 2e 06 55 41 52 | 65 74 75 72 6e 20 74 68 |le:..UAR|eturn th|
|00001300| 65 20 63 6f 6e 74 65 6e | 74 73 20 6f 66 20 74 68 |e conten|ts of th|
|00001310| 65 20 69 26 20 66 69 65 | 6c 64 20 69 6e 20 74 68 |e i& fie|ld in th|
|00001320| 65 20 63 75 72 72 65 6e | 74 20 64 61 74 61 62 61 |e curren|t databa|
|00001330| 73 65 20 61 73 20 61 20 | 73 74 72 69 6e 67 2e 20 |se as a |string. |
|00001340| 54 68 69 73 20 69 73 20 | 6e 6f 72 6d 61 6c 6c 79 |This is |normally|
|00001350| 20 75 73 65 64 20 66 6f | 72 20 41 53 43 49 49 20 | used fo|r ASCII |
|00001360| 74 65 78 74 20 61 6e 64 | 20 62 69 6e 61 72 79 20 |text and| binary |
|00001370| 66 69 65 6c 64 73 20 28 | 74 79 70 65 73 20 31 31 |fields (|types 11|
|00001380| 20 61 6e 64 20 31 33 29 | 2c 20 62 75 74 20 63 61 | and 13)|, but ca|
|00001390| 6e 20 61 63 74 75 61 6c | 6c 79 20 62 65 20 75 73 |n actual|ly be us|
|000013a0| 65 64 20 66 6f 72 20 61 | 6e 79 20 74 79 70 65 20 |ed for a|ny type |
|000013b0| 65 78 63 65 70 74 20 66 | 6f 72 20 6c 6f 6e 67 20 |except f|or long |
|000013c0| 74 79 70 65 73 2e 46 69 | 65 6c 64 73 20 61 72 65 |types.Fi|elds are|
|000013d0| 20 63 6f 75 6e 74 65 64 | 20 73 74 61 72 74 69 6e | counted| startin|
|000013e0| 67 20 66 72 6f 6d 20 6f | 6e 65 2e 06 06 54 68 65 |g from o|ne...The|
|000013f0| 20 75 73 75 61 6c 20 4f | 50 4c 20 73 79 6e 74 61 | usual O|PL synta|
|00001400| 78 3a 06 20 20 6e 61 6d | 65 24 20 3d 20 43 2e 6e |x:.  nam|e$ = C.n|
|00001410| 61 6d 24 06 77 6f 75 6c | 64 20 74 72 61 6e 73 6c |am$.woul|d transl|
|00001420| 61 74 65 20 74 6f 3a 06 | 20 20 55 53 45 20 43 06 |ate to:.|  USE C.|
|00001430| 20 20 6e 61 6d 65 24 20 | 3d 20 4f 44 62 47 65 74 |  name$ |= ODbGet|
|00001440| 53 74 72 69 6e 67 24 3a | 28 31 29 06 c5 4b 0e 00 |String$:|(1)..K..|
|00001450| 00 00 ff ff cc ba f4 dc | 11 02 0d 06 b5 02 15 02 |........|........|
|00001460| a9 05 e1 02 25 04 fc ed | 05 09 02 15 02 55 02 1b |....%...|.....U..|
|00001470| 21 4f 44 62 47 65 74 54 | 61 62 6c 65 43 6f 75 6e |!ODbGetT|ableCoun|
|00001480| 74 26 3a 28 70 61 74 68 | 24 29 20 5f 4f 70 6c 44 |t&:(path|$) _OplD|
|00001490| 62 06 42 52 65 74 75 72 | 6e 73 20 74 68 65 20 6e |b.BRetur|ns the n|
|000014a0| 75 6d 62 65 72 20 6f 66 | 20 74 61 62 6c 65 73 20 |umber of| tables |
|000014b0| 69 6e 20 74 68 65 20 64 | 61 74 61 62 61 73 65 20 |in the d|atabase |
|000014c0| 77 69 74 68 20 66 69 6c | 65 6e 61 6d 65 20 70 61 |with fil|ename pa|
|000014d0| 74 68 24 2e 06 1b 24 4f | 44 62 47 65 74 54 61 62 |th$...$O|DbGetTab|
|000014e0| 6c 65 4e 61 6d 65 24 3a | 28 70 61 74 68 24 2c 20 |leName$:|(path$, |
|000014f0| 69 26 29 20 5f 4f 70 6c | 44 62 06 36 52 65 74 75 |i&) _Opl|Db.6Retu|
|00001500| 72 6e 73 20 74 68 65 20 | 6e 61 6d 65 20 6f 66 20 |rns the |name of |
|00001510| 74 68 65 20 69 26 74 68 | 20 74 61 62 6c 65 20 69 |the i&th| table i|
|00001520| 6e 20 64 61 74 61 62 61 | 73 65 20 70 61 74 68 24 |n databa|se path$|
|00001530| 2e 06 1b 29 4f 44 62 47 | 65 74 49 6e 64 65 78 43 |...)ODbG|etIndexC|
|00001540| 6f 75 6e 74 26 3a 28 70 | 61 74 68 24 2c 20 74 61 |ount&:(p|ath$, ta|
|00001550| 62 6c 65 24 29 20 5f 4f | 70 6c 44 62 06 4e 52 65 |ble$) _O|plDb.NRe|
|00001560| 74 75 72 6e 73 20 74 68 | 65 20 6e 75 6d 62 65 72 |turns th|e number|
|00001570| 20 6f 66 20 69 6e 64 69 | 63 65 73 20 66 6f 72 20 | of indi|ces for |
|00001580| 74 61 62 6c 65 24 20 69 | 6e 20 74 68 65 20 64 61 |table$ i|n the da|
|00001590| 74 61 62 61 73 65 20 77 | 69 74 68 20 66 69 6c 65 |tabase w|ith file|
|000015a0| 6e 61 6d 65 20 70 61 74 | 68 24 2e 06 1b 2c 4f 44 |name pat|h$...,OD|
|000015b0| 62 47 65 74 49 6e 64 65 | 78 4e 61 6d 65 24 3a 28 |bGetInde|xName$:(|
|000015c0| 70 61 74 68 24 2c 20 74 | 61 62 6c 65 24 2c 20 69 |path$, t|able$, i|
|000015d0| 26 29 20 5f 4f 70 6c 44 | 62 06 3f 52 65 74 75 72 |&) _OplD|b.?Retur|
|000015e0| 6e 73 20 74 68 65 20 6e | 61 6d 65 20 6f 66 20 74 |ns the n|ame of t|
|000015f0| 68 65 20 69 26 74 68 20 | 69 6e 64 65 78 20 66 6f |he i&th |index fo|
|00001600| 72 20 74 61 62 6c 65 24 | 20 69 6e 20 74 68 65 20 |r table$| in the |
|00001610| 64 61 74 61 62 61 73 65 | 2e 06 1b 37 4f 44 62 47 |database|...7ODbG|
|00001620| 65 74 49 6e 64 65 78 44 | 65 73 63 72 69 70 74 69 |etIndexD|escripti|
|00001630| 6f 6e 24 3a 28 70 61 74 | 68 24 2c 20 74 61 62 6c |on$:(pat|h$, tabl|
|00001640| 65 24 2c 20 69 6e 64 65 | 78 24 29 20 5f 4f 70 6c |e$, inde|x$) _Opl|
|00001650| 44 62 06 4a 52 65 74 75 | 72 6e 73 20 61 20 73 74 |Db.JRetu|rns a st|
|00001660| 72 69 6e 67 20 64 65 73 | 63 72 69 62 69 6e 67 20 |ring des|cribing |
|00001670| 74 68 65 20 6b 65 79 20 | 6f 66 20 69 6e 64 65 78 |the key |of index|
|00001680| 24 20 66 6f 72 20 74 61 | 62 6c 65 24 20 69 6e 20 |$ for ta|ble$ in |
|00001690| 74 68 65 20 64 61 74 61 | 62 61 73 65 2e 06 df 7f |the data|base....|
|000016a0| 4f 44 62 47 65 74 46 69 | 65 6c 64 43 6f 75 6e 74 |ODbGetFi|eldCount|
|000016b0| 26 3a 28 64 62 61 73 65 | 24 2c 74 61 62 6c 65 24 |&:(dbase|$,table$|
|000016c0| 29 06 4f 44 62 47 65 74 | 46 69 65 6c 64 4e 61 6d |).ODbGet|FieldNam|
|000016d0| 65 24 3a 28 64 62 61 73 | 65 24 2c 74 61 62 6c 65 |e$:(dbas|e$,table|
|000016e0| 24 2c 66 69 65 6c 64 4e | 75 6d 26 29 06 4f 44 62 |$,fieldN|um&).ODb|
|000016f0| 47 65 74 46 69 65 6c 64 | 54 79 70 65 26 3a 28 64 |GetField|Type&:(d|
|00001700| 62 61 73 65 24 2c 74 61 | 62 6c 65 24 2c 66 69 65 |base$,ta|ble$,fie|
|00001710| 6c 64 4e 75 6d 26 29 20 | 5f 4f 70 6c 44 62 06 45 |ldNum&) |_OplDb.E|
|00001720| 04 00 00 00 00 00 02 01 | 00 00 00 00 00 00 00 00 |........|........|
|00001730| 00 00 00 02 00 00 00 0f | 00 00 00 07 f0 00 00 00 |........|........|
|00001740| 0a 00 00 00 00 16 d0 02 | 00 00 00 00 00 00 03 00 |........|........|
|00001750| 00 00 22 00 00 00 02 2b | 00 00 00 02 32 00 00 00 |.."....+|....2...|
|00001760| 01 00 00 00 00 0a 00 00 | 00 2a 03 00 00 b3 04 00 |........|.*......|
|00001770| 00 00 00 00 02 01 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001780| 00 02 00 00 00 0f 00 00 | 00 07 f0 00 00 00 0a 00 |........|........|
|00001790| 00 00 00 16 d0 02 00 00 | 00 00 00 00 19 00 00 00 |........|........|
|000017a0| c8 00 00 00 02 01 00 00 | 00 02 8e 00 00 00 02 01 |........|........|
|000017b0| 00 00 00 02 0c 00 00 00 | 02 0f 00 00 00 02 07 00 |........|........|
|000017c0| 00 00 02 18 00 00 00 02 | 1a 00 00 00 02 15 00 00 |........|........|
|000017d0| 00 02 1e 00 00 00 02 1a | 00 00 00 02 23 00 00 00 |........|....#...|
|000017e0| 02 12 00 00 00 02 34 00 | 00 00 02 34 00 00 00 02 |......4.|...4....|
|000017f0| 14 00 00 00 02 0e 00 00 | 00 02 10 00 00 00 02 0a |........|........|
|00001800| 00 00 00 02 0d 00 00 00 | 02 0e 00 00 00 02 0e 00 |........|........|
|00001810| 00 00 02 01 00 00 00 02 | 2e 00 00 00 01 00 00 00 |........|........|
|00001820| 00 1b 2c 4f 44 62 47 65 | 74 46 69 65 6c 64 53 69 |..,ODbGe|tFieldSi|
|00001830| 7a 65 26 3a 28 70 61 74 | 68 24 2c 20 74 61 62 6c |ze&:(pat|h$, tabl|
|00001840| 65 24 2c 20 69 26 29 20 | 5f 4f 70 6c 44 62 06 7e |e$, i&) |_OplDb.~|
|00001850| 52 65 74 75 72 6e 73 20 | 74 68 65 20 73 69 7a 65 |Returns |the size|
|00001860| 20 6f 66 20 74 68 65 20 | 69 26 74 68 20 66 69 65 | of the |i&th fie|
|00001870| 6c 64 20 69 6e 20 74 61 | 62 6c 65 24 20 69 6e 20 |ld in ta|ble$ in |
|00001880| 74 68 65 20 64 61 74 61 | 62 61 73 65 2e 20 54 68 |the data|base. Th|
|00001890| 69 73 20 69 73 20 74 68 | 65 20 6c 65 6e 67 74 68 |is is th|e length|
|000018a0| 20 6f 66 20 73 74 72 69 | 6e 67 20 66 69 65 6c 64 | of stri|ng field|
|000018b0| 73 2c 20 6f 74 68 65 72 | 77 69 73 65 20 69 74 20 |s, other|wise it |
|000018c0| 69 73 20 75 6e 64 65 66 | 69 6e 65 64 2e 06 1b 2d |is undef|ined...-|
|000018d0| 4f 44 62 47 65 74 43 61 | 6e 42 65 45 6d 70 74 79 |ODbGetCa|nBeEmpty|
|000018e0| 25 3a 28 70 61 74 68 24 | 2c 20 74 61 62 6c 65 24 |%:(path$|, table$|
|000018f0| 2c 20 69 26 29 20 5f 4f | 70 6c 44 62 06 55 52 65 |, i&) _O|plDb.URe|
|00001900| 74 75 72 6e 73 20 2d 31 | 20 69 66 20 74 68 65 20 |turns -1| if the |
|00001910| 69 26 74 68 20 66 69 65 | 6c 64 20 69 6e 20 74 61 |i&th fie|ld in ta|
|00001920| 62 6c 65 24 20 69 6e 20 | 74 68 65 20 64 61 74 61 |ble$ in |the data|
|00001930| 62 61 73 65 20 63 61 6e | 20 62 65 20 65 6d 70 74 |base can| be empt|
|00001940| 79 2c 20 7a 65 72 6f 20 | 6f 74 68 65 72 77 69 73 |y, zero |otherwis|
|00001950| 65 2e 06 df 5c 4f 44 62 | 4f 70 65 6e 52 3a 28 6c |e...\ODb|OpenR:(l|
|00001960| 6f 67 69 63 61 6c 4e 61 | 6d 65 26 2c 20 73 71 6c |ogicalNa|me&, sql|
|00001970| 24 2c 20 66 69 65 6c 64 | 54 79 70 65 73 24 29 06 |$, field|Types$).|
|00001980| 4f 44 62 4f 70 65 6e 3a | 28 6c 6f 67 69 63 61 6c |ODbOpen:|(logical|
|00001990| 4e 61 6d 65 26 2c 20 73 | 71 6c 24 2c 20 66 69 65 |Name&, s|ql$, fie|
|000019a0| 6c 64 54 79 70 65 73 24 | 29 20 5f 4f 70 6c 44 62 |ldTypes$|) _OplDb|
|000019b0| 06 40 04 00 00 00 00 00 | 02 01 00 00 00 00 00 00 |.@......|........|
|000019c0| 00 00 00 00 00 02 00 00 | 00 0f 00 00 00 07 f0 00 |........|........|
|000019d0| 00 00 0a 00 00 00 00 16 | d0 02 00 00 00 00 00 00 |........|........|
|000019e0| 02 00 00 00 2b 00 00 00 | 02 31 00 00 00 01 00 00 |....+...|.1......|
|000019f0| 00 00 0b 00 00 00 eb 05 | 00 00 c2 04 00 00 00 00 |........|........|
|00001a00| 00 02 01 00 00 00 00 00 | 00 00 00 00 00 00 02 00 |........|........|
|00001a10| 00 00 0f 00 00 00 07 f0 | 00 00 00 0a 00 00 00 00 |........|........|
|00001a20| 16 d0 02 00 00 00 00 00 | 00 1c 00 00 00 e2 00 00 |........|........|
|00001a30| 00 02 01 00 00 00 02 62 | 00 00 00 02 01 00 00 00 |.......b|........|
|00001a40| 02 59 00 00 00 02 1b 00 | 00 00 02 1d 00 00 00 02 |.Y......|........|
|00001a50| 22 00 00 00 02 1a 00 00 | 00 02 18 00 00 00 02 01 |".......|........|
|00001a60| 00 00 00 02 23 00 00 00 | 02 01 00 00 00 02 55 00 |....#...|......U.|
|00001a70| 00 00 02 01 00 00 00 02 | 2b 00 00 00 02 01 00 00 |........|+.......|
|00001a80| 00 02 4f 00 00 00 02 01 | 00 00 00 02 cc 00 00 00 |..O.....|........|
|00001a90| 02 01 00 00 00 02 13 00 | 00 00 02 01 00 00 00 02 |........|........|
|00001aa0| 5d 00 00 00 02 01 00 00 | 00 02 4d 01 00 00 02 01 |].......|..M.....|
|00001ab0| 00 00 00 02 3c 00 00 00 | 01 00 00 00 00 1f 68 4f |....<...|......hO|
|00001ac0| 44 62 53 74 61 72 74 54 | 61 62 6c 65 3a 06 4f 44 |DbStartT|able:.OD|
|00001ad0| 62 54 61 62 6c 65 46 69 | 65 6c 64 3a 28 66 69 65 |bTableFi|eld:(fie|
|00001ae0| 6c 64 4e 61 6d 65 24 2c | 20 74 79 70 65 26 2c 20 |ldName$,| type&, |
|00001af0| 6c 65 6e 67 74 68 26 29 | 06 4f 44 62 43 72 65 61 |length&)|.ODbCrea|
|00001b00| 74 65 54 61 62 6c 65 3a | 28 66 69 6c 65 4e 61 6d |teTable:|(fileNam|
|00001b10| 65 24 2c 20 74 61 62 6c | 65 4e 61 6d 65 24 29 20 |e$, tabl|eName$) |
|00001b20| 5f 4f 70 6c 44 62 06 45 | 04 00 00 00 00 00 02 01 |_OplDb.E|........|
|00001b30| 00 00 00 00 00 00 00 00 | 00 00 00 02 00 00 00 0f |........|........|
|00001b40| 00 00 00 07 f0 00 00 00 | 0a 00 00 00 00 16 d0 02 |........|........|
|00001b50| 00 00 00 00 00 00 03 00 | 00 00 0f 00 00 00 02 2b |........|.......+|
|00001b60| 00 00 00 02 2e 00 00 00 | 01 00 00 00 00 0c 00 00 |........|........|
|00001b70| 00 75 05 00 00 1b 1a 4f | 44 62 47 65 74 4c 65 6e |.u.....O|DbGetLen|
|00001b80| 67 74 68 26 3a 28 69 26 | 29 20 5f 4f 70 6c 44 62 |gth&:(i&|) _OplDb|
|00001b90| 06 ec 52 65 74 75 72 6e | 73 20 74 68 65 20 6c 65 |..Return|s the le|
|00001ba0| 6e 67 74 68 20 6f 66 20 | 74 68 65 20 69 26 20 66 |ngth of |the i& f|
|00001bb0| 69 65 6c 64 20 69 6e 20 | 74 68 65 20 63 75 72 72 |ield in |the curr|
|00001bc0| 65 6e 74 20 64 61 74 61 | 62 61 73 65 2e 20 49 66 |ent data|base. If|
|00001bd0| 20 74 68 65 20 66 69 65 | 6c 64 20 69 73 20 65 6d | the fie|ld is em|
|00001be0| 70 74 79 2c 20 72 65 74 | 75 72 6e 73 20 7a 65 72 |pty, ret|urns zer|
|00001bf0| 6f 2e 20 4f 74 68 65 72 | 77 69 73 65 20 69 74 20 |o. Other|wise it |
|00001c00| 72 65 74 75 72 6e 73 20 | 31 20 66 6f 72 20 61 6e |returns |1 for an|
|00001c10| 79 20 6e 75 6d 65 72 69 | 63 20 66 69 65 6c 64 20 |y numeri|c field |
|00001c20| 28 74 79 70 65 73 20 30 | 20 74 6f 20 31 30 29 2c |(types 0| to 10),|
|00001c30| 20 61 6e 64 20 74 68 65 | 20 6c 65 6e 67 74 68 20 | and the| length |
|00001c40| 69 6e 20 62 79 74 65 73 | 20 66 6f 72 20 74 65 78 |in bytes| for tex|
|00001c50| 74 2c 20 62 69 6e 61 72 | 79 2c 20 6c 6f 6e 67 20 |t, binar|y, long |
|00001c60| 74 65 78 74 2c 20 61 6e | 64 20 6c 6f 6e 67 20 62 |text, an|d long b|
|00001c70| 69 6e 61 72 79 20 66 69 | 65 6c 64 73 2e 06 6b 1a |inary fi|elds..k.|
|00001c80| 4f 44 62 47 65 74 53 74 | 72 69 6e 67 24 3a 28 69 |ODbGetSt|ring$:(i|
|00001c90| 26 29 20 5f 4f 70 6c 44 | 62 06 0d 00 00 00 55 01 |&) _OplD|b.....U.|
|00001ca0| 00 00 59 04 00 00 00 00 | 00 02 01 00 00 00 00 00 |..Y.....|........|
|00001cb0| 00 00 00 00 00 00 02 00 | 00 00 0f 00 00 00 07 f0 |........|........|
|00001cc0| 00 00 00 0a 00 00 00 00 | 16 d0 02 00 00 00 00 00 |........|........|
|00001cd0| 00 07 00 00 00 f5 00 00 | 00 02 01 00 00 00 02 16 |........|........|
|00001ce0| 00 00 00 02 11 00 00 00 | 02 14 00 00 00 02 08 00 |........|........|
|00001cf0| 00 00 02 1c 00 00 00 01 | 00 00 00 00 7b 17 4f 44 |........|....{.OD|
|00001d00| 62 47 65 74 49 6e 74 26 | 3a 28 69 26 29 20 5f 4f |bGetInt&|:(i&) _O|
|00001d10| 70 6c 44 62 06 fd 52 65 | 74 75 72 6e 20 74 68 65 |plDb..Re|turn the|
|00001d20| 20 63 6f 6e 74 65 6e 74 | 73 20 6f 66 20 74 68 65 | content|s of the|
|00001d30| 20 69 26 20 66 69 65 6c | 64 20 69 6e 20 74 68 65 | i& fiel|d in the|
|00001d40| 20 63 75 72 72 65 6e 74 | 20 64 61 74 61 62 61 73 | current| databas|
|00001d50| 65 2e 20 54 68 69 73 20 | 68 61 73 20 74 6f 20 62 |e. This |has to b|
|00001d60| 65 20 61 20 73 69 67 6e | 65 64 20 69 6e 74 65 67 |e a sign|ed integ|
|00001d70| 65 72 20 66 69 65 6c 64 | 20 28 74 79 70 65 73 20 |er field| (types |
|00001d80| 31 2c 20 33 2c 20 35 29 | 2e 06 06 54 68 65 20 75 |1, 3, 5)|...The u|
|00001d90| 73 75 61 6c 20 4f 50 4c | 20 73 79 6e 74 61 78 3a |sual OPL| syntax:|
|00001da0| 06 20 20 61 67 65 25 20 | 3d 20 43 2e 61 67 65 25 |.  age% |= C.age%|
|00001db0| 06 20 20 73 61 6c 61 72 | 79 26 20 3d 20 43 2e 73 |.  salar|y& = C.s|
|00001dc0| 61 6c 26 06 77 6f 75 6c | 64 20 74 72 61 6e 73 6c |al&.woul|d transl|
|00001dd0| 61 74 65 20 74 6f 3a 06 | 20 20 55 53 45 20 43 06 |ate to:.|  USE C.|
|00001de0| 20 20 61 67 65 25 20 3d | 20 4f 44 62 47 65 74 49 |  age% =| ODbGetI|
|00001df0| 6e 74 26 3a 28 32 29 06 | 20 20 73 61 6c 61 72 79 |nt&:(2).|  salary|
|00001e00| 26 20 3d 20 4f 44 62 47 | 65 74 49 6e 74 26 3a 28 |& = ODbG|etInt&:(|
|00001e10| 33 29 06 63 04 00 00 00 | 00 00 02 01 00 00 00 00 |3).c....|........|
|00001e20| 00 00 00 00 00 00 00 02 | 00 00 00 0f 00 00 00 07 |........|........|
|00001e30| f0 00 00 00 0a 00 00 00 | 00 16 d0 02 00 00 00 00 |........|........|
|00001e40| 00 00 09 00 00 00 74 00 | 00 00 02 01 00 00 00 02 |......t.|........|
|00001e50| 16 00 00 00 02 10 00 00 | 00 02 13 00 00 00 02 14 |........|........|
|00001e60| 00 00 00 02 08 00 00 00 | 02 18 00 00 00 02 1b 00 |........|........|
|00001e70| 00 00 01 00 00 00 00 1b | 17 4f 44 62 47 65 74 52 |........|.ODbGetR|
|00001e80| 65 61 6c 3a 28 69 26 29 | 20 5f 4f 70 6c 44 62 06 |eal:(i&)| _OplDb.|
|00001e90| 68 52 65 74 75 72 6e 20 | 74 68 65 20 63 6f 6e 74 |hReturn |the cont|
|00001ea0| 65 6e 74 73 20 6f 66 20 | 74 68 65 20 69 26 20 66 |ents of |the i& f|
|00001eb0| 69 65 6c 64 20 69 6e 20 | 74 68 65 20 63 75 72 72 |ield in |the curr|
|00001ec0| 65 6e 74 20 64 61 74 61 | 62 61 73 65 2e 20 54 68 |ent data|base. Th|
|00001ed0| 69 73 20 68 61 73 20 74 | 6f 20 62 65 20 61 6e 20 |is has t|o be an |
|00001ee0| 4f 50 4c 20 72 65 61 6c | 20 66 69 65 6c 64 20 28 |OPL real| field (|
|00001ef0| 74 79 70 65 20 39 29 2e | 06 1b 19 4f 44 62 47 65 |type 9).|...ODbGe|
|00001f00| 74 52 65 61 6c 33 32 3a | 28 69 26 29 20 5f 4f 70 |tReal32:|(i&) _Op|
|00001f10| 6c 44 62 06 69 52 65 74 | 75 72 6e 20 74 68 65 20 |lDb.iRet|urn the |
|00001f20| 63 6f 6e 74 65 6e 74 73 | 20 6f 66 20 74 68 65 20 |contents| of the |
|00001f30| 69 26 20 66 69 65 6c 64 | 20 69 6e 20 74 68 65 20 |i& field| in the |
|00001f40| 63 75 72 72 65 6e 74 20 | 64 61 74 61 62 61 73 65 |current |database|
|00001f50| 2e 20 54 68 69 73 20 68 | 61 73 20 74 6f 20 62 65 |. This h|as to be|
|00001f60| 20 61 20 73 68 6f 72 74 | 20 72 65 61 6c 20 66 69 | a short| real fi|
|00001f70| 65 6c 64 20 28 74 79 70 | 65 20 38 29 2e 06 1b 18 |eld (typ|e 8)....|
|00001f80| 4f 44 62 47 65 74 57 6f | 72 64 26 3a 28 69 26 29 |ODbGetWo|rd&:(i&)|
|00001f90| 20 5f 4f 70 6c 44 62 06 | 7a 52 65 74 75 72 6e 20 | _OplDb.|zReturn |
|00001fa0| 74 68 65 20 63 6f 6e 74 | 65 6e 74 73 20 6f 66 20 |the cont|ents of |
|00001fb0| 74 68 65 20 69 26 20 66 | 69 65 6c 64 20 69 6e 20 |the i& f|ield in |
|00001fc0| 74 68 65 20 63 75 72 72 | 65 6e 74 20 64 61 74 61 |the curr|ent data|
|00001fd0| 62 61 73 65 2e 20 54 68 | 69 73 20 68 61 73 20 74 |base. Th|is has t|
|00001fe0| 6f 20 62 65 20 61 6e 20 | 75 6e 73 69 67 6e 65 64 |o be an |unsigned|
|00001ff0| 20 69 6e 74 65 67 65 72 | 20 66 69 65 6c 64 20 28 | integer| field (|
|00002000| 74 79 70 65 73 20 30 2c | 20 32 2c 20 34 2c 20 36 |types 0,| 2, 4, 6|
|00002010| 29 2e 06 19 41 47 65 74 | 20 6c 65 6e 67 74 68 26 |)...AGet| length&|
|00002020| 20 62 79 74 65 73 20 66 | 72 6f 6d 20 74 68 65 20 | bytes f|rom the |
|00002030| 69 26 20 66 69 65 6c 64 | 20 69 6e 20 74 68 65 20 |i& field| in the |
|00002040| 63 75 72 72 65 6e 74 20 | 64 61 74 61 62 61 73 65 |current |database|
|00002050| 2c 20 61 6e 64 20 70 6c | 61 63 65 20 69 74 20 69 |, and pl|ace it i|
|00002060| 6e 20 74 68 65 20 62 75 | 66 66 65 72 26 2e 20 20 |n the bu|ffer&.  |
|00002070| 54 68 65 20 66 69 65 6c | 64 20 6d 75 73 74 20 62 |The fiel|d must b|
|00002080| 65 20 61 20 6c 6f 6e 67 | 20 66 69 65 6c 64 20 74 |e a long| field t|
|00002090| 79 70 65 20 28 74 79 70 | 65 73 20 31 34 2c 20 31 |ype (typ|es 14, 1|
|000020a0| 35 2c 20 31 36 29 2e 20 | 4e 6f 72 6d 61 6c 6c 79 |5, 16). |Normally|
|000020b0| 20 79 6f 75 20 77 6f 75 | 6c 64 20 66 69 72 73 74 | you wou|ld first|
|000020c0| 20 72 65 61 64 20 74 68 | 65 20 6c 65 6e 67 74 68 | read th|e length|
|000020d0| 20 6f 66 20 61 20 6c 6f | 6e 67 20 66 69 65 6c 64 | of a lo|ng field|
|000020e0| 20 75 73 69 6e 67 20 4f | 44 62 47 65 74 4c 65 6e | using O|DbGetLen|
|000020f0| 67 74 68 26 3a 20 61 6e | 64 20 75 73 65 20 74 68 |gth&: an|d use th|
|00002100| 69 73 20 61 73 20 74 68 | 65 20 6c 65 6e 67 74 68 |is as th|e length|
|00002110| 26 20 61 72 67 75 6d 65 | 6e 74 20 66 6f 72 20 74 |& argume|nt for t|
|00002120| 68 69 73 20 66 75 6e 63 | 74 69 6f 6e 2e 06 46 41 |his func|tion..FA|
|00002130| 54 68 69 73 20 66 75 6e | 63 74 69 6f 6e 20 69 73 |This fun|ction is|
|00002140| 20 75 73 65 64 20 73 69 | 6d 69 6c 61 72 20 74 6f | used si|milar to|
|00002150| 20 74 68 65 20 62 75 69 | 6c 74 2d 69 6e 20 66 75 | the bui|lt-in fu|
|00002160| 6e 63 74 69 6f 6e 20 46 | 49 4e 44 46 49 45 4c 44 |nction F|INDFIELD|
|00002170| 2c 20 69 6e 20 70 61 72 | 74 69 63 75 6c 61 72 20 |, in par|ticular |
|00002180| 74 68 65 20 66 6c 61 67 | 25 20 61 72 67 75 6d 65 |the flag|% argume|
|00002190| 6e 74 20 61 6e 64 20 74 | 68 65 20 72 65 74 75 72 |nt and t|he retur|
|000021a0| 6e 20 76 61 6c 75 65 20 | 68 61 76 65 20 74 68 65 |n value |have the|
|000021b0| 20 73 61 6d 65 20 6d 65 | 61 6e 69 6e 67 2e 20 54 | same me|aning. T|
|000021c0| 68 65 20 64 69 66 66 65 | 72 65 6e 63 65 20 69 73 |he diffe|rence is|
|000021d0| 20 74 68 61 74 20 74 68 | 65 20 73 71 6c 53 74 72 | that th|e sqlStr|
|000021e0| 69 6e 67 24 20 61 72 67 | 75 6d 65 6e 74 20 69 73 |ing$ arg|ument is|
|000021f0| 20 75 73 65 64 20 61 73 | 20 61 6e 20 53 51 4c 20 | used as| an SQL |
|00002200| 71 75 65 72 79 2e 20 53 | 6f 20 79 6f 75 20 63 61 |query. S|o you ca|
|00002210| 6e 20 68 61 76 65 20 61 | 20 71 75 65 72 79 20 6c |n have a| query l|
|00002220| 69 6b 65 3a 06 06 4f 44 | 62 46 69 6e 64 57 68 65 |ike:..OD|bFindWhe|
|00002230| 72 65 25 3a 28 22 6e 61 | 6d 65 20 4c 49 4b 45 20 |re%:("na|me LIKE |
|00002240| 27 2a 4d 69 6c 6c 65 72 | 2a 27 20 41 4e 44 20 28 |'*Miller|*' AND (|
|00002250| 68 65 69 67 68 74 20 3e | 20 31 2e 38 30 20 4f 52 |height >| 1.80 OR|
|00002260| 20 73 61 6c 61 72 79 20 | 3c 20 32 30 30 30 30 29 | salary |< 20000)|
|00002270| 22 2c 20 31 29 06 0d 40 | 03 00 00 00 ec 00 00 00 |", 1)..@|........|
|00002280| 38 00 00 00 00 ed 47 00 | 00 00 00 ff 0f 39 04 66 |8.....G.|.....9.f|
|00002290| 92 09 04 71 02 11 02 45 | 02 91 02 c1 02 e5 02 f2 |...q...E|........|
|000022a0| 3d 04 1b 23 4f 44 62 47 | 65 74 44 61 74 65 54 69 |=..#ODbG|etDateTi|
|000022b0| 6d 65 3a 28 64 74 69 6d | 65 26 2c 20 69 26 29 20 |me:(dtim|e&, i&) |
|000022c0| 5f 4f 70 6c 44 62 06 e8 | 47 65 74 20 74 68 65 20 |_OplDb..|Get the |
|000022d0| 63 6f 6e 74 65 6e 74 73 | 20 6f 66 20 74 68 65 20 |contents| of the |
|000022e0| 69 26 20 66 69 65 6c 64 | 20 69 6e 20 74 68 65 20 |i& field| in the |
|000022f0| 63 75 72 72 65 6e 74 20 | 64 61 74 61 62 61 73 65 |current |database|
|00002300| 2c 20 61 6e 64 20 70 6c | 61 63 65 20 69 74 20 69 |, and pl|ace it i|
|00002310| 6e 20 74 68 65 20 64 61 | 74 65 74 69 6d 65 20 6f |n the da|tetime o|
|00002320| 62 6a 65 63 74 20 64 74 | 69 6d 65 26 20 28 77 68 |bject dt|ime& (wh|
|00002330| 69 63 68 20 6d 75 73 74 | 20 68 61 76 65 20 62 65 |ich must| have be|
|00002340| 65 6e 20 63 72 65 61 74 | 65 64 20 75 73 69 6e 67 |en creat|ed using|
|00002350| 20 44 54 4e 65 77 44 61 | 74 65 54 69 6d 65 26 3a | DTNewDa|teTime&:|
|00002360| 20 6f 72 20 44 54 4e 6f | 77 26 3a 20 66 72 6f 6d | or DTNo|w&: from|
|00002370| 20 74 68 65 20 44 61 74 | 65 2e 6f 70 78 29 2e 20 | the Dat|e.opx). |
|00002380| 20 54 68 65 20 66 69 65 | 6c 64 20 6d 75 73 74 20 | The fie|ld must |
|00002390| 62 65 20 61 20 64 61 74 | 65 2f 74 69 6d 65 20 66 |be a dat|e/time f|
|000023a0| 69 65 6c 64 20 28 74 79 | 70 65 20 31 30 29 2e 06 |ield (ty|pe 10)..|
|000023b0| 0b 29 4f 44 62 47 65 74 | 4c 6f 6e 67 3a 28 62 75 |.)ODbGet|Long:(bu|
|000023c0| 66 66 65 72 26 2c 20 6c | 65 6e 67 74 68 26 2c 20 |ffer&, l|ength&, |
|000023d0| 69 26 29 20 5f 4f 70 6c | 44 62 06 0f 00 00 00 19 |i&) _Opl|Db......|
|000023e0| 01 00 00 1b 18 4f 44 62 | 50 75 74 45 6d 70 74 79 |.....ODb|PutEmpty|
|000023f0| 3a 28 69 26 29 20 5f 4f | 70 6c 44 62 06 2e 4d 61 |:(i&) _O|plDb..Ma|
|00002400| 6b 65 73 20 66 69 65 6c | 64 20 69 26 20 69 6e 20 |kes fiel|d i& in |
|00002410| 74 68 65 20 63 75 72 72 | 65 6e 74 20 64 61 74 61 |the curr|ent data|
|00002420| 62 61 73 65 20 65 6d 70 | 74 79 2e 06 1b 22 4f 44 |base emp|ty..."OD|
|00002430| 62 50 75 74 53 74 72 69 | 6e 67 3a 28 73 74 72 69 |bPutStri|ng:(stri|
|00002440| 6e 67 24 2c 20 69 26 29 | 20 5f 4f 70 6c 44 62 06 |ng$, i&)| _OplDb.|
|00002450| dd 41 73 73 69 67 6e 73 | 20 74 68 65 20 76 61 6c |.Assigns| the val|
|00002460| 75 65 20 6f 66 20 73 74 | 72 69 6e 67 24 20 74 6f |ue of st|ring$ to|
|00002470| 20 74 68 65 20 69 26 74 | 68 20 66 69 65 6c 64 20 | the i&t|h field |
|00002480| 69 6e 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 64 |in the c|urrent d|
|00002490| 61 74 61 62 61 73 65 2e | 20 20 54 68 69 73 20 77 |atabase.|  This w|
|000024a0| 6f 75 6c 64 20 6e 6f 72 | 6d 61 6c 6c 79 20 62 65 |ould nor|mally be|
|000024b0| 20 75 73 65 64 20 66 6f | 72 20 73 74 72 69 6e 67 | used fo|r string|
|000024c0| 20 6f 72 20 62 69 6e 61 | 72 79 20 66 69 65 6c 64 | or bina|ry field|
|000024d0| 73 2c 20 6f 72 20 66 6f | 72 20 6c 6f 6e 67 20 74 |s, or fo|r long t|
|000024e0| 65 78 74 20 6f 72 20 6c | 6f 6e 67 20 62 69 6e 61 |ext or l|ong bina|
|000024f0| 72 79 20 66 69 65 6c 64 | 73 2c 20 62 75 74 20 69 |ry field|s, but i|
|00002500| 74 20 63 61 6e 20 61 63 | 74 75 61 6c 6c 79 20 62 |t can ac|tually b|
|00002510| 65 20 75 73 65 64 20 66 | 6f 72 20 61 6e 79 20 74 |e used f|or any t|
|00002520| 79 70 65 20 6f 66 20 66 | 69 65 6c 64 2e 06 1b 1b |ype of f|ield....|
|00002530| 4f 44 62 50 75 74 49 6e | 74 3a 28 6e 6f 26 2c 20 |ODbPutIn|t:(no&, |
|00002540| 69 26 29 20 5f 4f 70 6c | 44 62 06 7e 41 73 73 69 |i&) _Opl|Db.~Assi|
|00002550| 67 6e 73 20 74 68 65 20 | 76 61 6c 75 65 20 6f 66 |gns the |value of|
|00002560| 20 6e 6f 26 20 74 6f 20 | 74 68 65 20 69 26 74 68 | no& to |the i&th|
|00002570| 20 66 69 65 6c 64 20 69 | 6e 20 74 68 65 20 63 75 | field i|n the cu|
|00002580| 72 72 65 6e 74 20 64 61 | 74 61 62 61 73 65 2e 20 |rrent da|tabase. |
|00002590| 54 68 65 20 66 69 65 6c | 64 20 6d 75 73 74 20 62 |The fiel|d must b|
|000025a0| 65 20 61 20 73 69 67 6e | 65 64 20 69 6e 74 65 67 |e a sign|ed integ|
|000025b0| 65 72 20 66 69 65 6c 64 | 20 28 74 79 70 65 73 20 |er field| (types |
|000025c0| 31 2c 20 33 2c 20 35 29 | 2e 06 1b 1a 4f 44 62 50 |1, 3, 5)|....ODbP|
|000025d0| 75 74 52 65 61 6c 3a 28 | 66 2c 20 69 26 29 20 5f |utReal:(|f, i&) _|
|000025e0| 4f 70 6c 44 62 06 67 41 | 73 73 69 67 6e 73 20 74 |OplDb.gA|ssigns t|
|000025f0| 68 65 20 76 61 6c 75 65 | 20 6f 66 20 66 20 74 6f |he value| of f to|
|00002600| 20 74 68 65 20 69 26 74 | 68 20 66 69 65 6c 64 20 | the i&t|h field |
|00002610| 69 6e 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 64 |in the c|urrent d|
|00002620| 61 74 61 62 61 73 65 2e | 20 54 68 65 20 66 69 65 |atabase.| The fie|
|00002630| 6c 64 20 6d 75 73 74 20 | 62 65 20 61 6e 20 4f 50 |ld must |be an OP|
|00002640| 4c 20 72 65 61 6c 20 66 | 69 65 6c 64 2e 06 1b 1c |L real f|ield....|
|00002650| 4f 44 62 50 75 74 52 65 | 61 6c 33 32 3a 28 66 2c |ODbPutRe|al32:(f,|
|00002660| 20 69 26 29 20 5f 4f 70 | 6c 44 62 06 72 41 73 73 | i&) _Op|lDb.rAss|
|00002670| 69 67 6e 73 20 74 68 65 | 20 76 61 6c 75 65 20 6f |igns the| value o|
|00002680| 66 20 66 20 74 6f 20 74 | 68 65 20 69 26 74 68 20 |f f to t|he i&th |
|00002690| 66 69 65 6c 64 20 69 6e | 20 74 68 65 20 63 75 72 |field in| the cur|
|000026a0| 72 65 6e 74 20 64 61 74 | 61 62 61 73 65 2e 20 20 |rent dat|abase.  |
|000026b0| 54 68 65 20 66 69 65 6c | 64 20 6d 75 73 74 20 62 |The fiel|d must b|
|000026c0| 65 20 61 20 73 68 6f 72 | 74 20 72 65 61 6c 20 66 |e a shor|t real f|
|000026d0| 69 65 6c 64 20 28 74 79 | 70 65 20 38 29 2e 06 1b |ield (ty|pe 8)...|
|000026e0| 1c 4f 44 62 50 75 74 57 | 6f 72 64 3a 28 6e 6f 26 |.ODbPutW|ord:(no&|
|000026f0| 2c 20 69 26 29 20 5f 4f | 70 6c 44 62 06 85 41 73 |, i&) _O|plDb..As|
|00002700| 73 69 67 6e 73 20 74 68 | 65 20 76 61 6c 75 65 20 |signs th|e value |
|00002710| 6f 66 20 6e 6f 26 20 74 | 6f 20 74 68 65 20 69 26 |of no& t|o the i&|
|00002720| 74 68 20 66 69 65 6c 64 | 20 69 6e 20 74 68 65 20 |th field| in the |
|00002730| 63 75 72 72 65 6e 74 20 | 64 61 74 61 62 61 73 65 |current |database|
|00002740| 2e 20 20 54 68 65 20 66 | 69 65 6c 64 20 6d 75 73 |.  The f|ield mus|
|00002750| 74 20 62 65 20 61 6e 20 | 75 6e 73 69 67 6e 65 64 |t be an |unsigned|
|00002760| 20 69 6e 74 65 67 65 72 | 20 66 69 65 6c 64 20 28 | integer| field (|
|00002770| 74 79 70 65 73 20 30 2c | 20 32 2c 20 34 2c 20 36 |types 0,| 2, 4, 6|
|00002780| 29 2e 06 1b 23 4f 44 62 | 50 75 74 44 61 74 65 54 |)...#ODb|PutDateT|
|00002790| 69 6d 65 3a 28 64 74 69 | 6d 65 26 2c 20 69 26 29 |ime:(dti|me&, i&)|
|000027a0| 20 5f 4f 70 6c 44 62 06 | 8a 41 73 73 69 67 6e 73 | _OplDb.|.Assigns|
|000027b0| 20 74 68 65 20 76 61 6c | 75 65 20 6f 66 20 74 68 | the val|ue of th|
|000027c0| 65 20 44 61 74 65 54 69 | 6d 65 20 6f 62 6a 65 63 |e DateTi|me objec|
|000027d0| 74 20 64 74 69 6d 65 26 | 20 74 6f 20 74 68 65 20 |t dtime&| to the |
|000027e0| 69 26 74 68 20 66 69 65 | 6c 64 20 69 6e 20 74 68 |i&th fie|ld in th|
|000027f0| 65 20 63 75 72 72 65 6e | 74 20 64 61 74 61 62 61 |e curren|t databa|
|00002800| 73 65 2e 20 20 54 68 65 | 20 66 69 65 6c 64 20 6d |se.  The| field m|
|00002810| 75 73 74 20 62 65 20 61 | 20 64 61 74 65 74 69 6d |ust be a| datetim|
|00002820| 65 20 66 69 65 6c 64 20 | 28 74 79 70 65 20 31 30 |e field |(type 10|
|00002830| 29 2e 06 1b 29 4f 44 62 | 50 75 74 4c 6f 6e 67 3a |)...)ODb|PutLong:|
|00002840| 28 62 75 66 66 65 72 26 | 2c 20 6c 65 6e 67 74 68 |(buffer&|, length|
|00002850| 26 2c 20 69 26 29 20 5f | 4f 70 6c 44 62 06 8d 41 |&, i&) _|OplDb..A|
|00002860| 73 73 69 67 6e 73 20 74 | 68 65 20 63 6f 6e 74 65 |ssigns t|he conte|
|00002870| 6e 74 73 20 6f 66 20 74 | 68 65 20 62 75 66 66 65 |nts of t|he buffe|
|00002880| 72 26 20 6f 66 20 6c 65 | 6e 67 74 68 26 20 74 6f |r& of le|ngth& to|
|00002890| 20 74 68 65 20 69 26 74 | 68 20 66 69 65 6c 64 20 | the i&t|h field |
|000028a0| 69 6e 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 64 |in the c|urrent d|
|000028b0| 61 74 61 62 61 73 65 2e | 20 20 54 68 65 20 66 69 |atabase.|  The fi|
|000028c0| 65 6c 64 20 6d 75 73 74 | 20 62 65 20 61 20 6c 6f |eld must| be a lo|
|000028d0| 6e 67 20 66 69 65 6c 64 | 20 28 74 79 70 65 20 31 |ng field| (type 1|
|000028e0| 34 2c 20 31 35 2c 20 31 | 36 29 2e 06 6b 29 4f 44 |4, 15, 1|6)..k)OD|
|000028f0| 62 46 69 6e 64 57 68 65 | 72 65 25 3a 28 73 71 6c |bFindWhe|re%:(sql|
|00002900| 53 74 72 69 6e 67 24 2c | 20 66 6c 61 67 25 29 20 |String$,| flag%) |
|00002910| 5f 4f 70 6c 44 62 06 10 | 00 00 00 46 01 00 00 45 |_OplDb..|...F...E|
|00002920| 04 00 00 00 00 00 02 01 | 00 00 00 00 00 00 00 00 |........|........|
|00002930| 00 00 00 02 00 00 00 0f | 00 00 00 07 f0 00 00 00 |........|........|
|00002940| 0a 00 00 00 00 16 d0 02 | 00 00 00 00 00 00 03 00 |........|........|
|00002950| 00 00 f5 00 00 00 02 01 | 00 00 00 02 50 00 00 00 |........|....P...|
|00002960| 01 00 00 00 00 7b 1d 4f | 44 62 55 73 65 3a 28 6c |.....{.O|DbUse:(l|
|00002970| 6f 67 69 63 61 6c 4e 61 | 6d 65 26 29 20 5f 4f 70 |ogicalNa|me&) _Op|
|00002980| 6c 44 62 06 9a 45 71 75 | 69 76 61 6c 65 6e 74 20 |lDb..Equ|ivalent |
|00002990| 74 6f 20 74 68 65 20 4f | 50 4c 20 63 6f 6d 6d 61 |to the O|PL comma|
|000029a0| 6e 64 20 55 53 45 2c 20 | 62 75 74 20 74 61 6b 65 |nd USE, |but take|
|000029b0| 73 20 61 20 6e 75 6d 62 | 65 72 20 66 72 6f 6d 20 |s a numb|er from |
|000029c0| 30 20 74 6f 20 32 35 20 | 69 6e 73 74 65 61 64 20 |0 to 25 |instead |
|000029d0| 6f 66 20 61 20 6c 65 74 | 74 65 72 20 66 72 6f 6d |of a let|ter from|
|000029e0| 20 41 2d 5a 20 61 73 20 | 61 6e 20 61 72 67 75 6d | A-Z as |an argum|
|000029f0| 65 6e 74 2e 06 06 53 6f | 3a 06 20 20 55 53 45 20 |ent...So|:.  USE |
|00002a00| 43 06 69 73 20 69 64 65 | 6e 74 69 63 61 6c 20 74 |C.is ide|ntical t|
|00002a10| 6f 06 20 20 4f 44 62 55 | 73 65 3a 28 32 29 06 54 |o.  ODbU|se:(2).T|
|00002a20| 04 00 00 00 00 00 02 01 | 00 00 00 00 00 00 00 00 |........|........|
|00002a30| 00 00 00 02 00 00 00 0f | 00 00 00 07 f0 00 00 00 |........|........|
|00002a40| 0a 00 00 00 00 16 d0 02 | 00 00 00 00 00 00 06 00 |........|........|
|00002a50| 00 00 70 00 00 00 02 01 | 00 00 00 02 04 00 00 00 |..p.....|........|
|00002a60| 02 08 00 00 00 02 10 00 | 00 00 02 0d 00 00 00 01 |........|........|
|00002a70| 00 00 00 00 5c 80 06 00 | 00 00 00 00 00 00 10 00 |....\...|........|
|00002a80| 00 00 00 00 00 00 00 00 | 3d 00 00 00 00 c0 11 00 |........|=.......|
|00002a90| 00 00 ea 1f 00 00 00 0b | 00 00 00 00 1a 00 00 00 |........|........|
|00002aa0| 00 79 00 00 00 00 da 00 | 00 00 00 9c 01 00 00 00 |.y......|........|
|00002ab0| d9 01 00 00 00 05 05 00 | 00 00 f2 0a 00 00 00 69 |........|.......i|
|00002ac0| 10 00 00 00 f9 1f 00 00 | 00 87 1d 00 00 00 a2 1e |........|........|
|00002ad0| 00 00 06 40 01 46 02 02 | 02 00 29 40 0a 89 00 00 |...@.F..|..)@....|
|00002ae0| 10 05 00 00 00 2e 01 00 | 10 07 00 00 00 31 01 00 |........|.....1..|
|00002af0| 10 08 00 00 00 32 01 00 | 10 09 00 00 00 37 01 00 |.....2..|.....7..|
|00002b00| 10 11 00 00 00 61 80 06 | 00 00 00 00 00 00 00 11 |.....a..|........|
|00002b10| 00 00 00 00 00 00 00 00 | 00 3d 00 00 00 00 c0 11 |........|.=......|
|00002b20| 00 00 00 ea 1f 00 00 00 | 0b 00 00 00 00 4e 28 00 |........|.....N(.|
|00002b30| 00 00 79 00 00 00 00 da | 00 00 00 00 9c 01 00 00 |..y.....|........|
|00002b40| 00 d9 01 00 00 00 05 05 | 00 00 00 f2 0a 00 00 00 |........|........|
|00002b50| 69 10 00 00 00 f9 1f 00 | 00 00 87 1d 00 00 00 a2 |i.......|........|
|00002b60| 1e 00 00 00 46 28 00 00 | 63 40 02 00 00 00 01 00 |....F(..|c@......|
|00002b70| 00 00 09 00 00 00 00 00 | 00 00 00 02 1a 54 61 62 |........|.....Tab|
|00002b80| 6c 65 31 0a 00 00 00 04 | 16 4e 61 6d 65 3a 0e 09 |le1.....|.Name:..|
|00002b90| 00 00 00 ff ff ff ff 00 | 00 01 00 04 00 02 00 9c |........|........|
|00002ba0| ff ff ff 64 00 00 00 32 | 44 65 73 63 72 69 70 74 |...d...2|Descript|
|00002bb0| 69 6f 6e 3a 0e 0a 00 00 | 00 ff ff ff ff 00 00 01 |ion:....|........|
|00002bc0| 00 04 00 02 00 9c ff ff | ff 64 00 00 00 c0 40 04 |........|.d....@.|
|00002bd0| 01 00 09 00 00 00 00 00 | 01 02 00 0a 00 00 00 01 |........|........|
|00002be0| 00 01 02 02 4f 00 00 10 | 00 00 00 00 00 00 00 00 |....O...|........|
|00002bf0| 00 00 00 00 02 4f 00 00 | 10 00 00 00 00 00 00 00 |.....O..|........|
|00002c00| 00 00 00 00 00 ff ff 04 | 01 00 09 00 00 00 00 00 |........|........|
|00002c10| 01 02 00 0a 00 00 00 01 | 00 01 02 02 4f 00 00 10 |........|....O...|
|00002c20| 00 00 00 00 29 00 00 00 | 19 00 00 00 1a 00 00 00 |....)...|........|
|00002c30| 1b 00 21 00 20 00 1c b3 | 00 00 00 1d 00 1e 00 1f |..!. ...|........|
|00002c40| 00 22 08 43 6f 75 72 69 | 65 72 02 18 00 24 00 23 |.".Couri|er...$.#|
|00002c50| 03 00 00 00 00 02 4f 00 | 00 10 00 00 00 00 27 00 |......O.|......'.|
|00002c60| 00 00 19 00 00 00 1a 00 | 00 00 1b 00 21 00 20 00 |........|....!. .|
|00002c70| 1c b4 00 00 00 1d 00 1e | 00 1f 00 22 06 41 72 69 |........|...".Ari|
|00002c80| 61 6c 00 18 00 24 00 23 | 03 00 00 00 00 ff ff 61 |al...$.#|.......a|
|00002c90| 80 06 00 00 00 00 00 00 | 00 11 00 00 00 00 00 00 |........|........|
|00002ca0| 00 00 00 3d 00 00 00 00 | c0 11 00 00 00 ea 1f 00 |...=....|........|
|00002cb0| 00 00 0b 00 00 00 00 4e | 28 00 00 00 dc 28 00 00 |.......N|(....(..|
|00002cc0| 00 41 29 00 00 00 9c 01 | 00 00 00 d9 01 00 00 00 |.A).....|........|
|00002cd0| 05 05 00 00 00 f2 0a 00 | 00 00 69 10 00 00 00 f9 |........|..i.....|
|00002ce0| 1f 00 00 00 87 1d 00 00 | 00 a2 1e 00 00 00 46 28 |........|......F(|
|00002cf0| 00 00 3b 40 4f 06 26 00 | 01 00 00 80 00 00 00 00 |..;@O.&.|........|
|00002d00| ff ff ff 7f 01 00 00 00 | e4 00 00 00 00 59 07 00 |........|.....Y..|
|00002d10| 00 00 00 00 0f 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002d20| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff ff 06 |........|........|
|00002d30| 40 05 46 02 02 02 00 61 | 80 06 00 00 00 00 00 00 |@.F....a|........|
|00002d40| 00 11 00 00 00 00 00 00 | 00 00 00 3d 00 00 00 00 |........|...=....|
|00002d50| c0 11 00 00 00 ea 1f 00 | 00 00 0b 00 00 00 00 4e |........|.......N|
|00002d60| 28 00 00 00 dc 28 00 00 | 00 41 29 00 00 00 66 2a |(....(..|.A)...f*|
|00002d70| 00 00 00 d9 01 00 00 00 | 05 05 00 00 00 f2 0a 00 |........|........|
|00002d80| 00 00 69 10 00 00 00 f9 | 1f 00 00 00 87 1d 00 00 |..i.....|........|
|00002d90| 00 a2 1e 00 00 00 a3 2a | 00 00 0d 40 03 00 00 00 |.......*|...@....|
|00002da0| ed 00 00 00 3a 00 00 00 | 00 73 49 00 00 00 00 ff |....:...|.sI.....|
|00002db0| 1f 39 04 66 92 09 04 71 | 02 11 02 45 02 91 02 c1 |.9.f...q|...E....|
|00002dc0| 02 e5 02 f2 3d 04 11 06 | 1b 23 4f 44 62 47 65 74 |....=...|.#ODbGet|
|00002dd0| 44 61 74 65 54 69 6d 65 | 3a 28 64 74 69 6d 65 26 |DateTime|:(dtime&|
|00002de0| 2c 20 69 26 29 20 5f 4f | 70 6c 44 62 06 e8 47 65 |, i&) _O|plDb..Ge|
|00002df0| 74 20 74 68 65 20 63 6f | 6e 74 65 6e 74 73 20 6f |t the co|ntents o|
|00002e00| 66 20 74 68 65 20 69 26 | 20 66 69 65 6c 64 20 69 |f the i&| field i|
|00002e10| 6e 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 64 61 |n the cu|rrent da|
|00002e20| 74 61 62 61 73 65 2c 20 | 61 6e 64 20 70 6c 61 63 |tabase, |and plac|
|00002e30| 65 20 69 74 20 69 6e 20 | 74 68 65 20 64 61 74 65 |e it in |the date|
|00002e40| 74 69 6d 65 20 6f 62 6a | 65 63 74 20 64 74 69 6d |time obj|ect dtim|
|00002e50| 65 26 20 28 77 68 69 63 | 68 20 6d 75 73 74 20 68 |e& (whic|h must h|
|00002e60| 61 76 65 20 62 65 65 6e | 20 63 72 65 61 74 65 64 |ave been| created|
|00002e70| 20 75 73 69 6e 67 20 44 | 54 4e 65 77 44 61 74 65 | using D|TNewDate|
|00002e80| 54 69 6d 65 26 3a 20 6f | 72 20 44 54 4e 6f 77 26 |Time&: o|r DTNow&|
|00002e90| 3a 20 66 72 6f 6d 20 74 | 68 65 20 44 61 74 65 2e |: from t|he Date.|
|00002ea0| 6f 70 78 29 2e 20 20 54 | 68 65 20 66 69 65 6c 64 |opx).  T|he field|
|00002eb0| 20 6d 75 73 74 20 62 65 | 20 61 20 64 61 74 65 2f | must be| a date/|
|00002ec0| 74 69 6d 65 20 66 69 65 | 6c 64 20 28 74 79 70 65 |time fie|ld (type|
|00002ed0| 20 31 30 29 2e 06 0b 29 | 4f 44 62 47 65 74 4c 6f | 10)...)|ODbGetLo|
|00002ee0| 6e 67 3a 28 62 75 66 66 | 65 72 26 2c 20 6c 65 6e |ng:(buff|er&, len|
|00002ef0| 67 74 68 26 2c 20 69 26 | 29 20 5f 4f 70 6c 44 62 |gth&, i&|) _OplDb|
|00002f00| 06 0f 00 00 00 19 01 00 | 00 1b 18 4f 44 62 50 75 |........|...ODbPu|
|00002f10| 74 45 6d 70 74 79 3a 28 | 69 26 29 20 5f 4f 70 6c |tEmpty:(|i&) _Opl|
|00002f20| 44 62 06 2e 4d 61 6b 65 | 73 20 66 69 65 6c 64 20 |Db..Make|s field |
|00002f30| 69 26 20 69 6e 20 74 68 | 65 20 63 75 72 72 65 6e |i& in th|e curren|
|00002f40| 74 20 64 61 74 61 62 61 | 73 65 20 65 6d 70 74 79 |t databa|se empty|
|00002f50| 2e 06 1b 22 4f 44 62 50 | 75 74 53 74 72 69 6e 67 |..."ODbP|utString|
|00002f60| 3a 28 73 74 72 69 6e 67 | 24 2c 20 69 26 29 20 5f |:(string|$, i&) _|
|00002f70| 4f 70 6c 44 62 06 dd 41 | 73 73 69 67 6e 73 20 74 |OplDb..A|ssigns t|
|00002f80| 68 65 20 76 61 6c 75 65 | 20 6f 66 20 73 74 72 69 |he value| of stri|
|00002f90| 6e 67 24 20 74 6f 20 74 | 68 65 20 69 26 74 68 20 |ng$ to t|he i&th |
|00002fa0| 66 69 65 6c 64 20 69 6e | 20 74 68 65 20 63 75 72 |field in| the cur|
|00002fb0| 72 65 6e 74 20 64 61 74 | 61 62 61 73 65 2e 20 20 |rent dat|abase.  |
|00002fc0| 54 68 69 73 20 77 6f 75 | 6c 64 20 6e 6f 72 6d 61 |This wou|ld norma|
|00002fd0| 6c 6c 79 20 62 65 20 75 | 73 65 64 20 66 6f 72 20 |lly be u|sed for |
|00002fe0| 73 74 72 69 6e 67 20 6f | 72 20 62 69 6e 61 72 79 |string o|r binary|
|00002ff0| 20 66 69 65 6c 64 73 2c | 20 6f 72 20 66 6f 72 20 | fields,| or for |
|00003000| 6c 6f 6e 67 20 74 65 78 | 74 20 6f 72 20 6c 6f 6e |long tex|t or lon|
|00003010| 67 20 62 69 6e 61 72 79 | 20 66 69 65 6c 64 73 2c |g binary| fields,|
|00003020| 20 62 75 74 20 69 74 20 | 63 61 6e 20 61 63 74 75 | but it |can actu|
|00003030| 61 6c 6c 79 20 62 65 20 | 75 73 65 64 20 66 6f 72 |ally be |used for|
|00003040| 20 61 6e 79 20 74 79 70 | 65 20 6f 66 20 66 69 65 | any typ|e of fie|
|00003050| 6c 64 2e 06 1b 1b 4f 44 | 62 50 75 74 49 6e 74 3a |ld....OD|bPutInt:|
|00003060| 28 6e 6f 26 2c 20 69 26 | 29 20 5f 4f 70 6c 44 62 |(no&, i&|) _OplDb|
|00003070| 06 7e 41 73 73 69 67 6e | 73 20 74 68 65 20 76 61 |.~Assign|s the va|
|00003080| 6c 75 65 20 6f 66 20 6e | 6f 26 20 74 6f 20 74 68 |lue of n|o& to th|
|00003090| 65 20 69 26 74 68 20 66 | 69 65 6c 64 20 69 6e 20 |e i&th f|ield in |
|000030a0| 74 68 65 20 63 75 72 72 | 65 6e 74 20 64 61 74 61 |the curr|ent data|
|000030b0| 62 61 73 65 2e 20 54 68 | 65 20 66 69 65 6c 64 20 |base. Th|e field |
|000030c0| 6d 75 73 74 20 62 65 20 | 61 20 73 69 67 6e 65 64 |must be |a signed|
|000030d0| 20 69 6e 74 65 67 65 72 | 20 66 69 65 6c 64 20 28 | integer| field (|
|000030e0| 74 79 70 65 73 20 31 2c | 20 33 2c 20 35 29 2e 06 |types 1,| 3, 5)..|
|000030f0| 1b 1a 4f 44 62 50 75 74 | 52 65 61 6c 3a 28 66 2c |..ODbPut|Real:(f,|
|00003100| 20 69 26 29 20 5f 4f 70 | 6c 44 62 06 67 41 73 73 | i&) _Op|lDb.gAss|
|00003110| 69 67 6e 73 20 74 68 65 | 20 76 61 6c 75 65 20 6f |igns the| value o|
|00003120| 66 20 66 20 74 6f 20 74 | 68 65 20 69 26 74 68 20 |f f to t|he i&th |
|00003130| 66 69 65 6c 64 20 69 6e | 20 74 68 65 20 63 75 72 |field in| the cur|
|00003140| 72 65 6e 74 20 64 61 74 | 61 62 61 73 65 2e 20 54 |rent dat|abase. T|
|00003150| 68 65 20 66 69 65 6c 64 | 20 6d 75 73 74 20 62 65 |he field| must be|
|00003160| 20 61 6e 20 4f 50 4c 20 | 72 65 61 6c 20 66 69 65 | an OPL |real fie|
|00003170| 6c 64 2e 06 1b 1c 4f 44 | 62 50 75 74 52 65 61 6c |ld....OD|bPutReal|
|00003180| 33 32 3a 28 66 2c 20 69 | 26 29 20 5f 4f 70 6c 44 |32:(f, i|&) _OplD|
|00003190| 62 06 72 41 73 73 69 67 | 6e 73 20 74 68 65 20 76 |b.rAssig|ns the v|
|000031a0| 61 6c 75 65 20 6f 66 20 | 66 20 74 6f 20 74 68 65 |alue of |f to the|
|000031b0| 20 69 26 74 68 20 66 69 | 65 6c 64 20 69 6e 20 74 | i&th fi|eld in t|
|000031c0| 68 65 20 63 75 72 72 65 | 6e 74 20 64 61 74 61 62 |he curre|nt datab|
|000031d0| 61 73 65 2e 20 20 54 68 | 65 20 66 69 65 6c 64 20 |ase.  Th|e field |
|000031e0| 6d 75 73 74 20 62 65 20 | 61 20 73 68 6f 72 74 20 |must be |a short |
|000031f0| 72 65 61 6c 20 66 69 65 | 6c 64 20 28 74 79 70 65 |real fie|ld (type|
|00003200| 20 38 29 2e 06 1b 1c 4f | 44 62 50 75 74 57 6f 72 | 8)....O|DbPutWor|
|00003210| 64 3a 28 6e 6f 26 2c 20 | 69 26 29 20 5f 4f 70 6c |d:(no&, |i&) _Opl|
|00003220| 44 62 06 85 41 73 73 69 | 67 6e 73 20 74 68 65 20 |Db..Assi|gns the |
|00003230| 76 61 6c 75 65 20 6f 66 | 20 6e 6f 26 20 74 6f 20 |value of| no& to |
|00003240| 74 68 65 20 69 26 74 68 | 20 66 69 65 6c 64 20 69 |the i&th| field i|
|00003250| 6e 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 64 61 |n the cu|rrent da|
|00003260| 74 61 62 61 73 65 2e 20 | 20 54 68 65 20 66 69 65 |tabase. | The fie|
|00003270| 6c 64 20 6d 75 73 74 20 | 62 65 20 61 6e 20 75 6e |ld must |be an un|
|00003280| 73 69 67 6e 65 64 20 69 | 6e 74 65 67 65 72 20 66 |signed i|nteger f|
|00003290| 69 65 6c 64 20 28 74 79 | 70 65 73 20 30 2c 20 32 |ield (ty|pes 0, 2|
|000032a0| 2c 20 34 2c 20 36 29 2e | 06 1b 23 4f 44 62 50 75 |, 4, 6).|..#ODbPu|
|000032b0| 74 44 61 74 65 54 69 6d | 65 3a 28 64 74 69 6d 65 |tDateTim|e:(dtime|
|000032c0| 26 2c 20 69 26 29 20 5f | 4f 70 6c 44 62 06 8a 41 |&, i&) _|OplDb..A|
|000032d0| 73 73 69 67 6e 73 20 74 | 68 65 20 76 61 6c 75 65 |ssigns t|he value|
|000032e0| 20 6f 66 20 74 68 65 20 | 44 61 74 65 54 69 6d 65 | of the |DateTime|
|000032f0| 20 6f 62 6a 65 63 74 20 | 64 74 69 6d 65 26 20 74 | object |dtime& t|
|00003300| 6f 20 74 68 65 20 69 26 | 74 68 20 66 69 65 6c 64 |o the i&|th field|
|00003310| 20 69 6e 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 | in the |current |
|00003320| 64 61 74 61 62 61 73 65 | 2e 20 20 54 68 65 20 66 |database|.  The f|
|00003330| 69 65 6c 64 20 6d 75 73 | 74 20 62 65 20 61 20 64 |ield mus|t be a d|
|00003340| 61 74 65 74 69 6d 65 20 | 66 69 65 6c 64 20 28 74 |atetime |field (t|
|00003350| 79 70 65 20 31 30 29 2e | 06 1b 29 4f 44 62 50 75 |ype 10).|..)ODbPu|
|00003360| 74 4c 6f 6e 67 3a 28 62 | 75 66 66 65 72 26 2c 20 |tLong:(b|uffer&, |
|00003370| 6c 65 6e 67 74 68 26 2c | 20 69 26 29 20 5f 4f 70 |length&,| i&) _Op|
|00003380| 6c 44 62 06 8d 41 73 73 | 69 67 6e 73 20 74 68 65 |lDb..Ass|igns the|
|00003390| 20 63 6f 6e 74 65 6e 74 | 73 20 6f 66 20 74 68 65 | content|s of the|
|000033a0| 20 62 75 66 66 65 72 26 | 20 6f 66 20 6c 65 6e 67 | buffer&| of leng|
|000033b0| 74 68 26 20 74 6f 20 74 | 68 65 20 69 26 74 68 20 |th& to t|he i&th |
|000033c0| 66 69 65 6c 64 20 69 6e | 20 74 68 65 20 63 75 72 |field in| the cur|
|000033d0| 72 65 6e 74 20 64 61 74 | 61 62 61 73 65 2e 20 20 |rent dat|abase.  |
|000033e0| 54 68 65 20 66 69 65 6c | 64 20 6d 75 73 74 20 62 |The fiel|d must b|
|000033f0| 65 20 61 20 6c 6f 6e 67 | 20 66 69 65 6c 64 20 28 |e a long| field (|
|00003400| 74 79 70 65 20 31 34 2c | 20 31 35 2c 20 31 36 29 |type 14,| 15, 16)|
|00003410| 2e 06 6b 29 4f 44 62 46 | 69 6e 64 57 68 65 72 65 |..k)ODbF|indWhere|
|00003420| 25 3a 28 73 71 6c 53 74 | 72 69 6e 67 24 2c 20 66 |%:(sqlSt|ring$, f|
|00003430| 6c 61 67 25 29 20 5f 4f | 70 6c 44 62 06 10 00 00 |lag%) _O|plDb....|
|00003440| 00 46 01 00 00 45 04 00 | 00 00 00 00 02 01 00 00 |.F...E..|........|
|00003450| 00 00 00 00 00 00 00 00 | 00 02 00 00 00 0f 00 00 |........|........|
|00003460| 00 07 f0 00 00 00 0a 00 | 00 00 00 16 d0 02 00 00 |........|........|
|00003470| 00 00 00 00 03 00 00 00 | f5 00 00 00 02 01 00 00 |........|........|
|00003480| 00 02 50 00 00 00 01 00 | 00 00 00 7b 1d 4f 44 62 |..P.....|...{.ODb|
|00003490| 55 73 65 3a 28 6c 6f 67 | 69 63 61 6c 4e 61 6d 65 |Use:(log|icalName|
|000034a0| 26 29 20 5f 4f 70 6c 44 | 62 06 9a 45 71 75 69 76 |&) _OplD|b..Equiv|
|000034b0| 61 6c 65 6e 74 20 74 6f | 20 74 68 65 20 4f 50 4c |alent to| the OPL|
|000034c0| 20 63 6f 6d 6d 61 6e 64 | 20 55 53 45 2c 20 62 75 | command| USE, bu|
|000034d0| 74 20 74 61 6b 65 73 20 | 61 20 6e 75 6d 62 65 72 |t takes |a number|
|000034e0| 20 66 72 6f 6d 20 30 20 | 74 6f 20 32 35 20 69 6e | from 0 |to 25 in|
|000034f0| 73 74 65 61 64 20 6f 66 | 20 61 20 6c 65 74 74 65 |stead of| a lette|
|00003500| 72 20 66 72 6f 6d 20 41 | 2d 5a 20 61 73 20 61 6e |r from A|-Z as an|
|00003510| 20 61 72 67 75 6d 65 6e | 74 2e 06 06 53 6f 3a 06 | argumen|t...So:.|
|00003520| 20 20 55 53 45 20 43 06 | 69 73 20 69 64 65 6e 74 |  USE C.|is ident|
|00003530| 69 63 61 6c 20 74 6f 06 | 20 20 4f 44 62 55 73 65 |ical to.|  ODbUse|
|00003540| 3a 28 32 29 06 54 04 00 | 00 00 00 00 02 01 00 00 |:(2).T..|........|
|00003550| 00 00 00 00 00 00 00 00 | 00 02 00 00 00 0f 00 00 |........|........|
|00003560| 00 07 f0 00 00 00 0a 00 | 00 00 00 16 d0 02 00 00 |........|........|
|00003570| 00 00 00 00 06 00 00 00 | 70 00 00 00 02 01 00 00 |........|p.......|
|00003580| 00 02 04 00 00 00 02 08 | 00 00 00 02 10 00 00 00 |........|........|
|00003590| 02 0d 00 00 00 01 00 00 | 00 00 7b 23 53 79 6e 74 |........|..{#Synt|
|000035a0| 61 78 20 6f 66 20 4f 50 | 58 2d 66 69 6c 65 73 20 |ax of OP|X-files |
|000035b0| 6e 6f 74 20 66 72 6f 6d | 20 50 73 69 6f 6e 06 f5 |not from| Psion..|
|000035c0| 76 73 20 31 20 30 31 2d | 30 38 2d 39 38 06 43 75 |vs 1 01-|08-98.Cu|
|000035d0| 72 72 65 6e 74 6c 79 20 | 63 6f 76 65 72 73 20 6f |rrently |covers o|
|000035e0| 6e 6c 79 20 4f 70 6c 44 | 62 2e 06 46 6f 72 20 61 |nly OplD|b..For a|
|000035f0| 76 61 69 6c 61 62 69 6c | 69 74 79 20 6f 66 20 4f |vailabil|ity of O|
|00003600| 50 58 2d 66 69 6c 65 73 | 20 73 65 65 06 68 74 74 |PX-files| see.htt|
|00003610| 70 3a 2f 2f 77 77 77 2e | 6d 63 61 6c 65 65 6c 79 |p://www.|mcaleely|
|00003620| 2e 63 6f 6d 2f 70 73 69 | 6f 6e 2f 4f 50 58 2f 06 |.com/psi|on/OPX/.|
|00003630| 54 68 69 73 20 66 69 6c | 65 20 69 73 20 61 76 61 |This fil|e is ava|
|00003640| 69 6c 61 62 6c 65 2c 20 | 61 6c 6f 6e 67 20 77 69 |ilable, |along wi|
|00003650| 74 68 20 6f 74 68 65 72 | 20 64 6f 63 20 69 6e 20 |th other| doc in |
|00003660| 44 41 54 41 2c 20 61 74 | 06 68 74 74 70 3a 2f 2f |DATA, at|.http://|
|00003670| 77 77 77 2e 6b 6e 6f 77 | 61 72 65 2e 6e 6c 2f 75 |www.know|are.nl/u|
|00003680| 73 65 72 73 2f 77 73 6d | 6f 75 74 2f 73 35 64 6f |sers/wsm|out/s5do|
|00003690| 63 2e 68 74 6d 6c 06 63 | 6f 6d 6d 65 6e 74 73 20 |c.html.c|omments |
|000036a0| 74 6f 20 77 73 6d 6f 75 | 74 40 6b 6e 6f 77 61 72 |to wsmou|t@knowar|
|000036b0| 65 2e 6e 6c 06 68 04 00 | 00 00 00 00 02 01 00 00 |e.nl.h..|........|
|000036c0| 00 00 00 00 00 00 00 00 | 00 02 00 00 00 00 00 00 |........|........|
|000036d0| 00 02 00 00 00 1d 01 07 | 00 00 00 0e 00 00 00 01 |........|........|
|000036e0| 1d 00 00 00 01 22 00 00 | 00 02 23 00 00 00 00 00 |....."..|..#.....|
|000036f0| 00 00 00 02 00 00 00 39 | 00 00 00 01 2e 00 00 00 |.......9|........|
|00003700| 01 1e 00 00 00 01 02 00 | 00 00 00 22 00 00 00 02 |........|..."....|
|00003710| 00 00 00 1d 01 00 01 00 | 00 00 00 00 00 00 61 80 |........|......a.|
|00003720| 06 00 00 00 00 00 00 00 | 11 00 00 00 00 00 00 00 |........|........|
|00003730| 00 00 3d 00 00 00 00 c0 | 11 00 00 00 0e 2b 00 00 |..=.....|.....+..|
|00003740| 00 0b 00 00 00 00 4e 28 | 00 00 00 dc 28 00 00 00 |......N(|....(...|
|00003750| 41 29 00 00 00 66 2a 00 | 00 00 d9 01 00 00 00 05 |A)...f*.|........|
|00003760| 05 00 00 00 f2 0a 00 00 | 00 69 10 00 00 00 1d 2b |........|.i.....+|
|00003770| 00 00 00 87 1d 00 00 00 | a2 1e 00 00 00 a3 2a 00 |........|......*.|
|00003780| 00 0d 40 03 00 00 00 ed | 00 00 00 3a 00 00 00 00 |..@.....|...:....|
|00003790| 74 49 00 00 00 00 ff 1f | 39 04 66 92 09 04 71 02 |tI......|9.f...q.|
|000037a0| 11 02 45 02 91 02 c1 02 | e5 02 f2 3d 04 15 06 1b |..E.....|...=....|
|000037b0| 23 4f 44 62 47 65 74 44 | 61 74 65 54 69 6d 65 3a |#ODbGetD|ateTime:|
|000037c0| 28 64 74 69 6d 65 26 2c | 20 69 26 29 20 5f 4f 70 |(dtime&,| i&) _Op|
|000037d0| 6c 44 62 06 e8 47 65 74 | 20 74 68 65 20 63 6f 6e |lDb..Get| the con|
|000037e0| 74 65 6e 74 73 20 6f 66 | 20 74 68 65 20 69 26 20 |tents of| the i& |
|000037f0| 66 69 65 6c 64 20 69 6e | 20 74 68 65 20 63 75 72 |field in| the cur|
|00003800| 72 65 6e 74 20 64 61 74 | 61 62 61 73 65 2c 20 61 |rent dat|abase, a|
|00003810| 6e 64 20 70 6c 61 63 65 | 20 69 74 20 69 6e 20 74 |nd place| it in t|
|00003820| 68 65 20 64 61 74 65 74 | 69 6d 65 20 6f 62 6a 65 |he datet|ime obje|
|00003830| 63 74 20 64 74 69 6d 65 | 26 20 28 77 68 69 63 68 |ct dtime|& (which|
|00003840| 20 6d 75 73 74 20 68 61 | 76 65 20 62 65 65 6e 20 | must ha|ve been |
|00003850| 63 72 65 61 74 65 64 20 | 75 73 69 6e 67 20 44 54 |created |using DT|
|00003860| 4e 65 77 44 61 74 65 54 | 69 6d 65 26 3a 20 6f 72 |NewDateT|ime&: or|
|00003870| 20 44 54 4e 6f 77 26 3a | 20 66 72 6f 6d 20 74 68 | DTNow&:| from th|
|00003880| 65 20 44 61 74 65 2e 6f | 70 78 29 2e 20 20 54 68 |e Date.o|px).  Th|
|00003890| 65 20 66 69 65 6c 64 20 | 6d 75 73 74 20 62 65 20 |e field |must be |
|000038a0| 61 20 64 61 74 65 2f 74 | 69 6d 65 20 66 69 65 6c |a date/t|ime fiel|
|000038b0| 64 20 28 74 79 70 65 20 | 31 30 29 2e 06 0b 29 4f |d (type |10)...)O|
|000038c0| 44 62 47 65 74 4c 6f 6e | 67 3a 28 62 75 66 66 65 |DbGetLon|g:(buffe|
|000038d0| 72 26 2c 20 6c 65 6e 67 | 74 68 26 2c 20 69 26 29 |r&, leng|th&, i&)|
|000038e0| 20 5f 4f 70 6c 44 62 06 | 0f 00 00 00 19 01 00 00 | _OplDb.|........|
|000038f0| 1b 18 4f 44 62 50 75 74 | 45 6d 70 74 79 3a 28 69 |..ODbPut|Empty:(i|
|00003900| 26 29 20 5f 4f 70 6c 44 | 62 06 2e 4d 61 6b 65 73 |&) _OplD|b..Makes|
|00003910| 20 66 69 65 6c 64 20 69 | 26 20 69 6e 20 74 68 65 | field i|& in the|
|00003920| 20 63 75 72 72 65 6e 74 | 20 64 61 74 61 62 61 73 | current| databas|
|00003930| 65 20 65 6d 70 74 79 2e | 06 1b 22 4f 44 62 50 75 |e empty.|.."ODbPu|
|00003940| 74 53 74 72 69 6e 67 3a | 28 73 74 72 69 6e 67 24 |tString:|(string$|
|00003950| 2c 20 69 26 29 20 5f 4f | 70 6c 44 62 06 dd 41 73 |, i&) _O|plDb..As|
|00003960| 73 69 67 6e 73 20 74 68 | 65 20 76 61 6c 75 65 20 |signs th|e value |
|00003970| 6f 66 20 73 74 72 69 6e | 67 24 20 74 6f 20 74 68 |of strin|g$ to th|
|00003980| 65 20 69 26 74 68 20 66 | 69 65 6c 64 20 69 6e 20 |e i&th f|ield in |
|00003990| 74 68 65 20 63 75 72 72 | 65 6e 74 20 64 61 74 61 |the curr|ent data|
|000039a0| 62 61 73 65 2e 20 20 54 | 68 69 73 20 77 6f 75 6c |base.  T|his woul|
|000039b0| 64 20 6e 6f 72 6d 61 6c | 6c 79 20 62 65 20 75 73 |d normal|ly be us|
|000039c0| 65 64 20 66 6f 72 20 73 | 74 72 69 6e 67 20 6f 72 |ed for s|tring or|
|000039d0| 20 62 69 6e 61 72 79 20 | 66 69 65 6c 64 73 2c 20 | binary |fields, |
|000039e0| 6f 72 20 66 6f 72 20 6c | 6f 6e 67 20 74 65 78 74 |or for l|ong text|
|000039f0| 20 6f 72 20 6c 6f 6e 67 | 20 62 69 6e 61 72 79 20 | or long| binary |
|00003a00| 66 69 65 6c 64 73 2c 20 | 62 75 74 20 69 74 20 63 |fields, |but it c|
|00003a10| 61 6e 20 61 63 74 75 61 | 6c 6c 79 20 62 65 20 75 |an actua|lly be u|
|00003a20| 73 65 64 20 66 6f 72 20 | 61 6e 79 20 74 79 70 65 |sed for |any type|
|00003a30| 20 6f 66 20 66 69 65 6c | 64 2e 06 1b 1b 4f 44 62 | of fiel|d....ODb|
|00003a40| 50 75 74 49 6e 74 3a 28 | 6e 6f 26 2c 20 69 26 29 |PutInt:(|no&, i&)|
|00003a50| 20 5f 4f 70 6c 44 62 06 | 7e 41 73 73 69 67 6e 73 | _OplDb.|~Assigns|
|00003a60| 20 74 68 65 20 76 61 6c | 75 65 20 6f 66 20 6e 6f | the val|ue of no|
|00003a70| 26 20 74 6f 20 74 68 65 | 20 69 26 74 68 20 66 69 |& to the| i&th fi|
|00003a80| 65 6c 64 20 69 6e 20 74 | 68 65 20 63 75 72 72 65 |eld in t|he curre|
|00003a90| 6e 74 20 64 61 74 61 62 | 61 73 65 2e 20 54 68 65 |nt datab|ase. The|
|00003aa0| 20 66 69 65 6c 64 20 6d | 75 73 74 20 62 65 20 61 | field m|ust be a|
|00003ab0| 20 73 69 67 6e 65 64 20 | 69 6e 74 65 67 65 72 20 | signed |integer |
|00003ac0| 66 69 65 6c 64 20 28 74 | 79 70 65 73 20 31 2c 20 |field (t|ypes 1, |
|00003ad0| 33 2c 20 35 29 2e 06 1b | 1a 4f 44 62 50 75 74 52 |3, 5)...|.ODbPutR|
|00003ae0| 65 61 6c 3a 28 66 2c 20 | 69 26 29 20 5f 4f 70 6c |eal:(f, |i&) _Opl|
|00003af0| 44 62 06 67 41 73 73 69 | 67 6e 73 20 74 68 65 20 |Db.gAssi|gns the |
|00003b00| 76 61 6c 75 65 20 6f 66 | 20 66 20 74 6f 20 74 68 |value of| f to th|
|00003b10| 65 20 69 26 74 68 20 66 | 69 65 6c 64 20 69 6e 20 |e i&th f|ield in |
|00003b20| 74 68 65 20 63 75 72 72 | 65 6e 74 20 64 61 74 61 |the curr|ent data|
|00003b30| 62 61 73 65 2e 20 54 68 | 65 20 66 69 65 6c 64 20 |base. Th|e field |
|00003b40| 6d 75 73 74 20 62 65 20 | 61 6e 20 4f 50 4c 20 72 |must be |an OPL r|
|00003b50| 65 61 6c 20 66 69 65 6c | 64 2e 06 1b 1c 4f 44 62 |eal fiel|d....ODb|
|00003b60| 50 75 74 52 65 61 6c 33 | 32 3a 28 66 2c 20 69 26 |PutReal3|2:(f, i&|
|00003b70| 29 20 5f 4f 70 6c 44 62 | 06 72 41 73 73 69 67 6e |) _OplDb|.rAssign|
|00003b80| 73 20 74 68 65 20 76 61 | 6c 75 65 20 6f 66 20 66 |s the va|lue of f|
|00003b90| 20 74 6f 20 74 68 65 20 | 69 26 74 68 20 66 69 65 | to the |i&th fie|
|00003ba0| 6c 64 20 69 6e 20 74 68 | 65 20 63 75 72 72 65 6e |ld in th|e curren|
|00003bb0| 74 20 64 61 74 61 62 61 | 73 65 2e 20 20 54 68 65 |t databa|se.  The|
|00003bc0| 20 66 69 65 6c 64 20 6d | 75 73 74 20 62 65 20 61 | field m|ust be a|
|00003bd0| 20 73 68 6f 72 74 20 72 | 65 61 6c 20 66 69 65 6c | short r|eal fiel|
|00003be0| 64 20 28 74 79 70 65 20 | 38 29 2e 06 1b 1c 4f 44 |d (type |8)....OD|
|00003bf0| 62 50 75 74 57 6f 72 64 | 3a 28 6e 6f 26 2c 20 69 |bPutWord|:(no&, i|
|00003c00| 26 29 20 5f 4f 70 6c 44 | 62 06 85 41 73 73 69 67 |&) _OplD|b..Assig|
|00003c10| 6e 73 20 74 68 65 20 76 | 61 6c 75 65 20 6f 66 20 |ns the v|alue of |
|00003c20| 6e 6f 26 20 74 6f 20 74 | 68 65 20 69 26 74 68 20 |no& to t|he i&th |
|00003c30| 66 69 65 6c 64 20 69 6e | 20 74 68 65 20 63 75 72 |field in| the cur|
|00003c40| 72 65 6e 74 20 64 61 74 | 61 62 61 73 65 2e 20 20 |rent dat|abase.  |
|00003c50| 54 68 65 20 66 69 65 6c | 64 20 6d 75 73 74 20 62 |The fiel|d must b|
|00003c60| 65 20 61 6e 20 75 6e 73 | 69 67 6e 65 64 20 69 6e |e an uns|igned in|
|00003c70| 74 65 67 65 72 20 66 69 | 65 6c 64 20 28 74 79 70 |teger fi|eld (typ|
|00003c80| 65 73 20 30 2c 20 32 2c | 20 34 2c 20 36 29 2e 06 |es 0, 2,| 4, 6)..|
|00003c90| 1b 23 4f 44 62 50 75 74 | 44 61 74 65 54 69 6d 65 |.#ODbPut|DateTime|
|00003ca0| 3a 28 64 74 69 6d 65 26 | 2c 20 69 26 29 20 5f 4f |:(dtime&|, i&) _O|
|00003cb0| 70 6c 44 62 06 8a 41 73 | 73 69 67 6e 73 20 74 68 |plDb..As|signs th|
|00003cc0| 65 20 76 61 6c 75 65 20 | 6f 66 20 74 68 65 20 44 |e value |of the D|
|00003cd0| 61 74 65 54 69 6d 65 20 | 6f 62 6a 65 63 74 20 64 |ateTime |object d|
|00003ce0| 74 69 6d 65 26 20 74 6f | 20 74 68 65 20 69 26 74 |time& to| the i&t|
|00003cf0| 68 20 66 69 65 6c 64 20 | 69 6e 20 74 68 65 20 63 |h field |in the c|
|00003d00| 75 72 72 65 6e 74 20 64 | 61 74 61 62 61 73 65 2e |urrent d|atabase.|
|00003d10| 20 20 54 68 65 20 66 69 | 65 6c 64 20 6d 75 73 74 |  The fi|eld must|
|00003d20| 20 62 65 20 61 20 64 61 | 74 65 74 69 6d 65 20 66 | be a da|tetime f|
|00003d30| 69 65 6c 64 20 28 74 79 | 70 65 20 31 30 29 2e 06 |ield (ty|pe 10)..|
|00003d40| 1b 29 4f 44 62 50 75 74 | 4c 6f 6e 67 3a 28 62 75 |.)ODbPut|Long:(bu|
|00003d50| 66 66 65 72 26 2c 20 6c | 65 6e 67 74 68 26 2c 20 |ffer&, l|ength&, |
|00003d60| 69 26 29 20 5f 4f 70 6c | 44 62 06 8d 41 73 73 69 |i&) _Opl|Db..Assi|
|00003d70| 67 6e 73 20 74 68 65 20 | 63 6f 6e 74 65 6e 74 73 |gns the |contents|
|00003d80| 20 6f 66 20 74 68 65 20 | 62 75 66 66 65 72 26 20 | of the |buffer& |
|00003d90| 6f 66 20 6c 65 6e 67 74 | 68 26 20 74 6f 20 74 68 |of lengt|h& to th|
|00003da0| 65 20 69 26 74 68 20 66 | 69 65 6c 64 20 69 6e 20 |e i&th f|ield in |
|00003db0| 74 68 65 20 63 75 72 72 | 65 6e 74 20 64 61 74 61 |the curr|ent data|
|00003dc0| 62 61 73 65 2e 20 20 54 | 68 65 20 66 69 65 6c 64 |base.  T|he field|
|00003dd0| 20 6d 75 73 74 20 62 65 | 20 61 20 6c 6f 6e 67 20 | must be| a long |
|00003de0| 66 69 65 6c 64 20 28 74 | 79 70 65 20 31 34 2c 20 |field (t|ype 14, |
|00003df0| 31 35 2c 20 31 36 29 2e | 06 6b 29 4f 44 62 46 69 |15, 16).|.k)ODbFi|
|00003e00| 6e 64 57 68 65 72 65 25 | 3a 28 73 71 6c 53 74 72 |ndWhere%|:(sqlStr|
|00003e10| 69 6e 67 24 2c 20 66 6c | 61 67 25 29 20 5f 4f 70 |ing$, fl|ag%) _Op|
|00003e20| 6c 44 62 06 10 00 00 00 | 46 01 00 00 45 04 00 00 |lDb.....|F...E...|
|00003e30| 00 00 00 02 01 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003e40| 02 00 00 00 0f 00 00 00 | 07 f0 00 00 00 0a 00 00 |........|........|
|00003e50| 00 00 16 d0 02 00 00 00 | 00 00 00 03 00 00 00 f5 |........|........|
|00003e60| 00 00 00 02 01 00 00 00 | 02 50 00 00 00 01 00 00 |........|.P......|
|00003e70| 00 00 7b 1d 4f 44 62 55 | 73 65 3a 28 6c 6f 67 69 |..{.ODbU|se:(logi|
|00003e80| 63 61 6c 4e 61 6d 65 26 | 29 20 5f 4f 70 6c 44 62 |calName&|) _OplDb|
|00003e90| 06 9a 45 71 75 69 76 61 | 6c 65 6e 74 20 74 6f 20 |..Equiva|lent to |
|00003ea0| 74 68 65 20 4f 50 4c 20 | 63 6f 6d 6d 61 6e 64 20 |the OPL |command |
|00003eb0| 55 53 45 2c 20 62 75 74 | 20 74 61 6b 65 73 20 61 |USE, but| takes a|
|00003ec0| 20 6e 75 6d 62 65 72 20 | 66 72 6f 6d 20 30 20 74 | number |from 0 t|
|00003ed0| 6f 20 32 35 20 69 6e 73 | 74 65 61 64 20 6f 66 20 |o 25 ins|tead of |
|00003ee0| 61 20 6c 65 74 74 65 72 | 20 66 72 6f 6d 20 41 2d |a letter| from A-|
|00003ef0| 5a 20 61 73 20 61 6e 20 | 61 72 67 75 6d 65 6e 74 |Z as an |argument|
|00003f00| 2e 06 06 53 6f 3a 06 20 | 20 55 53 45 20 43 06 69 |...So:. | USE C.i|
|00003f10| 73 20 69 64 65 6e 74 69 | 63 61 6c 20 74 6f 06 20 |s identi|cal to. |
|00003f20| 20 4f 44 62 55 73 65 3a | 28 32 29 06 54 04 00 00 | ODbUse:|(2).T...|
|00003f30| 00 00 00 02 01 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003f40| 02 00 00 00 0f 00 00 00 | 07 f0 00 00 00 0a 00 00 |........|........|
|00003f50| 00 00 16 d0 02 00 00 00 | 00 00 00 06 00 00 00 70 |........|.......p|
|00003f60| 00 00 00 02 01 00 00 00 | 02 04 00 00 00 02 08 00 |........|........|
|00003f70| 00 00 02 10 00 00 00 02 | 0d 00 00 00 01 00 00 00 |........|........|
|00003f80| 00 7b 24 20 53 79 6e 74 | 61 78 20 6f 66 20 4f 50 |.{$ Synt|ax of OP|
|00003f90| 58 2d 66 69 6c 65 73 20 | 6e 6f 74 20 66 72 6f 6d |X-files |not from|
|00003fa0| 20 50 73 69 6f 6e 06 f5 | 76 73 20 31 20 30 31 2d | Psion..|vs 1 01-|
|00003fb0| 30 38 2d 39 38 06 43 75 | 72 72 65 6e 74 6c 79 20 |08-98.Cu|rrently |
|00003fc0| 63 6f 76 65 72 73 20 6f | 6e 6c 79 20 4f 70 6c 44 |covers o|nly OplD|
|00003fd0| 62 2e 06 46 6f 72 20 61 | 76 61 69 6c 61 62 69 6c |b..For a|vailabil|
|00003fe0| 69 74 79 20 6f 66 20 4f | 50 58 2d 66 69 6c 65 73 |ity of O|PX-files|
|00003ff0| 20 73 65 65 06 68 74 74 | 70 3a 2f 2f 77 77 77 2e | see.htt|p://www.|
|00004000| 6d 63 61 6c 65 65 6c 79 | 2e 63 6f 6d 2f 70 73 69 |mcaleely|.com/psi|
|00004010| 6f 6e 2f 4f 50 58 2f 06 | 54 68 69 73 20 66 69 6c |on/OPX/.|This fil|
|00004020| 65 20 69 73 20 61 76 61 | 69 6c 61 62 6c 65 2c 20 |e is ava|ilable, |
|00004030| 61 6c 6f 6e 67 20 77 69 | 74 68 20 6f 74 68 65 72 |along wi|th other|
|00004040| 20 64 6f 63 20 69 6e 20 | 44 41 54 41 2c 20 61 74 | doc in |DATA, at|
|00004050| 06 68 74 74 70 3a 2f 2f | 77 77 77 2e 6b 6e 6f 77 |.http://|www.know|
|00004060| 61 72 65 2e 6e 6c 2f 75 | 73 65 72 73 2f 77 73 6d |are.nl/u|sers/wsm|
|00004070| 6f 75 74 2f 73 35 64 6f | 63 2e 68 74 6d 6c 06 63 |out/s5do|c.html.c|
|00004080| 6f 6d 6d 65 6e 74 73 20 | 74 6f 20 77 73 6d 6f 75 |omments |to wsmou|
|00004090| 74 40 6b 6e 6f 77 61 72 | 65 2e 6e 6c 06 68 04 00 |t@knowar|e.nl.h..|
|000040a0| 00 00 00 00 02 01 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000040b0| 00 02 00 00 00 00 00 00 | 00 02 00 00 00 1d 01 07 |........|........|
|000040c0| 00 00 00 0e 00 00 00 01 | 1d 00 00 00 01 22 00 00 |........|....."..|
|000040d0| 00 02 23 00 00 00 00 00 | 00 00 00 02 00 00 00 39 |..#.....|.......9|
|000040e0| 00 00 00 01 2e 00 00 00 | 01 1e 00 00 00 01 02 00 |........|........|
|000040f0| 00 00 00 22 00 00 00 02 | 00 00 00 1d 01 00 01 00 |..."....|........|
|00004100| 00 00 00 00 00 00 61 80 | 06 00 00 00 00 00 00 00 |......a.|........|
|00004110| 11 00 00 00 00 00 00 00 | 00 00 3d 00 00 00 00 c0 |........|..=.....|
|00004120| 11 00 00 00 f5 34 00 00 | 00 0b 00 00 00 00 4e 28 |.....4..|......N(|
|00004130| 00 00 00 dc 28 00 00 00 | 41 29 00 00 00 66 2a 00 |....(...|A)...f*.|
|00004140| 00 00 d9 01 00 00 00 05 | 05 00 00 00 f2 0a 00 00 |........|........|
|00004150| 00 69 10 00 00 00 04 35 | 00 00 00 87 1d 00 00 00 |.i.....5|........|
|00004160| a2 1e 00 00 00 a3 2a 00 | 00 0e 40 00 00 00 00 00 |......*.|..@.....|
|00004170| 00 00 00 00 00 00 00 00 | 00 00 40 1d 00 00 00 00 |........|..@.....|
|00004180| 00 00 00 ec 00 00 00 20 | 00 00 00 30 00 00 00 4f |....... |...0...O|
|00004190| 00 00 00 31 00 00 00 4f | 00 00 00 32 00 00 00 4f |...1...O|...2...O|
|000041a0| 00 00 00 33 00 00 00 4f | 00 00 00 34 00 00 00 4f |...3...O|...4...O|
|000041b0| 00 00 00 35 00 00 00 4f | 00 00 00 36 00 00 00 4f |...5...O|...6...O|
|000041c0| 00 00 00 37 00 00 00 4f | 00 00 00 38 00 00 00 4f |...7...O|...8...O|
|000041d0| 00 00 00 39 00 00 00 4f | 00 00 00 3a 00 00 00 4f |...9...O|...:...O|
|000041e0| 00 00 00 3b 00 00 00 4f | 00 00 00 3c 00 00 00 4f |...;...O|...<...O|
|000041f0| 00 00 00 3d 00 00 00 4f | 00 00 00 3e 00 00 00 4f |...=...O|...>...O|
|00004200| 00 00 00 3f 00 00 00 4f | 00 00 00 e0 00 00 00 4f |...?...O|.......O|
|00004210| 00 00 00 e1 00 00 00 4f | 00 00 00 e2 00 00 00 4f |.......O|.......O|
|00004220| 00 00 00 e3 00 00 00 4f | 00 00 00 e4 00 00 00 4f |.......O|.......O|
|00004230| 00 00 00 e5 00 00 00 4f | 00 00 00 e6 00 00 00 4f |.......O|.......O|
|00004240| 00 00 00 e7 00 00 00 4f | 00 00 00 e8 00 00 00 4f |.......O|.......O|
|00004250| 00 00 00 e9 00 00 00 4f | 00 00 00 ea 00 00 00 4f |.......O|.......O|
|00004260| 00 00 00 eb 00 00 00 4f | 00 00 00 00 00 00 00 00 |.......O|........|
|00004270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 ed c0 |........|........|
|00004290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000042a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000042b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000042c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000042d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000042e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000042f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 0e 40 30 |........|......@0|
|00004380| 01 00 00 30 01 00 00 01 | 3a 00 00 00 00 68 40 02 |...0....|:....h@.|
|00004390| 00 00 00 01 00 00 00 09 | 00 00 00 01 01 00 00 00 |........|........|
|000043a0| 09 00 00 00 00 02 1a 54 | 61 62 6c 65 31 0a 00 00 |.......T|able1...|
|000043b0| 00 04 16 4e 61 6d 65 3a | 0e 09 00 00 00 ff ff ff |...Name:|........|
|000043c0| ff 00 00 01 00 04 00 02 | 00 9c ff ff ff 64 00 00 |........|.....d..|
|000043d0| 00 32 44 65 73 63 72 69 | 70 74 69 6f 6e 3a 0e 0a |.2Descri|ption:..|
|000043e0| 00 00 00 ff ff ff ff 00 | 00 01 00 04 00 02 00 9c |........|........|
|000043f0| ff ff ff 64 00 00 00 c0 | 40 04 01 00 09 00 00 00 |...d....|@.......|
|00004400| 00 00 01 02 00 0a 00 00 | 00 01 00 01 02 02 4f 00 |........|......O.|
|00004410| 00 10 00 00 00 00 00 00 | 00 00 00 00 00 00 02 4f |........|.......O|
|00004420| 00 00 10 00 00 00 00 00 | 00 00 00 00 00 00 00 ff |........|........|
|00004430| ff 04 01 00 09 00 00 00 | 00 00 01 02 00 0a 00 00 |........|........|
|00004440| 00 01 00 01 02 02 4f 00 | 00 10 00 00 00 00 29 00 |......O.|......).|
|00004450| 00 00 19 00 00 00 1a 00 | 00 00 1b 00 21 00 20 00 |........|....!. .|
|00004460| 1c b3 00 00 00 1d 00 1e | 00 1f 00 22 08 43 6f 75 |........|...".Cou|
|00004470| 72 69 65 72 02 18 00 24 | 00 23 03 00 00 00 00 02 |rier...$|.#......|
|00004480| 4f 00 00 10 00 00 00 00 | 27 00 00 00 19 00 00 00 |O.......|'.......|
|00004490| 1a 00 00 00 1b 00 21 00 | 20 00 1c b4 00 00 00 1d |......!.| .......|
|000044a0| 00 1e 00 1f 00 22 06 41 | 72 69 61 6c 00 18 00 24 |.....".A|rial...$|
|000044b0| 00 23 03 00 00 00 00 ff | ff 50 40 69 00 00 10 00 |.#......|.P@i....|
|000044c0| 01 00 00 00 02 1a 54 61 | 62 6c 65 31 08 16 43 6f |......Ta|ble1..Co|
|000044d0| 6c 41 39 0e 00 16 43 6f | 6c 42 39 10 00 1a 43 6f |lA9...Co|lB9...Co|
|000044e0| 6c 41 31 30 0e 00 1a 43 | 6f 6c 42 31 30 10 00 20 |lA10...C|olB10.. |
|000044f0| 04 00 00 00 02 1a 49 6e | 64 65 78 31 01 00 02 16 |......In|dex1....|
|00004500| 43 6f 6c 41 39 01 00 12 | 00 00 00 09 40 00 00 00 |ColA9...|....@...|
|00004510| 00 00 00 00 00 00 6b 80 | 06 00 00 00 00 00 00 00 |......k.|........|
|00004520| 13 00 00 00 00 7d 42 00 | 00 00 2b 42 00 00 00 c0 |.....}B.|..+B....|
|00004530| 11 00 00 00 f5 34 00 00 | 00 0b 00 00 00 00 4e 28 |.....4..|......N(|
|00004540| 00 00 00 ff 40 00 00 00 | 69 41 00 00 00 66 2a 00 |....@...|iA...f*.|
|00004550| 00 00 d9 01 00 00 00 05 | 05 00 00 00 f2 0a 00 00 |........|........|
|00004560| 00 69 10 00 00 00 04 35 | 00 00 00 87 1d 00 00 00 |.i.....5|........|
|00004570| a2 1e 00 00 00 a3 2a 00 | 00 00 ef 40 00 00 00 ed |......*.|...@....|
|00004580| 3e 00 00 50 00 00 10 6d | 00 00 10 86 00 00 10 fe |>..P...m|........|
|00004590| a1 08 55 78 54 02 00 00 | 00 00 00 45 38 01 00 17 |..UxT...|...E8...|
|000045a0| 5f 06 40 05 48 02 02 02 | 00 01 00 00 0d 40 86 00 |_.@.H...|.....@..|
|000045b0| 00 10 22 44 61 74 61 2e | 61 70 70 29 40 0a 89 00 |.."Data.|app)@...|
|000045c0| 00 10 05 00 00 00 2e 01 | 00 10 07 00 00 00 31 01 |........|......1.|
|000045d0| 00 10 08 00 00 00 32 01 | 00 10 09 00 00 00 37 01 |......2.|......7.|
|000045e0| 00 10 0a 00 00 04 3b 40 | 4f 06 26 00 01 00 00 80 |......;@|O.&.....|
|000045f0| 00 00 00 00 ff ff ff 7f | 02 00 00 00 e4 00 00 00 |........|........|
|00004600| 00 59 07 00 00 00 00 00 | 0f 00 00 00 00 00 00 00 |.Y......|........|
|00004610| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004620| ff ff ff 0e 40 0c 00 00 | 01 d1 03 00 40 d9 02 00 |....@...|....@...|
|00004630| 00 00 00 0f 40 e0 04 00 | 30 d0 06 00 30 02 d9 02 |....@...|0...0...|
|00004640| 00 00 00 00 09 40 00 50 | 00 00 00 08 05 00 00 1a |.....@.P|........|
|00004650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004660| 1a 00 00 00 00 00 00 00 | ff ff ff 22 41 43 72 65 |........|..."ACre|
|00004670| 61 74 65 73 20 61 20 6e | 65 77 20 64 61 74 65 2f |ates a n|ew date/|
|00004680| 74 69 6d 65 20 6f 62 6a | 65 63 74 20 77 68 69 63 |time obj|ect whic|
|00004690| 68 20 63 6f 6e 74 61 69 | 6e 73 20 61 6c 6c 20 74 |h contai|ns all t|
|000046a0| 68 65 20 64 61 74 65 2f | 74 69 6d 65 20 63 6f 6d |he date/|time com|
|000046b0| 70 6f 6e 65 6e 74 73 20 | 6f 66 20 74 68 65 20 63 |ponents |of the c|
|000046c0| 75 72 72 65 6e 74 20 74 | 69 6d 65 20 61 6e 64 20 |urrent t|ime and |
|000046d0| 72 65 74 75 72 6e 73 20 | 61 20 68 61 6e 64 6c 65 |returns |a handle|
|000046e0| 20 69 64 26 20 66 6f 72 | 20 69 74 2e 06 45 78 61 | id& for| it..Exa|
|000046f0| 6d 70 6c 65 3a 20 54 69 | 6d 69 6e 67 20 61 20 6c |mple: Ti|ming a l|
|00004700| 6f 6f 70 06 2e 2e 2e 06 | 73 74 61 72 74 26 3d 44 |oop.....|start&=D|
|00004710| 54 4e 6f 77 26 3a 06 57 | 48 49 4c 45 20 63 6f 6e |TNow&:.W|HILE con|
|00004720| 64 69 74 69 6f 6e 06 2e | 2e 2e 06 45 4e 44 57 48 |dition..|...ENDWH|
|00004730| 06 65 6e 64 26 3d 44 54 | 4e 6f 77 26 3a 06 50 52 |.end&=DT|Now&:.PR|
|00004740| 49 4e 54 20 93 54 69 6d | 65 20 74 6f 20 64 6f 20 |INT .Tim|e to do |
|00004750| 6c 6f 6f 70 20 77 61 73 | 94 2c 44 54 4d 69 63 72 |loop was|.,DTMicr|
|00004760| 6f 73 44 69 66 66 26 3a | 28 73 74 61 72 74 26 2c |osDiff&:|(start&,|
|00004770| 65 6e 64 26 29 06 2e 2e | 2e 06 53 65 65 20 44 54 |end&)...|..See DT|
|00004780| 4e 45 57 44 41 54 45 54 | 49 4d 45 26 3a 2e 06 64 |NEWDATET|IME&:..d|
|00004790| 40 69 00 00 10 00 01 00 | 00 00 02 1a 54 61 62 6c |@i......|....Tabl|
|000047a0| 65 31 0c 16 43 6f 6c 41 | 39 0b 00 64 16 43 6f 6c |e1..ColA|9..d.Col|
|000047b0| 42 39 10 00 1a 43 6f 6c | 41 31 30 0b 00 c8 1a 43 |B9...Col|A10....C|
|000047c0| 6f 6c 42 31 30 10 00 1a | 43 6f 6c 41 31 31 0e 00 |olB10...|ColA11..|
|000047d0| 1a 43 6f 6c 42 31 31 10 | 00 20 04 00 00 00 02 1a |.ColB11.|. ......|
|000047e0| 49 6e 64 65 78 31 01 00 | 02 16 43 6f 6c 41 39 03 |Index1..|..ColA9.|
|000047f0| 00 69 00 00 04 0d 00 00 | 00 1a 00 00 00 00 00 00 |.i......|........|
|00004800| 00 ff ff ff 12 42 43 72 | 65 61 74 65 73 20 61 20 |.....BCr|eates a |
|00004810| 6e 65 77 20 64 61 74 65 | 2f 74 69 6d 65 20 6f 62 |new date|/time ob|
|00004820| 6a 65 63 74 20 77 68 69 | 63 68 20 63 6f 6e 74 61 |ject whi|ch conta|
|00004830| 69 6e 73 20 61 6c 6c 20 | 74 68 65 20 73 75 70 70 |ins all |the supp|
|00004840| 6c 69 65 64 20 64 61 74 | 65 2f 74 69 6d 65 20 63 |lied dat|e/time c|
|00004850| 6f 6d 70 6f 6e 65 6e 74 | 73 20 61 6e 64 20 72 65 |omponent|s and re|
|00004860| 74 75 72 6e 73 20 61 20 | 68 61 6e 64 6c 65 20 69 |turns a |handle i|
|00004870| 64 26 20 66 6f 72 20 69 | 74 2e 06 54 68 65 20 79 |d& for i|t..The y|
|00004880| 65 61 72 20 69 73 20 73 | 74 6f 72 65 64 20 61 73 |ear is s|tored as|
|00004890| 20 74 68 65 20 75 73 75 | 61 6c 20 66 6f 75 72 20 | the usu|al four |
|000048a0| 66 69 67 75 72 65 20 79 | 65 61 72 2c 20 65 2e 67 |figure y|ear, e.g|
|000048b0| 2e 20 31 39 39 37 2e 06 | 54 68 65 20 6d 6f 6e 74 |. 1997..|The mont|
|000048c0| 68 20 69 73 20 73 74 6f | 72 65 64 20 61 73 20 31 |h is sto|red as 1|
|000048d0| 20 66 6f 72 20 4a 61 6e | 75 61 72 79 2c 20 32 20 | for Jan|uary, 2 |
|000048e0| 66 6f 72 20 46 65 62 72 | 75 61 72 79 2c 20 65 74 |for Febr|uary, et|
|000048f0| 63 2e 06 54 68 65 20 64 | 61 79 20 69 73 20 73 74 |c..The d|ay is st|
|00004900| 6f 72 65 64 20 61 73 20 | 74 68 65 20 64 61 79 20 |ored as |the day |
|00004910| 6e 75 6d 62 65 72 20 69 | 6e 20 74 68 65 20 6d 6f |number i|n the mo|
|00004920| 6e 74 68 2e 06 54 68 65 | 20 68 6f 75 72 20 69 73 |nth..The| hour is|
|00004930| 20 74 68 65 20 68 6f 75 | 72 20 6f 66 20 74 68 65 | the hou|r of the|
|00004940| 20 64 61 79 20 69 6e 20 | 31 32 20 6f 72 20 32 34 | day in |12 or 24|
|00004950| 20 68 6f 75 72 20 63 6c | 6f 63 6b 20 61 63 63 6f | hour cl|ock acco|
|00004960| 72 64 69 6e 67 20 74 6f | 20 74 68 65 20 73 79 73 |rding to| the sys|
|00004970| 74 65 6d 20 73 65 74 74 | 69 6e 67 2e 06 54 68 65 |tem sett|ing..The|
|00004980| 20 6d 69 6e 75 74 65 73 | 2c 20 73 65 63 6f 6e 64 | minutes|, second|
|00004990| 73 20 61 6e 64 20 6d 69 | 63 72 6f 73 65 63 6f 6e |s and mi|crosecon|
|000049a0| 64 73 20 61 72 65 20 73 | 74 6f 72 65 64 20 61 73 |ds are s|tored as|
|000049b0| 20 74 68 65 20 75 73 75 | 61 6c 20 76 61 6c 75 65 | the usu|al value|
|000049c0| 73 20 30 20 74 6f 20 35 | 39 20 66 6f 72 20 6d 69 |s 0 to 5|9 for mi|
|000049d0| 6e 75 74 65 73 20 61 6e | 64 20 73 65 63 6f 6e 64 |nutes an|d second|
|000049e0| 73 20 61 6e 64 20 30 20 | 74 6f 20 39 39 39 20 66 |s and 0 |to 999 f|
|000049f0| 6f 72 20 6d 69 63 72 6f | 73 65 63 6f 6e 64 73 2e |or micro|seconds.|
|00004a00| 06 53 65 65 20 44 54 44 | 45 4c 45 54 45 44 41 54 |.See DTD|ELETEDAT|
|00004a10| 45 54 49 4d 45 3a 2e 06 | 03 41 53 65 74 73 20 74 |ETIME:..|.ASets t|
|00004a20| 68 65 20 6d 61 63 68 69 | 6e 65 92 73 20 61 75 74 |he machi|ne.s aut|
|00004a30| 6f 20 73 77 69 74 63 68 | 20 6f 66 66 20 62 65 68 |o switch| off beh|
|00004a40| 61 76 69 6f 75 72 2e 06 | 62 65 68 61 76 69 6f 72 |aviour..|behavior|
|00004a50| 26 3d 30 09 64 69 73 61 | 62 6c 65 73 20 74 68 65 |&=0.disa|bles the|
|00004a60| 20 6d 61 63 68 69 6e 65 | 92 73 20 61 75 74 6f 20 | machine|.s auto |
|00004a70| 73 77 69 74 63 68 20 6f | 66 66 20 6d 65 63 68 61 |switch o|ff mecha|
|00004a80| 6e 69 73 6d 2e 06 62 65 | 68 61 76 69 6f 72 26 3d |nism..be|havior&=|
|00004a90| 31 09 73 65 74 73 20 74 | 68 65 20 6d 61 63 68 69 |1.sets t|he machi|
|00004aa0| 6e 65 20 61 75 74 6f 20 | 73 77 69 74 63 68 20 6f |ne auto |switch o|
|00004ab0| 66 66 20 74 6f 20 6f 63 | 63 75 72 20 6f 6e 6c 79 |ff to oc|cur only|
|00004ac0| 20 77 68 65 6e 20 69 74 | 73 20 62 61 74 74 65 72 | when it|s batter|
|00004ad0| 69 65 73 20 61 72 65 20 | 6c 6f 77 2e 06 62 65 68 |ies are |low..beh|
|00004ae0| 61 76 69 6f 72 26 3d 32 | 20 09 73 65 74 73 20 74 |avior&=2| .sets t|
|00004af0| 68 65 20 6d 61 63 68 69 | 6e 65 73 20 61 75 74 6f |he machi|nes auto|
|00004b00| 20 73 77 69 74 63 68 20 | 6f 66 66 20 74 6f 20 6f | switch |off to o|
|00004b10| 63 63 75 72 20 61 6c 77 | 61 79 73 2e 06 fe 42 52 |ccur alw|ays...BR|
|00004b20| 65 74 75 72 6e 73 20 74 | 68 65 20 77 65 65 6b 20 |eturns t|he week |
|00004b30| 6e 75 6d 62 65 72 20 69 | 6e 20 74 68 65 20 79 65 |number i|n the ye|
|00004b40| 61 72 20 6f 66 20 74 68 | 65 20 64 61 74 65 2f 74 |ar of th|e date/t|
|00004b50| 69 6d 65 20 6f 62 6a 65 | 63 74 20 77 69 74 68 20 |ime obje|ct with |
|00004b60| 68 61 6e 64 6c 65 20 69 | 64 26 2e 20 54 68 65 20 |handle i|d&. The |
|00004b70| 66 69 72 73 74 20 64 61 | 79 20 6f 66 20 74 68 65 |first da|y of the|
|00004b80| 20 79 65 61 72 20 69 73 | 20 73 70 65 63 69 66 69 | year is| specifi|
|00004b90| 65 64 20 62 79 20 74 68 | 65 20 64 61 74 65 2f 74 |ed by th|e date/t|
|00004ba0| 69 6d 65 20 6f 62 6a 65 | 63 74 20 77 69 74 68 20 |ime obje|ct with |
|00004bb0| 68 61 6e 64 6c 65 20 79 | 65 61 72 73 74 61 72 74 |handle y|earstart|
|00004bc0| 26 2e 20 54 68 69 73 20 | 77 6f 75 6c 64 20 75 73 |&. This |would us|
|00004bd0| 75 61 6c 6c 79 20 62 65 | 20 73 65 74 20 74 6f 20 |ually be| set to |
|00004be0| 31 20 4a 61 6e 75 61 72 | 79 20 69 6e 20 74 68 65 |1 Januar|y in the|
|00004bf0| 20 61 70 70 72 6f 70 72 | 69 61 74 65 20 79 65 61 | appropr|iate yea|
|00004c00| 72 2c 20 62 75 74 20 61 | 6c 73 6f 20 61 6c 6c 6f |r, but a|lso allo|
|00004c10| 77 73 20 79 6f 75 20 74 | 6f 20 73 65 74 20 74 68 |ws you t|o set th|
|00004c20| 65 20 73 74 61 72 20 6f | 66 20 74 68 65 20 79 65 |e star o|f the ye|
|00004c30| 61 72 20 74 6f 20 74 68 | 65 20 62 65 67 69 6e 6e |ar to th|e beginn|
|00004c40| 69 6e 67 20 6f 66 20 74 | 68 65 20 66 69 6e 61 6e |ing of t|he finan|
|00004c50| 63 69 61 6c 20 79 65 61 | 72 20 6f 72 20 74 68 65 |cial yea|r or the|
|00004c60| 20 61 63 61 64 65 6d 69 | 63 20 79 65 61 72 2c 20 | academi|c year, |
|00004c70| 66 6f 72 20 65 78 61 6d | 70 6c 65 2e 06 72 75 6c |for exam|ple..rul|
|00004c80| 65 26 20 63 61 6e 20 74 | 61 6b 65 20 74 68 72 65 |e& can t|ake thre|
|00004c90| 65 20 76 61 6c 75 65 73 | 20 28 30 2c 31 2c 32 29 |e values| (0,1,2)|
|00004ca0| 2c 20 61 6c 6c 6f 77 69 | 6e 67 20 74 68 65 20 77 |, allowi|ng the w|
|00004cb0| 65 65 6b 20 6e 75 6d 62 | 65 72 20 74 6f 20 62 65 |eek numb|er to be|
|00004cc0| 20 63 61 6c 63 75 6c 61 | 74 65 64 20 62 79 20 6f | calcula|ted by o|
|00004cd0| 6e 65 20 6f 66 20 74 68 | 72 65 65 20 64 69 66 66 |ne of th|ree diff|
|00004ce0| 65 72 65 6e 74 20 72 75 | 6c 65 73 3a 06 76 61 6c |erent ru|les:.val|
|00004cf0| 75 65 09 09 6d 65 61 6e | 69 6e 67 06 30 20 09 09 |ue..mean|ing.0 ..|
|00004d00| 74 68 65 20 66 69 72 73 | 74 20 64 61 79 20 6f 66 |the firs|t day of|
|00004d10| 20 74 68 65 20 79 65 61 | 72 20 69 73 20 61 6c 77 | the yea|r is alw|
|00004d20| 61 79 73 20 69 6e 20 77 | 65 65 6b 20 6f 6e 65 2c |ays in w|eek one,|
|00004d30| 06 31 20 09 09 72 65 71 | 75 69 72 65 73 20 74 68 |.1 ..req|uires th|
|00004d40| 65 20 66 69 72 73 74 20 | 77 65 65 6b 20 6f 66 20 |e first |week of |
|00004d50| 74 68 65 20 79 65 61 72 | 20 74 6f 20 68 61 76 65 |the year| to have|
|00004d60| 20 61 74 20 6c 65 61 73 | 74 20 66 6f 75 72 20 64 | at leas|t four d|
|00004d70| 61 79 73 20 69 6e 20 69 | 74 2c 06 32 20 09 09 72 |ays in i|t,.2 ..r|
|00004d80| 65 71 75 69 72 65 73 20 | 74 68 65 20 66 69 72 73 |equires |the firs|
|00004d90| 74 20 77 65 65 6b 20 6f | 66 20 74 68 65 20 79 65 |t week o|f the ye|
|00004da0| 61 72 20 74 6f 20 68 61 | 76 65 20 74 68 65 20 66 |ar to ha|ve the f|
|00004db0| 75 6c 6c 20 73 65 76 65 | 6e 20 64 61 79 73 2e 06 |ull seve|n days..|
|00004dc0| 54 68 65 20 41 67 65 6e | 64 61 20 61 70 70 6c 69 |The Agen|da appli|
|00004dd0| 63 61 74 69 6f 6e 20 61 | 6e 64 20 6f 74 68 65 72 |cation a|nd other|
|00004de0| 20 53 65 72 69 65 73 20 | 35 20 61 70 70 6c 69 63 | Series |5 applic|
|00004df0| 61 74 69 6f 6e 73 20 75 | 73 65 20 74 68 65 20 72 |ations u|se the r|
|00004e00| 75 6c 65 20 77 69 74 68 | 20 76 61 6c 75 65 20 31 |ule with| value 1|
|00004e10| 20 62 79 20 64 65 66 61 | 75 6c 74 2e 06 7d 40 00 | by defa|ult..}@.|
|00004e20| 00 00 00 01 00 ec 31 1d | 4c 43 41 6d 50 6d 53 70 |......1.|LCAmPmSp|
|00004e30| 61 63 65 42 65 74 77 65 | 65 6e 26 3a 20 5f 53 79 |aceBetwe|en&: _Sy|
|00004e40| 73 52 41 4d 31 56 52 65 | 74 75 72 6e 73 20 2d 31 |sRAM1VRe|turns -1|
|00004e50| 20 69 66 20 6c 6f 63 61 | 6c 6c 79 20 74 68 65 72 | if loca|lly ther|
|00004e60| 65 20 73 68 6f 75 6c 64 | 20 62 65 20 61 20 73 70 |e should| be a sp|
|00004e70| 61 63 65 20 62 65 74 77 | 65 65 6e 20 74 68 65 20 |ace betw|een the |
|00004e80| 74 69 6d 65 20 61 6e 64 | 20 41 4d 2f 50 4d 20 6f |time and| AM/PM o|
|00004e90| 72 20 30 20 69 66 20 6e | 6f 74 2e 06 74 00 73 20 |r 0 if n|ot..t.s |
|00004ea0| 62 61 74 74 65 72 69 65 | 73 20 61 72 65 20 6c 6f |batterie|s are lo|
|00004eb0| 77 2e 06 62 65 68 61 76 | 69 6f 72 26 3d 32 20 09 |w..behav|ior&=2 .|
|00004ec0| 73 65 74 73 20 74 68 65 | 20 6d 61 63 68 69 6e 65 |sets the| machine|
|00004ed0| 73 20 61 75 74 6f 20 73 | 77 69 74 63 68 20 6f 66 |s auto s|witch of|
|00004ee0| 66 20 74 6f 20 6f 63 63 | 75 72 20 61 6c 77 61 79 |f to occ|ur alway|
|00004ef0| 73 2e 06 1d 00 64 26 29 | 06 2e 2e 2e 06 53 65 65 |s....d&)|.....See|
|00004f00| 20 44 54 4e 45 57 44 41 | 54 45 54 49 4d 45 26 3a | DTNEWDA|TETIME&:|
|00004f10| 2e 06 4f 4a 03 00 00 01 | ff ff 55 02 55 02 61 02 |..OJ....|..U.U.a.|
|00004f20| 49 02 55 02 4d 02 49 02 | 65 02 65 02 71 02 46 2d |I.U.M.I.|e.e.q.F-|
|00004f30| 05 e1 02 ed 02 d5 02 e1 | 02 35 10 44 54 4d 49 4e |........|.5.DTMIN|
|00004f40| 55 54 45 26 3a 20 5f 44 | 61 74 65 12 6d 26 3d 44 |UTE&: _D|ate.m&=D|
|00004f50| 54 4d 49 4e 55 54 45 26 | 3a 28 69 64 26 29 6f 52 |TMINUTE&|:(id&)oR|
|00004f60| 65 74 75 72 6e 73 20 74 | 68 65 20 6d 69 6e 75 74 |eturns t|he minut|
|00004f70| 65 73 20 63 6f 6d 70 6f | 6e 65 6e 74 20 6d 26 20 |es compo|nent m& |
|00004f80| 77 68 69 63 68 20 69 73 | 20 73 74 6f 72 65 64 20 |which is| stored |
|00004f90| 69 6e 20 74 68 65 20 64 | 61 74 65 2f 74 69 6d 65 |in the d|ate/time|
|00004fa0| 20 6f 62 6a 65 63 74 20 | 77 69 74 68 20 68 61 6e | object |with han|
|00004fb0| 64 6c 65 20 69 64 26 2e | 06 53 65 65 20 44 54 4e |dle id&.|.See DTN|
|00004fc0| 45 57 44 41 54 45 54 49 | 4d 45 26 3a 2e 06 35 10 |EWDATETI|ME&:..5.|
|00004fd0| 44 54 53 45 43 4f 4e 44 | 26 3a 20 5f 44 61 74 65 |DTSECOND|&: _Date|
|00004fe0| 12 73 26 3d 44 54 53 45 | 43 4f 4e 44 26 3a 28 69 |.s&=DTSE|COND&:(i|
|00004ff0| 64 26 29 6f 52 65 74 75 | 72 6e 73 20 74 68 65 20 |d&)oRetu|rns the |
|00005000| 73 65 63 6f 6e 64 73 20 | 63 6f 6d 70 6f 6e 65 6e |seconds |componen|
|00005010| 74 20 73 26 20 77 68 69 | 63 68 20 69 73 20 73 74 |t s& whi|ch is st|
|00005020| 6f 72 65 64 20 69 6e 20 | 74 68 65 20 64 61 74 65 |ored in |the date|
|00005030| 2f 74 69 6d 65 20 6f 62 | 6a 65 63 74 20 77 69 74 |/time ob|ject wit|
|00005040| 68 20 68 61 6e 64 6c 65 | 20 69 64 26 2e 06 53 65 |h handle| id&..Se|
|00005050| 65 20 44 54 4e 45 57 44 | 41 54 45 54 49 4d 45 26 |e DTNEWD|ATETIME&|
|00005060| 3a 2e 06 35 0f 44 54 4d | 49 43 52 4f 26 3a 20 5f |:..5.DTM|ICRO&: _|
|00005070| 44 61 74 65 11 6d 26 3d | 44 54 4d 49 43 52 4f 26 |Date.m&=|DTMICRO&|
|00005080| 3a 28 69 64 26 29 74 52 | 65 74 75 72 6e 73 20 74 |:(id&)tR|eturns t|
|00005090| 68 65 20 6d 69 63 72 6f | 73 65 63 6f 6e 64 73 20 |he micro|seconds |
|000050a0| 63 6f 6d 70 6f 6e 65 6e | 74 20 6d 26 20 77 68 69 |componen|t m& whi|
|000050b0| 63 68 20 69 73 20 73 74 | 6f 72 65 64 20 69 6e 20 |ch is st|ored in |
|000050c0| 74 68 65 20 64 61 74 65 | 2f 74 69 6d 65 20 6f 62 |the date|/time ob|
|000050d0| 6a 65 63 74 20 77 69 74 | 68 20 68 61 6e 64 6c 65 |ject wit|h handle|
|000050e0| 20 69 64 26 2e 06 53 65 | 65 20 44 54 4e 45 57 44 | id&..Se|e DTNEWD|
|000050f0| 41 54 45 54 49 4d 45 26 | 3a 2e 06 35 10 44 54 53 |ATETIME&|:..5.DTS|
|00005100| 45 54 59 45 41 52 3a 20 | 5f 44 61 74 65 12 44 54 |ETYEAR: |_Date.DT|
|00005110| 53 45 54 59 45 41 52 3a | 28 79 26 2c 69 64 26 29 |SETYEAR:|(y&,id&)|
|00005120| 6c 53 65 74 73 20 74 68 | 65 20 79 65 61 72 20 63 |lSets th|e year c|
|00005130| 6f 6d 70 6f 6e 65 6e 74 | 20 77 68 69 63 68 20 69 |omponent| which i|
|00005140| 73 20 73 74 6f 72 65 64 | 20 69 6e 20 74 68 65 20 |s stored| in the |
|00005150| 64 61 74 65 2f 74 69 6d | 65 20 6f 62 6a 65 63 74 |date/tim|e object|
|00005160| 20 77 69 74 68 20 68 61 | 6e 64 6c 65 20 69 64 26 | with ha|ndle id&|
|00005170| 20 74 6f 20 79 26 2e 06 | 53 65 65 20 44 54 4e 45 | to y&..|See DTNE|
|00005180| 57 44 41 54 45 54 49 4d | 45 26 3a 2e 06 35 11 44 |WDATETIM|E&:..5.D|
|00005190| 54 53 45 54 4d 4f 4e 54 | 48 3a 20 5f 44 61 74 65 |TSETMONT|H: _Date|
|000051a0| 13 44 54 53 45 54 4d 4f | 4e 54 48 3a 28 6d 26 2c |.DTSETMO|NTH:(m&,|
|000051b0| 69 64 26 29 6d 53 65 74 | 73 20 74 68 65 20 6d 6f |id&)mSet|s the mo|
|000051c0| 6e 74 68 20 63 6f 6d 70 | 6f 6e 65 6e 74 20 77 68 |nth comp|onent wh|
|000051d0| 69 63 68 20 69 73 20 73 | 74 6f 72 65 64 20 69 6e |ich is s|tored in|
|000051e0| 20 74 68 65 20 64 61 74 | 65 2f 74 69 6d 65 20 6f | the dat|e/time o|
|000051f0| 62 6a 65 63 74 20 77 69 | 74 68 20 68 61 6e 64 6c |bject wi|th handl|
|00005200| 65 20 69 64 26 20 74 6f | 20 6d 26 2e 06 53 65 65 |e id& to| m&..See|
|00005210| 20 44 54 4e 45 57 44 41 | 54 45 54 49 4d 45 26 3a | DTNEWDA|TETIME&:|
|00005220| 2e 06 35 0f 44 54 53 45 | 54 44 41 59 3a 20 5f 44 |..5.DTSE|TDAY: _D|
|00005230| 61 74 65 13 44 54 53 45 | 54 44 41 59 3a 28 64 61 |ate.DTSE|TDAY:(da|
|00005240| 79 26 2c 69 64 26 29 6d | 53 65 74 73 20 74 68 65 |y&,id&)m|Sets the|
|00005250| 20 64 61 79 20 63 6f 6d | 70 6f 6e 65 6e 74 20 77 | day com|ponent w|
|00005260| 68 69 63 68 20 69 73 20 | 73 74 6f 72 65 64 20 69 |hich is |stored i|
|00005270| 6e 20 74 68 65 20 64 61 | 74 65 2f 74 69 6d 65 20 |n the da|te/time |
|00005280| 6f 62 6a 65 63 74 20 77 | 69 74 68 20 68 61 6e 64 |object w|ith hand|
|00005290| 6c 65 20 69 64 26 20 74 | 6f 20 64 61 79 26 2e 06 |le id& t|o day&..|
|000052a0| 53 65 65 20 44 54 4e 45 | 57 44 41 54 45 54 49 4d |See DTNE|WDATETIM|
|000052b0| 45 26 3a 2e 06 35 10 44 | 54 53 45 54 48 4f 55 52 |E&:..5.D|TSETHOUR|
|000052c0| 3a 20 5f 44 61 74 65 12 | 44 54 53 45 54 48 4f 55 |: _Date.|DTSETHOU|
|000052d0| 52 3a 28 68 26 2c 69 64 | 26 29 6c 53 65 74 73 20 |R:(h&,id|&)lSets |
|000052e0| 74 68 65 20 68 6f 75 72 | 20 63 6f 6d 70 6f 6e 65 |the hour| compone|
|000052f0| 6e 74 20 77 68 69 63 68 | 20 69 73 20 73 74 6f 72 |nt which| is stor|
|00005300| 65 64 20 69 6e 20 74 68 | 65 20 64 61 74 65 2f 74 |ed in th|e date/t|
|00005310| 69 6d 65 20 6f 62 6a 65 | 63 74 20 77 69 74 68 20 |ime obje|ct with |
|00005320| 68 61 6e 64 6c 65 20 69 | 64 26 20 74 6f 20 68 26 |handle i|d& to h&|
|00005330| 2e 06 53 65 65 20 44 54 | 4e 45 57 44 41 54 45 54 |..See DT|NEWDATET|
|00005340| 49 4d 45 26 3a 2e 06 35 | 12 44 54 53 45 54 4d 49 |IME&:..5|.DTSETMI|
|00005350| 4e 55 54 45 3a 20 5f 44 | 61 74 65 14 44 54 53 45 |NUTE: _D|ate.DTSE|
|00005360| 54 4d 49 4e 55 54 45 3a | 28 6d 26 2c 69 64 26 29 |TMINUTE:|(m&,id&)|
|00005370| 6f 53 65 74 73 20 74 68 | 65 20 6d 69 6e 75 74 65 |oSets th|e minute|
|00005380| 73 20 63 6f 6d 70 6f 6e | 65 6e 74 20 77 68 69 63 |s compon|ent whic|
|00005390| 68 20 69 73 20 73 74 6f | 72 65 64 20 69 6e 20 74 |h is sto|red in t|
|000053a0| 68 65 20 64 61 74 65 2f | 74 69 6d 65 20 6f 62 6a |he date/|time obj|
|000053b0| 65 63 74 20 77 69 74 68 | 20 68 61 6e 64 6c 65 20 |ect with| handle |
|000053c0| 69 64 26 20 74 6f 20 6d | 26 2e 06 53 65 65 20 44 |id& to m|&..See D|
|000053d0| 54 4e 45 57 44 41 54 45 | 54 49 4d 45 26 3a 2e 06 |TNEWDATE|TIME&:..|
|000053e0| 35 12 44 54 53 45 54 53 | 45 43 4f 4e 44 3a 20 5f |5.DTSETS|ECOND: _|
|000053f0| 44 61 74 65 14 44 54 53 | 45 54 53 45 43 4f 4e 44 |Date.DTS|ETSECOND|
|00005400| 3a 28 73 26 2c 69 64 26 | 29 6f 53 65 74 73 20 74 |:(s&,id&|)oSets t|
|00005410| 68 65 20 73 65 63 6f 6e | 64 73 20 63 6f 6d 70 6f |he secon|ds compo|
|00005420| 6e 65 6e 74 20 77 68 69 | 63 68 20 69 73 20 73 74 |nent whi|ch is st|
|00005430| 6f 72 65 64 20 69 6e 20 | 74 68 65 20 64 61 74 65 |ored in |the date|
|00005440| 2f 74 69 6d 65 20 6f 62 | 6a 65 63 74 20 77 69 74 |/time ob|ject wit|
|00005450| 68 20 68 61 6e 64 6c 65 | 20 69 64 26 20 74 6f 20 |h handle| id& to |
|00005460| 73 26 2e 06 53 65 65 20 | 44 54 4e 45 57 44 41 54 |s&..See |DTNEWDAT|
|00005470| 45 54 49 4d 45 26 3a 2e | 06 35 11 44 54 53 45 54 |ETIME&:.|.5.DTSET|
|00005480| 4d 49 43 52 4f 3a 20 5f | 44 61 74 65 13 44 54 53 |MICRO: _|Date.DTS|
|00005490| 45 54 4d 49 43 52 4f 3a | 28 6d 26 2c 69 64 26 29 |ETMICRO:|(m&,id&)|
|000054a0| 74 53 65 74 73 20 74 68 | 65 20 6d 69 63 72 6f 73 |tSets th|e micros|
|000054b0| 65 63 6f 6e 64 73 20 63 | 6f 6d 70 6f 6e 65 6e 74 |econds c|omponent|
|000054c0| 20 77 68 69 63 68 20 69 | 73 20 73 74 6f 72 65 64 | which i|s stored|
|000054d0| 20 69 6e 20 74 68 65 20 | 64 61 74 65 2f 74 69 6d | in the |date/tim|
|000054e0| 65 20 6f 62 6a 65 63 74 | 20 77 69 74 68 20 68 61 |e object| with ha|
|000054f0| 6e 64 6c 65 20 69 64 26 | 20 74 6f 20 6d 26 2e 06 |ndle id&| to m&..|
|00005500| 53 65 65 20 44 54 4e 45 | 57 44 41 54 45 54 49 4d |See DTNE|WDATETIM|
|00005510| 45 26 3a 2e 06 15 0d 44 | 54 4e 4f 57 26 3a 20 5f |E&:....D|TNOW&: _|
|00005520| 44 61 74 65 0b 69 64 26 | 3d 44 54 4e 4f 57 26 3a |Date.id&|=DTNOW&:|
|00005530| 0e 00 00 02 22 01 00 00 | 35 15 44 54 44 41 54 45 |...."...|5.DTDATE|
|00005540| 54 49 4d 45 44 49 46 46 | 3a 20 5f 44 61 74 65 75 |TIMEDIFF|: _Dateu|
|00005550| 44 54 44 41 54 45 54 49 | 4d 45 44 49 46 46 3a 28 |DTDATETI|MEDIFF:(|
|00005560| 73 74 61 72 74 26 2c 65 | 6e 64 26 2c 42 59 52 45 |start&,e|nd&,BYRE|
|00005570| 46 20 79 65 61 72 26 2c | 42 59 52 45 46 20 6d 6f |F year&,|BYREF mo|
|00005580| 6e 74 68 26 2c 42 59 52 | 45 46 20 64 61 79 26 2c |nth&,BYR|EF day&,|
|00005590| 42 59 52 45 46 20 68 6f | 75 72 26 2c 42 59 52 45 |BYREF ho|ur&,BYRE|
|000055a0| 46 20 6d 69 6e 75 74 65 | 26 2c 42 59 52 45 46 20 |F minute|&,BYREF |
|000055b0| 73 65 63 6f 6e 64 26 2c | 42 59 52 45 46 20 6d 69 |second&,|BYREF mi|
|000055c0| 63 72 6f 26 29 bd 43 61 | 6c 63 75 6c 61 74 65 73 |cro&).Ca|lculates|
|000055d0| 20 74 68 65 20 65 78 61 | 63 74 20 64 69 66 66 65 | the exa|ct diffe|
|000055e0| 72 65 6e 63 65 20 62 65 | 74 77 65 65 6e 20 74 77 |rence be|tween tw|
|000055f0| 6f 20 64 61 74 65 2f 74 | 69 6d 65 20 6f 62 6a 65 |o date/t|ime obje|
|00005600| 63 74 73 20 77 69 74 68 | 20 68 61 6e 64 6c 65 73 |cts with| handles|
|00005610| 20 73 74 61 72 74 26 20 | 61 6e 64 20 65 6e 64 26 | start& |and end&|
|00005620| 20 69 6e 20 74 68 65 20 | 66 6f 72 6d 20 6f 66 20 | in the |form of |
|00005630| 61 20 64 61 74 65 2f 74 | 69 6d 65 20 6f 62 6a 65 |a date/t|ime obje|
|00005640| 63 74 2e 20 54 68 65 20 | 64 69 66 66 65 72 65 6e |ct. The |differen|
|00005650| 63 65 20 69 73 20 72 65 | 74 75 72 6e 65 64 20 69 |ce is re|turned i|
|00005660| 6e 20 74 68 65 20 76 61 | 72 69 61 62 6c 65 73 20 |n the va|riables |
|00005670| 79 65 61 72 26 2c 20 6d | 6f 6e 74 68 26 20 65 74 |year&, m|onth& et|
|00005680| 63 2e 06 35 13 44 54 59 | 45 41 52 53 44 49 46 46 |c..5.DTY|EARSDIFF|
|00005690| 26 3a 20 5f 44 61 74 65 | 20 64 69 66 66 26 3d 44 |&: _Date| diff&=D|
|000056a0| 54 59 45 41 52 53 44 49 | 46 46 26 3a 28 73 74 61 |TYEARSDI|FF&:(sta|
|000056b0| 72 74 26 2c 65 6e 64 26 | 29 81 52 65 74 75 72 6e |rt&,end&|).Return|
|000056c0| 73 20 74 68 65 20 64 69 | 66 66 65 72 65 6e 63 65 |s the di|fference|
|000056d0| 20 64 69 66 66 26 20 69 | 6e 20 77 68 6f 6c 65 20 | diff& i|n whole |
|000056e0| 79 65 61 72 73 20 62 65 | 74 77 65 65 6e 20 74 68 |years be|tween th|
|000056f0| 65 20 74 77 6f 20 64 61 | 74 65 2f 74 69 6d 65 20 |e two da|te/time |
|00005700| 6f 62 6a 65 63 74 73 20 | 77 69 74 68 20 68 61 6e |objects |with han|
|00005710| 64 6c 65 73 20 73 74 61 | 72 74 26 20 61 6e 64 20 |dles sta|rt& and |
|00005720| 65 6e 64 26 2e 06 53 65 | 65 20 44 54 4e 45 57 44 |end&..Se|e DTNEWD|
|00005730| 41 54 45 54 49 4d 45 26 | 3a 2e 06 35 14 44 54 4d |ATETIME&|:..5.DTM|
|00005740| 4f 4e 54 48 53 44 49 46 | 46 26 3a 20 5f 44 61 74 |ONTHSDIF|F&: _Dat|
|00005750| 65 21 64 69 66 66 26 3d | 44 54 4d 4f 4e 54 48 53 |e!diff&=|DTMONTHS|
|00005760| 44 49 46 46 26 3a 28 73 | 74 61 72 74 26 2c 65 6e |DIFF&:(s|tart&,en|
|00005770| 64 26 29 82 52 65 74 75 | 72 6e 73 20 74 68 65 20 |d&).Retu|rns the |
|00005780| 64 69 66 66 65 72 65 6e | 63 65 20 64 69 66 66 26 |differen|ce diff&|
|00005790| 20 69 6e 20 77 68 6f 6c | 65 20 6d 6f 6e 74 68 73 | in whol|e months|
|000057a0| 20 62 65 74 77 65 65 6e | 20 74 68 65 20 74 77 6f | between| the two|
|000057b0| 20 64 61 74 65 2f 74 69 | 6d 65 20 6f 62 6a 65 63 | date/ti|me objec|
|000057c0| 74 73 20 77 69 74 68 20 | 68 61 6e 64 6c 65 73 20 |ts with |handles |
|000057d0| 73 74 61 72 74 26 20 61 | 6e 64 20 65 6e 64 26 2e |start& a|nd end&.|
|000057e0| 06 53 65 65 20 44 54 4e | 45 57 44 41 54 45 54 49 |.See DTN|EWDATETI|
|000057f0| 4d 45 26 3a 2e 06 35 12 | 44 54 44 41 59 53 44 49 |ME&:..5.|DTDAYSDI|
|00005800| 46 46 26 3a 20 5f 44 61 | 74 65 1f 64 69 66 66 26 |FF&: _Da|te.diff&|
|00005810| 3d 44 54 44 41 59 53 44 | 49 46 46 26 3a 28 73 74 |=DTDAYSD|IFF&:(st|
|00005820| 61 72 74 26 2c 65 6e 64 | 26 29 80 52 65 74 75 72 |art&,end|&).Retur|
|00005830| 6e 73 20 74 68 65 20 64 | 69 66 66 65 72 65 6e 63 |ns the d|ifferenc|
|00005840| 65 20 64 69 66 66 26 20 | 69 6e 20 77 68 6f 6c 65 |e diff& |in whole|
|00005850| 20 64 61 79 73 20 62 65 | 74 77 65 65 6e 20 74 68 | days be|tween th|
|00005860| 65 20 74 77 6f 20 64 61 | 74 65 2f 74 69 6d 65 20 |e two da|te/time |
|00005870| 6f 62 6a 65 63 74 73 20 | 77 69 74 68 20 68 61 6e |objects |with han|
|00005880| 64 6c 65 73 20 73 74 61 | 72 74 26 20 61 6e 64 20 |dles sta|rt& and |
|00005890| 65 6e 64 26 2e 06 53 65 | 65 20 44 54 4e 45 57 44 |end&..Se|e DTNEWD|
|000058a0| 41 54 45 54 49 4d 45 26 | 3a 2e 06 35 13 44 54 48 |ATETIME&|:..5.DTH|
|000058b0| 4f 55 52 53 44 49 46 46 | 26 3a 20 5f 44 61 74 65 |OURSDIFF|&: _Date|
|000058c0| 20 64 69 66 66 26 3d 44 | 54 48 4f 55 52 53 44 49 | diff&=D|THOURSDI|
|000058d0| 46 46 26 3a 28 73 74 61 | 72 74 26 2c 65 6e 64 26 |FF&:(sta|rt&,end&|
|000058e0| 29 81 52 65 74 75 72 6e | 73 20 74 68 65 20 64 69 |).Return|s the di|
|000058f0| 66 66 65 72 65 6e 63 65 | 20 64 69 66 66 26 20 69 |fference| diff& i|
|00005900| 6e 20 77 68 6f 6c 65 20 | 68 6f 75 72 73 20 62 65 |n whole |hours be|
|00005910| 74 77 65 65 6e 20 74 68 | 65 20 74 77 6f 20 64 61 |tween th|e two da|
|00005920| 74 65 2f 74 69 6d 65 20 | 6f 62 6a 65 63 74 73 20 |te/time |objects |
|00005930| 77 69 74 68 20 68 61 6e | 64 6c 65 73 20 73 74 61 |with han|dles sta|
|00005940| 72 74 26 20 61 6e 64 20 | 65 6e 64 26 2e 06 53 65 |rt& and |end&..Se|
|00005950| 65 20 44 54 4e 45 57 44 | 41 54 45 54 49 4d 45 26 |e DTNEWD|ATETIME&|
|00005960| 3a 2e 06 04 41 53 65 74 | 73 20 74 68 65 20 63 75 |:...ASet|s the cu|
|00005970| 72 72 65 6e 74 20 70 72 | 6f 63 65 73 73 20 61 63 |rrent pr|ocess ac|
|00005980| 74 69 76 65 20 69 66 20 | 73 74 61 74 65 26 3d 31 |tive if |state&=1|
|00005990| 20 6f 72 20 6e 6f 74 20 | 61 63 74 69 76 65 20 69 | or not |active i|
|000059a0| 66 20 73 74 61 74 65 26 | 3d 30 2e 20 54 68 69 73 |f state&|=0. This|
|000059b0| 20 77 69 6c 6c 20 64 65 | 74 65 72 6d 69 6e 65 20 | will de|termine |
|000059c0| 77 68 65 74 68 65 72 20 | 6f 72 20 6e 6f 74 20 74 |whether |or not t|
|000059d0| 68 65 20 6d 61 63 68 69 | 6e 65 20 63 61 6e 20 61 |he machi|ne can a|
|000059e0| 75 74 6f 6d 61 74 69 63 | 61 6c 6c 79 20 74 75 72 |utomatic|ally tur|
|000059f0| 6e 20 6f 66 66 20 77 68 | 65 6e 20 74 68 65 20 75 |n off wh|en the u|
|00005a00| 73 65 72 20 69 73 20 6e | 6f 74 20 75 73 69 6e 67 |ser is n|ot using|
|00005a10| 20 74 68 65 20 6d 61 63 | 68 69 6e 65 3a 20 69 66 | the mac|hine: if|
|00005a20| 20 74 68 65 20 70 72 6f | 63 65 73 73 20 69 73 20 | the pro|cess is |
|00005a30| 61 63 74 69 76 65 20 74 | 68 65 6e 20 74 68 65 20 |active t|hen the |
|00005a40| 6d 61 63 68 69 6e 65 20 | 77 69 6c 6c 20 6e 6f 74 |machine |will not|
|00005a50| 20 61 75 74 6f 6d 61 74 | 69 63 61 6c 6c 79 20 74 | automat|ically t|
|00005a60| 75 72 6e 20 6f 66 66 2e | 06 0d 41 52 65 74 75 72 |urn off.|..ARetur|
|00005a70| 6e 73 20 74 68 65 20 74 | 69 6d 65 20 74 68 61 74 |ns the t|ime that|
|00005a80| 20 74 68 65 20 66 69 6c | 65 2c 20 66 69 6c 65 24 | the fil|e, file$|
|00005a90| 2c 20 77 61 73 20 6c 61 | 73 74 20 6d 6f 64 69 66 |, was la|st modif|
|00005aa0| 69 65 64 20 69 6e 74 6f | 20 64 61 74 65 54 69 6d |ied into| dateTim|
|00005ab0| 65 49 64 26 2e 20 20 49 | 74 20 69 73 20 6e 65 63 |eId&.  I|t is nec|
|00005ac0| 65 73 73 61 72 79 20 74 | 6f 20 70 61 73 73 20 74 |essary t|o pass t|
|00005ad0| 68 69 73 20 70 72 6f 63 | 65 64 75 72 65 20 74 68 |his proc|edure th|
|00005ae0| 65 20 49 44 20 6f 66 20 | 20 61 20 64 61 74 65 2f |e ID of | a date/|
|00005af0| 74 69 6d 65 20 6f 62 6a | 65 63 74 20 77 68 69 63 |time obj|ect whic|
|00005b00| 68 20 74 68 65 20 70 72 | 6f 63 65 64 75 72 65 20 |h the pr|ocedure |
|00005b10| 77 69 6c 6c 20 74 68 65 | 6e 20 73 65 74 20 74 6f |will the|n set to|
|00005b20| 20 74 68 65 20 72 65 71 | 75 69 72 65 64 20 74 69 | the req|uired ti|
|00005b30| 6d 65 2e 20 20 54 6f 20 | 6f 62 74 61 69 6e 20 61 |me.  To |obtain a|
|00005b40| 6e 64 20 72 65 61 64 20 | 61 20 64 61 74 65 2f 74 |nd read |a date/t|
|00005b50| 69 6d 65 20 6f 62 6a 65 | 63 74 2c 20 73 65 65 20 |ime obje|ct, see |
|00005b60| 74 68 65 20 91 44 61 74 | 65 20 4f 50 58 92 20 73 |the .Dat|e OPX. s|
|00005b70| 65 63 74 69 6f 6e 2e 06 | 81 40 02 00 00 00 01 00 |ection..|.@......|
|00005b80| 00 00 09 00 00 00 01 01 | 00 00 00 09 00 00 00 00 |........|........|
|00005b90| 02 1a 54 61 62 6c 65 31 | 0b 00 00 00 06 16 50 72 |..Table1|......Pr|
|00005ba0| 6f 63 3a 0b 09 00 00 00 | 64 00 00 00 00 00 03 00 |oc:.....|d.......|
|00005bb0| 04 00 02 00 9c ff ff ff | 64 00 00 00 1a 55 73 61 |........|d....Usa|
|00005bc0| 67 65 3a 0b 0a 00 00 00 | c8 00 00 00 00 00 01 00 |ge:.....|........|
|00005bd0| 04 00 02 00 9c ff ff ff | 64 00 00 00 16 49 6e 66 |........|d....Inf|
|00005be0| 6f 3a 0e 0b 00 00 00 ff | ff ff ff 00 00 01 00 04 |o:......|........|
|00005bf0| 00 02 00 9c ff ff ff 64 | 00 00 00 91 00 65 6e 20 |.......d|.....en |
|00005c00| 64 61 79 73 2e 06 54 68 | 65 20 41 67 65 6e 64 61 |days..Th|e Agenda|
|00005c10| 20 61 70 70 6c 69 63 61 | 74 69 6f 6e 20 61 6e 64 | applica|tion and|
|00005c20| 20 6f 74 68 65 72 20 53 | 65 72 69 65 73 20 35 20 | other S|eries 5 |
|00005c30| 61 70 70 6c 69 63 61 74 | 69 6f 6e 73 20 75 73 65 |applicat|ions use|
|00005c40| 20 74 68 65 20 72 75 6c | 65 20 77 69 74 68 20 76 | the rul|e with v|
|00005c50| 61 6c 75 65 20 31 20 62 | 79 20 64 65 66 61 75 6c |alue 1 b|y defaul|
|00005c60| 74 2e 06 29 40 0a 89 00 | 00 10 05 00 00 00 2e 01 |t..)@...|........|
|00005c70| 00 10 07 00 00 00 31 01 | 00 10 08 00 00 00 32 01 |......1.|......2.|
|00005c80| 00 10 09 00 00 00 37 01 | 00 10 0a 00 00 04 0e 4b |......7.|.......K|
|00005c90| 10 00 00 00 ff ff f9 02 | f9 02 29 03 94 6d 03 09 |........|..)..m..|
|00005ca0| 02 bd 02 fe 51 04 4d 03 | 35 03 9d 02 19 03 31 03 |....Q.M.|5.....1.|
|00005cb0| f0 d8 35 15 44 54 4d 49 | 4e 55 54 45 53 44 49 46 |..5.DTMI|NUTESDIF|
|00005cc0| 46 26 3a 20 5f 44 61 74 | 65 22 64 69 66 66 26 3d |F&: _Dat|e"diff&=|
|00005cd0| 44 54 4d 49 4e 55 54 45 | 53 44 49 46 46 26 3a 28 |DTMINUTE|SDIFF&:(|
|00005ce0| 73 74 61 72 74 26 2c 65 | 6e 64 26 29 83 52 65 74 |start&,e|nd&).Ret|
|00005cf0| 75 72 6e 73 20 74 68 65 | 20 64 69 66 66 65 72 65 |urns the| differe|
|00005d00| 6e 63 65 20 64 69 66 66 | 26 20 69 6e 20 77 68 6f |nce diff|& in who|
|00005d10| 6c 65 20 6d 69 6e 75 74 | 65 73 20 62 65 74 77 65 |le minut|es betwe|
|00005d20| 65 6e 20 74 68 65 20 74 | 77 6f 20 64 61 74 65 2f |en the t|wo date/|
|00005d30| 74 69 6d 65 20 6f 62 6a | 65 63 74 73 20 77 69 74 |time obj|ects wit|
|00005d40| 68 20 68 61 6e 64 6c 65 | 73 20 73 74 61 72 74 26 |h handle|s start&|
|00005d50| 20 61 6e 64 20 65 6e 64 | 26 2e 06 53 65 65 20 44 | and end|&..See D|
|00005d60| 54 4e 45 57 44 41 54 45 | 54 49 4d 45 26 3a 2e 06 |TNEWDATE|TIME&:..|
|00005d70| 35 15 44 54 53 45 43 4f | 4e 44 53 44 49 46 46 26 |5.DTSECO|NDSDIFF&|
|00005d80| 3a 20 5f 44 61 74 65 22 | 64 69 66 66 26 3d 44 54 |: _Date"|diff&=DT|
|00005d90| 53 45 43 4f 4e 44 53 44 | 49 46 46 26 3a 28 73 74 |SECONDSD|IFF&:(st|
|00005da0| 61 72 74 26 2c 65 6e 64 | 26 29 83 52 65 74 75 72 |art&,end|&).Retur|
|00005db0| 6e 73 20 74 68 65 20 64 | 69 66 66 65 72 65 6e 63 |ns the d|ifferenc|
|00005dc0| 65 20 64 69 66 66 26 20 | 69 6e 20 77 68 6f 6c 65 |e diff& |in whole|
|00005dd0| 20 73 65 63 6f 6e 64 73 | 20 62 65 74 77 65 65 6e | seconds| between|
|00005de0| 20 74 68 65 20 74 77 6f | 20 64 61 74 65 2f 74 69 | the two| date/ti|
|00005df0| 6d 65 20 6f 62 6a 65 63 | 74 73 20 77 69 74 68 20 |me objec|ts with |
|00005e00| 68 61 6e 64 6c 65 73 20 | 73 74 61 72 74 26 20 61 |handles |start& a|
|00005e10| 6e 64 20 65 6e 64 26 2e | 06 53 65 65 20 44 54 4e |nd end&.|.See DTN|
|00005e20| 45 57 44 41 54 45 54 49 | 4d 45 26 3a 2e 06 35 14 |EWDATETI|ME&:..5.|
|00005e30| 44 54 4d 49 43 52 4f 53 | 44 49 46 46 26 3a 20 5f |DTMICROS|DIFF&: _|
|00005e40| 44 61 74 65 21 64 69 66 | 66 26 3d 44 54 4d 49 43 |Date!dif|f&=DTMIC|
|00005e50| 52 4f 53 44 49 46 46 26 | 3a 28 73 74 61 72 74 26 |ROSDIFF&|:(start&|
|00005e60| 2c 65 6e 64 26 29 91 52 | 65 74 75 72 6e 73 20 74 |,end&).R|eturns t|
|00005e70| 68 65 20 64 69 66 66 65 | 72 65 6e 63 65 20 64 69 |he diffe|rence di|
|00005e80| 66 66 26 20 69 6e 20 77 | 68 6f 6c 65 20 6d 69 63 |ff& in w|hole mic|
|00005e90| 72 6f 73 65 63 6f 6e 64 | 73 20 62 65 74 77 65 65 |rosecond|s betwee|
|00005ea0| 6e 20 74 68 65 20 74 77 | 6f 20 64 61 74 65 2f 74 |n the tw|o date/t|
|00005eb0| 69 6d 65 20 6f 62 6a 65 | 63 74 73 20 77 69 74 68 |ime obje|cts with|
|00005ec0| 20 68 61 6e 64 6c 65 73 | 20 73 74 61 72 74 26 20 | handles| start& |
|00005ed0| 61 6e 64 20 65 6e 64 26 | 2e 06 53 65 65 20 44 54 |and end&|..See DT|
|00005ee0| 4e 45 57 44 41 54 45 54 | 49 4d 45 26 3a 2c 20 44 |NEWDATET|IME&:, D|
|00005ef0| 54 4e 4f 57 26 3a 2e 06 | 15 16 44 54 57 45 45 4b |TNOW&:..|..DTWEEK|
|00005f00| 4e 4f 49 4e 59 45 41 52 | 26 3a 20 5f 44 61 74 65 |NOINYEAR|&: _Date|
|00005f10| 29 77 26 3d 44 54 57 45 | 45 4b 4e 4f 49 4e 59 45 |)w&=DTWE|EKNOINYE|
|00005f20| 41 52 26 3a 28 69 64 26 | 2c 79 65 61 72 73 74 61 |AR&:(id&|,yearsta|
|00005f30| 72 74 26 2c 72 75 6c 65 | 26 29 0f 00 00 01 fe 02 |rt&,rule|&)......|
|00005f40| 00 00 35 15 44 54 44 41 | 59 4e 4f 49 4e 59 45 41 |..5.DTDA|YNOINYEA|
|00005f50| 52 26 3a 20 5f 44 61 74 | 65 1f 44 54 44 41 59 4e |R&: _Dat|e.DTDAYN|
|00005f60| 4f 49 4e 59 45 41 52 26 | 3a 28 69 64 26 2c 79 65 |OINYEAR&|:(id&,ye|
|00005f70| 61 72 73 74 61 72 74 26 | 29 a3 52 65 74 75 72 6e |arstart&|).Return|
|00005f80| 73 20 74 68 65 20 64 61 | 79 20 6e 75 6d 62 65 72 |s the da|y number|
|00005f90| 20 69 6e 20 74 68 65 20 | 79 65 61 72 20 6f 66 20 | in the |year of |
|00005fa0| 74 68 65 20 64 61 74 65 | 2f 74 69 6d 65 20 6f 62 |the date|/time ob|
|00005fb0| 6a 65 63 74 20 77 69 74 | 68 20 68 61 6e 64 6c 65 |ject wit|h handle|
|00005fc0| 20 69 64 26 2e 20 54 68 | 65 20 66 69 72 73 74 20 | id&. Th|e first |
|00005fd0| 64 61 79 20 6f 66 20 74 | 68 65 20 79 65 61 72 20 |day of t|he year |
|00005fe0| 69 73 20 73 70 65 63 69 | 66 69 65 64 20 62 79 20 |is speci|fied by |
|00005ff0| 74 68 65 20 64 61 74 65 | 2f 74 69 6d 65 20 6f 62 |the date|/time ob|
|00006000| 6a 65 63 74 20 77 69 74 | 68 20 68 61 6e 64 6c 65 |ject wit|h handle|
|00006010| 20 79 65 61 72 73 74 61 | 72 74 26 2e 06 35 15 44 | yearsta|rt&..5.D|
|00006020| 54 44 41 59 4e 4f 49 4e | 57 45 45 4b 26 3a 20 5f |TDAYNOIN|WEEK&: _|
|00006030| 44 61 74 65 17 6e 26 3d | 44 54 44 41 59 4e 4f 49 |Date.n&=|DTDAYNOI|
|00006040| 4e 57 45 45 4b 26 3a 28 | 69 64 26 29 52 52 65 74 |NWEEK&:(|id&)RRet|
|00006050| 75 72 6e 73 20 74 68 65 | 20 64 61 79 20 6e 75 6d |urns the| day num|
|00006060| 62 65 72 20 69 6e 20 74 | 68 65 20 77 65 65 6b 20 |ber in t|he week |
|00006070| 28 31 2d 37 29 20 6f 66 | 20 74 68 65 20 64 61 74 |(1-7) of| the dat|
|00006080| 65 2f 74 69 6d 65 20 6f | 62 6a 65 63 74 20 77 69 |e/time o|bject wi|
|00006090| 74 68 20 68 61 6e 64 6c | 65 20 69 64 26 2e 06 35 |th handl|e id&..5|
|000060a0| 15 44 54 44 41 59 53 49 | 4e 4d 4f 4e 54 48 26 3a |.DTDAYSI|NMONTH&:|
|000060b0| 20 5f 44 61 74 65 17 6e | 26 3d 44 54 44 41 59 53 | _Date.n|&=DTDAYS|
|000060c0| 49 4e 4d 4f 4e 54 48 26 | 3a 28 69 64 26 29 7f 52 |INMONTH&|:(id&).R|
|000060d0| 65 74 75 72 6e 73 20 74 | 68 65 20 6e 75 6d 62 65 |eturns t|he numbe|
|000060e0| 72 20 6f 66 20 64 61 79 | 73 20 69 6e 20 74 68 65 |r of day|s in the|
|000060f0| 20 6d 6f 6e 74 68 20 6f | 66 20 74 68 65 20 6d 6f | month o|f the mo|
|00006100| 6e 74 68 20 73 70 65 63 | 69 66 69 65 64 20 62 79 |nth spec|ified by|
|00006110| 20 74 68 65 20 6d 6f 6e | 74 68 20 63 6f 6d 70 6f | the mon|th compo|
|00006120| 6e 65 6e 74 20 6f 66 20 | 74 68 65 20 64 61 74 65 |nent of |the date|
|00006130| 2f 74 69 6d 65 20 6f 62 | 6a 65 63 74 20 77 69 74 |/time ob|ject wit|
|00006140| 68 20 68 61 6e 64 6c 65 | 20 69 64 26 2e 06 35 14 |h handle| id&..5.|
|00006150| 44 54 53 45 54 48 4f 4d | 45 54 49 4d 45 3a 20 5f |DTSETHOM|ETIME: _|
|00006160| 44 61 74 65 13 44 54 53 | 45 54 48 4f 4d 45 54 49 |Date.DTS|ETHOMETI|
|00006170| 4d 45 3a 28 69 64 26 29 | 54 53 65 74 73 20 74 68 |ME:(id&)|TSets th|
|00006180| 65 20 73 79 73 74 65 6d | 20 74 69 6d 65 20 74 6f |e system| time to|
|00006190| 20 74 68 65 20 74 69 6d | 65 20 73 70 65 63 69 66 | the tim|e specif|
|000061a0| 69 65 64 20 69 6e 20 74 | 68 65 20 64 61 74 65 2f |ied in t|he date/|
|000061b0| 74 69 6d 65 20 6f 62 6a | 65 63 74 20 77 69 74 68 |time obj|ect with|
|000061c0| 20 68 61 6e 64 6c 65 20 | 69 64 26 2e 06 35 15 4c | handle |id&..5.L|
|000061d0| 43 43 4f 55 4e 54 52 59 | 43 4f 44 45 26 3a 20 5f |CCOUNTRY|CODE&: _|
|000061e0| 44 61 74 65 13 63 63 26 | 3d 4c 43 43 4f 55 4e 54 |Date.cc&|=LCCOUNT|
|000061f0| 52 59 43 4f 44 45 26 3a | e8 52 65 74 75 72 6e 73 |RYCODE&:|.Returns|
|00006200| 20 74 68 65 20 63 6f 75 | 6e 74 72 79 20 63 6f 64 | the cou|ntry cod|
|00006210| 65 20 66 6f 72 20 74 68 | 65 20 63 75 72 72 65 6e |e for th|e curren|
|00006220| 74 20 73 79 73 74 65 6d | 20 68 6f 6d 65 20 63 6f |t system| home co|
|00006230| 75 6e 74 72 79 20 28 4c | 43 20 73 74 61 6e 64 73 |untry (L|C stands|
|00006240| 20 66 6f 72 20 91 4c 6f | 63 61 6c 65 92 29 2c 20 | for .Lo|cale.), |
|00006250| 77 68 69 63 68 20 6d 61 | 79 20 62 65 20 75 73 65 |which ma|y be use|
|00006260| 64 20 74 6f 20 73 65 6c | 65 63 74 20 63 6f 75 6e |d to sel|ect coun|
|00006270| 74 72 79 2d 73 70 65 63 | 69 66 69 63 20 64 61 74 |try-spec|ific dat|
|00006280| 61 2e 20 20 54 68 65 20 | 63 6f 75 6e 74 72 79 20 |a.  The |country |
|00006290| 63 6f 64 65 20 66 6f 72 | 20 61 6e 79 20 67 69 76 |code for| any giv|
|000062a0| 65 6e 20 63 6f 75 6e 74 | 72 79 20 69 73 20 74 68 |en count|ry is th|
|000062b0| 65 20 69 6e 74 65 72 6e | 61 74 69 6f 6e 61 6c 20 |e intern|ational |
|000062c0| 64 69 61 6c 6c 69 6e 67 | 20 70 72 65 66 69 78 20 |dialling| prefix |
|000062d0| 66 6f 72 20 74 68 61 74 | 20 63 6f 75 6e 74 72 79 |for that| country|
|000062e0| 06 35 1a 4c 43 44 45 43 | 49 4d 41 4c 53 45 50 41 |.5.LCDEC|IMALSEPA|
|000062f0| 52 41 54 4f 52 24 3a 20 | 5f 44 61 74 65 1c 64 65 |RATOR$: |_Date.de|
|00006300| 63 53 65 70 24 3d 4c 43 | 44 45 43 49 4d 41 4c 53 |cSep$=LC|DECIMALS|
|00006310| 45 50 41 52 41 54 4f 52 | 24 3a 99 52 65 74 75 72 |EPARATOR|$:.Retur|
|00006320| 6e 73 20 74 68 65 20 64 | 65 63 69 6d 61 6c 20 73 |ns the d|ecimal s|
|00006330| 65 70 61 72 61 74 6f 72 | 20 28 74 68 65 20 63 68 |eparator| (the ch|
|00006340| 61 72 61 63 74 65 72 20 | 75 73 65 64 20 69 6e 20 |aracter |used in |
|00006350| 64 65 63 69 6d 61 6c 20 | 6e 75 6d 62 65 72 73 20 |decimal |numbers |
|00006360| 74 6f 20 73 65 70 61 72 | 61 74 65 20 77 68 6f 6c |to separ|ate whol|
|00006370| 65 20 70 61 72 74 20 66 | 72 6f 6d 20 66 72 61 63 |e part f|rom frac|
|00006380| 74 69 6f 6e 61 6c 20 70 | 61 72 74 29 20 61 63 63 |tional p|art) acc|
|00006390| 6f 72 64 69 6e 67 20 74 | 6f 20 74 68 65 20 6c 6f |ording t|o the lo|
|000063a0| 63 61 6c 20 73 79 73 74 | 65 6d 20 73 65 74 74 69 |cal syst|em setti|
|000063b0| 6e 67 2e 06 35 17 4c 43 | 53 45 54 43 4c 4f 43 4b |ng..5.LC|SETCLOCK|
|000063c0| 46 4f 52 4d 41 54 3a 20 | 5f 44 61 74 65 1a 4c 43 |FORMAT: |_Date.LC|
|000063d0| 53 45 54 43 4c 4f 43 4b | 46 4f 52 4d 41 54 3a 28 |SETCLOCK|FORMAT:(|
|000063e0| 66 6f 72 6d 61 74 26 29 | 98 53 65 74 73 20 74 68 |format&)|.Sets th|
|000063f0| 65 20 73 79 73 74 65 6d | 20 63 6c 6f 63 6b 20 66 |e system| clock f|
+--------+-------------------------+-------------------------+--------+--------+