home *** CD-ROM | disk | FTP | other *** search
/ Megazine / Megazine-1.iso / PROGRAMA / FOXPRO / BUILDSQL / BASEFORM.VCT < prev    next >
Unknown  |  1996-12-01  |  77.1 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert VW Comms Data Base (other/vwCommsDataBase) ext Unsupported
100% file MacBinary INVALID date "4" default (weak)
99% file data default
40% TrID Windows Font resource (v1) default
39% TrID DEGAS med-res bitmap default (weak)
20% TrID MacBinary 1 default (weak)
100% siegfried x-fmt/342 Microsoft FoxPro Memo default (weak)
100% gt2 MAC Bilddatei default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 01 34 3f 00 00 00 01 | 21 c0 00 00 00 00 00 00 |..4?....|!.......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00000210| 3d 20 20 20 33 2e 30 30 | 00 00 00 01 00 00 00 c8 |= 3.00|........|
|00000220| fe f2 ff 1b 02 01 00 00 | 00 af 00 00 00 af 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 21 | 30 01 00 00 00 25 00 00 |.......!|0....%..|
|00000250| 00 53 00 00 00 00 00 00 | 00 66 00 00 00 03 00 00 |.S......|.f......|
|00000260| 00 60 00 00 00 00 00 00 | 00 00 00 00 00 fc 03 00 |.`......|........|
|00000270| 03 00 55 00 00 10 00 0d | 00 99 fc 43 f4 00 00 f6 |..U.....|...C....|
|00000280| 01 00 fd fe 03 00 55 02 | 00 08 00 54 48 49 53 46 |......U.|...THISF|
|00000290| 4f 52 4d 07 00 52 45 46 | 52 45 53 48 05 00 43 6c |ORM..REF|RESH..Cl|
|000002a0| 69 63 6b 2c 00 00 00 00 | 00 31 00 d1 00 32 00 00 |ick,....|.1...2..|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|000002c0| 00 00 00 11 00 00 00 25 | 00 00 00 01 00 00 00 00 |.......%|........|
|000002d0| 29 00 00 00 af 00 00 00 | 00 00 00 00 00 00 00 00 |).......|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 00 22 |........|......."|
|000002f0| 41 72 69 61 6c 2c 20 31 | 2c 20 31 30 2c 20 36 2c |Arial, 1|, 10, 6,|
|00000300| 20 31 36 2c 20 31 33 2c | 20 31 34 2c 20 33 2c 20 | 16, 13,| 14, 3, |
|00000310| 30 0a 00 00 00 01 00 00 | 00 09 66 72 6d 73 69 6d |0.......|..frmsim|
|00000320| 70 6c 65 00 00 00 01 00 | 00 00 06 50 69 78 65 6c |ple.....|...Pixel|
|00000330| 73 00 00 00 01 00 00 00 | 05 43 6c 61 73 73 00 00 |s.......|.Class..|
|00000340| 00 01 00 00 00 01 31 00 | 00 00 01 00 00 00 22 41 |......1.|......"A|
|00000350| 72 69 61 6c 2c 20 31 2c | 20 31 30 2c 20 36 2c 20 |rial, 1,| 10, 6, |
|00000360| 31 36 2c 20 31 33 2c 20 | 31 34 2c 20 33 2c 20 30 |16, 13, |14, 3, 0|
|00000370| 0a 00 00 00 01 00 00 00 | 07 66 72 6d 62 61 73 65 |........|.frmbase|
|00000380| 00 00 00 01 00 00 00 06 | 50 69 78 65 6c 73 00 00 |........|Pixels..|
|00000390| 00 01 00 00 00 23 42 61 | 73 65 20 66 6f 72 6d 2c |.....#Ba|se form,|
|000003a0| 20 67 72 65 79 20 62 61 | 63 6b 67 72 6f 75 6e 64 | grey ba|ckground|
|000003b0| 2c 20 33 35 30 78 35 35 | 30 00 00 00 01 00 00 00 |, 350x55|0.......|
|000003c0| 22 41 72 69 61 6c 2c 20 | 31 2c 20 31 30 2c 20 36 |"Arial, |1, 10, 6|
|000003d0| 2c 20 31 36 2c 20 31 33 | 2c 20 31 34 2c 20 33 2c |, 16, 13|, 14, 3,|
|000003e0| 20 30 0a 00 00 00 01 00 | 00 00 06 73 70 6c 61 73 | 0......|...splas|
|000003f0| 68 00 00 00 01 00 00 00 | 06 50 69 78 65 6c 73 00 |h.......|.Pixels.|
|00000400| 00 00 01 00 00 00 05 43 | 6c 61 73 73 00 00 00 01 |.......C|lass....|
|00000410| 00 00 00 01 31 00 00 00 | 01 00 00 00 04 66 6f 72 |....1...|.....for|
|00000420| 6d 00 00 00 01 00 00 00 | 06 73 70 6c 61 73 68 00 |m.......|.splash.|
|00000430| 00 00 01 00 00 00 36 50 | 52 4f 43 45 44 55 52 45 |......6P|ROCEDURE|
|00000440| 20 49 6e 69 74 0d 0a 54 | 48 49 53 46 4f 52 4d 2e | Init..T|HISFORM.|
|00000450| 41 75 74 6f 43 65 6e 74 | 65 72 20 3d 20 2e 54 2e |AutoCent|er = .T.|
|00000460| 0d 0a 0d 0a 45 4e 44 50 | 52 4f 43 0d 0a 00 00 00 |....ENDP|ROC.....|
|00000470| 01 00 00 00 01 31 00 00 | 00 01 00 00 00 cb fe f2 |.....1..|........|
|00000480| ff 1b 02 01 00 00 00 b2 | 00 00 00 b2 00 00 00 00 |........|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 00 00 00 00 00 03 d8 01 | 00 00 00 25 00 00 00 57 |........|...%...W|
|000004b0| 00 00 00 00 00 00 00 69 | 00 00 00 03 00 00 00 63 |.......i|.......c|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 fc 03 00 03 00 |........|........|
|000004d0| 55 00 00 11 00 0e 00 54 | f4 00 00 f7 01 00 10 fc |U......T|........|
|000004e0| 61 fd fe 03 00 55 02 00 | 08 00 54 48 49 53 46 4f |a....U..|..THISFO|
|000004f0| 52 4d 0a 00 41 55 54 4f | 43 45 4e 54 45 52 04 00 |RM..AUTO|CENTER..|
|00000500| 49 6e 69 74 2c 00 00 00 | 00 00 31 00 e1 00 32 00 |Init,...|..1...2.|
|00000510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 01 00 00 00 10 00 00 00 | 2b 00 00 00 01 00 00 00 |........|+.......|
|00000530| 00 29 00 00 00 b2 00 00 | 00 00 00 00 00 00 00 00 |.)......|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|00000550| 01 33 00 00 00 01 00 00 | 00 04 66 6f 72 6d 00 00 |.3......|..form..|
|00000560| 00 01 00 00 00 22 41 72 | 69 61 6c 2c 20 31 2c 20 |....."Ar|ial, 1, |
|00000570| 31 30 2c 20 36 2c 20 31 | 36 2c 20 31 33 2c 20 31 |10, 6, 1|6, 13, 1|
|00000580| 34 2c 20 33 2c 20 30 0a | 00 00 00 01 00 00 00 08 |4, 3, 0.|........|
|00000590| 66 72 6d 6d 61 69 6e 74 | 00 00 00 01 00 00 00 06 |frmmaint|........|
|000005a0| 50 69 78 65 6c 73 00 00 | 00 01 00 00 00 05 43 6c |Pixels..|......Cl|
|000005b0| 61 73 73 00 00 00 01 00 | 00 00 05 43 6c 61 73 73 |ass.....|...Class|
|000005c0| 00 00 00 01 00 00 00 07 | 66 72 6d 62 61 73 65 00 |........|frmbase.|
|000005d0| 00 00 01 00 00 00 08 66 | 72 6d 6d 61 69 6e 74 00 |.......f|rmmaint.|
|000005e0| 00 00 01 00 00 00 42 48 | 65 69 67 68 74 20 3d 20 |......BH|eight = |
|000005f0| 32 37 33 0d 0a 4c 65 66 | 74 20 3d 20 39 0d 0a 54 |273..Lef|t = 9..T|
|00000600| 6f 70 20 3d 20 32 32 0d | 0a 57 69 64 74 68 20 3d |op = 22.|.Width =|
|00000610| 20 35 30 34 0d 0a 4e 61 | 6d 65 20 3d 20 22 47 72 | 504..Na|me = "Gr|
|00000620| 64 62 61 73 65 31 22 0d | 0a 00 00 00 01 00 00 00 |dbase1".|........|
|00000630| 04 66 6f 72 6d 00 00 00 | 01 00 00 00 16 66 72 6d |.form...|.....frm|
|00000640| 6d 61 69 6e 74 2e 50 67 | 62 61 73 65 31 2e 50 61 |maint.Pg|base1.Pa|
|00000650| 67 65 33 00 00 00 01 00 | 00 00 08 47 72 64 62 61 |ge3.....|...Grdba|
|00000660| 73 65 31 00 00 00 01 00 | 00 00 04 67 72 69 64 00 |se1.....|...grid.|
|00000670| 00 00 01 00 00 00 0c 62 | 61 73 65 63 74 72 6c 2e |.......b|asectrl.|
|00000680| 76 63 78 00 00 00 01 00 | 00 00 07 67 72 64 62 61 |vcx.....|...grdba|
|00000690| 73 65 00 00 00 01 00 00 | 00 04 66 6f 72 6d 00 00 |se......|..form..|
|000006a0| 00 01 00 00 00 c0 54 6f | 70 20 3d 20 30 0d 0a 4c |......To|p = 0..L|
|000006b0| 65 66 74 20 3d 20 30 0d | 0a 48 65 69 67 68 74 20 |eft = 0.|.Height |
|000006c0| 3d 20 32 35 30 0d 0a 57 | 69 64 74 68 20 3d 20 33 |= 250..W|idth = 3|
|000006d0| 38 37 0d 0a 44 6f 43 72 | 65 61 74 65 20 3d 20 2e |87..DoCr|eate = .|
|000006e0| 54 2e 0d 0a 43 61 70 74 | 69 6f 6e 20 3d 20 22 22 |T...Capt|ion = ""|
|000006f0| 0d 0a 43 6c 6f 73 61 62 | 6c 65 20 3d 20 2e 46 2e |..Closab|le = .F.|
|00000700| 0d 0a 43 6f 6e 74 72 6f | 6c 42 6f 78 20 3d 20 2e |..Contro|lBox = .|
|00000710| 46 2e 0d 0a 4d 61 78 42 | 75 74 74 6f 6e 20 3d 20 |F...MaxB|utton = |
|00000720| 2e 46 2e 0d 0a 4d 69 6e | 42 75 74 74 6f 6e 20 3d |.F...Min|Button =|
|00000730| 20 2e 46 2e 0d 0a 4d 6f | 76 61 62 6c 65 20 3d 20 | .F...Mo|vable = |
|00000740| 2e 46 2e 0d 0a 57 69 6e | 64 6f 77 54 79 70 65 20 |.F...Win|dowType |
|00000750| 3d 20 30 0d 0a 4e 61 6d | 65 20 3d 20 22 73 70 6c |= 0..Nam|e = "spl|
|00000760| 61 73 68 22 0d 0a 00 00 | 00 01 00 00 00 08 66 72 |ash"....|......fr|
|00000770| 6d 6d 61 69 6e 74 00 00 | 00 01 00 00 00 07 50 67 |mmaint..|......Pg|
|00000780| 62 61 73 65 31 00 00 00 | 01 00 00 00 09 70 61 67 |base1...|.....pag|
|00000790| 65 66 72 61 6d 65 00 00 | 00 01 00 00 00 2c 63 74 |eframe..|.....,ct|
|000007a0| 6f 6f 6c 62 61 72 20 54 | 6f 6f 6c 42 61 72 20 61 |oolbar T|oolBar a|
|000007b0| 73 73 6f 63 69 61 74 65 | 64 20 77 69 74 68 20 74 |ssociate|d with t|
|000007c0| 68 69 73 20 66 6f 72 6d | 0d 0a 00 00 00 01 00 00 |his form|........|
|000007d0| 00 72 50 52 4f 43 45 44 | 55 52 45 20 44 65 73 74 |.rPROCED|URE Dest|
|000007e0| 72 6f 79 0d 0a 6f 41 70 | 70 2e 52 65 6d 6f 76 65 |roy..oAp|p.Remove|
|000007f0| 4e 61 76 54 62 72 28 29 | 0d 0a 0d 0a 45 4e 44 50 |NavTbr()|....ENDP|
|00000800| 52 4f 43 0d 0a 50 52 4f | 43 45 44 55 52 45 20 49 |ROC..PRO|CEDURE I|
|00000810| 6e 69 74 0d 0a 6f 41 70 | 70 2e 53 68 6f 77 4e 61 |nit..oAp|p.ShowNa|
|00000820| 76 54 62 72 28 54 48 49 | 53 46 4f 52 4d 2e 63 54 |vTbr(THI|SFORM.cT|
|00000830| 6f 6f 6c 42 61 72 29 0d | 0a 0d 0a 45 4e 44 50 52 |oolBar).|...ENDPR|
|00000840| 4f 43 0d 0a 00 00 00 01 | 00 00 00 30 50 52 4f 43 |OC......|...0PROC|
|00000850| 45 44 55 52 45 20 43 6c | 69 63 6b 0d 0a 54 48 49 |EDURE Cl|ick..THI|
|00000860| 53 46 4f 52 4d 2e 52 65 | 66 72 65 73 68 28 29 0d |SFORM.Re|fresh().|
|00000870| 0a 0d 0a 45 4e 44 50 52 | 4f 43 0d 0a 00 00 00 01 |...ENDPR|OC......|
|00000880| 00 00 00 06 70 67 62 61 | 73 65 00 00 00 01 00 00 |....pgba|se......|
|00000890| 00 73 54 6f 70 20 3d 20 | 30 0d 0a 4c 65 66 74 20 |.sTop = |0..Left |
|000008a0| 3d 20 30 0d 0a 48 65 69 | 67 68 74 20 3d 20 33 35 |= 0..Hei|ght = 35|
|000008b0| 30 0d 0a 57 69 64 74 68 | 20 3d 20 35 35 30 0d 0a |0..Width| = 550..|
|000008c0| 44 6f 43 72 65 61 74 65 | 20 3d 20 2e 54 2e 0d 0a |DoCreate| = .T...|
|000008d0| 43 61 70 74 69 6f 6e 20 | 3d 20 22 42 61 73 65 46 |Caption |= "BaseF|
|000008e0| 6f 72 6d 22 0d 0a 63 74 | 6f 6f 6c 62 61 72 20 3d |orm"..ct|oolbar =|
|000008f0| 20 0d 0a 4e 61 6d 65 20 | 3d 20 22 66 72 6d 62 61 | ..Name |= "frmba|
|00000900| 73 65 22 0d 0a 00 00 00 | 01 00 00 00 07 66 72 6d |se".....|.....frm|
|00000910| 62 61 73 65 00 00 00 01 | 00 00 00 07 66 72 6d 62 |base....|....frmb|
|00000920| 61 73 65 00 00 00 01 00 | 00 00 09 66 72 6d 73 69 |ase.....|...frmsi|
|00000930| 6d 70 6c 65 00 00 00 01 | 00 00 00 a4 63 74 61 62 |mple....|....ctab|
|00000940| 6c 65 20 4d 61 69 6e 20 | 74 61 62 6c 65 20 66 6f |le Main |table fo|
|00000950| 72 20 66 6f 72 6d 0d 0a | 2a 6e 65 78 74 20 73 6b |r form..|*next sk|
|00000960| 69 70 0d 0a 2a 70 72 65 | 76 69 6f 75 73 20 73 6b |ip..*pre|vious sk|
|00000970| 69 70 20 2d 31 0d 0a 2a | 66 69 72 73 74 20 67 6f |ip -1..*|first go|
|00000980| 20 74 6f 70 0d 0a 2a 6c | 61 73 74 20 67 6f 20 62 | top..*l|ast go b|
|00000990| 6f 74 74 6f 6d 0d 0a 2a | 73 61 76 65 20 73 61 76 |ottom..*|save sav|
|000009a0| 65 20 69 74 0d 0a 2a 72 | 65 76 65 72 74 20 72 65 |e it..*r|evert re|
|000009b0| 76 65 72 74 20 62 61 63 | 6b 0d 0a 2a 61 64 64 20 |vert bac|k..*add |
|000009c0| 41 64 64 20 6d 65 74 68 | 6f 64 0d 0a 2a 64 65 6c |Add meth|od..*del|
|000009d0| 20 44 65 6c 65 74 65 20 | 6d 65 74 68 6f 64 0d 0a | Delete |method..|
|000009e0| 00 00 00 01 00 00 00 46 | 44 6f 43 72 65 61 74 65 |.......F|DoCreate|
|000009f0| 20 3d 20 2e 54 2e 0d 0a | 43 61 70 74 69 6f 6e 20 | = .T...|Caption |
|00000a00| 3d 20 22 66 72 6d 53 69 | 6d 70 6c 65 22 0d 0a 63 |= "frmSi|mple"..c|
|00000a10| 74 61 62 6c 65 20 3d 20 | 0d 0a 4e 61 6d 65 20 3d |table = |..Name =|
|00000a20| 20 22 66 72 6d 73 69 6d | 70 6c 65 22 0d 0a 00 00 | "frmsim|ple"....|
|00000a30| 00 01 00 00 00 04 66 6f | 72 6d 00 00 00 01 00 00 |......fo|rm......|
|00000a40| 00 0c 62 61 73 65 66 6f | 72 6d 2e 76 63 78 00 00 |..basefo|rm.vcx..|
|00000a50| 00 01 00 00 06 c0 fe f2 | ff 1b 02 01 00 00 00 a7 |........|........|
|00000a60| 06 00 00 a7 06 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 d6 9d 08 |........|........|
|00000a80| 00 00 00 25 00 00 00 eb | 04 00 00 00 00 00 00 ee |...%....|........|
|00000a90| 05 00 00 4f 00 00 00 50 | 05 00 00 00 00 00 00 00 |...O...P|........|
|00000aa0| 00 00 00 fc 03 00 03 00 | 55 00 00 54 00 07 00 ae |........|U..T....|
|00000ab0| f7 00 00 fe 13 00 25 fc | 43 f4 01 00 f7 02 00 a1 |......%.|C.......|
|00000ac0| 0a fd f9 05 3b 00 fe 10 | 00 54 f7 00 00 10 fc f4 |....;...|.T......|
|00000ad0| 01 00 f7 02 00 fd fe 11 | 00 01 53 45 4c 45 20 26 |........|..SELE &|
|00000ae0| 6c 63 54 61 62 6c 65 0a | 04 00 1e fe 05 00 23 29 |lcTable.|......#)|
|00000af0| fe 0d 00 99 fc 43 f4 01 | 00 f6 03 00 fd fe 03 00 |.....C..|........|
|00000b00| 55 04 00 07 00 4c 43 54 | 41 42 4c 45 08 00 54 48 |U....LCT|ABLE..TH|
|00000b10| 49 53 46 4f 52 4d 06 00 | 43 54 41 42 4c 45 07 00 |ISFORM..|CTABLE..|
|00000b20| 52 45 46 52 45 53 48 54 | 00 07 00 ae f7 00 00 fe |REFRESHT|........|
|00000b30| 13 00 25 fc 43 f4 01 00 | f7 02 00 a1 0a fd f9 05 |..%.C...|........|
|00000b40| 3b 00 fe 10 00 54 f7 00 | 00 10 fc f4 01 00 f7 02 |;....T..|........|
|00000b50| 00 fd fe 11 00 01 53 45 | 4c 45 20 26 6c 63 54 61 |......SE|LE &lcTa|
|00000b60| 62 6c 65 0a 04 00 1e fe | 05 00 23 36 fe 0d 00 99 |ble.....|..#6....|
|00000b70| fc 43 f4 01 00 f6 03 00 | fd fe 03 00 55 04 00 07 |.C......|....U...|
|00000b80| 00 4c 43 54 41 42 4c 45 | 08 00 54 48 49 53 46 4f |.LCTABLE|..THISFO|
|00000b90| 52 4d 06 00 43 54 41 42 | 4c 45 07 00 52 45 46 52 |RM..CTAB|LE..REFR|
|00000ba0| 45 53 48 7e 00 07 00 ae | f7 00 00 fe 13 00 25 fc |ESH~....|......%.|
|00000bb0| 43 f4 01 00 f7 02 00 a1 | 0a fd f9 05 3b 00 fe 10 |C.......|....;...|
|00000bc0| 00 54 f7 00 00 10 fc f4 | 01 00 f7 02 00 fd fe 11 |.T......|........|
|00000bd0| 00 01 53 45 4c 45 20 26 | 6c 63 54 61 62 6c 65 0a |..SELE &|lcTable.|
|00000be0| 04 00 1e fe 0d 00 25 fc | 43 2b 0a fd f9 05 77 00 |......%.|C+....w.|
|00000bf0| fe 04 00 48 fe 0c 00 25 | fc 43 2b fd f9 05 66 00 |...H...%|.C+...f.|
|00000c00| fe 0a 00 48 fc f9 02 ff | ff fd fe 04 00 1e fe 0d |...H....|........|
|00000c10| 00 99 fc 43 f4 01 00 f6 | 03 00 fd fe 04 00 1e fe |...C....|........|
|00000c20| 03 00 55 04 00 07 00 4c | 43 54 41 42 4c 45 08 00 |..U....L|CTABLE..|
|00000c30| 54 48 49 53 46 4f 52 4d | 06 00 43 54 41 42 4c 45 |THISFORM|..CTABLE|
|00000c40| 07 00 52 45 46 52 45 53 | 48 6a 00 07 00 ae f7 00 |..REFRES|Hj......|
|00000c50| 00 fe 13 00 25 fc 43 f4 | 01 00 f7 02 00 a1 0a fd |....%.C.|........|
|00000c60| f9 05 3b 00 fe 10 00 54 | f7 00 00 10 fc f4 01 00 |..;....T|........|
|00000c70| f7 02 00 fd fe 11 00 01 | 53 45 4c 45 20 26 6c 63 |........|SELE &lc|
|00000c80| 54 61 62 6c 65 0a 04 00 | 1e fe 0d 00 25 fc 43 1e |Table...|....%.C.|
|00000c90| 0a fd f9 05 63 00 fe 0a | 00 48 fc f9 02 ff ff fd |....c...|.H......|
|00000ca0| fe 0d 00 99 fc 43 f4 01 | 00 f6 03 00 fd fe 04 00 |.....C..|........|
|00000cb0| 1e fe 03 00 55 04 00 07 | 00 4c 43 54 41 42 4c 45 |....U...|.LCTABLE|
|00000cc0| 08 00 54 48 49 53 46 4f | 52 4d 06 00 43 54 41 42 |..THISFO|RM..CTAB|
|00000cd0| 4c 45 07 00 52 45 46 52 | 45 53 48 53 00 07 00 ae |LE..REFR|ESHS....|
|00000ce0| f7 00 00 fe 10 00 54 f7 | 00 00 10 fc f4 01 00 f7 |......T.|........|
|00000cf0| 02 00 fd fe 20 00 25 fc | 43 fb 09 00 42 75 66 66 |.... .%.|C...Buff|
|00000d00| 65 72 69 6e 67 f7 00 00 | ea 89 f8 01 01 10 fd f9 |ering...|........|
|00000d10| 05 3b 00 fe 04 00 42 fe | 08 00 1b f9 05 4c 00 fe |.;....B.|.....L..|
|00000d20| 09 00 86 fc 43 ea 93 fd | fe 04 00 1e fe 03 00 55 |....C...|.......U|
|00000d30| 03 00 07 00 4c 43 54 41 | 42 4c 45 08 00 54 48 49 |....LCTA|BLE..THI|
|00000d40| 53 46 4f 52 4d 06 00 43 | 54 41 42 4c 45 62 00 07 |SFORM..C|TABLEb..|
|00000d50| 00 ae f7 00 00 fe 10 00 | 54 f7 00 00 10 fc f4 01 |........|T.......|
|00000d60| 00 f7 02 00 fd fe 20 00 | 25 fc 43 fb 09 00 42 75 |...... .|%.C...Bu|
|00000d70| 66 66 65 72 69 6e 67 f7 | 00 00 ea 89 f8 01 01 10 |ffering.|........|
|00000d80| fd f9 05 3b 00 fe 04 00 | 42 fe 08 00 1b f9 05 5b |...;....|B......[|
|00000d90| 00 fe 09 00 86 fc 43 ea | 94 fd fe 0f 00 99 fc 43 |......C.|.......C|
|00000da0| e1 39 f4 03 00 f6 04 00 | fd fe 04 00 1e fe 03 00 |.9......|........|
|00000db0| 55 05 00 07 00 4c 43 54 | 41 42 4c 45 08 00 54 48 |U....LCT|ABLE..TH|
|00000dc0| 49 53 46 4f 52 4d 06 00 | 43 54 41 42 4c 45 0a 00 |ISFORM..|CTABLE..|
|00000dd0| 41 43 54 49 56 45 46 4f | 52 4d 07 00 52 45 46 52 |ACTIVEFO|RM..REFR|
|00000de0| 45 53 48 cb 00 0f 00 ae | f7 00 00 07 f7 01 00 07 |ESH.....|........|
|00000df0| f7 02 00 fe 10 00 54 f7 | 00 00 10 fc f4 03 00 f7 |......T.|........|
|00000e00| 04 00 fd fe 11 00 01 53 | 45 4c 45 20 26 6c 63 54 |.......S|ELE &lcT|
|00000e10| 61 62 6c 65 0a 0f 00 54 | f7 02 00 10 fc 43 f8 01 |able...T|.....C..|
|00000e20| 01 2f fd fe 06 00 47 0f | 1f fe 2b 00 01 43 41 4c |./....G.|..+..CAL|
|00000e30| 43 55 4c 41 54 45 20 4d | 41 58 28 56 41 4c 28 26 |CULATE M|AX(VAL(&|
|00000e40| 6c 63 46 69 65 6c 64 29 | 29 20 54 4f 20 6c 6e 4d |lcField)|) TO lnM|
|00000e50| 61 78 49 44 0a 06 00 47 | 0f 20 fe 11 00 54 f7 01 |axID...G|. ...T..|
|00000e60| 00 10 fc f7 01 00 f8 01 | 01 06 fd fe 05 00 06 08 |........|........|
|00000e70| fe 2f 00 01 52 45 50 4c | 41 43 45 20 26 6c 63 46 |./..REPL|ACE &lcF|
|00000e80| 69 65 6c 64 20 57 49 54 | 48 20 41 4c 4c 54 52 49 |ield WIT|H ALLTRI|
|00000e90| 4d 28 53 54 52 28 6c 6e | 4d 61 78 49 44 29 29 0a |M(STR(ln|MaxID)).|
|00000ea0| 0d 00 99 fc 43 f4 03 00 | f6 05 00 fd fe 03 00 55 |....C...|.......U|
|00000eb0| 06 00 07 00 4c 43 54 41 | 42 4c 45 07 00 4c 4e 4d |....LCTA|BLE..LNM|
|00000ec0| 41 58 49 44 07 00 4c 43 | 46 49 45 4c 44 08 00 54 |AXID..LC|FIELD..T|
|00000ed0| 48 49 53 46 4f 52 4d 06 | 00 43 54 41 42 4c 45 07 |HISFORM.|.CTABLE.|
|00000ee0| 00 52 45 46 52 45 53 48 | 5a 00 07 00 ae f7 00 00 |.REFRESH|Z.......|
|00000ef0| fe 10 00 54 f7 00 00 10 | fc f4 01 00 f7 02 00 fd |...T....|........|
|00000f00| fe 11 00 01 53 45 4c 45 | 20 26 6c 63 54 61 62 6c |....SELE| &lcTabl|
|00000f10| 65 0a 04 00 14 fe 04 00 | 48 fe 0c 00 25 fc 43 2b |e.......|H...%.C+|
|00000f20| fd f9 05 46 00 fe 0a 00 | 48 fc f9 02 ff ff fd fe |...F....|H.......|
|00000f30| 04 00 1e fe 0d 00 99 fc | 43 f4 01 00 f6 03 00 fd |........|C.......|
|00000f40| fe 03 00 55 04 00 07 00 | 4c 43 54 41 42 4c 45 08 |...U....|LCTABLE.|
|00000f50| 00 54 48 49 53 46 4f 52 | 4d 06 00 43 54 41 42 4c |.THISFOR|M..CTABL|
|00000f60| 45 07 00 52 45 46 52 45 | 53 48 05 00 66 69 72 73 |E..REFRE|SH..firs|
|00000f70| 74 2c 00 00 00 00 00 04 | 00 6c 61 73 74 a8 00 00 |t,......|.last...|
|00000f80| 00 00 00 04 00 6e 65 78 | 74 24 01 00 00 00 00 08 |.....nex|t$......|
|00000f90| 00 70 72 65 76 69 6f 75 | 73 ca 01 00 00 00 00 04 |.previou|s.......|
|00000fa0| 00 73 61 76 65 5c 02 00 | 00 00 00 06 00 72 65 76 |.save\..|.....rev|
|00000fb0| 65 72 74 ce 02 00 00 00 | 00 03 00 61 64 64 64 03 |ert.....|...addd.|
|00000fc0| 00 00 00 00 03 00 64 65 | 6c 69 04 00 00 00 00 31 |......de|li.....1|
|00000fd0| 00 71 00 31 01 01 01 11 | 01 41 00 51 00 d1 00 33 |.q.1....|.A.Q...3|
|00000fe0| 00 71 00 31 01 01 01 11 | 01 41 00 51 00 d1 00 34 |.q.1....|.A.Q...4|
|00000ff0| 00 71 00 31 01 01 01 11 | 01 41 00 d1 00 41 00 c1 |.q.1....|.A...A..|
|00001000| 00 a1 00 41 00 d1 00 41 | 00 33 00 71 00 31 01 01 |...A...A|.3.q.1..|
|00001010| 01 11 01 41 00 d1 00 a1 | 00 d1 00 41 00 33 00 71 |...A....|...A.3.q|
|00001020| 00 01 01 01 02 41 00 81 | 00 91 00 41 00 33 00 71 |.....A..|...A.3.q|
|00001030| 00 01 01 01 02 41 00 81 | 00 91 00 f1 00 41 00 33 |.....A..|.....A.3|
|00001040| 00 f1 00 01 01 11 01 f1 | 00 61 00 b1 02 61 00 11 |........|.a...a..|
|00001050| 01 51 00 f1 02 d1 00 33 | 00 71 00 01 01 11 01 41 |.Q.....3|.q.....A|
|00001060| 00 41 00 c1 00 a1 00 41 | 00 d1 00 32 00 00 00 00 |.A.....A|...2....|
|00001070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 01 00 00 |........|........|
|00001080| 00 11 00 00 00 8b 00 00 | 00 01 00 00 00 09 00 00 |........|........|
|00001090| 00 a6 00 00 00 25 01 00 | 00 0b 00 00 00 11 00 00 |.....%..|........|
|000010a0| 00 40 01 00 00 ea 01 00 | 00 16 00 00 00 1e 00 00 |.@......|........|
|000010b0| 00 09 02 00 00 98 02 00 | 00 25 00 00 00 28 00 00 |........|.%...(..|
|000010c0| 00 b3 02 00 00 30 03 00 | 00 31 00 00 00 30 00 00 |.....0..|.1...0..|
|000010d0| 00 4d 03 00 00 e9 03 00 | 00 3b 00 00 00 39 00 00 |.M......|.;...9..|
|000010e0| 00 03 04 00 00 12 05 00 | 00 46 00 00 00 45 00 00 |........|.F...E..|
|000010f0| 00 2c 05 00 00 a2 05 00 | 00 54 00 00 00 00 29 00 |.,......|.T....).|
|00001100| 00 00 a7 06 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001110| 00 00 00 00 00 00 00 00 | 00 01 00 00 01 2b fe f2 |........|.....+..|
|00001120| ff 1b 02 01 00 00 00 12 | 01 00 00 12 01 00 00 00 |........|........|
|00001130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001140| 00 00 00 00 00 65 a0 02 | 00 00 00 25 00 00 00 94 |.....e..|...%....|
|00001150| 00 00 00 00 00 00 00 b9 | 00 00 00 05 00 00 00 af |........|........|
|00001160| 00 00 00 00 00 00 00 00 | 00 00 00 fc 03 00 03 00 |........|........|
|00001170| 55 00 00 10 00 0d 00 99 | fc 43 f4 00 00 f6 01 00 |U.......|.C......|
|00001180| fd fe 03 00 55 02 00 04 | 00 4f 41 50 50 0c 00 52 |....U...|.OAPP..R|
|00001190| 45 4d 4f 56 45 4e 41 56 | 54 42 52 16 00 13 00 99 |EMOVENAV|TBR.....|
|000011a0| fc 43 f4 02 00 f7 03 00 | f4 00 00 f6 01 00 fd fe |.C......|........|
|000011b0| 03 00 55 04 00 04 00 4f | 41 50 50 0a 00 53 48 4f |..U....O|APP..SHO|
|000011c0| 57 4e 41 56 54 42 52 08 | 00 54 48 49 53 46 4f 52 |WNAVTBR.|.THISFOR|
|000011d0| 4d 08 00 43 54 4f 4f 4c | 42 41 52 07 00 44 65 73 |M..CTOOL|BAR..Des|
|000011e0| 74 72 6f 79 2c 00 00 00 | 00 00 04 00 49 6e 69 74 |troy,...|....Init|
|000011f0| 54 00 00 00 00 00 31 00 | d1 00 33 00 31 01 32 00 |T.....1.|..3.1.2.|
|00001200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001210| 01 00 00 00 13 00 00 00 | 28 00 00 00 01 00 00 00 |........|(.......|
|00001220| 03 00 00 00 43 00 00 00 | 67 00 00 00 05 00 00 00 |....C...|g.......|
|00001230| 00 29 00 00 00 12 01 00 | 00 00 00 00 00 00 00 00 |.)......|........|
|00001240| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|00001250| 0c 62 61 73 65 63 74 72 | 6c 2e 76 63 78 00 00 00 |.basectr|l.vcx...|
|00001260| 01 00 00 00 04 66 6f 72 | 6d 00 00 00 01 00 00 03 |.....for|m.......|
|00001270| 3f 50 52 4f 43 45 44 55 | 52 45 20 6e 65 78 74 0d |?PROCEDU|RE next.|
|00001280| 0a 4c 4f 43 41 4c 20 6c | 63 54 61 62 6c 65 0d 0a |.LOCAL l|cTable..|
|00001290| 49 46 20 21 45 4d 50 54 | 59 28 54 48 49 53 46 4f |IF !EMPT|Y(THISFO|
|000012a0| 52 4d 2e 63 54 61 62 6c | 65 29 0d 0a 09 6c 63 54 |RM.cTabl|e)...lcT|
|000012b0| 61 62 6c 65 20 3d 20 54 | 48 49 53 46 4f 52 4d 2e |able = T|HISFORM.|
|000012c0| 63 54 61 62 6c 65 0d 0a | 09 53 45 4c 45 20 26 6c |cTable..|.SELE &l|
|000012d0| 63 54 61 62 6c 65 0d 0a | 45 4e 44 49 46 0d 0a 49 |cTable..|ENDIF..I|
|000012e0| 46 20 21 45 4f 46 28 29 | 0d 0a 09 53 4b 49 50 0d |F !EOF()|...SKIP.|
|000012f0| 0a 09 49 46 20 45 4f 46 | 28 29 0d 0a 09 09 53 4b |..IF EOF|()....SK|
|00001300| 49 50 20 2d 31 0d 0a 09 | 45 4e 44 49 46 0d 0a 09 |IP -1...|ENDIF...|
|00001310| 5f 53 43 52 45 45 4e 2e | 41 63 74 69 76 65 46 6f |_SCREEN.|ActiveFo|
|00001320| 72 6d 2e 52 65 66 72 65 | 73 68 28 29 0d 0a 45 4e |rm.Refre|sh()..EN|
|00001330| 44 49 46 0d 0a 0d 0a 0d | 0a 45 4e 44 50 52 4f 43 |DIF.....|.ENDPROC|
|00001340| 0d 0a 50 52 4f 43 45 44 | 55 52 45 20 70 72 65 76 |..PROCED|URE prev|
|00001350| 69 6f 75 73 0d 0a 4c 4f | 43 41 4c 20 6c 63 54 61 |ious..LO|CAL lcTa|
|00001360| 62 6c 65 0d 0a 49 46 20 | 21 45 4d 50 54 59 28 54 |ble..IF |!EMPTY(T|
|00001370| 48 49 53 46 4f 52 4d 2e | 63 54 61 62 6c 65 29 0d |HISFORM.|cTable).|
|00001380| 0a 09 6c 63 54 61 62 6c | 65 20 3d 20 54 48 49 53 |..lcTabl|e = THIS|
|00001390| 46 4f 52 4d 2e 63 54 61 | 62 6c 65 0d 0a 09 53 45 |FORM.cTa|ble...SE|
|000013a0| 4c 45 20 26 6c 63 54 61 | 62 6c 65 0d 0a 45 4e 44 |LE &lcTa|ble..END|
|000013b0| 49 46 0d 0a 49 46 20 21 | 42 4f 46 28 29 0d 0a 09 |IF..IF !|BOF()...|
|000013c0| 53 4b 49 50 20 2d 31 0d | 0a 09 5f 53 43 52 45 45 |SKIP -1.|.._SCREE|
|000013d0| 4e 2e 41 63 74 69 76 65 | 46 6f 72 6d 2e 52 65 66 |N.Active|Form.Ref|
|000013e0| 72 65 73 68 28 29 0d 0a | 45 4e 44 49 46 0d 0a 0d |resh()..|ENDIF...|
|000013f0| 0a 45 4e 44 50 52 4f 43 | 0d 0a 50 52 4f 43 45 44 |.ENDPROC|..PROCED|
|00001400| 55 52 45 20 66 69 72 73 | 74 0d 0a 4c 4f 43 41 4c |URE firs|t..LOCAL|
|00001410| 20 6c 63 54 61 62 6c 65 | 0d 0a 49 46 20 21 45 4d | lcTable|..IF !EM|
|00001420| 50 54 59 28 54 48 49 53 | 46 4f 52 4d 2e 63 54 61 |PTY(THIS|FORM.cTa|
|00001430| 62 6c 65 29 0d 0a 09 6c | 63 54 61 62 6c 65 20 3d |ble)...l|cTable =|
|00001440| 20 54 48 49 53 46 4f 52 | 4d 2e 63 54 61 62 6c 65 | THISFOR|M.cTable|
|00001450| 0d 0a 09 53 45 4c 45 20 | 26 6c 63 54 61 62 6c 65 |...SELE |&lcTable|
|00001460| 0d 0a 45 4e 44 49 46 0d | 0a 47 4f 20 54 4f 50 0d |..ENDIF.|.GO TOP.|
|00001470| 0a 5f 53 43 52 45 45 4e | 2e 41 63 74 69 76 65 46 |._SCREEN|.ActiveF|
|00001480| 6f 72 6d 2e 52 65 66 72 | 65 73 68 28 29 0d 0a 0d |orm.Refr|esh()...|
|00001490| 0a 45 4e 44 50 52 4f 43 | 0d 0a 50 52 4f 43 45 44 |.ENDPROC|..PROCED|
|000014a0| 55 52 45 20 6c 61 73 74 | 0d 0a 4c 4f 43 41 4c 20 |URE last|..LOCAL |
|000014b0| 6c 63 54 61 62 6c 65 0d | 0a 49 46 20 21 45 4d 50 |lcTable.|.IF !EMP|
|000014c0| 54 59 28 54 48 49 53 46 | 4f 52 4d 2e 63 54 61 62 |TY(THISF|ORM.cTab|
|000014d0| 6c 65 29 0d 0a 09 6c 63 | 54 61 62 6c 65 20 3d 20 |le)...lc|Table = |
|000014e0| 54 48 49 53 46 4f 52 4d | 2e 63 54 61 62 6c 65 0d |THISFORM|.cTable.|
|000014f0| 0a 09 53 45 4c 45 20 26 | 6c 63 54 61 62 6c 65 0d |..SELE &|lcTable.|
|00001500| 0a 45 4e 44 49 46 0d 0a | 47 4f 20 42 4f 54 54 4f |.ENDIF..|GO BOTTO|
|00001510| 4d 0d 0a 5f 53 43 52 45 | 45 4e 2e 41 63 74 69 76 |M.._SCRE|EN.Activ|
|00001520| 65 46 6f 72 6d 2e 52 65 | 66 72 65 73 68 28 29 0d |eForm.Re|fresh().|
|00001530| 0a 0d 0a 45 4e 44 50 52 | 4f 43 0d 0a 50 52 4f 43 |...ENDPR|OC..PROC|
|00001540| 45 44 55 52 45 20 73 61 | 76 65 0d 0a 3d 54 41 42 |EDURE sa|ve..=TAB|
|00001550| 4c 45 55 50 44 41 54 45 | 0d 0a 0d 0a 45 4e 44 50 |LEUPDATE|....ENDP|
|00001560| 52 4f 43 0d 0a 50 52 4f | 43 45 44 55 52 45 20 72 |ROC..PRO|CEDURE r|
|00001570| 65 76 65 72 74 0d 0a 3d | 54 41 42 4c 45 52 45 56 |evert..=|TABLEREV|
|00001580| 45 52 54 28 29 0d 0a 5f | 53 43 52 45 45 4e 2e 41 |ERT().._|SCREEN.A|
|00001590| 63 74 69 76 65 46 6f 72 | 6d 2e 52 65 66 72 65 73 |ctiveFor|m.Refres|
|000015a0| 68 28 29 0d 0a 0d 0a 45 | 4e 44 50 52 4f 43 0d 0a |h()....E|NDPROC..|
|000015b0| 00 00 00 01 00 00 04 40 | fe f2 ff 1b 02 01 00 00 |.......@|........|
|000015c0| 00 27 04 00 00 27 04 00 | 00 00 00 00 00 00 00 00 |.'...'..|........|
|000015d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 a5 |........|........|
|000015e0| 27 06 00 00 00 25 00 00 | 00 e5 02 00 00 00 00 00 |'....%..|........|
|000015f0| 00 8e 03 00 00 2d 00 00 | 00 34 03 00 00 00 00 00 |.....-..|.4......|
|00001600| 00 00 00 00 00 fc 03 00 | 03 00 55 00 00 80 00 07 |........|..U.....|
|00001610| 00 ae f7 00 00 fe 13 00 | 25 fc 43 f4 01 00 f7 02 |........|%.C.....|
|00001620| 00 a1 0a fd f9 05 3b 00 | fe 10 00 54 f7 00 00 10 |......;.|...T....|
|00001630| fc f4 01 00 f7 02 00 fd | fe 11 00 01 53 45 4c 45 |........|....SELE|
|00001640| 20 26 6c 63 54 61 62 6c | 65 0a 04 00 1e fe 0d 00 | &lcTabl|e.......|
|00001650| 25 fc 43 2b 0a fd f9 05 | 79 00 fe 04 00 48 fe 0c |%.C+....|y....H..|
|00001660| 00 25 fc 43 2b fd f9 05 | 66 00 fe 0a 00 48 fc f9 |.%.C+...|f....H..|
|00001670| 02 ff ff fd fe 04 00 1e | fe 0f 00 99 fc 43 e1 39 |........|.....C.9|
|00001680| f4 03 00 f6 04 00 fd fe | 04 00 1e fe 03 00 55 05 |........|......U.|
|00001690| 00 07 00 4c 43 54 41 42 | 4c 45 08 00 54 48 49 53 |...LCTAB|LE..THIS|
|000016a0| 46 4f 52 4d 06 00 43 54 | 41 42 4c 45 0a 00 41 43 |FORM..CT|ABLE..AC|
|000016b0| 54 49 56 45 46 4f 52 4d | 07 00 52 45 46 52 45 53 |TIVEFORM|..REFRES|
|000016c0| 48 6c 00 07 00 ae f7 00 | 00 fe 13 00 25 fc 43 f4 |Hl......|....%.C.|
|000016d0| 01 00 f7 02 00 a1 0a fd | f9 05 3b 00 fe 10 00 54 |........|..;....T|
|000016e0| f7 00 00 10 fc f4 01 00 | f7 02 00 fd fe 11 00 01 |........|........|
|000016f0| 53 45 4c 45 20 26 6c 63 | 54 61 62 6c 65 0a 04 00 |SELE &lc|Table...|
|00001700| 1e fe 0d 00 25 fc 43 1e | 0a fd f9 05 65 00 fe 0a |....%.C.|....e...|
|00001710| 00 48 fc f9 02 ff ff fd | fe 0f 00 99 fc 43 e1 39 |.H......|.....C.9|
|00001720| f4 03 00 f6 04 00 fd fe | 04 00 1e fe 03 00 55 05 |........|......U.|
|00001730| 00 07 00 4c 43 54 41 42 | 4c 45 08 00 54 48 49 53 |...LCTAB|LE..THIS|
|00001740| 46 4f 52 4d 06 00 43 54 | 41 42 4c 45 0a 00 41 43 |FORM..CT|ABLE..AC|
|00001750| 54 49 56 45 46 4f 52 4d | 07 00 52 45 46 52 45 53 |TIVEFORM|..REFRES|
|00001760| 48 56 00 07 00 ae f7 00 | 00 fe 13 00 25 fc 43 f4 |HV......|....%.C.|
|00001770| 01 00 f7 02 00 a1 0a fd | f9 05 3b 00 fe 10 00 54 |........|..;....T|
|00001780| f7 00 00 10 fc f4 01 00 | f7 02 00 fd fe 11 00 01 |........|........|
|00001790| 53 45 4c 45 20 26 6c 63 | 54 61 62 6c 65 0a 04 00 |SELE &lc|Table...|
|000017a0| 1e fe 05 00 23 29 fe 0f | 00 99 fc 43 e1 39 f4 03 |....#)..|...C.9..|
|000017b0| 00 f6 04 00 fd fe 03 00 | 55 05 00 07 00 4c 43 54 |........|U....LCT|
|000017c0| 41 42 4c 45 08 00 54 48 | 49 53 46 4f 52 4d 06 00 |ABLE..TH|ISFORM..|
|000017d0| 43 54 41 42 4c 45 0a 00 | 41 43 54 49 56 45 46 4f |CTABLE..|ACTIVEFO|
|000017e0| 52 4d 07 00 52 45 46 52 | 45 53 48 56 00 07 00 ae |RM..REFR|ESHV....|
|000017f0| f7 00 00 fe 13 00 25 fc | 43 f4 01 00 f7 02 00 a1 |......%.|C.......|
|00001800| 0a fd f9 05 3b 00 fe 10 | 00 54 f7 00 00 10 fc f4 |....;...|.T......|
|00001810| 01 00 f7 02 00 fd fe 11 | 00 01 53 45 4c 45 20 26 |........|..SELE &|
|00001820| 6c 63 54 61 62 6c 65 0a | 04 00 1e fe 05 00 23 36 |lcTable.|......#6|
|00001830| fe 0f 00 99 fc 43 e1 39 | f4 03 00 f6 04 00 fd fe |.....C.9|........|
|00001840| 03 00 55 05 00 07 00 4c | 43 54 41 42 4c 45 08 00 |..U....L|CTABLE..|
|00001850| 54 48 49 53 46 4f 52 4d | 06 00 43 54 41 42 4c 45 |THISFORM|..CTABLE|
|00001860| 0a 00 41 43 54 49 56 45 | 46 4f 52 4d 07 00 52 45 |..ACTIVE|FORM..RE|
|00001870| 46 52 45 53 48 0c 00 09 | 00 86 fc f7 00 00 fd fe |FRESH...|........|
|00001880| 03 00 55 01 00 0b 00 54 | 41 42 4c 45 55 50 44 41 |..U....T|ABLEUPDA|
|00001890| 54 45 1b 00 09 00 86 fc | 43 ea 94 fd fe 0f 00 99 |TE......|C.......|
|000018a0| fc 43 e1 39 f4 00 00 f6 | 01 00 fd fe 03 00 55 02 |.C.9....|......U.|
|000018b0| 00 0a 00 41 43 54 49 56 | 45 46 4f 52 4d 07 00 52 |...ACTIV|EFORM..R|
|000018c0| 45 46 52 45 53 48 04 00 | 6e 65 78 74 2c 00 00 00 |EFRESH..|next,...|
|000018d0| 00 00 08 00 70 72 65 76 | 69 6f 75 73 e0 00 00 00 |....prev|ious....|
|000018e0| 00 00 05 00 66 69 72 73 | 74 80 01 00 00 00 00 04 |....firs|t.......|
|000018f0| 00 6c 61 73 74 0a 02 00 | 00 00 00 04 00 73 61 76 |.last...|.....sav|
|00001900| 65 94 02 00 00 00 00 06 | 00 72 65 76 65 72 74 b1 |e.......|.revert.|
|00001910| 02 00 00 00 00 31 00 71 | 00 31 01 01 01 11 01 41 |.....1.q|.1.....A|
|00001920| 00 d1 00 41 00 c1 00 a1 | 00 41 00 f1 00 41 00 34 |...A....|.A...A.4|
|00001930| 00 71 00 31 01 01 01 11 | 01 41 00 d1 00 a1 00 f1 |.q.1....|.A......|
|00001940| 00 41 00 33 00 71 00 31 | 01 01 01 11 01 41 00 51 |.A.3.q.1|.....A.Q|
|00001950| 00 f1 00 33 00 71 00 31 | 01 01 01 11 01 41 00 51 |...3.q.1|.....A.Q|
|00001960| 00 f1 00 33 00 91 00 33 | 00 91 00 f1 00 32 00 00 |...3...3|.....2..|
|00001970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00001980| 00 00 00 10 00 00 00 c6 | 00 00 00 01 00 00 00 0e |........|........|
|00001990| 00 00 00 e5 00 00 00 7e | 01 00 00 11 00 00 00 18 |.......~|........|
|000019a0| 00 00 00 9a 01 00 00 1e | 02 00 00 1d 00 00 00 20 |........|....... |
|000019b0| 00 00 00 39 02 00 00 c0 | 02 00 00 27 00 00 00 28 |...9....|...'...(|
|000019c0| 00 00 00 db 02 00 00 e9 | 02 00 00 31 00 00 00 2a |........|...1...*|
|000019d0| 00 00 00 06 03 00 00 34 | 03 00 00 35 00 00 00 00 |.......4|...5....|
|000019e0| 29 00 00 00 27 04 00 00 | 00 00 00 00 00 00 00 00 |)...'...|........|
|000019f0| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 00 94 |........|........|
|00001a00| 45 72 61 73 65 50 61 67 | 65 20 3d 20 2e 54 2e 0d |ErasePag|e = .T..|
|00001a10| 0a 54 6f 70 20 3d 20 39 | 0d 0a 4c 65 66 74 20 3d |.Top = 9|..Left =|
|00001a20| 20 31 30 0d 0a 57 69 64 | 74 68 20 3d 20 35 33 31 | 10..Wid|th = 531|
|00001a30| 0d 0a 48 65 69 67 68 74 | 20 3d 20 33 33 32 0d 0a |..Height| = 332..|
|00001a40| 4e 61 6d 65 20 3d 20 22 | 50 67 62 61 73 65 31 22 |Name = "|Pgbase1"|
|00001a50| 0d 0a 50 61 67 65 31 2e | 4e 61 6d 65 20 3d 20 22 |..Page1.|Name = "|
|00001a60| 50 61 67 65 31 22 0d 0a | 50 61 67 65 32 2e 4e 61 |Page1"..|Page2.Na|
|00001a70| 6d 65 20 3d 20 22 50 61 | 67 65 32 22 0d 0a 50 61 |me = "Pa|ge2"..Pa|
|00001a80| 67 65 33 2e 4e 61 6d 65 | 20 3d 20 22 50 61 67 65 |ge3.Name| = "Page|
|00001a90| 33 22 0d 0a 00 00 00 01 | 00 00 00 ec 63 74 61 62 |3"......|....ctab|
|00001aa0| 6c 65 20 4d 61 69 6e 20 | 74 61 62 6c 65 20 66 6f |le Main |table fo|
|00001ab0| 72 20 74 68 69 73 20 66 | 6f 72 6d 0d 0a 2a 66 69 |r this f|orm..*fi|
|00001ac0| 72 73 74 20 47 4f 20 54 | 4f 50 0d 0a 2a 6c 61 73 |rst GO T|OP..*las|
|00001ad0| 74 20 47 4f 20 42 4f 54 | 54 4f 4d 0d 0a 2a 6e 65 |t GO BOT|TOM..*ne|
|00001ae0| 78 74 20 73 6b 69 70 0d | 0a 2a 70 72 65 76 69 6f |xt skip.|.*previo|
|00001af0| 75 73 20 73 6b 69 70 20 | 2d 31 0d 0a 2a 73 61 76 |us skip |-1..*sav|
|00001b00| 65 20 74 61 62 6c 65 75 | 70 64 61 74 65 0d 0a 2a |e tableu|pdate..*|
|00001b10| 72 65 76 65 72 74 20 74 | 61 62 6c 65 72 65 76 65 |revert t|ablereve|
|00001b20| 72 74 28 29 0d 0a 2a 61 | 64 64 20 41 64 64 20 61 |rt()..*a|dd Add a|
|00001b30| 20 72 65 63 6f 72 64 20 | 74 6f 20 74 68 65 20 6d | record |to the m|
|00001b40| 61 69 6e 20 74 61 62 6c | 65 2c 20 69 6e 63 72 69 |ain tabl|e, incri|
|00001b50| 6d 65 6e 74 20 74 68 65 | 20 6b 65 79 20 66 69 65 |ment the| key fie|
|00001b60| 6c 64 0d 0a 2a 64 65 6c | 20 44 65 6c 65 74 65 20 |ld..*del| Delete |
|00001b70| 72 65 63 6f 72 64 20 66 | 72 6f 6d 20 6d 61 69 6e |record f|rom main|
|00001b80| 20 74 61 62 6c 65 0d 0a | 00 00 00 01 00 00 00 67 | table..|.......g|
|00001b90| 54 6f 70 20 3d 20 30 0d | 0a 4c 65 66 74 20 3d 20 |Top = 0.|.Left = |
|00001ba0| 30 0d 0a 44 6f 43 72 65 | 61 74 65 20 3d 20 2e 54 |0..DoCre|ate = .T|
|00001bb0| 2e 0d 0a 42 75 66 66 65 | 72 4d 6f 64 65 20 3d 20 |...Buffe|rMode = |
|00001bc0| 30 0d 0a 43 61 70 74 69 | 6f 6e 20 3d 20 22 66 72 |0..Capti|on = "fr|
|00001bd0| 6d 4d 61 69 6e 74 22 0d | 0a 63 74 61 62 6c 65 20 |mMaint".|.ctable |
|00001be0| 3d 20 0d 0a 4e 61 6d 65 | 20 3d 20 22 66 72 6d 6d |= ..Name| = "frmm|
|00001bf0| 61 69 6e 74 22 0d 0a 00 | 00 00 01 00 00 00 0c 62 |aint"...|.......b|
|00001c00| 61 73 65 66 6f 72 6d 2e | 76 63 78 00 00 00 01 00 |aseform.|vcx.....|
|00001c10| 00 05 ad 50 52 4f 43 45 | 44 55 52 45 20 66 69 72 |...PROCE|DURE fir|
|00001c20| 73 74 0d 0a 4c 4f 43 41 | 4c 20 6c 63 54 61 62 6c |st..LOCA|L lcTabl|
|00001c30| 65 0d 0a 49 46 20 21 45 | 4d 50 54 59 28 54 48 49 |e..IF !E|MPTY(THI|
|00001c40| 53 46 4f 52 4d 2e 63 54 | 61 62 6c 65 29 0d 0a 09 |SFORM.cT|able)...|
|00001c50| 6c 63 54 61 62 6c 65 20 | 3d 20 54 48 49 53 46 4f |lcTable |= THISFO|
|00001c60| 52 4d 2e 63 54 61 62 6c | 65 0d 0a 09 53 45 4c 45 |RM.cTabl|e...SELE|
|00001c70| 20 26 6c 63 54 61 62 6c | 65 0d 0a 45 4e 44 49 46 | &lcTabl|e..ENDIF|
|00001c80| 0d 0a 47 4f 20 54 4f 50 | 0d 0a 54 48 49 53 46 4f |..GO TOP|..THISFO|
|00001c90| 52 4d 2e 52 65 66 72 65 | 73 68 28 29 0d 0a 0d 0a |RM.Refre|sh()....|
|00001ca0| 45 4e 44 50 52 4f 43 0d | 0a 50 52 4f 43 45 44 55 |ENDPROC.|.PROCEDU|
|00001cb0| 52 45 20 6c 61 73 74 0d | 0a 4c 4f 43 41 4c 20 6c |RE last.|.LOCAL l|
|00001cc0| 63 54 61 62 6c 65 0d 0a | 49 46 20 21 45 4d 50 54 |cTable..|IF !EMPT|
|00001cd0| 59 28 54 48 49 53 46 4f | 52 4d 2e 63 54 61 62 6c |Y(THISFO|RM.cTabl|
|00001ce0| 65 29 0d 0a 09 6c 63 54 | 61 62 6c 65 20 3d 20 54 |e)...lcT|able = T|
|00001cf0| 48 49 53 46 4f 52 4d 2e | 63 54 61 62 6c 65 0d 0a |HISFORM.|cTable..|
|00001d00| 09 53 45 4c 45 20 26 6c | 63 54 61 62 6c 65 0d 0a |.SELE &l|cTable..|
|00001d10| 45 4e 44 49 46 0d 0a 47 | 4f 20 42 4f 54 54 4f 4d |ENDIF..G|O BOTTOM|
|00001d20| 0d 0a 54 48 49 53 46 4f | 52 4d 2e 52 65 66 72 65 |..THISFO|RM.Refre|
|00001d30| 73 68 28 29 0d 0a 0d 0a | 0d 0a 45 4e 44 50 52 4f |sh()....|..ENDPRO|
|00001d40| 43 0d 0a 50 52 4f 43 45 | 44 55 52 45 20 6e 65 78 |C..PROCE|DURE nex|
|00001d50| 74 0d 0a 4c 4f 43 41 4c | 20 6c 63 54 61 62 6c 65 |t..LOCAL| lcTable|
|00001d60| 0d 0a 49 46 20 21 45 4d | 50 54 59 28 54 48 49 53 |..IF !EM|PTY(THIS|
|00001d70| 46 4f 52 4d 2e 63 54 61 | 62 6c 65 29 0d 0a 09 6c |FORM.cTa|ble)...l|
|00001d80| 63 54 61 62 6c 65 20 3d | 20 54 48 49 53 46 4f 52 |cTable =| THISFOR|
|00001d90| 4d 2e 63 54 61 62 6c 65 | 0d 0a 09 53 45 4c 45 20 |M.cTable|...SELE |
|00001da0| 26 6c 63 54 61 62 6c 65 | 0d 0a 45 4e 44 49 46 0d |&lcTable|..ENDIF.|
|00001db0| 0a 49 46 20 21 45 4f 46 | 28 29 0d 0a 09 53 4b 49 |.IF !EOF|()...SKI|
|00001dc0| 50 0d 0a 09 49 46 20 45 | 4f 46 28 29 0d 0a 09 09 |P...IF E|OF()....|
|00001dd0| 53 4b 49 50 20 2d 31 0d | 0a 09 45 4e 44 49 46 0d |SKIP -1.|..ENDIF.|
|00001de0| 0a 09 54 48 49 53 46 4f | 52 4d 2e 52 65 66 72 65 |..THISFO|RM.Refre|
|00001df0| 73 68 28 29 0d 0a 45 4e | 44 49 46 0d 0a 0d 0a 45 |sh()..EN|DIF....E|
|00001e00| 4e 44 50 52 4f 43 0d 0a | 50 52 4f 43 45 44 55 52 |NDPROC..|PROCEDUR|
|00001e10| 45 20 70 72 65 76 69 6f | 75 73 0d 0a 4c 4f 43 41 |E previo|us..LOCA|
|00001e20| 4c 20 6c 63 54 61 62 6c | 65 0d 0a 49 46 20 21 45 |L lcTabl|e..IF !E|
|00001e30| 4d 50 54 59 28 54 48 49 | 53 46 4f 52 4d 2e 63 54 |MPTY(THI|SFORM.cT|
|00001e40| 61 62 6c 65 29 0d 0a 09 | 6c 63 54 61 62 6c 65 20 |able)...|lcTable |
|00001e50| 3d 20 54 48 49 53 46 4f | 52 4d 2e 63 54 61 62 6c |= THISFO|RM.cTabl|
|00001e60| 65 0d 0a 09 53 45 4c 45 | 20 26 6c 63 54 61 62 6c |e...SELE| &lcTabl|
|00001e70| 65 0d 0a 45 4e 44 49 46 | 0d 0a 49 46 20 21 42 4f |e..ENDIF|..IF !BO|
|00001e80| 46 28 29 0d 0a 09 53 4b | 49 50 20 2d 31 0d 0a 09 |F()...SK|IP -1...|
|00001e90| 54 48 49 53 46 4f 52 4d | 2e 52 65 66 72 65 73 68 |THISFORM|.Refresh|
|00001ea0| 28 29 0d 0a 45 4e 44 49 | 46 0d 0a 0d 0a 45 4e 44 |()..ENDI|F....END|
|00001eb0| 50 52 4f 43 0d 0a 50 52 | 4f 43 45 44 55 52 45 20 |PROC..PR|OCEDURE |
|00001ec0| 73 61 76 65 0d 0a 4c 4f | 43 41 4c 20 6c 63 54 61 |save..LO|CAL lcTa|
|00001ed0| 62 6c 65 0d 0a 6c 63 54 | 61 62 6c 65 20 3d 20 54 |ble..lcT|able = T|
|00001ee0| 48 49 53 46 4f 52 4d 2e | 63 54 61 62 6c 65 0d 0a |HISFORM.|cTable..|
|00001ef0| 49 46 20 43 55 52 53 4f | 52 47 45 54 50 52 4f 50 |IF CURSO|RGETPROP|
|00001f00| 28 22 42 75 66 66 65 72 | 69 6e 67 22 2c 20 6c 63 |("Buffer|ing", lc|
|00001f10| 54 61 62 6c 65 29 20 3d | 20 31 0d 0a 09 52 45 54 |Table) =| 1...RET|
|00001f20| 55 52 4e 0d 0a 45 4c 53 | 45 0d 0a 09 3d 54 41 42 |URN..ELS|E...=TAB|
|00001f30| 4c 45 55 50 44 41 54 45 | 28 29 0d 0a 45 4e 44 49 |LEUPDATE|()..ENDI|
|00001f40| 46 0d 0a 0d 0a 45 4e 44 | 50 52 4f 43 0d 0a 50 52 |F....END|PROC..PR|
|00001f50| 4f 43 45 44 55 52 45 20 | 72 65 76 65 72 74 0d 0a |OCEDURE |revert..|
|00001f60| 4c 4f 43 41 4c 20 6c 63 | 54 61 62 6c 65 0d 0a 6c |LOCAL lc|Table..l|
|00001f70| 63 54 61 62 6c 65 20 3d | 20 54 48 49 53 46 4f 52 |cTable =| THISFOR|
|00001f80| 4d 2e 63 54 61 62 6c 65 | 0d 0a 49 46 20 43 55 52 |M.cTable|..IF CUR|
|00001f90| 53 4f 52 47 45 54 50 52 | 4f 50 28 22 42 75 66 66 |SORGETPR|OP("Buff|
|00001fa0| 65 72 69 6e 67 22 2c 20 | 6c 63 54 61 62 6c 65 29 |ering", |lcTable)|
|00001fb0| 20 3d 20 31 0d 0a 09 52 | 45 54 55 52 4e 0d 0a 45 | = 1...R|ETURN..E|
|00001fc0| 4c 53 45 0d 0a 09 3d 54 | 41 42 4c 45 52 45 56 45 |LSE...=T|ABLEREVE|
|00001fd0| 52 54 28 29 0d 0a 09 5f | 53 43 52 45 45 4e 2e 41 |RT()..._|SCREEN.A|
|00001fe0| 63 74 69 76 65 46 6f 72 | 6d 2e 52 65 66 72 65 73 |ctiveFor|m.Refres|
|00001ff0| 68 28 29 0d 0a 45 4e 44 | 49 46 0d 0a 0d 0a 45 4e |h()..END|IF....EN|
|00002000| 44 50 52 4f 43 0d 0a 50 | 52 4f 43 45 44 55 52 45 |DPROC..P|ROCEDURE|
|00002010| 20 61 64 64 0d 0a 4c 4f | 43 41 4c 20 6c 63 54 61 | add..LO|CAL lcTa|
|00002020| 62 6c 65 2c 20 6c 6e 4d | 61 78 49 44 2c 20 6c 63 |ble, lnM|axID, lc|
|00002030| 46 69 65 6c 64 0d 0a 6c | 63 54 61 62 6c 65 20 3d |Field..l|cTable =|
|00002040| 20 54 48 49 53 46 4f 52 | 4d 2e 63 54 61 62 6c 65 | THISFOR|M.cTable|
|00002050| 0d 0a 53 45 4c 45 20 26 | 6c 63 54 61 62 6c 65 0d |..SELE &|lcTable.|
|00002060| 0a 6c 63 46 69 65 6c 64 | 20 3d 20 46 49 45 4c 44 |.lcField| = FIELD|
|00002070| 28 31 29 0d 0a 53 45 54 | 20 44 45 4c 45 54 45 44 |(1)..SET| DELETED|
|00002080| 20 4f 46 46 0d 0a 43 41 | 4c 43 55 4c 41 54 45 20 | OFF..CA|LCULATE |
|00002090| 4d 41 58 28 56 41 4c 28 | 26 6c 63 46 69 65 6c 64 |MAX(VAL(|&lcField|
|000020a0| 29 29 20 54 4f 20 6c 6e | 4d 61 78 49 44 0d 0a 53 |)) TO ln|MaxID..S|
|000020b0| 45 54 20 44 45 4c 45 54 | 45 44 20 4f 4e 0d 0a 6c |ET DELET|ED ON..l|
|000020c0| 6e 4d 61 78 49 44 20 3d | 20 6c 6e 4d 61 78 49 44 |nMaxID =| lnMaxID|
|000020d0| 20 2b 20 31 0d 0a 41 50 | 50 45 4e 44 20 42 4c 41 | + 1..AP|PEND BLA|
|000020e0| 4e 4b 0d 0a 52 45 50 4c | 41 43 45 20 26 6c 63 46 |NK..REPL|ACE &lcF|
|000020f0| 69 65 6c 64 20 57 49 54 | 48 20 41 4c 4c 54 52 49 |ield WIT|H ALLTRI|
|00002100| 4d 28 53 54 52 28 6c 6e | 4d 61 78 49 44 29 29 0d |M(STR(ln|MaxID)).|
|00002110| 0a 54 48 49 53 46 4f 52 | 4d 2e 52 65 66 72 65 73 |.THISFOR|M.Refres|
|00002120| 68 28 29 0d 0a 0d 0a 45 | 4e 44 50 52 4f 43 0d 0a |h()....E|NDPROC..|
|00002130| 50 52 4f 43 45 44 55 52 | 45 20 64 65 6c 0d 0a 4c |PROCEDUR|E del..L|
|00002140| 4f 43 41 4c 20 6c 63 54 | 61 62 6c 65 0d 0a 6c 63 |OCAL lcT|able..lc|
|00002150| 54 61 62 6c 65 20 3d 20 | 54 48 49 53 46 4f 52 4d |Table = |THISFORM|
|00002160| 2e 63 54 61 62 6c 65 0d | 0a 53 45 4c 45 20 26 6c |.cTable.|.SELE &l|
|00002170| 63 54 61 62 6c 65 0d 0a | 44 45 4c 45 54 45 0d 0a |cTable..|DELETE..|
|00002180| 53 4b 49 50 0d 0a 49 46 | 20 45 4f 46 28 29 0d 0a |SKIP..IF| EOF()..|
|00002190| 09 53 4b 49 50 20 2d 31 | 0d 0a 45 4e 44 49 46 0d |.SKIP -1|..ENDIF.|
|000021a0| 0a 54 48 49 53 46 4f 52 | 4d 2e 52 65 66 72 65 73 |.THISFOR|M.Refres|
|000021b0| 68 28 29 0d 0a 0d 0a 45 | 4e 44 50 52 4f 43 0d 0a |h()....E|NDPROC..|
|000021c0| 00 00 00 01 00 00 00 07 | 66 72 6d 62 61 73 65 00 |........|frmbase.|
|000021d0| 00 00 01 00 00 00 19 2e | 2e 5c 2e 2e 5c 66 6f 78 |........|.\..\fox|
|000021e0| 64 65 76 5c 62 61 73 65 | 66 6f 72 6d 2e 76 63 78 |dev\base|form.vcx|
|000021f0| 00 00 00 01 00 00 00 04 | 66 6f 72 6d 00 00 00 01 |........|form....|
|00002200| 00 00 00 06 50 69 78 65 | 6c 73 00 00 00 01 00 00 |....Pixe|ls......|
|00002210| 00 0b 66 72 6d 42 75 69 | 6c 64 53 51 4c 00 00 00 |..frmBui|ldSQL...|
|00002220| 01 00 00 00 e5 54 6f 70 | 20 3d 20 30 0d 0a 4c 65 |.....Top| = 0..Le|
|00002230| 66 74 20 3d 20 30 0d 0a | 48 65 69 67 68 74 20 3d |ft = 0..|Height =|
|00002240| 20 32 34 36 0d 0a 57 69 | 64 74 68 20 3d 20 36 31 | 246..Wi|dth = 61|
|00002250| 31 0d 0a 44 6f 43 72 65 | 61 74 65 20 3d 20 2e 54 |1..DoCre|ate = .T|
|00002260| 2e 0d 0a 43 61 70 74 69 | 6f 6e 20 3d 20 22 53 51 |...Capti|on = "SQ|
|00002270| 4c 20 51 75 65 72 79 20 | 42 75 69 6c 64 65 72 22 |L Query |Builder"|
|00002280| 0d 0a 57 69 6e 64 6f 77 | 54 79 70 65 20 3d 20 31 |..Window|Type = 1|
|00002290| 0d 0a 4c 6f 63 6b 53 63 | 72 65 65 6e 20 3d 20 2e |..LockSc|reen = .|
|000022a0| 46 2e 0d 0a 6e 63 72 69 | 74 63 6f 75 6e 74 20 3d |F...ncri|tcount =|
|000022b0| 20 30 0d 0a 63 73 71 6c | 63 6f 64 65 20 3d 20 0d | 0..csql|code = .|
|000022c0| 0a 63 68 63 61 74 65 67 | 6f 72 79 20 3d 20 0d 0a |.chcateg|ory = ..|
|000022d0| 63 68 6f 70 65 72 61 74 | 6f 72 20 3d 20 0d 0a 63 |choperat|or = ..c|
|000022e0| 68 76 61 6c 75 65 20 3d | 20 0d 0a 63 64 62 63 20 |hvalue =| ..cdbc |
|000022f0| 3d 20 0d 0a 4e 61 6d 65 | 20 3d 20 22 66 72 6d 42 |= ..Name| = "frmB|
|00002300| 75 69 6c 64 53 51 4c 22 | 0d 0a 00 00 00 01 00 00 |uildSQL"|........|
|00002310| 20 b1 50 52 4f 43 45 44 | 55 52 45 20 6d 61 6b 65 | .PROCED|URE make|
|00002320| 73 71 6c 0d 0a 4c 4f 43 | 41 4c 20 6c 6e 4c 65 6e |sql..LOC|AL lnLen|
|00002330| 2c 20 6c 63 54 79 70 65 | 2c 20 6c 63 54 79 70 65 |, lcType|, lcType|
|00002340| 32 2c 20 6c 63 46 69 65 | 6c 64 2c 20 6c 6e 41 74 |2, lcFie|ld, lnAt|
|00002350| 0d 0a 4c 4f 43 41 4c 20 | 6c 63 54 61 62 6c 65 4c |..LOCAL |lcTableL|
|00002360| 69 73 74 2c 20 6c 63 4a | 6f 69 6e 0d 0a 4c 4f 43 |ist, lcJ|oin..LOC|
|00002370| 41 4c 20 41 52 52 41 59 | 20 61 54 61 62 6c 65 4c |AL ARRAY| aTableL|
|00002380| 69 73 74 5b 31 5d 0d 0a | 0d 0a 49 46 20 41 4c 45 |ist[1]..|..IF ALE|
|00002390| 4e 28 54 48 49 53 46 4f | 52 4d 2e 61 43 72 69 74 |N(THISFO|RM.aCrit|
|000023a0| 56 69 65 77 29 20 3d 20 | 31 20 41 4e 44 20 3b 0d |View) = |1 AND ;.|
|000023b0| 0a 09 09 45 4d 50 54 59 | 28 41 4c 4c 54 28 54 48 |...EMPTY|(ALLT(TH|
|000023c0| 49 53 46 4f 52 4d 2e 61 | 43 72 69 74 56 69 65 77 |ISFORM.a|CritView|
|000023d0| 5b 31 2c 31 5d 29 29 0d | 0a 09 57 41 49 54 20 57 |[1,1])).|..WAIT W|
|000023e0| 49 4e 44 4f 57 20 22 4e | 6f 20 63 72 69 74 65 72 |INDOW "N|o criter|
|000023f0| 69 61 20 73 65 6c 65 63 | 74 65 64 22 20 4e 4f 57 |ia selec|ted" NOW|
|00002400| 41 49 54 0d 0a 09 52 45 | 54 55 52 4e 20 2e 46 2e |AIT...RE|TURN .F.|
|00002410| 0d 0a 45 4e 44 49 46 0d | 0a 0d 0a 54 48 49 53 46 |..ENDIF.|...THISF|
|00002420| 4f 52 4d 2e 63 53 51 4c | 43 6f 64 65 20 3d 20 22 |ORM.cSQL|Code = "|
|00002430| 22 0d 0a 0d 0a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |"....***|********|
|00002440| 2a 20 43 55 53 54 4f 4d | 20 4d 4f 44 49 46 59 20 |* CUSTOM| MODIFY |
|00002450| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002460| 0d 0a 2a 20 50 75 74 20 | 74 68 65 20 6d 61 69 6e |..* Put |the main|
|00002470| 20 74 61 62 6c 65 20 6f | 66 20 74 68 65 20 44 42 | table o|f the DB|
|00002480| 43 20 68 65 72 65 2e 20 | 20 49 66 20 79 6f 75 20 |C here. | If you |
|00002490| 64 6f 6e 27 74 20 68 61 | 76 65 20 61 20 6d 61 69 |don't ha|ve a mai|
|000024a0| 6e 20 74 61 62 6c 65 0d | 0a 2a 20 74 68 69 73 20 |n table.|.* this |
|000024b0| 63 6c 61 73 73 2f 66 6f | 72 6d 20 77 6f 6e 27 74 |class/fo|rm won't|
|000024c0| 20 62 65 20 6d 75 63 68 | 20 67 6f 6f 64 20 74 6f | be much| good to|
|000024d0| 20 79 6f 75 2e 20 20 49 | 66 20 79 6f 75 20 6c 65 | you. I|f you le|
|000024e0| 61 76 65 20 74 68 69 73 | 20 62 6c 61 6e 6b 0d 0a |ave this| blank..|
|000024f0| 2a 20 79 6f 75 20 77 69 | 6c 6c 20 68 61 76 65 20 |* you wi|ll have |
|00002500| 74 6f 20 6d 6f 64 69 66 | 79 20 6d 75 63 68 20 6f |to modif|y much o|
|00002510| 66 20 74 68 65 20 72 65 | 73 74 20 6f 66 20 74 68 |f the re|st of th|
|00002520| 65 20 63 6f 64 65 2e 2e | 2e 0d 0a 61 54 61 62 6c |e code..|...aTabl|
|00002530| 65 4c 69 73 74 5b 31 5d | 20 3d 20 22 6d 75 73 69 |eList[1]| = "musi|
|00002540| 63 69 61 6e 22 0d 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |cian"..*|********|
|00002550| 2a 2a 2a 20 45 4e 44 20 | 43 55 53 54 4f 4d 20 4d |*** END |CUSTOM M|
|00002560| 4f 44 49 46 59 20 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |ODIFY **|********|
|00002570| 2a 2a 0d 0a 0d 0a 6c 63 | 54 61 62 6c 65 4c 69 73 |**....lc|TableLis|
|00002580| 74 20 3d 20 22 22 0d 0a | 6c 63 4a 6f 69 6e 20 3d |t = ""..|lcJoin =|
|00002590| 20 22 22 0d 0a 0d 0a 6c | 6e 4c 65 6e 20 3d 20 41 | ""....l|nLen = A|
|000025a0| 4c 45 4e 28 54 48 49 53 | 46 4f 52 4d 2e 61 43 72 |LEN(THIS|FORM.aCr|
|000025b0| 69 74 56 69 65 77 2c 31 | 29 0d 0a 46 4f 52 20 69 |itView,1|)..FOR i|
|000025c0| 20 3d 20 31 20 54 4f 20 | 6c 6e 4c 65 6e 0d 0a 09 | = 1 TO |lnLen...|
|000025d0| 6c 63 54 79 70 65 20 3d | 20 54 48 49 53 46 4f 52 |lcType =| THISFOR|
|000025e0| 4d 2e 61 43 72 69 74 56 | 69 65 77 5b 69 2c 32 5d |M.aCritV|iew[i,2]|
|000025f0| 0d 0a 09 44 4f 20 43 41 | 53 45 0d 0a 09 43 41 53 |...DO CA|SE...CAS|
|00002600| 45 20 6c 63 54 79 70 65 | 20 3d 20 22 28 22 0d 0a |E lcType| = "("..|
|00002610| 09 09 49 46 20 69 20 3e | 20 31 0d 0a 09 09 09 6c |..IF i >| 1.....l|
|00002620| 63 54 79 70 65 32 20 3d | 20 54 48 49 53 46 4f 52 |cType2 =| THISFOR|
|00002630| 4d 2e 61 43 72 69 74 56 | 69 65 77 5b 69 2d 31 2c |M.aCritV|iew[i-1,|
|00002640| 32 5d 0d 0a 09 09 09 49 | 46 20 6c 63 54 79 70 65 |2].....I|F lcType|
|00002650| 32 20 21 3d 20 22 28 22 | 20 41 4e 44 20 6c 63 54 |2 != "("| AND lcT|
|00002660| 79 70 65 32 20 21 3d 20 | 22 4f 52 22 0d 0a 09 09 |ype2 != |"OR"....|
|00002670| 09 09 54 48 49 53 46 4f | 52 4d 2e 63 53 51 4c 43 |..THISFO|RM.cSQLC|
|00002680| 6f 64 65 20 3d 20 54 48 | 49 53 46 4f 52 4d 2e 63 |ode = TH|ISFORM.c|
|00002690| 53 51 4c 43 6f 64 65 20 | 2b 20 22 20 41 4e 44 22 |SQLCode |+ " AND"|
|000026a0| 0d 0a 09 09 09 45 4e 44 | 49 46 0d 0a 09 09 45 4e |.....END|IF....EN|
|000026b0| 44 49 46 0d 0a 09 09 54 | 48 49 53 46 4f 52 4d 2e |DIF....T|HISFORM.|
|000026c0| 63 53 51 4c 43 6f 64 65 | 20 3d 20 54 48 49 53 46 |cSQLCode| = THISF|
|000026d0| 4f 52 4d 2e 63 53 51 4c | 43 6f 64 65 20 2b 20 22 |ORM.cSQL|Code + "|
|000026e0| 20 22 20 2b 20 6c 63 54 | 79 70 65 0d 0a 09 43 41 | " + lcT|ype...CA|
|000026f0| 53 45 20 6c 63 54 79 70 | 65 20 3d 20 22 29 22 20 |SE lcTyp|e = ")" |
|00002700| 4f 52 20 6c 63 54 79 70 | 65 20 3d 20 22 4f 52 22 |OR lcTyp|e = "OR"|
|00002710| 0d 0a 09 09 54 48 49 53 | 46 4f 52 4d 2e 63 53 51 |....THIS|FORM.cSQ|
|00002720| 4c 43 6f 64 65 20 3d 20 | 54 48 49 53 46 4f 52 4d |LCode = |THISFORM|
|00002730| 2e 63 53 51 4c 43 6f 64 | 65 20 2b 20 22 20 22 20 |.cSQLCod|e + " " |
|00002740| 2b 20 6c 63 54 79 70 65 | 0d 0a 09 4f 54 48 45 52 |+ lcType|...OTHER|
|00002750| 57 49 53 45 0d 0a 09 09 | 49 46 20 69 20 3e 20 31 |WISE....|IF i > 1|
|00002760| 0d 0a 09 09 09 6c 63 54 | 79 70 65 32 20 3d 20 54 |.....lcT|ype2 = T|
|00002770| 48 49 53 46 4f 52 4d 2e | 61 43 72 69 74 56 69 65 |HISFORM.|aCritVie|
|00002780| 77 5b 69 2d 31 2c 32 5d | 0d 0a 09 09 09 49 46 20 |w[i-1,2]|.....IF |
|00002790| 6c 63 54 79 70 65 32 20 | 21 3d 20 22 28 22 20 41 |lcType2 |!= "(" A|
|000027a0| 4e 44 20 6c 63 54 79 70 | 65 32 20 21 3d 20 22 4f |ND lcTyp|e2 != "O|
|000027b0| 52 22 0d 0a 09 09 09 09 | 54 48 49 53 46 4f 52 4d |R"......|THISFORM|
|000027c0| 2e 63 53 51 4c 43 6f 64 | 65 20 3d 20 54 48 49 53 |.cSQLCod|e = THIS|
|000027d0| 46 4f 52 4d 2e 63 53 51 | 4c 43 6f 64 65 20 2b 20 |FORM.cSQ|LCode + |
|000027e0| 22 20 41 4e 44 22 0d 0a | 09 09 09 45 4e 44 49 46 |" AND"..|...ENDIF|
|000027f0| 0d 0a 09 09 45 4e 44 49 | 46 0d 0a 09 09 54 48 49 |....ENDI|F....THI|
|00002800| 53 46 4f 52 4d 2e 63 53 | 51 4c 43 6f 64 65 20 3d |SFORM.cS|QLCode =|
|00002810| 20 54 48 49 53 46 4f 52 | 4d 2e 63 53 51 4c 43 6f | THISFOR|M.cSQLCo|
|00002820| 64 65 20 2b 20 22 20 22 | 20 2b 20 3b 0d 0a 09 09 |de + " "| + ;....|
|00002830| 09 4c 4f 57 45 52 28 41 | 4c 4c 54 52 49 4d 28 54 |.LOWER(A|LLTRIM(T|
|00002840| 48 49 53 46 4f 52 4d 2e | 61 43 72 69 74 56 69 65 |HISFORM.|aCritVie|
|00002850| 77 5b 69 2c 32 5d 29 29 | 20 2b 20 22 20 22 20 2b |w[i,2]))| + " " +|
|00002860| 20 3b 0d 0a 09 09 09 41 | 4c 4c 54 52 49 4d 28 54 | ;.....A|LLTRIM(T|
|00002870| 48 49 53 46 4f 52 4d 2e | 61 43 72 69 74 56 69 65 |HISFORM.|aCritVie|
|00002880| 77 5b 69 2c 33 5d 29 20 | 2b 20 22 20 22 0d 0a 09 |w[i,3]) |+ " "...|
|00002890| 09 44 4f 20 43 41 53 45 | 0d 0a 09 09 43 41 53 45 |.DO CASE|....CASE|
|000028a0| 20 4c 45 46 54 28 54 48 | 49 53 46 4f 52 4d 2e 61 | LEFT(TH|ISFORM.a|
|000028b0| 43 72 69 74 56 69 65 77 | 5b 69 2c 34 5d 2c 34 29 |CritView|[i,4],4)|
|000028c0| 20 3d 20 22 56 41 4c 3a | 22 0d 0a 09 09 09 54 48 | = "VAL:|".....TH|
|000028d0| 49 53 46 4f 52 4d 2e 63 | 53 51 4c 43 6f 64 65 20 |ISFORM.c|SQLCode |
|000028e0| 3d 20 54 48 49 53 46 4f | 52 4d 2e 63 53 51 4c 43 |= THISFO|RM.cSQLC|
|000028f0| 6f 64 65 20 2b 20 3b 0d | 0a 09 09 09 09 53 55 42 |ode + ;.|.....SUB|
|00002900| 53 54 52 28 54 48 49 53 | 46 4f 52 4d 2e 61 43 72 |STR(THIS|FORM.aCr|
|00002910| 69 74 56 69 65 77 5b 69 | 2c 34 5d 2c 20 35 29 0d |itView[i|,4], 5).|
|00002920| 0a 09 09 43 41 53 45 20 | 4c 45 46 54 28 54 48 49 |...CASE |LEFT(THI|
|00002930| 53 46 4f 52 4d 2e 61 43 | 72 69 74 56 69 65 77 5b |SFORM.aC|ritView[|
|00002940| 69 2c 34 5d 2c 35 29 20 | 3d 20 22 42 4f 4f 4c 3a |i,4],5) |= "BOOL:|
|00002950| 22 0d 0a 09 09 09 54 48 | 49 53 46 4f 52 4d 2e 63 |".....TH|ISFORM.c|
|00002960| 53 51 4c 43 6f 64 65 20 | 3d 20 54 48 49 53 46 4f |SQLCode |= THISFO|
|00002970| 52 4d 2e 63 53 51 4c 43 | 6f 64 65 20 2b 20 3b 0d |RM.cSQLC|ode + ;.|
|00002980| 0a 09 09 09 09 53 55 42 | 53 54 52 28 54 48 49 53 |.....SUB|STR(THIS|
|00002990| 46 4f 52 4d 2e 61 43 72 | 69 74 56 69 65 77 5b 69 |FORM.aCr|itView[i|
|000029a0| 2c 34 5d 2c 20 36 29 0d | 0a 09 09 4f 54 48 45 52 |,4], 6).|...OTHER|
|000029b0| 57 49 53 45 0d 0a 09 09 | 09 54 48 49 53 46 4f 52 |WISE....|.THISFOR|
|000029c0| 4d 2e 63 53 51 4c 43 6f | 64 65 20 3d 20 54 48 49 |M.cSQLCo|de = THI|
|000029d0| 53 46 4f 52 4d 2e 63 53 | 51 4c 43 6f 64 65 20 2b |SFORM.cS|QLCode +|
|000029e0| 20 3b 0d 0a 09 09 09 09 | 22 27 22 20 2b 20 41 4c | ;......|"'" + AL|
|000029f0| 4c 54 52 49 4d 28 54 48 | 49 53 46 4f 52 4d 2e 61 |LTRIM(TH|ISFORM.a|
|00002a00| 43 72 69 74 56 69 65 77 | 5b 69 2c 34 5d 29 20 2b |CritView|[i,4]) +|
|00002a10| 20 22 27 22 0d 0a 09 09 | 45 4e 44 43 41 53 45 0d | "'"....|ENDCASE.|
|00002a20| 0a 09 09 6c 6e 41 74 20 | 3d 20 41 54 28 22 2e 22 |...lnAt |= AT("."|
|00002a30| 2c 20 54 48 49 53 46 4f | 52 4d 2e 61 43 72 69 74 |, THISFO|RM.aCrit|
|00002a40| 56 69 65 77 5b 69 2c 32 | 5d 29 0d 0a 09 09 49 46 |View[i,2|])....IF|
|00002a50| 20 6c 6e 41 74 20 3e 20 | 30 0d 0a 09 09 09 6c 63 | lnAt > |0.....lc|
|00002a60| 54 61 62 6c 65 20 3d 20 | 4c 4f 57 45 52 28 41 4c |Table = |LOWER(AL|
|00002a70| 4c 54 52 49 4d 28 4c 45 | 46 54 28 54 48 49 53 46 |LTRIM(LE|FT(THISF|
|00002a80| 4f 52 4d 2e 61 43 72 69 | 74 56 69 65 77 5b 69 2c |ORM.aCri|tView[i,|
|00002a90| 32 5d 2c 6c 6e 41 74 20 | 2d 20 31 29 29 29 0d 0a |2],lnAt |- 1)))..|
|00002aa0| 09 09 09 49 46 20 41 53 | 43 41 4e 28 61 54 61 62 |...IF AS|CAN(aTab|
|00002ab0| 6c 65 4c 69 73 74 2c 20 | 6c 63 54 61 62 6c 65 29 |leList, |lcTable)|
|00002ac0| 20 3d 20 30 0d 0a 09 09 | 09 09 6c 6e 41 4c 65 6e | = 0....|..lnALen|
|00002ad0| 20 3d 20 41 4c 45 4e 28 | 61 54 61 62 6c 65 4c 69 | = ALEN(|aTableLi|
|00002ae0| 73 74 29 20 2b 20 31 0d | 0a 09 09 09 09 44 49 4d |st) + 1.|.....DIM|
|00002af0| 45 4e 53 49 4f 4e 20 61 | 54 61 62 6c 65 4c 69 73 |ENSION a|TableLis|
|00002b00| 74 5b 6c 6e 41 4c 65 6e | 5d 0d 0a 09 09 09 09 61 |t[lnALen|]......a|
|00002b10| 54 61 62 6c 65 4c 69 73 | 74 5b 6c 6e 41 4c 65 6e |TableLis|t[lnALen|
|00002b20| 5d 20 3d 20 6c 63 54 61 | 62 6c 65 0d 0a 09 09 09 |] = lcTa|ble.....|
|00002b30| 45 4e 44 49 46 0d 0a 09 | 09 45 4e 44 49 46 0d 0a |ENDIF...|.ENDIF..|
|00002b40| 09 45 4e 44 43 41 53 45 | 0d 0a 4e 45 58 54 0d 0a |.ENDCASE|..NEXT..|
|00002b50| 0d 0a 46 4f 52 20 69 20 | 3d 20 31 20 54 4f 20 41 |..FOR i |= 1 TO A|
|00002b60| 4c 45 4e 28 61 54 61 62 | 6c 65 4c 69 73 74 29 0d |LEN(aTab|leList).|
|00002b70| 0a 09 49 46 20 69 20 3d | 20 31 0d 0a 09 09 6c 63 |..IF i =| 1....lc|
|00002b80| 54 61 62 6c 65 4c 69 73 | 74 20 3d 20 41 4c 4c 54 |TableLis|t = ALLT|
|00002b90| 28 61 54 61 62 6c 65 4c | 69 73 74 5b 69 5d 29 0d |(aTableL|ist[i]).|
|00002ba0| 0a 09 45 4c 53 45 0d 0a | 09 09 6c 63 54 61 62 6c |..ELSE..|..lcTabl|
|00002bb0| 65 4c 69 73 74 20 3d 20 | 6c 63 54 61 62 6c 65 4c |eList = |lcTableL|
|00002bc0| 69 73 74 20 2b 20 22 2c | 20 22 20 2b 20 3b 0d 0a |ist + ",| " + ;..|
|00002bd0| 09 09 09 41 4c 4c 54 28 | 61 54 61 62 6c 65 4c 69 |...ALLT(|aTableLi|
|00002be0| 73 74 5b 69 5d 29 0d 0a | 0d 0a 2a 2a 2a 2a 2a 2a |st[i])..|..******|
|00002bf0| 2a 2a 2a 2a 2a 2a 20 43 | 55 53 54 4f 4d 20 4d 4f |****** C|USTOM MO|
|00002c00| 44 49 46 59 20 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |DIFY ***|********|
|00002c10| 2a 2a 2a 2a 2a 0d 0a 2a | 20 49 66 20 79 6f 75 20 |*****..*| If you |
|00002c20| 68 61 76 65 20 61 20 6d | 61 69 6e 20 74 61 62 6c |have a m|ain tabl|
|00002c30| 65 20 69 6e 20 79 6f 75 | 72 20 44 42 43 2c 20 72 |e in you|r DBC, r|
|00002c40| 65 70 6c 61 63 65 20 22 | 6d 75 73 69 63 69 61 6e |eplace "|musician|
|00002c50| 22 20 77 69 74 68 0d 0a | 2a 20 74 68 65 20 6e 61 |" with..|* the na|
|00002c60| 6d 65 20 6f 66 20 74 68 | 65 20 74 61 62 6c 65 2c |me of th|e table,|
|00002c70| 20 61 6e 64 20 22 65 6d | 70 6e 75 6d 22 20 77 69 | and "em|pnum" wi|
|00002c80| 74 68 20 74 68 65 20 6d | 61 73 74 65 72 20 66 69 |th the m|aster fi|
|00002c90| 65 6c 64 20 6e 61 6d 65 | 2e 0d 0a 09 09 6c 63 4a |eld name|.....lcJ|
|00002ca0| 6f 69 6e 20 3d 20 6c 63 | 4a 6f 69 6e 20 2b 20 22 |oin = lc|Join + "|
|00002cb0| 6d 75 73 69 63 69 61 6e | 2e 65 6d 70 6e 75 6d 20 |musician|.empnum |
|00002cc0| 3d 20 22 20 2b 20 3b 0d | 0a 09 09 09 41 4c 4c 54 |= " + ;.|....ALLT|
|00002cd0| 28 61 54 61 62 6c 65 4c | 69 73 74 5b 69 5d 29 20 |(aTableL|ist[i]) |
|00002ce0| 2b 20 22 2e 65 6d 70 6e | 75 6d 20 41 4e 44 20 22 |+ ".empn|um AND "|
|00002cf0| 0d 0a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 20 45 |..******|****** E|
|00002d00| 4e 44 20 43 55 53 54 4f | 4d 20 4d 4f 44 49 46 59 |ND CUSTO|M MODIFY|
|00002d10| 20 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0d 0a 0d | *******|*****...|
|00002d20| 0a 09 45 4e 44 49 46 0d | 0a 4e 45 58 54 0d 0a 0d |..ENDIF.|.NEXT...|
|00002d30| 0a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 20 43 55 |.*******|***** CU|
|00002d40| 53 54 4f 4d 20 4d 4f 44 | 49 46 59 20 2a 2a 2a 2a |STOM MOD|IFY ****|
|00002d50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0d 0a 2a 20 |********|****..* |
|00002d60| 59 6f 75 20 6d 61 79 20 | 6e 65 65 64 20 74 6f 20 |You may |need to |
|00002d70| 6d 6f 64 69 66 79 20 74 | 68 69 73 2e 2e 2e 0d 0a |modify t|his.....|
|00002d80| 54 48 49 53 46 4f 52 4d | 2e 63 53 51 4c 43 6f 64 |THISFORM|.cSQLCod|
|00002d90| 65 20 3d 20 22 2a 20 46 | 52 4f 4d 20 22 20 2b 20 |e = "* F|ROM " + |
|00002da0| 3b 0d 0a 09 6c 63 54 61 | 62 6c 65 4c 69 73 74 20 |;...lcTa|bleList |
|00002db0| 2b 20 22 20 57 48 45 52 | 45 20 22 20 2b 20 6c 63 |+ " WHER|E " + lc|
|00002dc0| 4a 6f 69 6e 20 2b 20 54 | 48 49 53 46 4f 52 4d 2e |Join + T|HISFORM.|
|00002dd0| 63 53 51 4c 43 6f 64 65 | 0d 0a 2a 2a 2a 2a 2a 2a |cSQLCode|..******|
|00002de0| 2a 2a 2a 2a 2a 2a 20 45 | 4e 44 20 43 55 53 54 4f |****** E|ND CUSTO|
|00002df0| 4d 20 4d 4f 44 49 46 59 | 20 2a 2a 2a 2a 2a 2a 2a |M MODIFY| *******|
|00002e00| 2a 2a 2a 2a 2a 0d 0a 0d | 0a 52 45 54 55 52 4e 20 |*****...|.RETURN |
|00002e10| 2e 54 2e 0d 0a 0d 0a 45 | 4e 44 50 52 4f 43 0d 0a |.T.....E|NDPROC..|
|00002e20| 50 52 4f 43 45 44 55 52 | 45 20 6d 61 6b 65 63 61 |PROCEDUR|E makeca|
|00002e30| 74 65 67 6f 72 79 0d 0a | 4c 4f 43 41 4c 20 41 52 |tegory..|LOCAL AR|
|00002e40| 52 41 59 20 61 44 42 54 | 61 62 6c 65 73 5b 31 5d |RAY aDBT|ables[1]|
|00002e50| 0d 0a 4c 4f 43 41 4c 20 | 6c 6e 44 42 46 73 2c 20 |..LOCAL |lnDBFs, |
|00002e60| 6c 6e 43 6f 75 6e 74 2c | 20 69 2c 20 6a 2c 20 6c |lnCount,| i, j, l|
|00002e70| 63 54 61 62 6c 65 46 69 | 65 6c 64 2c 20 6c 63 43 |cTableFi|eld, lcC|
|00002e80| 61 70 74 69 6f 6e 2c 20 | 6c 63 43 6f 6d 6d 65 6e |aption, |lcCommen|
|00002e90| 74 2c 20 6c 63 4c 65 66 | 74 43 6f 6d 6d 0d 0a 4c |t, lcLef|tComm..L|
|00002ea0| 4f 43 41 4c 20 6c 63 43 | 75 72 54 61 62 6c 65 2c |OCAL lcC|urTable,|
|00002eb0| 20 6c 6e 46 69 65 6c 64 | 73 2c 20 6c 63 43 61 74 | lnField|s, lcCat|
|00002ec0| 33 2c 20 6c 6e 43 6f 6c | 50 6f 73 2c 20 6c 63 41 |3, lnCol|Pos, lcA|
|00002ed0| 72 54 61 62 6c 65 2c 20 | 6c 63 41 72 54 65 78 74 |rTable, |lcArText|
|00002ee0| 0d 0a 4c 4f 43 41 4c 20 | 6c 63 44 42 43 0d 0a 0d |..LOCAL |lcDBC...|
|00002ef0| 0a 6c 63 44 42 43 20 3d | 20 54 48 49 53 46 4f 52 |.lcDBC =| THISFOR|
|00002f00| 4d 2e 63 44 42 43 0d 0a | 49 46 20 21 44 42 55 53 |M.cDBC..|IF !DBUS|
|00002f10| 45 44 28 6c 63 44 42 43 | 29 0d 0a 09 4f 50 45 4e |ED(lcDBC|)...OPEN|
|00002f20| 20 44 41 54 41 42 41 53 | 45 20 26 6c 63 44 42 43 | DATABAS|E &lcDBC|
|00002f30| 0d 0a 45 4e 44 49 46 0d | 0a 53 45 54 20 44 41 54 |..ENDIF.|.SET DAT|
|00002f40| 41 42 41 53 45 20 54 4f | 20 26 6c 63 44 42 43 0d |ABASE TO| &lcDBC.|
|00002f50| 0a 54 48 49 53 46 4f 52 | 4d 2e 61 43 61 74 65 67 |.THISFOR|M.aCateg|
|00002f60| 6f 72 79 20 3d 20 22 22 | 0d 0a 6c 6e 44 42 46 73 |ory = ""|..lnDBFs|
|00002f70| 20 3d 20 41 44 42 4f 42 | 4a 45 43 54 53 28 61 44 | = ADBOB|JECTS(aD|
|00002f80| 42 54 61 62 6c 65 73 2c | 20 22 54 41 42 4c 45 22 |BTables,| "TABLE"|
|00002f90| 29 0d 0a 49 46 20 6c 6e | 44 42 46 73 20 3d 20 30 |)..IF ln|DBFs = 0|
|00002fa0| 0d 0a 09 52 45 54 55 52 | 4e 20 30 0d 0a 45 4e 44 |...RETUR|N 0..END|
|00002fb0| 49 46 0d 0a 6c 6e 43 6f | 75 6e 74 20 3d 20 30 0d |IF..lnCo|unt = 0.|
|00002fc0| 0a 46 4f 52 20 69 20 3d | 20 31 20 54 4f 20 6c 6e |.FOR i =| 1 TO ln|
|00002fd0| 44 42 46 73 0d 0a 09 6c | 63 43 75 72 54 61 62 6c |DBFs...l|cCurTabl|
|00002fe0| 65 20 3d 20 61 44 42 54 | 61 62 6c 65 73 5b 69 5d |e = aDBT|ables[i]|
|00002ff0| 0d 0a 09 49 46 20 21 46 | 49 4c 45 28 6c 63 43 75 |...IF !F|ILE(lcCu|
|00003000| 72 54 61 62 6c 65 20 2b | 20 22 2e 44 42 46 22 29 |rTable +| ".DBF")|
|00003010| 0d 0a 09 09 4c 4f 4f 50 | 0d 0a 09 45 4e 44 49 46 |....LOOP|...ENDIF|
|00003020| 0d 0a 09 49 46 20 21 55 | 53 45 44 28 6c 63 43 75 |...IF !U|SED(lcCu|
|00003030| 72 54 61 62 6c 65 29 0d | 0a 09 09 55 53 45 20 26 |rTable).|...USE &|
|00003040| 6c 63 43 75 72 54 61 62 | 6c 65 20 49 4e 20 30 0d |lcCurTab|le IN 0.|
|00003050| 0a 09 45 4e 44 49 46 0d | 0a 09 53 45 4c 45 20 26 |..ENDIF.|..SELE &|
|00003060| 6c 63 43 75 72 54 61 62 | 6c 65 0d 0a 09 6c 6e 46 |lcCurTab|le...lnF|
|00003070| 69 65 6c 64 73 20 3d 20 | 46 43 4f 55 4e 54 28 29 |ields = |FCOUNT()|
|00003080| 0d 0a 09 46 4f 52 20 6a | 20 3d 20 31 20 54 4f 20 |...FOR j| = 1 TO |
|00003090| 6c 6e 46 69 65 6c 64 73 | 0d 0a 09 09 6c 63 54 61 |lnFields|....lcTa|
|000030a0| 62 6c 65 46 69 65 6c 64 | 20 3d 20 6c 63 43 75 72 |bleField| = lcCur|
|000030b0| 54 61 62 6c 65 20 2b 20 | 22 2e 22 20 2b 20 46 49 |Table + |"." + FI|
|000030c0| 45 4c 44 28 6a 29 0d 0a | 09 09 6c 63 43 61 70 74 |ELD(j)..|..lcCapt|
|000030d0| 69 6f 6e 20 3d 20 41 4c | 4c 54 52 49 4d 28 44 42 |ion = AL|LTRIM(DB|
|000030e0| 47 45 54 50 52 4f 50 28 | 6c 63 54 61 62 6c 65 46 |GETPROP(|lcTableF|
|000030f0| 69 65 6c 64 2c 20 22 46 | 69 65 6c 64 22 2c 20 22 |ield, "F|ield", "|
|00003100| 43 61 70 74 69 6f 6e 22 | 29 29 0d 0a 09 09 49 46 |Caption"|))....IF|
|00003110| 20 21 45 4d 50 54 59 28 | 6c 63 43 61 70 74 69 6f | !EMPTY(|lcCaptio|
|00003120| 6e 29 0d 0a 09 09 09 6c | 63 43 6f 6d 6d 65 6e 74 |n).....l|cComment|
|00003130| 20 3d 20 44 42 47 45 54 | 50 52 4f 50 28 6c 63 54 | = DBGET|PROP(lcT|
|00003140| 61 62 6c 65 46 69 65 6c | 64 2c 20 22 46 69 65 6c |ableFiel|d, "Fiel|
|00003150| 64 22 2c 20 22 43 6f 6d | 6d 65 6e 74 22 29 0d 0a |d", "Com|ment")..|
|00003160| 09 09 09 6c 63 4c 65 66 | 74 43 6f 6d 6d 20 3d 20 |...lcLef|tComm = |
|00003170| 4c 45 46 54 28 6c 63 43 | 6f 6d 6d 65 6e 74 2c 34 |LEFT(lcC|omment,4|
|00003180| 29 0d 0a 09 09 09 49 46 | 20 6c 63 4c 65 66 74 43 |).....IF| lcLeftC|
|00003190| 6f 6d 6d 20 3d 20 22 54 | 45 58 54 22 20 4f 52 20 |omm = "T|EXT" OR |
|000031a0| 6c 63 4c 65 66 74 43 6f | 6d 6d 20 3d 20 22 4e 55 |lcLeftCo|mm = "NU|
|000031b0| 4d 3a 22 20 4f 52 20 3b | 0d 0a 09 09 09 09 09 6c |M:" OR ;|.......l|
|000031c0| 63 4c 65 66 74 43 6f 6d | 6d 20 3d 20 22 53 45 4c |cLeftCom|m = "SEL|
|000031d0| 45 22 20 4f 52 20 6c 63 | 4c 65 66 74 43 6f 6d 6d |E" OR lc|LeftComm|
|000031e0| 20 3d 20 22 56 41 4c 55 | 22 20 4f 52 20 3b 0d 0a | = "VALU|" OR ;..|
|000031f0| 09 09 09 09 09 6c 63 4c | 65 66 74 43 6f 6d 6d 20 |.....lcL|eftComm |
|00003200| 3d 20 22 42 4f 4f 4c 22 | 0d 0a 09 09 09 09 6c 6e |= "BOOL"|......ln|
|00003210| 43 6f 75 6e 74 20 3d 20 | 6c 6e 43 6f 75 6e 74 20 |Count = |lnCount |
|00003220| 2b 20 31 0d 0a 09 09 09 | 09 44 49 4d 45 4e 53 49 |+ 1.....|.DIMENSI|
|00003230| 4f 4e 20 54 48 49 53 46 | 4f 52 4d 2e 61 43 61 74 |ON THISF|ORM.aCat|
|00003240| 65 67 6f 72 79 5b 6c 6e | 43 6f 75 6e 74 2c 33 5d |egory[ln|Count,3]|
|00003250| 0d 0a 09 09 09 09 54 48 | 49 53 46 4f 52 4d 2e 61 |......TH|ISFORM.a|
|00003260| 43 61 74 65 67 6f 72 79 | 5b 6c 6e 43 6f 75 6e 74 |Category|[lnCount|
|00003270| 2c 31 5d 20 3d 20 6c 63 | 43 61 70 74 69 6f 6e 0d |,1] = lc|Caption.|
|00003280| 0a 09 09 09 09 54 48 49 | 53 46 4f 52 4d 2e 61 43 |.....THI|SFORM.aC|
|00003290| 61 74 65 67 6f 72 79 5b | 6c 6e 43 6f 75 6e 74 2c |ategory[|lnCount,|
|000032a0| 32 5d 20 3d 20 6c 63 54 | 61 62 6c 65 46 69 65 6c |2] = lcT|ableFiel|
|000032b0| 64 0d 0a 09 09 09 09 54 | 48 49 53 46 4f 52 4d 2e |d......T|HISFORM.|
|000032c0| 61 43 61 74 65 67 6f 72 | 79 5b 6c 6e 43 6f 75 6e |aCategor|y[lnCoun|
|000032d0| 74 2c 33 5d 20 3d 20 6c | 63 43 6f 6d 6d 65 6e 74 |t,3] = l|cComment|
|000032e0| 0d 0a 09 09 09 45 4e 44 | 49 46 0d 0a 09 09 45 4e |.....END|IF....EN|
|000032f0| 44 49 46 0d 0a 09 4e 45 | 58 54 0d 0a 09 55 53 45 |DIF...NE|XT...USE|
|00003300| 0d 0a 4e 45 58 54 0d 0a | 49 46 20 6c 6e 43 6f 75 |..NEXT..|IF lnCou|
|00003310| 6e 74 20 3d 20 30 0d 0a | 09 52 45 54 55 52 4e 20 |nt = 0..|.RETURN |
|00003320| 30 0d 0a 45 4e 44 49 46 | 0d 0a 54 48 49 53 46 4f |0..ENDIF|..THISFO|
|00003330| 52 4d 2e 63 62 6f 43 61 | 74 65 67 6f 72 79 2e 52 |RM.cboCa|tegory.R|
|00003340| 65 71 75 65 72 79 28 29 | 0d 0a 54 48 49 53 46 4f |equery()|..THISFO|
|00003350| 52 4d 2e 63 62 6f 43 61 | 74 65 67 6f 72 79 2e 4c |RM.cboCa|tegory.L|
|00003360| 69 73 74 49 6e 64 65 78 | 20 3d 20 31 0d 0a 54 48 |istIndex| = 1..TH|
|00003370| 49 53 46 4f 52 4d 2e 63 | 62 6f 43 61 74 65 67 6f |ISFORM.c|boCatego|
|00003380| 72 79 2e 43 6c 69 63 6b | 28 29 0d 0a 52 45 54 55 |ry.Click|()..RETU|
|00003390| 52 4e 20 31 0d 0a 0d 0a | 45 4e 44 50 52 4f 43 0d |RN 1....|ENDPROC.|
|000033a0| 0a 50 52 4f 43 45 44 55 | 52 45 20 6d 61 6b 65 6f |.PROCEDU|RE makeo|
|000033b0| 70 65 72 61 74 6f 72 0d | 0a 2a 20 43 6f 6c 75 6d |perator.|.* Colum|
|000033c0| 6e 20 31 20 6f 66 20 61 | 4f 70 65 72 61 74 6f 72 |n 1 of a|Operator|
|000033d0| 20 69 73 20 64 69 73 70 | 6c 61 79 65 64 0d 0a 2a | is disp|layed..*|
|000033e0| 20 43 6f 6c 75 6d 6e 20 | 32 20 6f 66 20 61 4f 70 | Column |2 of aOp|
|000033f0| 65 72 61 74 6f 72 20 69 | 73 20 63 6f 70 69 65 64 |erator i|s copied|
|00003400| 20 74 6f 20 61 43 72 69 | 74 56 69 65 77 5b 78 2c | to aCri|tView[x,|
|00003410| 33 5d 0d 0a 0d 0a 44 49 | 4d 45 4e 53 49 4f 4e 20 |3]....DI|MENSION |
|00003420| 54 48 49 53 46 4f 52 4d | 2e 61 4f 70 65 72 61 74 |THISFORM|.aOperat|
|00003430| 6f 72 5b 36 2c 32 5d 0d | 0a 54 48 49 53 46 4f 52 |or[6,2].|.THISFOR|
|00003440| 4d 2e 61 4f 70 65 72 61 | 74 6f 72 5b 31 2c 31 5d |M.aOpera|tor[1,1]|
|00003450| 20 3d 20 22 3d 22 09 09 | 26 26 20 43 61 6e 20 61 | = "="..|&& Can a|
|00003460| 6c 73 6f 20 62 65 20 22 | 4c 69 6b 65 22 0d 0a 54 |lso be "|Like"..T|
|00003470| 48 49 53 46 4f 52 4d 2e | 61 4f 70 65 72 61 74 6f |HISFORM.|aOperato|
|00003480| 72 5b 32 2c 31 5d 20 3d | 20 22 3d 3d 22 09 09 26 |r[2,1] =| "=="..&|
|00003490| 26 20 43 61 6e 20 61 6c | 73 6f 20 62 65 20 22 45 |& Can al|so be "E|
|000034a0| 78 61 63 74 6c 79 20 4c | 69 6b 65 22 0d 0a 54 48 |xactly L|ike"..TH|
|000034b0| 49 53 46 4f 52 4d 2e 61 | 4f 70 65 72 61 74 6f 72 |ISFORM.a|Operator|
|000034c0| 5b 33 2c 31 5d 20 3d 20 | 22 3e 3d 22 0d 0a 54 48 |[3,1] = |">="..TH|
|000034d0| 49 53 46 4f 52 4d 2e 61 | 4f 70 65 72 61 74 6f 72 |ISFORM.a|Operator|
|000034e0| 5b 34 2c 31 5d 20 3d 20 | 22 3e 22 0d 0a 54 48 49 |[4,1] = |">"..THI|
|000034f0| 53 46 4f 52 4d 2e 61 4f | 70 65 72 61 74 6f 72 5b |SFORM.aO|perator[|
|00003500| 35 2c 31 5d 20 3d 20 22 | 3c 22 0d 0a 54 48 49 53 |5,1] = "|<"..THIS|
|00003510| 46 4f 52 4d 2e 61 4f 70 | 65 72 61 74 6f 72 5b 36 |FORM.aOp|erator[6|
|00003520| 2c 31 5d 20 3d 20 22 3c | 3d 22 0d 0a 0d 0a 54 48 |,1] = "<|="....TH|
|00003530| 49 53 46 4f 52 4d 2e 61 | 4f 70 65 72 61 74 6f 72 |ISFORM.a|Operator|
|00003540| 5b 31 2c 32 5d 20 3d 20 | 22 3d 22 0d 0a 54 48 49 |[1,2] = |"="..THI|
|00003550| 53 46 4f 52 4d 2e 61 4f | 70 65 72 61 74 6f 72 5b |SFORM.aO|perator[|
|00003560| 32 2c 32 5d 20 3d 20 22 | 3d 3d 22 0d 0a 54 48 49 |2,2] = "|=="..THI|
|00003570| 53 46 4f 52 4d 2e 61 4f | 70 65 72 61 74 6f 72 5b |SFORM.aO|perator[|
|00003580| 33 2c 32 5d 20 3d 20 22 | 3e 3d 22 0d 0a 54 48 49 |3,2] = "|>="..THI|
|00003590| 53 46 4f 52 4d 2e 61 4f | 70 65 72 61 74 6f 72 5b |SFORM.aO|perator[|
|000035a0| 34 2c 32 5d 20 3d 20 22 | 3e 22 0d 0a 54 48 49 53 |4,2] = "|>"..THIS|
|000035b0| 46 4f 52 4d 2e 61 4f 70 | 65 72 61 74 6f 72 5b 35 |FORM.aOp|erator[5|
|000035c0| 2c 32 5d 20 3d 20 22 3c | 22 0d 0a 54 48 49 53 46 |,2] = "<|"..THISF|
|000035d0| 4f 52 4d 2e 61 4f 70 65 | 72 61 74 6f 72 5b 36 2c |ORM.aOpe|rator[6,|
|000035e0| 32 5d 20 3d 20 22 3c 3d | 22 0d 0a 0d 0a 54 48 49 |2] = "<=|"....THI|
|000035f0| 53 46 4f 52 4d 2e 63 62 | 6f 4f 70 65 72 61 74 6f |SFORM.cb|oOperato|
|00003600| 72 2e 52 65 71 75 65 72 | 79 28 29 0d 0a 54 48 49 |r.Requer|y()..THI|
|00003610| 53 46 4f 52 4d 2e 63 62 | 6f 4f 70 65 72 61 74 6f |SFORM.cb|oOperato|
|00003620| 72 2e 4c 69 73 74 49 6e | 64 65 78 20 3d 20 31 0d |r.ListIn|dex = 1.|
|00003630| 0a 54 48 49 53 46 4f 52 | 4d 2e 63 62 6f 4f 70 65 |.THISFOR|M.cboOpe|
|00003640| 72 61 74 6f 72 2e 43 6c | 69 63 6b 28 29 0d 0a 0d |rator.Cl|ick()...|
|00003650| 0a 45 4e 44 50 52 4f 43 | 0d 0a 50 52 4f 43 45 44 |.ENDPROC|..PROCED|
|00003660| 55 52 45 20 63 68 65 63 | 6b 62 72 61 63 6b 65 74 |URE chec|kbracket|
|00003670| 73 0d 0a 2a 20 43 68 65 | 63 6b 20 66 6f 72 20 6d |s..* Che|ck for m|
|00003680| 69 6e 6f 72 20 73 79 6e | 74 61 78 20 70 72 6f 62 |inor syn|tax prob|
|00003690| 6c 65 6d 73 3a 20 20 6d | 69 73 6d 61 74 63 68 65 |lems: m|ismatche|
|000036a0| 64 20 62 72 61 63 6b 65 | 74 73 2c 20 75 6e 62 61 |d bracke|ts, unba|
|000036b0| 6c 61 6e 63 65 64 20 62 | 72 61 63 6b 65 74 73 2e |lanced b|rackets.|
|000036c0| 2e 2e 0d 0a 4c 4f 43 41 | 4c 20 6c 6e 41 4c 65 6e |....LOCA|L lnALen|
|000036d0| 2c 20 6c 6e 4f 42 2c 20 | 6c 6e 43 42 0d 0a 6c 6e |, lnOB, |lnCB..ln|
|000036e0| 41 4c 65 6e 20 3d 20 41 | 4c 45 4e 28 54 48 49 53 |ALen = A|LEN(THIS|
|000036f0| 46 4f 52 4d 2e 61 43 72 | 69 74 56 69 65 77 2c 31 |FORM.aCr|itView,1|
|00003700| 29 0d 0a 6c 6e 4f 42 20 | 3d 20 30 0d 0a 6c 6e 43 |)..lnOB |= 0..lnC|
|00003710| 42 20 3d 20 30 0d 0a 49 | 46 20 54 48 49 53 46 4f |B = 0..I|F THISFO|
|00003720| 52 4d 2e 61 43 72 69 74 | 56 69 65 77 5b 31 2c 32 |RM.aCrit|View[1,2|
|00003730| 5d 20 3d 20 22 4f 52 22 | 20 4f 52 20 54 48 49 53 |] = "OR"| OR THIS|
|00003740| 46 4f 52 4d 2e 61 43 72 | 69 74 56 69 65 77 5b 6c |FORM.aCr|itView[l|
|00003750| 6e 41 4c 65 6e 2c 32 5d | 20 3d 20 22 4f 52 22 0d |nALen,2]| = "OR".|
|00003760| 0a 09 57 41 49 54 20 57 | 49 4e 44 4f 57 20 22 4d |..WAIT W|INDOW "M|
|00003770| 69 73 70 6c 61 63 65 64 | 20 27 4f 52 27 20 73 74 |isplaced| 'OR' st|
|00003780| 61 74 65 6d 65 6e 74 22 | 20 4e 4f 57 41 49 54 0d |atement"| NOWAIT.|
|00003790| 0a 09 52 45 54 55 52 4e | 20 2e 46 2e 0d 0a 45 4e |..RETURN| .F...EN|
|000037a0| 44 49 46 0d 0a 49 46 20 | 54 48 49 53 46 4f 52 4d |DIF..IF |THISFORM|
|000037b0| 2e 61 43 72 69 74 56 69 | 65 77 5b 31 2c 32 5d 20 |.aCritVi|ew[1,2] |
|000037c0| 3d 20 22 29 22 20 4f 52 | 20 54 48 49 53 46 4f 52 |= ")" OR| THISFOR|
|000037d0| 4d 2e 61 43 72 69 74 56 | 69 65 77 5b 6c 6e 41 4c |M.aCritV|iew[lnAL|
|000037e0| 65 6e 2c 32 5d 20 3d 20 | 22 28 22 0d 0a 09 57 41 |en,2] = |"("...WA|
|000037f0| 49 54 20 57 49 4e 44 4f | 57 20 22 55 6e 62 61 6c |IT WINDO|W "Unbal|
|00003800| 61 6e 63 65 64 20 62 72 | 61 63 6b 65 74 73 22 20 |anced br|ackets" |
|00003810| 4e 4f 57 41 49 54 0d 0a | 09 52 45 54 55 52 4e 20 |NOWAIT..|.RETURN |
|00003820| 2e 46 2e 0d 0a 45 4e 44 | 49 46 0d 0a 46 4f 52 20 |.F...END|IF..FOR |
|00003830| 69 20 3d 20 31 20 54 4f | 20 6c 6e 41 4c 65 6e 0d |i = 1 TO| lnALen.|
|00003840| 0a 09 44 4f 20 43 41 53 | 45 0d 0a 09 43 41 53 45 |..DO CAS|E...CASE|
|00003850| 20 54 48 49 53 46 4f 52 | 4d 2e 61 43 72 69 74 56 | THISFOR|M.aCritV|
|00003860| 69 65 77 28 69 2c 32 29 | 20 3d 20 22 28 22 0d 0a |iew(i,2)| = "("..|
|00003870| 09 09 6c 6e 4f 42 20 3d | 20 6c 6e 4f 42 20 2b 20 |..lnOB =| lnOB + |
|00003880| 31 0d 0a 09 43 41 53 45 | 20 54 48 49 53 46 4f 52 |1...CASE| THISFOR|
|00003890| 4d 2e 61 43 72 69 74 56 | 69 65 77 28 69 2c 32 29 |M.aCritV|iew(i,2)|
|000038a0| 20 3d 20 22 29 22 0d 0a | 09 09 6c 6e 43 42 20 3d | = ")"..|..lnCB =|
|000038b0| 20 6c 6e 43 42 20 2b 20 | 31 0d 0a 09 45 4e 44 43 | lnCB + |1...ENDC|
|000038c0| 41 53 45 0d 0a 09 49 46 | 20 6c 6e 4f 42 20 3c 20 |ASE...IF| lnOB < |
|000038d0| 6c 6e 43 42 0d 0a 09 09 | 57 41 49 54 20 57 49 4e |lnCB....|WAIT WIN|
|000038e0| 44 4f 57 20 22 43 6c 6f | 73 65 20 62 72 61 63 6b |DOW "Clo|se brack|
|000038f0| 65 74 20 70 72 65 63 65 | 65 64 73 20 6f 70 65 6e |et prece|eds open|
|00003900| 20 62 72 61 63 6b 65 74 | 22 20 4e 4f 57 41 49 54 | bracket|" NOWAIT|
|00003910| 0d 0a 09 09 52 45 54 55 | 52 4e 20 2e 46 2e 0d 0a |....RETU|RN .F...|
|00003920| 09 45 4e 44 49 46 0d 0a | 09 49 46 20 28 69 20 3e |.ENDIF..|.IF (i >|
|00003930| 20 31 20 41 4e 44 20 69 | 20 3c 20 6c 6e 41 4c 65 | 1 AND i| < lnALe|
|00003940| 6e 29 0d 0a 09 09 49 46 | 20 54 48 49 53 46 4f 52 |n)....IF| THISFOR|
|00003950| 4d 2e 61 43 72 69 74 56 | 69 65 77 5b 69 2c 32 5d |M.aCritV|iew[i,2]|
|00003960| 20 3d 20 22 4f 52 22 20 | 41 4e 44 20 3b 0d 0a 09 | = "OR" |AND ;...|
|00003970| 09 09 09 28 54 48 49 53 | 46 4f 52 4d 2e 61 43 72 |...(THIS|FORM.aCr|
|00003980| 69 74 56 69 65 77 5b 69 | 2d 31 2c 32 5d 20 3d 20 |itView[i|-1,2] = |
|00003990| 22 28 22 20 4f 52 20 54 | 48 49 53 46 4f 52 4d 2e |"(" OR T|HISFORM.|
|000039a0| 61 43 72 69 74 56 69 65 | 77 5b 69 2b 31 2c 32 5d |aCritVie|w[i+1,2]|
|000039b0| 20 3d 20 22 29 22 29 0d | 0a 09 09 09 57 41 49 54 | = ")").|....WAIT|
|000039c0| 20 57 49 4e 44 4f 57 20 | 22 4d 69 73 70 6c 61 63 | WINDOW |"Misplac|
|000039d0| 65 64 20 27 4f 52 27 20 | 73 74 61 74 65 6d 65 6e |ed 'OR' |statemen|
|000039e0| 74 22 20 4e 4f 57 41 49 | 54 0d 0a 09 09 09 52 45 |t" NOWAI|T.....RE|
|000039f0| 54 55 52 4e 20 2e 46 2e | 0d 0a 09 09 45 4e 44 49 |TURN .F.|....ENDI|
|00003a00| 46 0d 0a 09 09 49 46 20 | 28 54 48 49 53 46 4f 52 |F....IF |(THISFOR|
|00003a10| 4d 2e 61 43 72 69 74 56 | 69 65 77 5b 69 2c 32 5d |M.aCritV|iew[i,2]|
|00003a20| 20 3d 20 22 28 22 20 41 | 4e 44 20 3b 0d 0a 09 09 | = "(" A|ND ;....|
|00003a30| 09 28 54 48 49 53 46 4f | 52 4d 2e 61 43 72 69 74 |.(THISFO|RM.aCrit|
|00003a40| 56 69 65 77 5b 69 2d 31 | 2c 32 5d 20 3d 20 22 29 |View[i-1|,2] = ")|
|00003a50| 22 20 4f 52 20 54 48 49 | 53 46 4f 52 4d 2e 61 43 |" OR THI|SFORM.aC|
|00003a60| 72 69 74 56 69 65 77 5b | 69 2b 31 2c 32 5d 20 3d |ritView[|i+1,2] =|
|00003a70| 20 22 29 22 29 29 20 4f | 52 20 3b 0d 0a 09 09 09 | ")")) O|R ;.....|
|00003a80| 28 54 48 49 53 46 4f 52 | 4d 2e 61 43 72 69 74 56 |(THISFOR|M.aCritV|
|00003a90| 69 65 77 5b 69 2c 32 5d | 20 3d 20 22 29 22 20 41 |iew[i,2]| = ")" A|
|00003aa0| 4e 44 20 3b 0d 0a 09 09 | 09 28 54 48 49 53 46 4f |ND ;....|.(THISFO|
|00003ab0| 52 4d 2e 61 43 72 69 74 | 56 69 65 77 5b 69 2d 31 |RM.aCrit|View[i-1|
|00003ac0| 2c 32 5d 20 3d 20 22 28 | 22 20 4f 52 20 54 48 49 |,2] = "(|" OR THI|
|00003ad0| 53 46 4f 52 4d 2e 61 43 | 72 69 74 56 69 65 77 5b |SFORM.aC|ritView[|
|00003ae0| 69 2b 31 2c 32 5d 20 3d | 20 22 28 22 29 29 0d 0a |i+1,2] =| "("))..|
|00003af0| 09 09 09 57 41 49 54 20 | 57 49 4e 44 4f 57 20 22 |...WAIT |WINDOW "|
|00003b00| 55 6e 62 61 6c 61 6e 63 | 65 64 20 62 72 61 63 6b |Unbalanc|ed brack|
|00003b10| 65 74 73 22 20 4e 4f 57 | 41 49 54 0d 0a 09 09 09 |ets" NOW|AIT.....|
|00003b20| 52 45 54 55 52 4e 20 2e | 46 2e 0d 0a 09 09 45 4e |RETURN .|F.....EN|
|00003b30| 44 49 46 0d 0a 09 45 4e | 44 49 46 0d 0a 4e 45 58 |DIF...EN|DIF..NEX|
|00003b40| 54 0d 0a 49 46 20 6c 6e | 4f 42 20 3e 20 6c 6e 43 |T..IF ln|OB > lnC|
|00003b50| 42 0d 0a 09 57 41 49 54 | 20 57 49 4e 44 4f 57 20 |B...WAIT| WINDOW |
|00003b60| 22 55 6e 62 61 6c 61 6e | 63 65 64 20 62 72 61 63 |"Unbalan|ced brac|
|00003b70| 6b 65 74 73 22 20 4e 4f | 57 41 49 54 0d 0a 09 52 |kets" NO|WAIT...R|
|00003b80| 45 54 55 52 4e 20 2e 46 | 2e 0d 0a 45 4e 44 49 46 |ETURN .F|...ENDIF|
|00003b90| 0d 0a 52 45 54 55 52 4e | 20 2e 54 2e 0d 0a 0d 0a |..RETURN| .T.....|
|00003ba0| 45 4e 44 50 52 4f 43 0d | 0a 50 52 4f 43 45 44 55 |ENDPROC.|.PROCEDU|
|00003bb0| 52 45 20 61 64 64 63 72 | 69 74 0d 0a 4c 50 41 52 |RE addcr|it..LPAR|
|00003bc0| 41 4d 45 54 45 52 53 20 | 6c 63 54 78 74 0d 0a 49 |AMETERS |lcTxt..I|
|00003bd0| 46 20 54 59 50 45 28 22 | 6c 63 54 78 74 22 29 20 |F TYPE("|lcTxt") |
|00003be0| 21 3d 20 22 43 22 0d 0a | 09 57 41 49 54 20 57 49 |!= "C"..|.WAIT WI|
|00003bf0| 4e 44 4f 57 20 22 50 72 | 6f 67 72 61 6d 6d 65 72 |NDOW "Pr|ogrammer|
|00003c00| 2c 20 67 65 74 20 69 74 | 20 72 69 67 68 74 21 22 |, get it| right!"|
|00003c10| 20 4e 4f 57 41 49 54 0d | 0a 09 52 45 54 55 52 4e | NOWAIT.|..RETURN|
|00003c20| 0d 0a 45 4e 44 49 46 0d | 0a 4c 4f 43 41 4c 20 6c |..ENDIF.|.LOCAL l|
|00003c30| 6e 43 72 69 74 56 69 65 | 77 2c 20 6c 63 54 78 74 |nCritVie|w, lcTxt|
|00003c40| 54 6f 41 64 64 0d 0a 6c | 6e 43 72 69 74 56 69 65 |ToAdd..l|nCritVie|
|00003c50| 77 20 3d 20 54 48 49 53 | 46 4f 52 4d 2e 6c 73 74 |w = THIS|FORM.lst|
|00003c60| 43 72 69 74 56 69 65 77 | 2e 4c 69 73 74 49 6e 64 |CritView|.ListInd|
|00003c70| 65 78 0d 0a 54 48 49 53 | 46 4f 52 4d 2e 6e 43 72 |ex..THIS|FORM.nCr|
|00003c80| 69 74 43 6f 75 6e 74 20 | 3d 20 54 48 49 53 46 4f |itCount |= THISFO|
|00003c90| 52 4d 2e 6e 43 72 69 74 | 43 6f 75 6e 74 20 2b 20 |RM.nCrit|Count + |
|00003ca0| 31 0d 0a 44 49 4d 45 4e | 53 49 4f 4e 20 54 48 49 |1..DIMEN|SION THI|
|00003cb0| 53 46 4f 52 4d 2e 61 43 | 72 69 74 56 69 65 77 5b |SFORM.aC|ritView[|
|00003cc0| 54 48 49 53 46 4f 52 4d | 2e 6e 43 72 69 74 43 6f |THISFORM|.nCritCo|
|00003cd0| 75 6e 74 2c 34 5d 0d 0a | 0d 0a 49 46 20 54 48 49 |unt,4]..|..IF THI|
|00003ce0| 53 46 4f 52 4d 2e 6f 70 | 74 41 62 6f 76 65 42 65 |SFORM.op|tAboveBe|
|00003cf0| 6c 6f 77 2e 56 61 6c 75 | 65 20 3d 20 32 0d 0a 09 |low.Valu|e = 2...|
|00003d00| 6c 6e 43 72 69 74 56 69 | 65 77 20 3d 20 4d 49 4e |lnCritVi|ew = MIN|
|00003d10| 28 54 48 49 53 46 4f 52 | 4d 2e 6e 43 72 69 74 43 |(THISFOR|M.nCritC|
|00003d20| 6f 75 6e 74 2c 20 6c 6e | 43 72 69 74 56 69 65 77 |ount, ln|CritView|
|00003d30| 20 2b 20 31 29 0d 0a 45 | 4e 44 49 46 0d 0a 0d 0a | + 1)..E|NDIF....|
|00003d40| 3d 41 49 4e 53 28 54 48 | 49 53 46 4f 52 4d 2e 61 |=AINS(TH|ISFORM.a|
|00003d50| 43 72 69 74 56 69 65 77 | 2c 20 6c 6e 43 72 69 74 |CritView|, lnCrit|
|00003d60| 56 69 65 77 29 0d 0a 44 | 4f 20 43 41 53 45 0d 0a |View)..D|O CASE..|
|00003d70| 43 41 53 45 20 6c 63 54 | 78 74 20 3d 20 22 29 22 |CASE lcT|xt = ")"|
|00003d80| 0d 0a 09 6c 63 54 78 74 | 54 6f 41 64 64 20 3d 20 |...lcTxt|ToAdd = |
|00003d90| 50 41 44 4c 28 22 20 29 | 22 2c 20 36 30 2c 20 22 |PADL(" )|", 60, "|
|00003da0| 20 22 29 0d 0a 09 54 48 | 49 53 46 4f 52 4d 2e 61 | ")...TH|ISFORM.a|
|00003db0| 43 72 69 74 56 69 65 77 | 5b 6c 6e 43 72 69 74 56 |CritView|[lnCritV|
|00003dc0| 69 65 77 2c 32 5d 20 3d | 20 22 29 22 0d 0a 43 41 |iew,2] =| ")"..CA|
|00003dd0| 53 45 20 6c 63 54 78 74 | 20 3d 20 22 28 22 0d 0a |SE lcTxt| = "("..|
|00003de0| 09 6c 63 54 78 74 54 6f | 41 64 64 20 3d 20 22 28 |.lcTxtTo|Add = "(|
|00003df0| 22 0d 0a 09 54 48 49 53 | 46 4f 52 4d 2e 61 43 72 |"...THIS|FORM.aCr|
|00003e00| 69 74 56 69 65 77 5b 6c | 6e 43 72 69 74 56 69 65 |itView[l|nCritVie|
|00003e10| 77 2c 32 5d 20 3d 20 22 | 28 22 0d 0a 43 41 53 45 |w,2] = "|("..CASE|
|00003e20| 20 6c 63 54 78 74 20 3d | 20 22 4f 52 22 0d 0a 09 | lcTxt =| "OR"...|
|00003e30| 6c 63 54 78 74 54 6f 41 | 64 64 20 3d 20 50 41 44 |lcTxtToA|dd = PAD|
|00003e40| 43 28 22 20 4f 52 20 22 | 2c 20 35 38 2c 20 22 2d |C(" OR "|, 58, "-|
|00003e50| 22 29 0d 0a 09 54 48 49 | 53 46 4f 52 4d 2e 61 43 |")...THI|SFORM.aC|
|00003e60| 72 69 74 56 69 65 77 5b | 6c 6e 43 72 69 74 56 69 |ritView[|lnCritVi|
|00003e70| 65 77 2c 32 5d 20 3d 20 | 22 4f 52 22 0d 0a 45 4e |ew,2] = |"OR"..EN|
|00003e80| 44 43 41 53 45 0d 0a 54 | 48 49 53 46 4f 52 4d 2e |DCASE..T|HISFORM.|
|00003e90| 61 43 72 69 74 56 69 65 | 77 5b 6c 6e 43 72 69 74 |aCritVie|w[lnCrit|
|00003ea0| 56 69 65 77 2c 31 5d 20 | 3d 20 6c 63 54 78 74 54 |View,1] |= lcTxtT|
|00003eb0| 6f 41 64 64 0d 0a 0d 0a | 54 48 49 53 46 4f 52 4d |oAdd....|THISFORM|
|00003ec0| 2e 6c 73 74 43 72 69 74 | 56 69 65 77 2e 52 65 71 |.lstCrit|View.Req|
|00003ed0| 75 65 72 79 28 29 0d 0a | 49 46 20 54 48 49 53 46 |uery()..|IF THISF|
|00003ee0| 4f 52 4d 2e 6f 70 74 41 | 62 6f 76 65 42 65 6c 6f |ORM.optA|boveBelo|
|00003ef0| 77 2e 56 61 6c 75 65 20 | 3d 20 32 0d 0a 09 54 48 |w.Value |= 2...TH|
|00003f00| 49 53 46 4f 52 4d 2e 6c | 73 74 43 72 69 74 56 69 |ISFORM.l|stCritVi|
|00003f10| 65 77 2e 4c 69 73 74 49 | 6e 64 65 78 20 3d 20 4d |ew.ListI|ndex = M|
|00003f20| 49 4e 28 54 48 49 53 46 | 4f 52 4d 2e 6e 43 72 69 |IN(THISF|ORM.nCri|
|00003f30| 74 43 6f 75 6e 74 2c 20 | 54 48 49 53 46 4f 52 4d |tCount, |THISFORM|
|00003f40| 2e 6c 73 74 43 72 69 74 | 56 69 65 77 2e 4c 69 73 |.lstCrit|View.Lis|
|00003f50| 74 49 6e 64 65 78 20 2b | 20 31 29 0d 0a 45 4e 44 |tIndex +| 1)..END|
|00003f60| 49 46 0d 0a 0d 0a 45 4e | 44 50 52 4f 43 0d 0a 50 |IF....EN|DPROC..P|
|00003f70| 52 4f 43 45 44 55 52 45 | 20 55 6e 6c 6f 61 64 0d |ROCEDURE| Unload.|
|00003f80| 0a 52 45 54 55 52 4e 20 | 54 48 49 53 46 4f 52 4d |.RETURN |THISFORM|
|00003f90| 2e 63 53 51 4c 43 6f 64 | 65 0d 0a 0d 0a 45 4e 44 |.cSQLCod|e....END|
|00003fa0| 50 52 4f 43 0d 0a 50 52 | 4f 43 45 44 55 52 45 20 |PROC..PR|OCEDURE |
|00003fb0| 49 6e 69 74 0d 0a 4c 50 | 41 52 41 4d 45 54 45 52 |Init..LP|ARAMETER|
|00003fc0| 20 74 63 44 42 43 0d 0a | 49 46 20 54 59 50 45 28 | tcDBC..|IF TYPE(|
|00003fd0| 22 74 63 44 42 43 22 29 | 20 21 3d 20 22 43 22 0d |"tcDBC")| != "C".|
|00003fe0| 0a 09 52 45 54 55 52 4e | 20 2e 46 2e 0d 0a 45 4e |..RETURN| .F...EN|
|00003ff0| 44 49 46 0d 0a 49 46 20 | 21 46 49 4c 45 28 74 63 |DIF..IF |!FILE(tc|
|00004000| 44 42 43 20 2b 20 22 2e | 44 42 43 22 29 0d 0a 09 |DBC + ".|DBC")...|
|00004010| 52 45 54 55 52 4e 20 2e | 46 2e 0d 0a 45 4e 44 49 |RETURN .|F...ENDI|
|00004020| 46 0d 0a 0d 0a 54 48 49 | 53 46 4f 52 4d 2e 63 44 |F....THI|SFORM.cD|
|00004030| 42 43 20 3d 20 74 63 44 | 42 43 0d 0a 0d 0a 4c 4f |BC = tcD|BC....LO|
|00004040| 43 41 4c 20 6c 63 4d 65 | 73 73 61 67 65 0d 0a 6c |CAL lcMe|ssage..l|
|00004050| 63 4d 65 73 73 61 67 65 | 20 3d 20 22 22 0d 0a 0d |cMessage| = ""...|
|00004060| 0a 54 48 49 53 46 4f 52 | 4d 2e 41 75 74 6f 43 65 |.THISFOR|M.AutoCe|
|00004070| 6e 74 65 72 20 3d 20 2e | 54 2e 0d 0a 6f 41 70 70 |nter = .|T...oApp|
|00004080| 2e 6e 46 6f 72 6d 49 6e | 73 74 61 6e 63 65 43 6f |.nFormIn|stanceCo|
|00004090| 75 6e 74 20 3d 20 6f 41 | 70 70 2e 6e 46 6f 72 6d |unt = oA|pp.nForm|
|000040a0| 49 6e 73 74 61 6e 63 65 | 43 6f 75 6e 74 20 2b 20 |Instance|Count + |
|000040b0| 31 0d 0a 44 49 4d 45 4e | 53 49 4f 4e 20 54 48 49 |1..DIMEN|SION THI|
|000040c0| 53 46 4f 52 4d 2e 61 43 | 72 69 74 56 69 65 77 5b |SFORM.aC|ritView[|
|000040d0| 31 2c 34 5d 0d 0a 49 46 | 20 54 48 49 53 46 4f 52 |1,4]..IF| THISFOR|
|000040e0| 4d 2e 4d 61 6b 65 43 61 | 74 65 67 6f 72 79 28 29 |M.MakeCa|tegory()|
|000040f0| 20 3d 20 30 0d 0a 09 6c | 63 4d 65 73 73 61 67 65 | = 0...l|cMessage|
|00004100| 20 3d 20 22 49 6e 76 61 | 6c 69 64 20 44 42 43 20 | = "Inva|lid DBC |
|00004110| 72 65 66 65 72 65 6e 63 | 65 2e 22 20 2b 20 43 48 |referenc|e." + CH|
|00004120| 52 28 31 33 29 20 2b 20 | 3b 0d 0a 09 09 22 54 68 |R(13) + |;...."Th|
|00004130| 69 73 20 6d 6f 64 75 6c | 65 20 6e 6f 74 20 66 75 |is modul|e not fu|
|00004140| 6e 63 74 69 6f 6e 61 6c | 2e 22 0d 0a 09 3d 4d 45 |nctional|."...=ME|
|00004150| 53 53 41 47 45 42 4f 58 | 28 6c 63 4d 65 73 73 61 |SSAGEBOX|(lcMessa|
|00004160| 67 65 2c 20 4d 42 5f 49 | 43 4f 4e 45 58 43 4c 41 |ge, MB_I|CONEXCLA|
|00004170| 4d 41 54 49 4f 4e 2c 20 | 22 44 42 43 20 45 72 72 |MATION, |"DBC Err|
|00004180| 6f 72 22 29 0d 0a 09 52 | 45 54 55 52 4e 20 2e 46 |or")...R|ETURN .F|
|00004190| 2e 0d 0a 45 4e 44 49 46 | 0d 0a 54 48 49 53 46 4f |...ENDIF|..THISFO|
|000041a0| 52 4d 2e 4d 61 6b 65 4f | 70 65 72 61 74 6f 72 28 |RM.MakeO|perator(|
|000041b0| 29 0d 0a 54 48 49 53 46 | 4f 52 4d 2e 61 43 72 69 |)..THISF|ORM.aCri|
|000041c0| 74 56 69 65 77 20 3d 20 | 22 22 0d 0a 54 48 49 53 |tView = |""..THIS|
|000041d0| 46 4f 52 4d 2e 6c 73 74 | 43 72 69 74 56 69 65 77 |FORM.lst|CritView|
|000041e0| 2e 52 65 71 75 65 72 79 | 28 29 0d 0a 54 48 49 53 |.Requery|()..THIS|
|000041f0| 46 4f 52 4d 2e 6c 73 74 | 43 72 69 74 56 69 65 77 |FORM.lst|CritView|
|00004200| 2e 56 61 6c 75 65 20 3d | 20 31 0d 0a 54 48 49 53 |.Value =| 1..THIS|
|00004210| 46 4f 52 4d 2e 63 62 6f | 43 61 74 65 67 6f 72 79 |FORM.cbo|Category|
|00004220| 2e 43 6c 69 63 6b 28 29 | 0d 0a 0d 0a 45 4e 44 50 |.Click()|....ENDP|
|00004230| 52 4f 43 0d 0a 50 52 4f | 43 45 44 55 52 45 20 44 |ROC..PRO|CEDURE D|
|00004240| 65 73 74 72 6f 79 0d 0a | 4c 4f 43 41 4c 20 6c 6e |estroy..|LOCAL ln|
|00004250| 44 42 46 73 2c 20 6c 63 | 44 42 43 0d 0a 6c 63 44 |DBFs, lc|DBC..lcD|
|00004260| 42 43 20 3d 20 54 48 49 | 53 46 4f 52 4d 2e 63 44 |BC = THI|SFORM.cD|
|00004270| 42 43 0d 0a 0d 0a 6f 41 | 70 70 2e 6e 46 6f 72 6d |BC....oA|pp.nForm|
|00004280| 49 6e 73 74 61 6e 63 65 | 43 6f 75 6e 74 20 3d 20 |Instance|Count = |
|00004290| 6f 41 70 70 2e 6e 46 6f | 72 6d 49 6e 73 74 61 6e |oApp.nFo|rmInstan|
|000042a0| 63 65 43 6f 75 6e 74 20 | 2d 20 31 0d 0a 0d 0a 49 |ceCount |- 1....I|
|000042b0| 46 20 21 44 42 55 53 45 | 44 28 6c 63 44 42 43 29 |F !DBUSE|D(lcDBC)|
|000042c0| 0d 0a 09 4f 50 45 4e 20 | 44 41 54 41 42 41 53 45 |...OPEN |DATABASE|
|000042d0| 20 26 6c 63 44 42 43 0d | 0a 45 4e 44 49 46 0d 0a | &lcDBC.|.ENDIF..|
|000042e0| 53 45 54 20 44 41 54 41 | 42 41 53 45 20 54 4f 20 |SET DATA|BASE TO |
|000042f0| 26 6c 63 44 42 43 0d 0a | 6c 6e 44 42 46 73 20 3d |&lcDBC..|lnDBFs =|
|00004300| 20 41 44 42 4f 42 4a 45 | 43 54 53 28 61 44 42 54 | ADBOBJE|CTS(aDBT|
|00004310| 61 62 6c 65 73 2c 20 22 | 54 41 42 4c 45 22 29 0d |ables, "|TABLE").|
|00004320| 0a 49 46 20 6c 6e 44 42 | 46 73 20 3d 20 30 0d 0a |.IF lnDB|Fs = 0..|
|00004330| 09 52 45 54 55 52 4e 0d | 0a 45 4e 44 49 46 0d 0a |.RETURN.|.ENDIF..|
|00004340| 46 4f 52 20 69 20 3d 20 | 31 20 54 4f 20 6c 6e 44 |FOR i = |1 TO lnD|
|00004350| 42 46 73 0d 0a 09 6c 63 | 43 75 72 54 61 62 6c 65 |BFs...lc|CurTable|
|00004360| 20 3d 20 61 44 42 54 61 | 62 6c 65 73 5b 69 5d 0d | = aDBTa|bles[i].|
|00004370| 0a 09 49 46 20 55 53 45 | 44 28 6c 63 43 75 72 54 |..IF USE|D(lcCurT|
|00004380| 61 62 6c 65 29 0d 0a 09 | 09 53 45 4c 45 20 26 6c |able)...|.SELE &l|
|00004390| 63 43 75 72 54 61 62 6c | 65 0d 0a 09 09 55 53 45 |cCurTabl|e....USE|
|000043a0| 0d 0a 09 45 4e 44 49 46 | 0d 0a 4e 45 58 54 0d 0a |...ENDIF|..NEXT..|
|000043b0| 52 45 54 55 52 4e 0d 0a | 0d 0a 45 4e 44 50 52 4f |RETURN..|..ENDPRO|
|000043c0| 43 0d 0a 00 00 00 01 00 | 00 19 61 fe f2 ff 1b 02 |C.......|..a.....|
|000043d0| 01 00 00 00 48 19 00 00 | 48 19 00 00 00 00 00 00 |....H...|H.......|
|000043e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000043f0| 00 00 da 52 08 00 00 00 | 25 00 00 00 1d 16 00 00 |...R....|%.......|
|00004400| 00 00 00 00 8f 18 00 00 | f7 00 00 00 a1 16 00 00 |........|........|
|00004410| 00 00 00 00 00 00 00 00 | fc 03 00 03 00 55 00 00 |........|.....U..|
|00004420| 23 05 17 00 ae f7 00 00 | 07 f7 01 00 07 f7 02 00 |#.......|........|
|00004430| 07 f7 03 00 07 f7 04 00 | fe 0b 00 ae f7 05 00 07 |........|........|
|00004440| f7 06 00 fe 0d 00 ae f6 | 07 00 fc f8 01 01 fd 16 |........|........|
|00004450| fe 2b 00 25 fc 43 f4 08 | 00 e0 09 00 cd f8 01 01 |.+.%.C..|........|
|00004460| 10 f0 12 00 43 43 43 f8 | 01 01 f8 01 01 f4 08 00 |....CCC.|........|
|00004470| f6 09 00 9b a1 09 fd f9 | 05 80 00 fe 1f 00 52 2c |........|......R,|
|00004480| 3a fc fb 14 00 4e 6f 20 | 63 72 69 74 65 72 69 61 |:....No |criteria|
|00004490| 20 73 65 6c 65 63 74 65 | 64 fd fe 07 00 42 fc 2d | selecte|d....B.-|
|000044a0| fd fe 04 00 1e fe 10 00 | 54 f4 08 00 f7 0a 00 10 |........|T.......|
|000044b0| fc fb 00 00 fd fe 1b 00 | 54 f6 07 00 fc f8 01 01 |........|T.......|
|000044c0| fd 16 10 fc fb 08 00 6d | 75 73 69 63 69 61 6e fd |.......m|usician.|
|000044d0| fe 0d 00 54 f7 05 00 10 | fc fb 00 00 fd fe 0d 00 |...T....|........|
|000044e0| 54 f7 06 00 10 fc fb 00 | 00 fd fe 15 00 54 f7 00 |T.......|.....T..|
|000044f0| 00 10 fc 43 f4 08 00 e0 | 09 00 f8 01 01 cd fd fe |...C....|........|
|00004500| 17 00 84 f7 0b 00 10 fc | f8 01 01 fd 28 fc f7 00 |........|....(...|
|00004510| 00 fd f9 05 39 04 fe 18 | 00 54 f7 01 00 10 fc 43 |....9...|.T.....C|
|00004520| 00 f7 0b 00 f8 01 02 f4 | 08 00 f6 09 00 fd fe 0d |........|........|
|00004530| 00 18 48 f9 05 1a 01 f9 | 05 35 04 fe 12 00 0c fc |..H.....|.5......|
|00004540| f7 01 00 fb 01 00 28 10 | fd f9 05 b6 01 fe 11 00 |......(.|........|
|00004550| 25 fc f7 0b 00 f8 01 01 | 11 fd f9 05 96 01 fe 1b |%.......|........|
|00004560| 00 54 f7 02 00 10 fc 43 | f7 0b 00 f8 01 01 08 f8 |.T.....C|........|
|00004570| 01 02 f4 08 00 f6 09 00 | fd fe 1f 00 25 fc f7 02 |........|....%...|
|00004580| 00 fb 01 00 28 0f f0 0a | 00 f7 02 00 fb 02 00 4f |....(...|.......O|
|00004590| 52 0f 09 fd f9 05 92 01 | fe 1b 00 54 f4 08 00 f7 |R.......|...T....|
|000045a0| 0a 00 10 fc f4 08 00 f7 | 0a 00 fb 04 00 20 41 4e |........|..... AN|
|000045b0| 44 06 fd fe 04 00 1e fe | 04 00 1e fe 1c 00 54 f4 |D.......|......T.|
|000045c0| 08 00 f7 0a 00 10 fc f4 | 08 00 f7 0a 00 fb 01 00 |........|........|
|000045d0| 20 06 f7 01 00 06 fd fe | 1f 00 0c fc f7 01 00 fb | .......|........|
|000045e0| 01 00 29 10 f1 0a 00 f7 | 01 00 fb 02 00 4f 52 10 |..).....|.....OR.|
|000045f0| 0b fd f9 05 f1 01 fe 1c | 00 54 f4 08 00 f7 0a 00 |........|.T......|
|00004600| 10 fc f4 08 00 f7 0a 00 | fb 01 00 20 06 f7 01 00 |........|... ....|
|00004610| 06 fd fe 08 00 32 f9 05 | 35 04 fe 11 00 25 fc f7 |.....2..|5....%..|
|00004620| 0b 00 f8 01 01 11 fd f9 | 05 63 02 fe 1b 00 54 f7 |........|.c....T.|
|00004630| 02 00 10 fc 43 f7 0b 00 | f8 01 01 08 f8 01 02 f4 |....C...|........|
|00004640| 08 00 f6 09 00 fd fe 1f | 00 25 fc f7 02 00 fb 01 |........|.%......|
|00004650| 00 28 0f f0 0a 00 f7 02 | 00 fb 02 00 4f 52 0f 09 |.(......|....OR..|
|00004660| fd f9 05 5f 02 fe 1b 00 | 54 f4 08 00 f7 0a 00 10 |..._....|T.......|
|00004670| fc f4 08 00 f7 0a 00 fb | 04 00 20 41 4e 44 06 fd |........|.. AND..|
|00004680| fe 04 00 1e fe 04 00 1e | fe 46 00 54 f4 08 00 f7 |........|.F.T....|
|00004690| 0a 00 10 fc f4 08 00 f7 | 0a 00 fb 01 00 20 06 43 |........|..... .C|
|000046a0| 43 43 00 f7 0b 00 f8 01 | 02 f4 08 00 f6 09 00 9b |CC......|........|
|000046b0| 40 06 fb 01 00 20 06 43 | 43 00 f7 0b 00 f8 01 03 |@.... .C|C.......|
|000046c0| f4 08 00 f6 09 00 9b 06 | fb 01 00 20 06 fd fe 0d |........|... ....|
|000046d0| 00 18 48 f9 05 ba 02 f9 | 05 89 03 fe 25 00 0c fc |..H.....|....%...|
|000046e0| 43 43 00 f7 0b 00 f8 01 | 04 f4 08 00 f6 09 00 f8 |CC......|........|
|000046f0| 01 04 3d fb 04 00 56 41 | 4c 3a 10 fd f9 05 06 03 |..=...VA|L:......|
|00004700| fe 27 00 54 f4 08 00 f7 | 0a 00 10 fc f4 08 00 f7 |.'.T....|........|
|00004710| 0a 00 43 43 00 f7 0b 00 | f8 01 04 f4 08 00 f6 09 |..CC....|........|
|00004720| 00 f8 01 05 5c 06 fd fe | 26 00 0c fc 43 43 00 f7 |....\...|&...CC..|
|00004730| 0b 00 f8 01 04 f4 08 00 | f6 09 00 f8 01 05 3d fb |........|......=.|
|00004740| 05 00 42 4f 4f 4c 3a 10 | fd f9 05 53 03 fe 27 00 |..BOOL:.|...S..'.|
|00004750| 54 f4 08 00 f7 0a 00 10 | fc f4 08 00 f7 0a 00 43 |T.......|.......C|
|00004760| 43 00 f7 0b 00 f8 01 04 | f4 08 00 f6 09 00 f8 01 |C.......|........|
|00004770| 06 5c 06 fd fe 08 00 32 | f9 05 89 03 fe 2e 00 54 |.\.....2|.......T|
|00004780| f4 08 00 f7 0a 00 10 fc | f4 08 00 f7 0a 00 fb 01 |........|........|
|00004790| 00 27 06 43 43 00 f7 0b | 00 f8 01 04 f4 08 00 f6 |.'.CC...|........|
|000047a0| 09 00 9b 06 fb 01 00 27 | 06 fd fe 04 00 1c fe 1e |.......'|........|
|000047b0| 00 54 f7 04 00 10 fc 43 | fb 01 00 2e 43 00 f7 0b |.T.....C|....C...|
|000047c0| 00 f8 01 02 f4 08 00 f6 | 09 00 1d fd fe 11 00 25 |........|.......%|
|000047d0| fc f7 04 00 f8 01 00 11 | fd f9 05 31 04 fe 25 00 |........|...1..%.|
|000047e0| 54 f7 0c 00 10 fc 43 43 | 43 43 00 f7 0b 00 f8 01 |T.....CC|CC......|
|000047f0| 02 f4 08 00 f6 09 00 f7 | 04 00 f8 01 01 08 3d 9b |........|......=.|
|00004800| 40 fd fe 18 00 25 fc 43 | eb f7 07 00 f7 0c 00 ea |@....%.C|........|
|00004810| 11 f8 01 00 10 fd f9 05 | 2d 04 fe 14 00 54 f7 0d |........|-....T..|
|00004820| 00 10 fc 43 eb f7 07 00 | cd f8 01 01 06 fd fe 0d |...C....|........|
|00004830| 00 15 f6 07 00 fc f7 0d | 00 fd 16 fe 13 00 54 f6 |........|......T.|
|00004840| 07 00 fc f7 0d 00 fd 16 | 10 fc f7 0c 00 fd fe 04 |........|........|
|00004850| 00 1e fe 04 00 1e fe 04 | 00 1c fe 04 00 85 fe 1a |........|........|
|00004860| 00 84 f7 0b 00 10 fc f8 | 01 01 fd 28 fc 43 eb f7 |........|...(.C..|
|00004870| 07 00 cd fd f9 05 e4 04 | fe 11 00 25 fc f7 0b 00 |........|...%....|
|00004880| f8 01 01 10 fd f9 05 7c | 04 fe 14 00 54 f7 05 00 |.......||....T...|
|00004890| 10 fc 43 43 00 f7 0b 00 | f6 07 00 9b fd fe 08 00 |..CC....|........|
|000048a0| 1b f9 05 e0 04 fe 1e 00 | 54 f7 05 00 10 fc f7 05 |........|T.......|
|000048b0| 00 fb 02 00 2c 20 06 43 | 43 00 f7 0b 00 f6 07 00 |...., .C|C.......|
|000048c0| 9b 06 fd fe 3e 00 54 f7 | 06 00 10 fc f7 06 00 fb |....>.T.|........|
|000048d0| 12 00 6d 75 73 69 63 69 | 61 6e 2e 65 6d 70 6e 75 |..musici|an.empnu|
|000048e0| 6d 20 3d 20 06 43 43 00 | f7 0b 00 f6 07 00 9b 06 |m = .CC.|........|
|000048f0| fb 0c 00 2e 65 6d 70 6e | 75 6d 20 41 4e 44 20 06 |....empn|um AND .|
|00004900| fd fe 04 00 1e fe 04 00 | 85 fe 31 00 54 f4 08 00 |........|..1.T...|
|00004910| f7 0a 00 10 fc fb 07 00 | 2a 20 46 52 4f 4d 20 f7 |........|* FROM .|
|00004920| 05 00 06 fb 07 00 20 57 | 48 45 52 45 20 06 f7 06 |...... W|HERE ...|
|00004930| 00 06 f4 08 00 f7 0a 00 | 06 fd fe 07 00 42 fc 61 |........|.....B.a|
|00004940| fd fe 03 00 55 0e 00 05 | 00 4c 4e 4c 45 4e 06 00 |....U...|.LNLEN..|
|00004950| 4c 43 54 59 50 45 07 00 | 4c 43 54 59 50 45 32 07 |LCTYPE..|LCTYPE2.|
|00004960| 00 4c 43 46 49 45 4c 44 | 04 00 4c 4e 41 54 0b 00 |.LCFIELD|..LNAT..|
|00004970| 4c 43 54 41 42 4c 45 4c | 49 53 54 06 00 4c 43 4a |LCTABLEL|IST..LCJ|
|00004980| 4f 49 4e 0a 00 41 54 41 | 42 4c 45 4c 49 53 54 08 |OIN..ATA|BLELIST.|
|00004990| 00 54 48 49 53 46 4f 52 | 4d 09 00 41 43 52 49 54 |.THISFOR|M..ACRIT|
|000049a0| 56 49 45 57 08 00 43 53 | 51 4c 43 4f 44 45 01 00 |VIEW..CS|QLCODE..|
|000049b0| 49 07 00 4c 43 54 41 42 | 4c 45 06 00 4c 4e 41 4c |I..LCTAB|LE..LNAL|
|000049c0| 45 4e 67 03 0d 00 ae f6 | 00 00 fc f8 01 01 fd 16 |ENg.....|........|
|000049d0| fe 23 00 ae f7 01 00 07 | f7 02 00 07 f7 03 00 07 |.#......|........|
|000049e0| f7 04 00 07 f7 05 00 07 | f7 06 00 07 f7 07 00 07 |........|........|
|000049f0| f7 08 00 fe 1b 00 ae f7 | 09 00 07 f7 0a 00 07 f7 |........|........|
|00004a00| 0b 00 07 f7 0c 00 07 f7 | 0d 00 07 f7 0e 00 fe 07 |........|........|
|00004a10| 00 ae f7 0f 00 fe 10 00 | 54 f7 0f 00 10 fc f4 10 |........|T.......|
|00004a20| 00 f7 11 00 fd fe 11 00 | 25 fc 43 f7 0f 00 ea a4 |........|%.C.....|
|00004a30| 0a fd f9 05 8b 00 fe 18 | 00 01 4f 50 45 4e 20 44 |........|..OPEN D|
|00004a40| 41 54 41 42 41 53 45 20 | 26 6c 63 44 42 43 0a 04 |ATABASE |&lcDBC..|
|00004a50| 00 1e fe 1a 00 01 53 45 | 54 20 44 41 54 41 42 41 |......SE|T DATABA|
|00004a60| 53 45 20 54 4f 20 26 6c | 63 44 42 43 0a 10 00 54 |SE TO &l|cDBC...T|
|00004a70| f4 10 00 f7 12 00 10 fc | fb 00 00 fd fe 1a 00 54 |........|.......T|
|00004a80| f7 01 00 10 fc 43 ea 19 | f7 00 00 fb 05 00 54 41 |.....C..|......TA|
|00004a90| 42 4c 45 ea 98 fd fe 11 | 00 25 fc f7 01 00 f8 01 |BLE.....|.%......|
|00004aa0| 00 10 fd f9 05 ed 00 fe | 09 00 42 fc f8 01 00 fd |........|..B.....|
|00004ab0| fe 04 00 1e fe 0d 00 54 | f7 02 00 10 fc f8 01 00 |.......T|........|
|00004ac0| fd fe 17 00 84 f7 03 00 | 10 fc f8 01 01 fd 28 fc |........|......(.|
|00004ad0| f7 01 00 fd f9 05 06 03 | fe 12 00 54 f7 09 00 10 |........|...T....|
|00004ae0| fc 43 00 f7 03 00 f6 00 | 00 fd fe 18 00 25 fc 43 |.C......|.....%.C|
|00004af0| f7 09 00 fb 04 00 2e 44 | 42 46 06 30 0a fd f9 05 |.......D|BF.0....|
|00004b00| 43 01 fe 04 00 2e fe 04 | 00 1e fe 10 00 25 fc 43 |C.......|.....%.C|
|00004b10| f7 09 00 aa 0a fd f9 05 | 6f 01 fe 18 00 01 55 53 |........|o.....US|
|00004b20| 45 20 26 6c 63 43 75 72 | 54 61 62 6c 65 20 49 4e |E &lcCur|Table IN|
|00004b30| 20 30 0a 04 00 1e fe 14 | 00 01 53 45 4c 45 20 26 | 0......|..SELE &|
|00004b40| 6c 63 43 75 72 54 61 62 | 6c 65 0a 0c 00 54 f7 0a |lcCurTab|le...T..|
|00004b50| 00 10 fc 43 2e fd fe 17 | 00 84 f7 04 00 10 fc f8 |...C....|........|
|00004b60| 01 01 fd 28 fc f7 0a 00 | fd f9 05 fe 02 fe 18 00 |...(....|........|
|00004b70| 54 f7 05 00 10 fc f7 09 | 00 fb 01 00 2e 06 43 f7 |T.......|......C.|
|00004b80| 04 00 2f 06 fd fe 24 00 | 54 f7 06 00 10 fc 43 43 |../...$.|T.....CC|
|00004b90| f7 05 00 fb 05 00 46 69 | 65 6c 64 fb 07 00 43 61 |......Fi|eld...Ca|
|00004ba0| 70 74 69 6f 6e ea 8b 9b | fd fe 10 00 25 fc 43 f7 |ption...|....%.C.|
|00004bb0| 06 00 a1 0a fd f9 05 fa | 02 fe 22 00 54 f7 07 00 |........|..".T...|
|00004bc0| 10 fc 43 f7 05 00 fb 05 | 00 46 69 65 6c 64 fb 07 |..C.....|.Field..|
|00004bd0| 00 43 6f 6d 6d 65 6e 74 | ea 8b fd fe 12 00 54 f7 |.Comment|......T.|
|00004be0| 08 00 10 fc 43 f7 07 00 | f8 01 04 3d fd fe 51 00 |....C...|...=..Q.|
|00004bf0| 25 fc f7 08 00 fb 04 00 | 54 45 58 54 10 f1 0c 00 |%.......|TEXT....|
|00004c00| f7 08 00 fb 04 00 4e 55 | 4d 3a 10 0b f1 0c 00 f7 |......NU|M:......|
|00004c10| 08 00 fb 04 00 53 45 4c | 45 10 0b f1 0c 00 f7 08 |.....SEL|E.......|
|00004c20| 00 fb 04 00 56 41 4c 55 | 10 0b f1 0c 00 f7 08 00 |....VALU|........|
|00004c30| fb 04 00 42 4f 4f 4c 10 | 0b fd f9 05 f6 02 fe 11 |...BOOL.|........|
|00004c40| 00 54 f7 02 00 10 fc f7 | 02 00 f8 01 01 06 fd fe |.T......|........|
|00004c50| 16 00 15 f4 10 00 f6 12 | 00 fc f7 02 00 fd 07 fc |........|........|
|00004c60| f8 01 03 fd 16 fe 1c 00 | 54 f4 10 00 f6 12 00 fc |........|T.......|
|00004c70| f7 02 00 fd 07 fc f8 01 | 01 fd 16 10 fc f7 06 00 |........|........|
|00004c80| fd fe 1c 00 54 f4 10 00 | f6 12 00 fc f7 02 00 fd |....T...|........|
|00004c90| 07 fc f8 01 02 fd 16 10 | fc f7 05 00 fd fe 1c 00 |........|........|
|00004ca0| 54 f4 10 00 f6 12 00 fc | f7 02 00 fd 07 fc f8 01 |T.......|........|
|00004cb0| 03 fd 16 10 fc f7 07 00 | fd fe 04 00 1e fe 04 00 |........|........|
|00004cc0| 1e fe 04 00 85 fe 04 00 | 51 fe 04 00 85 fe 11 00 |........|Q.......|
|00004cd0| 25 fc f7 02 00 f8 01 00 | 10 fd f9 05 24 03 fe 09 |%.......|....$...|
|00004ce0| 00 42 fc f8 01 00 fd fe | 04 00 1e fe 10 00 99 fc |.B......|........|
|00004cf0| 43 f4 10 00 f4 13 00 f6 | 14 00 fd fe 13 00 54 f4 |C.......|......T.|
|00004d00| 10 00 f4 13 00 f7 15 00 | 10 fc f8 01 01 fd fe 10 |........|........|
|00004d10| 00 99 fc 43 f4 10 00 f4 | 13 00 f6 16 00 fd fe 09 |...C....|........|
|00004d20| 00 42 fc f8 01 01 fd fe | 03 00 55 17 00 09 00 41 |.B......|..U....A|
|00004d30| 44 42 54 41 42 4c 45 53 | 06 00 4c 4e 44 42 46 53 |DBTABLES|..LNDBFS|
|00004d40| 07 00 4c 4e 43 4f 55 4e | 54 01 00 49 01 00 4a 0c |..LNCOUN|T..I..J.|
|00004d50| 00 4c 43 54 41 42 4c 45 | 46 49 45 4c 44 09 00 4c |.LCTABLE|FIELD..L|
|00004d60| 43 43 41 50 54 49 4f 4e | 09 00 4c 43 43 4f 4d 4d |CCAPTION|..LCCOMM|
|00004d70| 45 4e 54 0a 00 4c 43 4c | 45 46 54 43 4f 4d 4d 0a |ENT..LCL|EFTCOMM.|
|00004d80| 00 4c 43 43 55 52 54 41 | 42 4c 45 08 00 4c 4e 46 |.LCCURTA|BLE..LNF|
|00004d90| 49 45 4c 44 53 06 00 4c | 43 43 41 54 33 08 00 4c |IELDS..L|CCAT3..L|
|00004da0| 4e 43 4f 4c 50 4f 53 09 | 00 4c 43 41 52 54 41 42 |NCOLPOS.|.LCARTAB|
|00004db0| 4c 45 08 00 4c 43 41 52 | 54 45 58 54 05 00 4c 43 |LE..LCAR|TEXT..LC|
|00004dc0| 44 42 43 08 00 54 48 49 | 53 46 4f 52 4d 04 00 43 |DBC..THI|SFORM..C|
|00004dd0| 44 42 43 09 00 41 43 41 | 54 45 47 4f 52 59 0b 00 |DBC..ACA|TEGORY..|
|00004de0| 43 42 4f 43 41 54 45 47 | 4f 52 59 07 00 52 45 51 |CBOCATEG|ORY..REQ|
|00004df0| 55 45 52 59 09 00 4c 49 | 53 54 49 4e 44 45 58 05 |UERY..LI|STINDEX.|
|00004e00| 00 43 4c 49 43 4b ae 01 | 16 00 15 f4 00 00 f6 01 |.CLICK..|........|
|00004e10| 00 fc f8 01 06 fd 07 fc | f8 01 02 fd 16 fe 1d 00 |........|........|
|00004e20| 54 f4 00 00 f6 01 00 fc | f8 01 01 fd 07 fc f8 01 |T.......|........|
|00004e30| 01 fd 16 10 fc fb 01 00 | 3d fd fe 1e 00 54 f4 00 |........|=....T..|
|00004e40| 00 f6 01 00 fc f8 01 02 | fd 07 fc f8 01 01 fd 16 |........|........|
|00004e50| 10 fc fb 02 00 3d 3d fd | fe 1e 00 54 f4 00 00 f6 |.....==.|...T....|
|00004e60| 01 00 fc f8 01 03 fd 07 | fc f8 01 01 fd 16 10 fc |........|........|
|00004e70| fb 02 00 3e 3d fd fe 1d | 00 54 f4 00 00 f6 01 00 |...>=...|.T......|
|00004e80| fc f8 01 04 fd 07 fc f8 | 01 01 fd 16 10 fc fb 01 |........|........|
|00004e90| 00 3e fd fe 1d 00 54 f4 | 00 00 f6 01 00 fc f8 01 |.>....T.|........|
|00004ea0| 05 fd 07 fc f8 01 01 fd | 16 10 fc fb 01 00 3c fd |........|......<.|
|00004eb0| fe 1e 00 54 f4 00 00 f6 | 01 00 fc f8 01 06 fd 07 |...T....|........|
|00004ec0| fc f8 01 01 fd 16 10 fc | fb 02 00 3c 3d fd fe 1d |........|...<=...|
|00004ed0| 00 54 f4 00 00 f6 01 00 | fc f8 01 01 fd 07 fc f8 |.T......|........|
|00004ee0| 01 02 fd 16 10 fc fb 01 | 00 3d fd fe 1e 00 54 f4 |........|.=....T.|
|00004ef0| 00 00 f6 01 00 fc f8 01 | 02 fd 07 fc f8 01 02 fd |........|........|
|00004f00| 16 10 fc fb 02 00 3d 3d | fd fe 1e 00 54 f4 00 00 |......==|....T...|
|00004f10| f6 01 00 fc f8 01 03 fd | 07 fc f8 01 02 fd 16 10 |........|........|
|00004f20| fc fb 02 00 3e 3d fd fe | 1d 00 54 f4 00 00 f6 01 |....>=..|..T.....|
|00004f30| 00 fc f8 01 04 fd 07 fc | f8 01 02 fd 16 10 fc fb |........|........|
|00004f40| 01 00 3e fd fe 1d 00 54 | f4 00 00 f6 01 00 fc f8 |..>....T|........|
|00004f50| 01 05 fd 07 fc f8 01 02 | fd 16 10 fc fb 01 00 3c |........|.......<|
|00004f60| fd fe 1e 00 54 f4 00 00 | f6 01 00 fc f8 01 06 fd |....T...|........|
|00004f70| 07 fc f8 01 02 fd 16 10 | fc fb 02 00 3c 3d fd fe |........|....<=..|
|00004f80| 10 00 99 fc 43 f4 00 00 | f4 02 00 f6 03 00 fd fe |....C...|........|
|00004f90| 13 00 54 f4 00 00 f4 02 | 00 f7 04 00 10 fc f8 01 |..T.....|........|
|00004fa0| 01 fd fe 10 00 99 fc 43 | f4 00 00 f4 02 00 f6 05 |.......C|........|
|00004fb0| 00 fd fe 03 00 55 06 00 | 08 00 54 48 49 53 46 4f |.....U..|..THISFO|
|00004fc0| 52 4d 09 00 41 4f 50 45 | 52 41 54 4f 52 0b 00 43 |RM..AOPE|RATOR..C|
|00004fd0| 42 4f 4f 50 45 52 41 54 | 4f 52 07 00 52 45 51 55 |BOOPERAT|OR..REQU|
|00004fe0| 45 52 59 09 00 4c 49 53 | 54 49 4e 44 45 58 05 00 |ERY..LIS|TINDEX..|
|00004ff0| 43 4c 49 43 4b 7e 03 0f | 00 ae f7 00 00 07 f7 01 |CLICK~..|........|
|00005000| 00 07 f7 02 00 fe 15 00 | 54 f7 00 00 10 fc 43 f4 |........|T.....C.|
|00005010| 03 00 e0 04 00 f8 01 01 | cd fd fe 0d 00 54 f7 01 |........|.....T..|
|00005020| 00 10 fc f8 01 00 fd fe | 0d 00 54 f7 02 00 10 fc |........|..T.....|
|00005030| f8 01 00 fd fe 35 00 25 | fc 43 f8 01 01 f8 01 02 |.....5.%|.C......|
|00005040| f4 03 00 f6 04 00 fb 02 | 00 4f 52 10 f1 15 00 43 |........|.OR....C|
|00005050| 00 f7 00 00 f8 01 02 f4 | 03 00 f6 04 00 fb 02 00 |........|........|
|00005060| 4f 52 10 0b fd f9 05 9d | 00 fe 23 00 52 2c 3a fc |OR......|..#.R,:.|
|00005070| fb 18 00 4d 69 73 70 6c | 61 63 65 64 20 27 4f 52 |...Mispl|aced 'OR|
|00005080| 27 20 73 74 61 74 65 6d | 65 6e 74 fd fe 07 00 42 |' statem|ent....B|
|00005090| fc 2d fd fe 04 00 1e fe | 33 00 25 fc 43 f8 01 01 |.-......|3.%.C...|
|000050a0| f8 01 02 f4 03 00 f6 04 | 00 fb 01 00 29 10 f1 14 |........|....)...|
|000050b0| 00 43 00 f7 00 00 f8 01 | 02 f4 03 00 f6 04 00 fb |.C......|........|
|000050c0| 01 00 28 10 0b fd f9 05 | f9 00 fe 1e 00 52 2c 3a |..(.....|.....R,:|
|000050d0| fc fb 13 00 55 6e 62 61 | 6c 61 6e 63 65 64 20 62 |....Unba|lanced b|
|000050e0| 72 61 63 6b 65 74 73 fd | fe 07 00 42 fc 2d fd fe |rackets.|...B.-..|
|000050f0| 04 00 1e fe 17 00 84 f7 | 05 00 10 fc f8 01 01 fd |........|........|
|00005100| 28 fc f7 00 00 fd f9 05 | 36 03 fe 0d 00 18 48 f9 |(.......|6.....H.|
|00005110| 05 21 01 f9 05 7d 01 fe | 1d 00 0c fc 43 00 f7 05 |.!...}..|....C...|
|00005120| 00 f8 01 02 f4 03 00 f6 | 04 00 fb 01 00 28 10 fd |........|.....(..|
|00005130| f9 05 4f 01 fe 11 00 54 | f7 01 00 10 fc f7 01 00 |..O....T|........|
|00005140| f8 01 01 06 fd fe 1d 00 | 0c fc 43 00 f7 05 00 f8 |........|..C.....|
|00005150| 01 02 f4 03 00 f6 04 00 | fb 01 00 29 10 fd f9 05 |........|...)....|
|00005160| 7d 01 fe 11 00 54 f7 02 | 00 10 fc f7 02 00 f8 01 |}....T..|........|
|00005170| 01 06 fd fe 04 00 1c fe | 11 00 25 fc f7 01 00 f7 |........|..%.....|
|00005180| 02 00 0d fd f9 05 c7 01 | fe 2e 00 52 2c 3a fc fb |........|...R,:..|
|00005190| 23 00 43 6c 6f 73 65 20 | 62 72 61 63 6b 65 74 20 |#.Close |bracket |
|000051a0| 70 72 65 63 65 65 64 73 | 20 6f 70 65 6e 20 62 72 |preceeds| open br|
|000051b0| 61 63 6b 65 74 fd fe 07 | 00 42 fc 2d fd fe 04 00 |acket...|.B.-....|
|000051c0| 1e fe 1d 00 25 fc f7 05 | 00 f8 01 01 11 f0 08 00 |....%...|........|
|000051d0| f7 05 00 f7 00 00 0d 09 | 03 fd f9 05 32 03 fe 53 |........|....2..S|
|000051e0| 00 25 fc 43 00 f7 05 00 | f8 01 02 f4 03 00 f6 04 |.%.C....|........|
|000051f0| 00 fb 02 00 4f 52 10 f0 | 32 00 43 f7 05 00 f8 01 |....OR..|2.C.....|
|00005200| 01 08 f8 01 02 f4 03 00 | f6 04 00 fb 01 00 28 10 |........|......(.|
|00005210| f1 17 00 43 f7 05 00 f8 | 01 01 06 f8 01 02 f4 03 |...C....|........|
|00005220| 00 f6 04 00 fb 01 00 29 | 10 0b 03 09 fd f9 05 65 |.......)|.......e|
|00005230| 02 fe 23 00 52 2c 3a fc | fb 18 00 4d 69 73 70 6c |..#.R,:.|...Mispl|
|00005240| 61 63 65 64 20 27 4f 52 | 27 20 73 74 61 74 65 6d |aced 'OR|' statem|
|00005250| 65 6e 74 fd fe 07 00 42 | fc 2d fd fe 04 00 1e fe |ent....B|.-......|
|00005260| a0 00 25 fc 43 00 f7 05 | 00 f8 01 02 f4 03 00 f6 |..%.C...|........|
|00005270| 04 00 fb 01 00 28 10 f0 | 32 00 43 f7 05 00 f8 01 |.....(..|2.C.....|
|00005280| 01 08 f8 01 02 f4 03 00 | f6 04 00 fb 01 00 29 10 |........|......).|
|00005290| f1 17 00 43 f7 05 00 f8 | 01 01 06 f8 01 02 f4 03 |...C....|........|
|000052a0| 00 f6 04 00 fb 01 00 29 | 10 0b 03 09 03 f1 4a 00 |.......)|......J.|
|000052b0| 43 00 f7 05 00 f8 01 02 | f4 03 00 f6 04 00 fb 01 |C.......|........|
|000052c0| 00 29 10 f0 32 00 43 f7 | 05 00 f8 01 01 08 f8 01 |.)..2.C.|........|
|000052d0| 02 f4 03 00 f6 04 00 fb | 01 00 28 10 f1 17 00 43 |........|..(....C|
|000052e0| f7 05 00 f8 01 01 06 f8 | 01 02 f4 03 00 f6 04 00 |........|........|
|000052f0| fb 01 00 28 10 0b 03 09 | 03 0b fd f9 05 2e 03 fe |...(....|........|
|00005300| 1e 00 52 2c 3a fc fb 13 | 00 55 6e 62 61 6c 61 6e |..R,:...|.Unbalan|
|00005310| 63 65 64 20 62 72 61 63 | 6b 65 74 73 fd fe 07 00 |ced brac|kets....|
|00005320| 42 fc 2d fd fe 04 00 1e | fe 04 00 1e fe 04 00 85 |B.-.....|........|
|00005330| fe 11 00 25 fc f7 01 00 | f7 02 00 11 fd f9 05 70 |...%....|.......p|
|00005340| 03 fe 1e 00 52 2c 3a fc | fb 13 00 55 6e 62 61 6c |....R,:.|...Unbal|
|00005350| 61 6e 63 65 64 20 62 72 | 61 63 6b 65 74 73 fd fe |anced br|ackets..|
|00005360| 07 00 42 fc 2d fd fe 04 | 00 1e fe 07 00 42 fc 61 |..B.-...|.....B.a|
|00005370| fd fe 03 00 55 06 00 06 | 00 4c 4e 41 4c 45 4e 04 |....U...|.LNALEN.|
|00005380| 00 4c 4e 4f 42 04 00 4c | 4e 43 42 08 00 54 48 49 |.LNOB..L|NCB..THI|
|00005390| 53 46 4f 52 4d 09 00 41 | 43 52 49 54 56 49 45 57 |SFORM..A|CRITVIEW|
|000053a0| 01 00 49 2f 02 07 00 af | f7 00 00 fe 19 00 25 fc |..I/....|......%.|
|000053b0| 43 fb 05 00 6c 63 54 78 | 74 62 fb 01 00 43 0f fd |C...lcTx|tb...C..|
|000053c0| f9 05 48 00 fe 24 00 52 | 2c 3a fc fb 19 00 50 72 |..H..$.R|,:....Pr|
|000053d0| 6f 67 72 61 6d 6d 65 72 | 2c 20 67 65 74 20 69 74 |ogrammer|, get it|
|000053e0| 20 72 69 67 68 74 21 fd | fe 04 00 42 fe 04 00 1e | right!.|...B....|
|000053f0| fe 0b 00 ae f7 01 00 07 | f7 02 00 fe 13 00 54 f7 |........|......T.|
|00005400| 01 00 10 fc f4 03 00 f4 | 04 00 f7 05 00 fd fe 17 |........|........|
|00005410| 00 54 f4 03 00 f7 06 00 | 10 fc f4 03 00 f7 06 00 |.T......|........|
|00005420| f8 01 01 06 fd fe 19 00 | 15 f4 03 00 f6 07 00 fc |........|........|
|00005430| f4 03 00 f7 06 00 fd 07 | fc f8 01 04 fd 16 fe 17 |........|........|
|00005440| 00 25 fc f4 03 00 f4 08 | 00 f7 09 00 f8 01 02 10 |.%......|........|
|00005450| fd f9 05 ca 00 fe 19 00 | 54 f7 01 00 10 fc 43 f4 |........|T.....C.|
|00005460| 03 00 f7 06 00 f7 01 00 | f8 01 01 06 46 fd fe 04 |........|....F...|
|00005470| 00 1e fe 12 00 86 fc 43 | f4 03 00 e0 07 00 f7 01 |.......C|........|
|00005480| 00 ea 0e fd fe 0d 00 18 | 48 f9 05 ed 00 f9 05 bc |........|H.......|
|00005490| 01 fe 12 00 0c fc f7 00 | 00 fb 01 00 29 10 fd f9 |........|....)...|
|000054a0| 05 34 01 fe 18 00 54 f7 | 02 00 10 fc 43 fb 02 00 |.4....T.|....C...|
|000054b0| 20 29 f8 02 3c fb 01 00 | 20 b1 fd fe 1d 00 54 f4 | )..<...| .....T.|
|000054c0| 03 00 f6 07 00 fc f7 01 | 00 fd 07 fc f8 01 02 fd |........|........|
|000054d0| 16 10 fc fb 01 00 29 fd | fe 12 00 0c fc f7 00 00 |......).|........|
|000054e0| fb 01 00 28 10 fd f9 05 | 71 01 fe 0e 00 54 f7 02 |...(....|q....T..|
|000054f0| 00 10 fc fb 01 00 28 fd | fe 1d 00 54 f4 03 00 f6 |......(.|...T....|
|00005500| 07 00 fc f7 01 00 fd 07 | fc f8 01 02 fd 16 10 fc |........|........|
|00005510| fb 01 00 28 fd fe 13 00 | 0c fc f7 00 00 fb 02 00 |...(....|........|
|00005520| 4f 52 10 fd f9 05 bc 01 | fe 1a 00 54 f7 02 00 10 |OR......|...T....|
|00005530| fc 43 fb 04 00 20 4f 52 | 20 f8 02 3a fb 01 00 2d |.C... OR| ..:...-|
|00005540| b0 fd fe 1e 00 54 f4 03 | 00 f6 07 00 fc f7 01 00 |.....T..|........|
|00005550| fd 07 fc f8 01 02 fd 16 | 10 fc fb 02 00 4f 52 fd |........|.....OR.|
|00005560| fe 04 00 1c fe 1c 00 54 | f4 03 00 f6 07 00 fc f7 |.......T|........|
|00005570| 01 00 fd 07 fc f8 01 01 | fd 16 10 fc f7 02 00 fd |........|........|
|00005580| fe 10 00 99 fc 43 f4 03 | 00 f4 04 00 f6 0a 00 fd |.....C..|........|
|00005590| fe 17 00 25 fc f4 03 00 | f4 08 00 f7 09 00 f8 01 |...%....|........|
|000055a0| 02 10 fd f9 05 28 02 fe | 25 00 54 f4 03 00 f4 04 |.....(..|%.T.....|
|000055b0| 00 f7 05 00 10 fc 43 f4 | 03 00 f7 06 00 f4 03 00 |......C.|........|
|000055c0| f4 04 00 f7 05 00 f8 01 | 01 06 46 fd fe 04 00 1e |........|..F.....|
|000055d0| fe 03 00 55 0b 00 05 00 | 4c 43 54 58 54 0a 00 4c |...U....|LCTXT..L|
|000055e0| 4e 43 52 49 54 56 49 45 | 57 0a 00 4c 43 54 58 54 |NCRITVIE|W..LCTXT|
|000055f0| 54 4f 41 44 44 08 00 54 | 48 49 53 46 4f 52 4d 0b |TOADD..T|HISFORM.|
|00005600| 00 4c 53 54 43 52 49 54 | 56 49 45 57 09 00 4c 49 |.LSTCRIT|VIEW..LI|
|00005610| 53 54 49 4e 44 45 58 0a | 00 4e 43 52 49 54 43 4f |STINDEX.|.NCRITCO|
|00005620| 55 4e 54 09 00 41 43 52 | 49 54 56 49 45 57 0d 00 |UNT..ACR|ITVIEW..|
|00005630| 4f 50 54 41 42 4f 56 45 | 42 45 4c 4f 57 05 00 56 |OPTABOVE|BELOW..V|
|00005640| 41 4c 55 45 07 00 52 45 | 51 55 45 52 59 0f 00 0c |ALUE..RE|QUERY...|
|00005650| 00 42 fc f4 00 00 f7 01 | 00 fd fe 03 00 55 02 00 |.B......|.....U..|
|00005660| 08 00 54 48 49 53 46 4f | 52 4d 08 00 43 53 51 4c |..THISFO|RM..CSQL|
|00005670| 43 4f 44 45 83 01 07 00 | af f7 00 00 fe 19 00 25 |CODE....|.......%|
|00005680| fc 43 fb 05 00 74 63 44 | 42 43 62 fb 01 00 43 0f |.C...tcD|BCb...C.|
|00005690| fd f9 05 27 00 fe 07 00 | 42 fc 2d fd fe 04 00 1e |...'....|B.-.....|
|000056a0| fe 18 00 25 fc 43 f7 00 | 00 fb 04 00 2e 44 42 43 |...%.C..|.....DBC|
|000056b0| 06 30 0a fd f9 05 4a 00 | fe 07 00 42 fc 2d fd fe |.0....J.|...B.-..|
|000056c0| 04 00 1e fe 10 00 54 f4 | 01 00 f7 02 00 10 fc f7 |......T.|........|
|000056d0| 00 00 fd fe 07 00 ae f7 | 03 00 fe 0d 00 54 f7 03 |........|.....T..|
|000056e0| 00 10 fc fb 00 00 fd fe | 0e 00 54 f4 01 00 f7 04 |........|..T.....|
|000056f0| 00 10 fc 61 fd fe 17 00 | 54 f4 05 00 f7 06 00 10 |...a....|T.......|
|00005700| fc f4 05 00 f7 06 00 f8 | 01 01 06 fd fe 16 00 15 |........|........|
|00005710| f4 01 00 f6 07 00 fc f8 | 01 01 fd 07 fc f8 01 04 |........|........|
|00005720| fd 16 fe 15 00 25 fc 43 | f4 01 00 f6 08 00 f8 01 |.....%.C|........|
|00005730| 00 10 fd f9 05 2c 01 fe | 48 00 54 f7 03 00 10 fc |.....,..|H.T.....|
|00005740| fb 16 00 49 6e 76 61 6c | 69 64 20 44 42 43 20 72 |...Inval|id DBC r|
|00005750| 65 66 65 72 65 6e 63 65 | 2e 43 f8 02 0d 20 06 fb |eference|.C... ..|
|00005760| 1b 00 54 68 69 73 20 6d | 6f 64 75 6c 65 20 6e 6f |..This m|odule no|
|00005770| 74 20 66 75 6e 63 74 69 | 6f 6e 61 6c 2e 06 fd fe |t functi|onal....|
|00005780| 1b 00 86 fc 43 f7 03 00 | f7 09 00 fb 09 00 44 42 |....C...|......DB|
|00005790| 43 20 45 72 72 6f 72 ea | 78 fd fe 07 00 42 fc 2d |C Error.|x....B.-|
|000057a0| fd fe 04 00 1e fe 0d 00 | 99 fc 43 f4 01 00 f6 0a |........|..C.....|
|000057b0| 00 fd fe 10 00 54 f4 01 | 00 f7 07 00 10 fc fb 00 |.....T..|........|
|000057c0| 00 fd fe 10 00 99 fc 43 | f4 01 00 f4 0b 00 f6 0c |.......C|........|
|000057d0| 00 fd fe 13 00 54 f4 01 | 00 f4 0b 00 f7 0d 00 10 |.....T..|........|
|000057e0| fc f8 01 01 fd fe 10 00 | 99 fc 43 f4 01 00 f4 0e |........|..C.....|
|000057f0| 00 f6 0f 00 fd fe 03 00 | 55 10 00 05 00 54 43 44 |........|U....TCD|
|00005800| 42 43 08 00 54 48 49 53 | 46 4f 52 4d 04 00 43 44 |BC..THIS|FORM..CD|
|00005810| 42 43 09 00 4c 43 4d 45 | 53 53 41 47 45 0a 00 41 |BC..LCME|SSAGE..A|
|00005820| 55 54 4f 43 45 4e 54 45 | 52 04 00 4f 41 50 50 12 |UTOCENTE|R..OAPP.|
|00005830| 00 4e 46 4f 52 4d 49 4e | 53 54 41 4e 43 45 43 4f |.NFORMIN|STANCECO|
|00005840| 55 4e 54 09 00 41 43 52 | 49 54 56 49 45 57 0c 00 |UNT..ACR|ITVIEW..|
|00005850| 4d 41 4b 45 43 41 54 45 | 47 4f 52 59 12 00 4d 42 |MAKECATE|GORY..MB|
|00005860| 5f 49 43 4f 4e 45 58 43 | 4c 41 4d 41 54 49 4f 4e |_ICONEXC|LAMATION|
|00005870| 0c 00 4d 41 4b 45 4f 50 | 45 52 41 54 4f 52 0b 00 |..MAKEOP|ERATOR..|
|00005880| 4c 53 54 43 52 49 54 56 | 49 45 57 07 00 52 45 51 |LSTCRITV|IEW..REQ|
|00005890| 55 45 52 59 05 00 56 41 | 4c 55 45 0b 00 43 42 4f |UERY..VA|LUE..CBO|
|000058a0| 43 41 54 45 47 4f 52 59 | 05 00 43 4c 49 43 4b 0b |CATEGORY|..CLICK.|
|000058b0| 01 0b 00 ae f7 00 00 07 | f7 01 00 fe 10 00 54 f7 |........|......T.|
|000058c0| 01 00 10 fc f4 02 00 f7 | 03 00 fd fe 17 00 54 f4 |........|......T.|
|000058d0| 04 00 f7 05 00 10 fc f4 | 04 00 f7 05 00 f8 01 01 |........|........|
|000058e0| 08 fd fe 11 00 25 fc 43 | f7 01 00 ea a4 0a fd f9 |.....%.C|........|
|000058f0| 05 5b 00 fe 18 00 01 4f | 50 45 4e 20 44 41 54 41 |.[.....O|PEN DATA|
|00005900| 42 41 53 45 20 26 6c 63 | 44 42 43 0a 04 00 1e fe |BASE &lc|DBC.....|
|00005910| 1a 00 01 53 45 54 20 44 | 41 54 41 42 41 53 45 20 |...SET D|ATABASE |
|00005920| 54 4f 20 26 6c 63 44 42 | 43 0a 1a 00 54 f7 00 00 |TO &lcDB|C...T...|
|00005930| 10 fc 43 ea 19 f7 06 00 | fb 05 00 54 41 42 4c 45 |..C.....|...TABLE|
|00005940| ea 98 fd fe 11 00 25 fc | f7 00 00 f8 01 00 10 fd |......%.|........|
|00005950| f9 05 a8 00 fe 04 00 42 | fe 04 00 1e fe 17 00 84 |.......B|........|
|00005960| f7 07 00 10 fc f8 01 01 | fd 28 fc f7 00 00 fd f9 |........|.(......|
|00005970| 05 00 01 fe 12 00 54 f7 | 08 00 10 fc 43 00 f7 07 |......T.|....C...|
|00005980| 00 f6 06 00 fd fe 0f 00 | 25 fc 43 f7 08 00 aa fd |........|%.C.....|
|00005990| f9 05 fc 00 fe 14 00 01 | 53 45 4c 45 20 26 6c 63 |........|SELE &lc|
|000059a0| 43 75 72 54 61 62 6c 65 | 0a 04 00 51 fe 04 00 1e |CurTable|...Q....|
|000059b0| fe 04 00 85 fe 04 00 42 | fe 03 00 55 09 00 06 00 |.......B|...U....|
|000059c0| 4c 4e 44 42 46 53 05 00 | 4c 43 44 42 43 08 00 54 |LNDBFS..|LCDBC..T|
|000059d0| 48 49 53 46 4f 52 4d 04 | 00 43 44 42 43 04 00 4f |HISFORM.|.CDBC..O|
|000059e0| 41 50 50 12 00 4e 46 4f | 52 4d 49 4e 53 54 41 4e |APP..NFO|RMINSTAN|
|000059f0| 43 45 43 4f 55 4e 54 09 | 00 41 44 42 54 41 42 4c |CECOUNT.|.ADBTABL|
|00005a00| 45 53 01 00 49 0a 00 4c | 43 43 55 52 54 41 42 4c |ES..I..L|CCURTABL|
|00005a10| 45 07 00 6d 61 6b 65 73 | 71 6c 2c 00 00 00 00 00 |E..makes|ql,.....|
|00005a20| 0c 00 6d 61 6b 65 63 61 | 74 65 67 6f 72 79 ce 05 |..makeca|tegory..|
|00005a30| 00 00 00 00 0c 00 6d 61 | 6b 65 6f 70 65 72 61 74 |......ma|keoperat|
|00005a40| 6f 72 12 0a 00 00 00 00 | 0d 00 63 68 65 63 6b 62 |or......|..checkb|
|00005a50| 72 61 63 6b 65 74 73 01 | 0c 00 00 00 00 07 00 61 |rackets.|.......a|
|00005a60| 64 64 63 72 69 74 af 0f | 00 00 00 00 06 00 55 6e |ddcrit..|......Un|
|00005a70| 6c 6f 61 64 59 12 00 00 | 00 00 04 00 49 6e 69 74 |loadY...|....Init|
|00005a80| 80 12 00 00 00 00 07 00 | 44 65 73 74 72 6f 79 bb |........|Destroy.|
|00005a90| 14 00 00 00 00 31 00 71 | 01 b1 00 d1 00 b3 02 f1 |.....1.q|........|
|00005aa0| 01 71 00 41 00 02 01 b6 | 01 d3 00 d1 00 52 01 71 |.q.A....|.....R.q|
|00005ab0| 01 81 01 d1 00 21 01 11 | 01 b1 01 f1 01 b1 01 41 |.....!..|.......A|
|00005ac0| 00 41 00 c1 01 f1 01 c1 | 01 81 00 11 01 b1 01 f1 |.A......|........|
|00005ad0| 01 b1 01 41 00 41 00 63 | 04 d1 00 51 02 72 02 61 |...A.A.c|...Q.r.a|
|00005ae0| 02 72 02 81 00 e2 02 41 | 00 e1 01 11 01 51 02 81 |.r.....A|.....Q..|
|00005af0| 01 41 01 d1 00 31 01 41 | 00 41 00 41 00 41 00 a2 |.A...1.A|.A.A.A..|
|00005b00| 01 11 01 41 01 81 00 e2 | 01 e6 03 43 00 41 00 15 |...A....|...C.A..|
|00005b10| 03 73 00 33 00 d1 00 31 | 02 b1 01 71 00 02 01 11 |.s.3...1|...q....|
|00005b20| 01 81 01 41 00 a1 01 01 | 01 a1 01 11 01 91 00 41 |...A....|.......A|
|00005b30| 00 d1 00 71 01 21 01 81 | 01 41 00 41 00 01 01 81 |...q.!..|.A.A....|
|00005b40| 01 41 00 41 01 c1 00 71 | 01 81 01 41 02 01 01 21 |.A.A...q|...A...!|
|00005b50| 02 21 01 13 05 11 01 61 | 01 c1 01 c1 01 c1 01 41 |.!.....a|.......A|
|00005b60| 00 41 00 41 00 41 00 41 | 00 11 01 91 00 41 00 01 |.A.A.A.A|.....A..|
|00005b70| 01 31 01 01 01 91 00 33 | 00 64 01 d1 01 e1 01 e1 |.1.....3|.d......|
|00005b80| 01 d1 01 d1 01 e1 01 d2 | 01 e1 01 e1 01 d1 01 d1 |........|........|
|00005b90| 01 e1 01 02 01 31 01 01 | 01 33 00 f2 00 51 01 d1 |.....1..|.3...Q..|
|00005ba0| 00 d1 00 51 03 31 02 71 | 00 41 00 31 03 e1 01 71 |...Q.1.q|.A.1...q|
|00005bb0| 00 41 00 71 01 d1 00 d1 | 01 11 01 d1 01 11 01 41 |.A.q....|.......A|
|00005bc0| 00 11 01 e1 02 71 00 41 | 00 d1 01 32 05 31 02 71 |.....q.A|...2.1.q|
|00005bd0| 00 41 00 04 0a e1 01 71 | 00 41 00 41 00 41 00 11 |.A.....q|.A.A.A..|
|00005be0| 01 e1 01 71 00 41 00 71 | 00 33 00 71 00 91 01 41 |...q.A.q|.3.q...A|
|00005bf0| 02 41 00 41 00 b1 00 31 | 01 71 01 91 01 72 01 91 |.A.A...1|.q...r..|
|00005c00| 01 41 00 22 01 d1 00 21 | 01 81 01 d1 01 21 01 e1 |.A."...!|.....!..|
|00005c10| 00 d1 01 31 01 a1 01 e1 | 01 41 00 c1 01 02 01 71 |...1....|.A.....q|
|00005c20| 01 51 02 41 00 33 00 c1 | 00 33 00 71 00 91 01 71 |.Q.A.3..|.3.q...q|
|00005c30| 00 41 00 81 01 71 00 41 | 00 02 01 72 00 d1 00 e2 |.A...q.A|...r....|
|00005c40| 00 71 01 61 01 51 01 82 | 04 b1 01 71 00 41 00 d1 |.q.a.Q..|...q.A..|
|00005c50| 00 01 01 01 01 31 01 01 | 01 33 00 b1 00 01 01 72 |.....1..|.3.....r|
|00005c60| 01 12 01 81 01 41 00 a1 | 01 a1 01 11 01 41 00 41 |.....A..|.....A.A|
|00005c70| 00 71 01 21 01 f1 00 41 | 01 41 00 41 00 41 00 41 |.q.!...A|.A.A.A.A|
|00005c80| 00 32 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.2......|........|
|00005c90| 00 00 00 01 00 00 00 13 | 00 00 00 03 0b 00 00 01 |........|........|
|00005ca0| 00 00 00 40 00 00 00 26 | 0b 00 00 84 10 00 00 61 |...@...&|.......a|
|00005cb0| 00 00 00 72 00 00 00 a7 | 10 00 00 3d 13 00 00 98 |...r....|...=....|
|00005cc0| 00 00 00 83 00 00 00 61 | 13 00 00 8c 18 00 00 b0 |.......a|........|
|00005cd0| 00 00 00 ab 00 00 00 aa | 18 00 00 52 1c 00 00 df |........|...R....|
|00005ce0| 00 00 00 c9 00 00 00 6f | 1c 00 00 89 1c 00 00 02 |.......o|........|
|00005cf0| 01 00 00 cb 00 00 00 a4 | 1c 00 00 18 1f 00 00 06 |........|........|
|00005d00| 01 00 00 e3 00 00 00 36 | 1f 00 00 a6 20 00 00 24 |.......6|.... ..$|
|00005d10| 01 00 00 00 29 00 00 00 | 48 19 00 00 00 00 00 00 |....)...|H.......|
|00005d20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00005d30| 00 00 02 a1 6e 63 72 69 | 74 63 6f 75 6e 74 20 4e |....ncri|tcount N|
|00005d40| 75 6d 62 65 72 20 6f 66 | 20 71 75 65 72 79 20 63 |umber of| query c|
|00005d50| 72 69 74 65 72 69 61 20 | 69 6e 20 6c 69 73 74 20 |riteria |in list |
|00005d60| 62 6f 78 0d 0a 63 73 71 | 6c 63 6f 64 65 20 53 74 |box..csq|lcode St|
|00005d70| 72 69 6e 67 20 6f 66 20 | 53 51 4c 20 63 6f 64 65 |ring of |SQL code|
|00005d80| 20 74 6f 20 65 78 74 72 | 61 63 74 20 72 65 63 6f | to extr|act reco|
|00005d90| 72 64 73 20 74 6f 20 70 | 75 6c 6c 0d 0a 63 68 63 |rds to p|ull..chc|
|00005da0| 61 74 65 67 6f 72 79 20 | 73 74 72 69 6e 67 20 74 |ategory |string t|
|00005db0| 6f 20 68 6f 6c 64 20 74 | 61 62 6c 65 20 61 6e 64 |o hold t|able and|
|00005dc0| 20 66 69 65 6c 64 20 6e | 61 6d 65 20 66 72 6f 6d | field n|ame from|
|00005dd0| 20 61 43 61 74 65 67 6f | 72 79 5b 78 2c 32 5d 0d | aCatego|ry[x,2].|
|00005de0| 0a 63 68 6f 70 65 72 61 | 74 6f 72 20 73 74 72 69 |.chopera|tor stri|
|00005df0| 6e 67 20 74 6f 20 68 6f | 6c 64 20 6f 70 65 72 61 |ng to ho|ld opera|
|00005e00| 74 6f 72 20 66 72 6f 6d | 20 61 4f 70 65 72 61 74 |tor from| aOperat|
|00005e10| 6f 72 5b 78 2c 32 5d 0d | 0a 63 68 76 61 6c 75 65 |or[x,2].|.chvalue|
|00005e20| 20 73 74 72 69 6e 67 20 | 74 6f 20 68 6f 6c 64 20 | string |to hold |
|00005e30| 76 61 6c 75 65 20 66 72 | 6f 6d 20 74 78 56 61 6c |value fr|om txVal|
|00005e40| 75 65 20 6f 72 20 61 56 | 61 6c 75 65 5b 78 2c 32 |ue or aV|alue[x,2|
|00005e50| 5d 0d 0a 63 64 62 63 20 | 44 42 43 20 74 6f 20 77 |]..cdbc |DBC to w|
|00005e60| 6f 72 6b 20 77 69 74 68 | 0d 0a 5e 61 63 72 69 74 |ork with|..^acrit|
|00005e70| 76 69 65 77 5b 31 2c 36 | 5d 20 41 72 72 61 79 20 |view[1,6|] Array |
|00005e80| 73 74 6f 72 69 6e 67 20 | 74 68 65 20 76 69 73 69 |storing |the visi|
|00005e90| 62 6c 65 20 71 75 65 72 | 79 2e 0d 0a 2a 6d 61 6b |ble quer|y...*mak|
|00005ea0| 65 73 71 6c 20 4d 61 6b | 65 20 53 51 4c 20 63 6f |esql Mak|e SQL co|
|00005eb0| 64 65 0d 0a 5e 61 63 61 | 74 65 67 6f 72 79 5b 31 |de..^aca|tegory[1|
|00005ec0| 2c 30 5d 20 43 61 74 65 | 67 6f 72 79 20 61 72 72 |,0] Cate|gory arr|
|00005ed0| 61 79 20 66 6f 72 20 63 | 62 6f 43 61 74 65 67 6f |ay for c|boCatego|
|00005ee0| 72 79 0d 0a 5e 61 6f 70 | 65 72 61 74 6f 72 5b 31 |ry..^aop|erator[1|
|00005ef0| 2c 30 5d 20 41 72 72 61 | 79 20 66 6f 72 20 63 62 |,0] Arra|y for cb|
|00005f00| 6f 4f 70 65 72 61 74 6f | 72 0d 0a 5e 61 76 61 6c |oOperato|r..^aval|
|00005f10| 75 65 5b 31 2c 30 5d 20 | 41 72 72 61 79 20 66 6f |ue[1,0] |Array fo|
|00005f20| 72 20 63 62 6f 56 61 6c | 75 65 0d 0a 2a 6d 61 6b |r cboVal|ue..*mak|
|00005f30| 65 63 61 74 65 67 6f 72 | 79 20 50 6f 70 75 6c 61 |ecategor|y Popula|
|00005f40| 74 65 20 61 43 61 74 65 | 67 6f 72 79 0d 0a 2a 6d |te aCate|gory..*m|
|00005f50| 61 6b 65 6f 70 65 72 61 | 74 6f 72 20 50 6f 70 75 |akeopera|tor Popu|
|00005f60| 6c 61 74 65 20 61 4f 70 | 65 72 61 74 6f 72 0d 0a |late aOp|erator..|
|00005f70| 2a 63 68 65 63 6b 62 72 | 61 63 6b 65 74 73 20 43 |*checkbr|ackets C|
|00005f80| 68 65 63 6b 73 20 62 72 | 61 63 6b 65 74 73 20 61 |hecks br|ackets a|
|00005f90| 6e 64 20 6d 69 6e 6f 72 | 20 73 79 6e 74 61 78 20 |nd minor| syntax |
|00005fa0| 66 6f 72 20 53 51 4c 0d | 0a 2a 61 64 64 63 72 69 |for SQL.|.*addcri|
|00005fb0| 74 20 67 65 6e 65 72 69 | 63 20 61 64 64 20 66 6f |t generi|c add fo|
|00005fc0| 72 20 22 28 22 2c 20 22 | 29 22 20 61 6e 64 20 22 |r "(", "|)" and "|
|00005fd0| 4f 52 22 0d 0a 00 00 00 | 01 00 00 00 07 63 6d 64 |OR".....|.....cmd|
|00005fe0| 62 61 73 65 00 00 00 01 | 00 00 00 19 2e 2e 5c 2e |base....|......\.|
|00005ff0| 2e 5c 66 6f 78 64 65 76 | 5c 62 61 73 65 63 74 72 |.\foxdev|\basectr|
|00006000| 6c 2e 76 63 78 00 00 00 | 01 00 00 00 0d 63 6f 6d |l.vcx...|.....com|
|00006010| 6d 61 6e 64 62 75 74 74 | 6f 6e 00 00 00 01 00 00 |mandbutt|on......|
|00006020| 00 08 63 6d 64 43 6c 65 | 61 72 00 00 00 01 00 00 |..cmdCle|ar......|
|00006030| 00 0b 66 72 6d 62 75 69 | 6c 64 73 71 6c 00 00 00 |..frmbui|ldsql...|
|00006040| 01 00 00 00 50 54 6f 70 | 20 3d 20 31 31 30 0d 0a |....PTop| = 110..|
|00006050| 4c 65 66 74 20 3d 20 35 | 33 31 0d 0a 43 61 70 74 |Left = 5|31..Capt|
|00006060| 69 6f 6e 20 3d 20 22 43 | 6c 65 61 72 20 41 4c 4c |ion = "C|lear ALL|
|00006070| 22 0d 0a 54 61 62 49 6e | 64 65 78 20 3d 20 31 31 |"..TabIn|dex = 11|
|00006080| 0d 0a 4e 61 6d 65 20 3d | 20 22 63 6d 64 43 6c 65 |..Name =| "cmdCle|
|00006090| 61 72 22 0d 0a 00 00 00 | 01 00 00 01 a0 50 52 4f |ar".....|.....PRO|
|000060a0| 43 45 44 55 52 45 20 43 | 6c 69 63 6b 0d 0a 4c 4f |CEDURE C|lick..LO|
|000060b0| 43 41 4c 20 6c 63 54 69 | 74 6c 65 2c 20 6c 63 54 |CAL lcTi|tle, lcT|
|000060c0| 78 74 0d 0a 0d 0a 49 46 | 20 54 48 49 53 46 4f 52 |xt....IF| THISFOR|
|000060d0| 4d 2e 6e 43 72 69 74 43 | 6f 75 6e 74 20 3d 20 30 |M.nCritC|ount = 0|
|000060e0| 0d 0a 09 52 45 54 55 52 | 4e 0d 0a 45 4e 44 49 46 |...RETUR|N..ENDIF|
|000060f0| 0d 0a 0d 0a 6c 63 54 69 | 74 6c 65 20 3d 20 22 2a |....lcTi|tle = "*|
|00006100| 2a 2a 20 57 41 52 4e 49 | 4e 47 20 2a 2a 2a 22 0d |** WARNI|NG ***".|
|00006110| 0a 6c 63 54 78 74 20 3d | 20 22 41 72 65 20 79 6f |.lcTxt =| "Are yo|
|00006120| 75 20 73 75 72 65 20 79 | 6f 75 20 77 61 6e 74 22 |u sure y|ou want"|
|00006130| 20 2b 20 43 48 52 28 31 | 30 29 20 2b 20 3b 0d 0a | + CHR(1|0) + ;..|
|00006140| 09 22 74 6f 20 63 6c 65 | 61 72 20 74 68 65 20 63 |."to cle|ar the c|
|00006150| 6f 64 65 20 62 6f 78 3f | 22 0d 0a 49 46 20 4d 45 |ode box?|"..IF ME|
|00006160| 53 53 41 47 45 42 4f 58 | 28 6c 63 54 78 74 2c 20 |SSAGEBOX|(lcTxt, |
|00006170| 34 20 2b 20 34 38 20 2b | 20 32 35 36 2c 20 6c 63 |4 + 48 +| 256, lc|
|00006180| 54 69 74 6c 65 29 20 3c | 3e 20 37 0d 0a 09 44 49 |Title) <|> 7...DI|
|00006190| 4d 45 4e 53 49 4f 4e 20 | 54 48 49 53 46 4f 52 4d |MENSION |THISFORM|
|000061a0| 2e 61 43 72 69 74 56 69 | 65 77 5b 31 2c 34 5d 0d |.aCritVi|ew[1,4].|
|000061b0| 0a 09 54 48 49 53 46 4f | 52 4d 2e 61 43 72 69 74 |..THISFO|RM.aCrit|
|000061c0| 56 69 65 77 20 3d 20 22 | 22 0d 0a 09 54 48 49 53 |View = "|"...THIS|
|000061d0| 46 4f 52 4d 2e 6e 43 72 | 69 74 43 6f 75 6e 74 20 |FORM.nCr|itCount |
|000061e0| 3d 20 30 0d 0a 09 54 48 | 49 53 46 4f 52 4d 2e 6c |= 0...TH|ISFORM.l|
|000061f0| 73 74 43 72 69 74 56 69 | 65 77 2e 52 65 71 75 65 |stCritVi|ew.Reque|
|00006200| 72 79 28 29 0d 0a 09 54 | 48 49 53 46 4f 52 4d 2e |ry()...T|HISFORM.|
|00006210| 6c 73 74 43 72 69 74 56 | 69 65 77 2e 4c 69 73 74 |lstCritV|iew.List|
|00006220| 49 6e 64 65 78 20 3d 20 | 31 0d 0a 45 4e 44 49 46 |Index = |1..ENDIF|
|00006230| 0d 0a 0d 0a 45 4e 44 50 | 52 4f 43 0d 0a 00 00 00 |....ENDP|ROC.....|
|00006240| 01 00 00 02 0f fe f2 ff | 1b 02 01 00 00 00 f6 01 |........|........|
|00006250| 00 00 f6 01 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006260| 00 00 00 00 00 00 00 00 | 00 00 00 00 76 43 01 00 |........|....vC..|
|00006270| 00 00 25 00 00 00 82 01 | 00 00 00 00 00 00 ad 01 |..%.....|........|
|00006280| 00 00 0f 00 00 00 8f 01 | 00 00 00 00 00 00 00 00 |........|........|
|00006290| 00 00 fc 03 00 03 00 55 | 00 00 00 01 0b 00 ae f7 |.......U|........|
|000062a0| 00 00 07 f7 01 00 fe 14 | 00 25 fc f4 02 00 f7 03 |........|.%......|
|000062b0| 00 f8 01 00 10 fd f9 05 | 23 00 fe 04 00 42 fe 04 |........|#....B..|
|000062c0| 00 1e fe 1c 00 54 f7 00 | 00 10 fc fb 0f 00 2a 2a |.....T..|......**|
|000062d0| 2a 20 57 41 52 4e 49 4e | 47 20 2a 2a 2a fd fe 42 |* WARNIN|G ***..B|
|000062e0| 00 54 f7 01 00 10 fc fb | 15 00 41 72 65 20 79 6f |.T......|..Are yo|
|000062f0| 75 20 73 75 72 65 20 79 | 6f 75 20 77 61 6e 74 43 |u sure y|ou wantC|
|00006300| f8 02 0a 20 06 fb 16 00 | 74 6f 20 63 6c 65 61 72 |... ....|to clear|
|00006310| 20 74 68 65 20 63 6f 64 | 65 20 62 6f 78 3f 06 fd | the cod|e box?..|
|00006320| fe 1b 00 25 fc 43 f7 01 | 00 f9 04 34 01 f7 00 00 |...%.C..|...4....|
|00006330| ea 78 f8 01 07 0f fd f9 | 05 f9 00 fe 16 00 15 f4 |.x......|........|
|00006340| 02 00 f6 04 00 fc f8 01 | 01 fd 07 fc f8 01 04 fd |........|........|
|00006350| 16 fe 10 00 54 f4 02 00 | f7 04 00 10 fc fb 00 00 |....T...|........|
|00006360| fd fe 10 00 54 f4 02 00 | f7 03 00 10 fc f8 01 00 |....T...|........|
|00006370| fd fe 10 00 99 fc 43 f4 | 02 00 f4 05 00 f6 06 00 |......C.|........|
|00006380| fd fe 13 00 54 f4 02 00 | f4 05 00 f7 07 00 10 fc |....T...|........|
|00006390| f8 01 01 fd fe 04 00 1e | fe 03 00 55 08 00 07 00 |........|...U....|
|000063a0| 4c 43 54 49 54 4c 45 05 | 00 4c 43 54 58 54 08 00 |LCTITLE.|.LCTXT..|
|000063b0| 54 48 49 53 46 4f 52 4d | 0a 00 4e 43 52 49 54 43 |THISFORM|..NCRITC|
|000063c0| 4f 55 4e 54 09 00 41 43 | 52 49 54 56 49 45 57 0b |OUNT..AC|RITVIEW.|
|000063d0| 00 4c 53 54 43 52 49 54 | 56 49 45 57 07 00 52 45 |.LSTCRIT|VIEW..RE|
|000063e0| 51 55 45 52 59 09 00 4c | 49 53 54 49 4e 44 45 58 |QUERY..L|ISTINDEX|
|000063f0| 05 00 43 6c 69 63 6b 2c | 00 00 00 00 00 31 00 b1 |..Click,|.....1..|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.