home *** CD-ROM | disk | FTP | other *** search
| CA Visual Objects Module Export File | 1994-11-18 | 22.2 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: CA Visual Objects Module Export File
(other/caVisualObjectsModuleExportFile).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| CA Visual Objects Module Export File (other/caVisualObjectsModuleExportFile)
| magic
| Unsupported |
| 100%
| file
| data
| default
| |
| 100%
| TrID
| CA Visual Objects Module Export File (v1.x)
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 00 1b 00 00 00 80 01 | 43 41 2d 56 4f 20 4d 6f |........|CA-VO Mo|
|00000010| 64 75 6c 65 20 45 78 70 | 6f 72 74 20 46 69 6c 65 |dule Exp|ort File|
|00000020| 00 20 00 0d 00 00 00 53 | 74 61 6e 64 61 72 64 20 |. .....S|tandard |
|00000030| 53 51 4c 00 21 00 02 00 | 00 00 02 00 40 00 1c 00 |SQL.!...|....@...|
|00000040| 00 00 53 54 41 4e 44 41 | 52 44 53 51 4c 44 49 41 |..STANDA|RDSQLDIA|
|00000050| 4c 4f 47 53 55 42 3a 43 | 41 4e 43 45 4c 00 51 00 |LOGSUB:C|ANCEL.Q.|
|00000060| 02 00 00 00 02 00 44 00 | 02 00 00 00 03 00 48 00 |......D.|......H.|
|00000070| 04 00 00 00 0f fa a7 2e | 4d 00 02 00 00 00 15 00 |........|M.......|
|00000080| 45 00 02 00 00 00 00 00 | 46 00 02 00 00 00 02 00 |E.......|F.......|
|00000090| 47 00 02 00 00 00 ff ff | 49 00 02 00 00 00 00 00 |G.......|I.......|
|000000a0| 41 00 61 00 00 00 4d 45 | 54 48 4f 44 20 43 61 6e |A.a...ME|THOD Can|
|000000b0| 63 65 6c 28 20 29 20 43 | 4c 41 53 53 20 53 74 61 |cel( ) C|LASS Sta|
|000000c0| 6e 64 61 72 64 53 51 4c | 44 69 61 6c 6f 67 53 75 |ndardSQL|DialogSu|
|000000d0| 62 20 0d 0a 0d 0a 09 6f | 43 6f 6e 6e 3a 44 69 73 |b .....o|Conn:Dis|
|000000e0| 63 6f 6e 6e 65 63 74 28 | 29 0d 0a 0d 0a 09 73 65 |connect(|).....se|
|000000f0| 6c 66 3a 45 6e 64 44 69 | 61 6c 6f 67 28 30 29 0d |lf:EndDi|alog(0).|
|00000100| 0a 0d 0a 20 0d 0a 00 4e | 00 2d 00 00 00 4d 45 54 |... ...N|.-...MET|
|00000110| 48 4f 44 20 43 61 6e 63 | 65 6c 28 20 29 20 43 4c |HOD Canc|el( ) CL|
|00000120| 41 53 53 20 53 74 61 6e | 64 61 72 64 53 51 4c 44 |ASS Stan|dardSQLD|
|00000130| 69 61 6c 6f 67 53 75 62 | 20 00 40 00 20 00 00 00 |ialogSub| .@. ...|
|00000140| 53 54 41 4e 44 41 52 44 | 53 51 4c 44 49 41 4c 4f |STANDARD|SQLDIALO|
|00000150| 47 53 55 42 3a 4f 50 45 | 4e 5f 54 41 42 4c 45 00 |GSUB:OPE|N_TABLE.|
|00000160| 51 00 02 00 00 00 02 00 | 44 00 02 00 00 00 03 00 |Q.......|D.......|
|00000170| 48 00 04 00 00 00 0f fa | a7 2e 4d 00 02 00 00 00 |H.......|..M.....|
|00000180| 15 00 45 00 02 00 00 00 | 00 00 46 00 02 00 00 00 |..E.....|..F.....|
|00000190| 02 00 47 00 02 00 00 00 | ff ff 49 00 02 00 00 00 |..G.....|..I.....|
|000001a0| 00 00 41 00 39 03 00 00 | 4d 45 54 48 4f 44 20 4f |..A.9...|METHOD O|
|000001b0| 70 65 6e 5f 54 61 62 6c | 65 28 20 29 20 43 4c 41 |pen_Tabl|e( ) CLA|
|000001c0| 53 53 20 53 74 61 6e 64 | 61 72 64 53 51 4c 44 69 |SS Stand|ardSQLDi|
|000001d0| 61 6c 6f 67 53 75 62 20 | 0d 0a 0d 0a 09 6c 6f 63 |alogSub |.....loc|
|000001e0| 61 6c 20 6f 45 72 72 6f | 72 20 61 73 20 75 73 75 |al oErro|r as usu|
|000001f0| 61 6c 0d 0a 09 6c 6f 63 | 61 6c 20 6f 53 65 72 76 |al...loc|al oServ|
|00000200| 65 72 0d 0a 09 6c 6f 63 | 61 6c 20 6f 4e 65 77 43 |er...loc|al oNewC|
|00000210| 68 69 6c 64 0d 0a 09 6c | 6f 63 61 6c 20 73 53 65 |hild...l|ocal sSe|
|00000220| 6c 65 63 74 53 74 6d 74 | 20 61 73 20 73 74 72 69 |lectStmt| as stri|
|00000230| 6e 67 0d 0a 09 6c 6f 63 | 61 6c 20 6f 54 42 20 61 |ng...loc|al oTB a|
|00000240| 73 20 6f 62 6a 65 63 74 | 0d 0a 0d 0a 09 69 66 20 |s object|.....if |
|00000250| 6f 44 43 54 61 62 6c 65 | 4c 69 73 74 42 6f 78 3a |oDCTable|ListBox:|
|00000260| 43 75 72 72 65 6e 74 49 | 74 65 6d 4e 6f 20 3d 20 |CurrentI|temNo = |
|00000270| 30 0d 0a 09 09 6f 54 42 | 20 3a 3d 20 54 65 78 74 |0....oTB| := Text|
|00000280| 42 6f 78 7b 73 65 6c 66 | 2c 22 53 74 61 6e 64 61 |Box{self|,"Standa|
|00000290| 72 64 53 51 4c 44 69 61 | 6c 6f 67 22 2c 22 4e 6f |rdSQLDia|log","No|
|000002a0| 20 54 61 62 6c 65 20 73 | 65 6c 65 63 74 65 64 21 | Table s|elected!|
|000002b0| 22 7d 0d 0a 09 09 6f 54 | 42 3a 54 79 70 65 20 3a |"}....oT|B:Type :|
|000002c0| 3d 20 42 55 54 54 4f 4e | 4f 4b 41 59 0d 0a 09 09 |= BUTTON|OKAY....|
|000002d0| 6f 54 42 3a 73 68 6f 77 | 28 29 0d 0a 09 09 72 65 |oTB:show|()....re|
|000002e0| 74 75 72 6e 20 0d 0a 09 | 65 6e 64 69 66 0d 0a 0d |turn ...|endif...|
|000002f0| 0a 09 62 65 67 69 6e 20 | 73 65 71 75 65 6e 63 65 |..begin |sequence|
|00000300| 0d 0a 09 0d 0a 20 20 20 | 20 20 20 73 53 65 6c 65 |..... | sSele|
|00000310| 63 74 53 74 6d 74 20 3a | 3d 20 22 73 65 6c 65 63 |ctStmt :|= "selec|
|00000320| 74 20 2a 20 66 72 6f 6d | 20 22 20 2b 20 6f 44 43 |t * from| " + oDC|
|00000330| 54 61 62 6c 65 4c 69 73 | 74 42 6f 78 3a 43 75 72 |TableLis|tBox:Cur|
|00000340| 72 65 6e 74 49 74 65 6d | 20 0d 0a 09 0d 0a 20 20 |rentItem| ..... |
|00000350| 20 20 20 20 6f 53 65 72 | 76 65 72 20 3a 3d 20 53 | oSer|ver := S|
|00000360| 51 4c 53 65 6c 65 63 74 | 7b 20 73 53 65 6c 65 63 |QLSelect|{ sSelec|
|00000370| 74 53 74 6d 74 2c 20 6f | 43 6f 6e 6e 20 7d 0d 0a |tStmt, o|Conn }..|
|00000380| 20 20 20 20 0d 0a 09 73 | 65 6c 66 3a 45 6e 64 44 | ...s|elf:EndD|
|00000390| 69 61 6c 6f 67 28 31 29 | 0d 0a 09 0d 0a 09 6f 4e |ialog(1)|......oN|
|000003a0| 65 77 43 68 69 6c 64 20 | 3a 3d 20 53 74 64 44 61 |ewChild |:= StdDa|
|000003b0| 74 61 57 69 6e 64 6f 77 | 7b 6f 4d 79 50 61 72 65 |taWindow|{oMyPare|
|000003c0| 6e 74 2c 20 6f 44 43 54 | 61 62 6c 65 4c 69 73 74 |nt, oDCT|ableList|
|000003d0| 42 6f 78 3a 43 75 72 72 | 65 6e 74 49 74 65 6d 2c |Box:Curr|entItem,|
|000003e0| 20 46 41 4c 53 45 2c 20 | 6f 53 65 72 76 65 72 7d | FALSE, |oServer}|
|000003f0| 0d 0a 09 0d 0a 09 6f 4e | 65 77 43 68 69 6c 64 3a |......oN|ewChild:|
|00000400| 56 69 65 77 41 73 28 23 | 46 6f 72 6d 56 69 65 77 |ViewAs(#|FormView|
|00000410| 29 0d 0a 09 0d 0a 09 6f | 4e 65 77 43 68 69 6c 64 |)......o|NewChild|
|00000420| 3a 43 61 70 74 69 6f 6e | 20 3a 3d 20 22 53 51 4c |:Caption| := "SQL|
|00000430| 20 54 61 62 6c 65 3a 20 | 22 20 2b 20 6f 44 43 54 | Table: |" + oDCT|
|00000440| 61 62 6c 65 4c 69 73 74 | 42 6f 78 3a 43 75 72 72 |ableList|Box:Curr|
|00000450| 65 6e 74 49 74 65 6d 0d | 0a 09 0d 0a 09 6f 4e 65 |entItem.|.....oNe|
|00000460| 77 43 68 69 6c 64 3a 53 | 68 6f 77 28 29 0d 0a 0d |wChild:S|how()...|
|00000470| 0a 20 20 20 20 20 20 6f | 4d 79 50 61 72 65 6e 74 |. o|MyParent|
|00000480| 3a 41 64 64 43 68 69 6c | 64 28 20 6f 4e 65 77 43 |:AddChil|d( oNewC|
|00000490| 68 69 6c 64 20 29 0d 0a | 20 0d 0a 20 20 20 20 20 |hild )..| .. |
|000004a0| 20 72 65 63 6f 76 65 72 | 20 75 73 69 6e 67 20 6f | recover| using o|
|000004b0| 45 72 72 6f 72 0d 0a 09 | 20 20 20 20 53 68 6f 77 |Error...| Show|
|000004c0| 45 72 72 6f 72 28 20 6f | 45 72 72 6f 72 20 29 0d |Error( o|Error ).|
|000004d0| 0a 09 65 6e 64 20 73 65 | 71 75 65 6e 63 65 0d 0a |..end se|quence..|
|000004e0| 00 4e 00 31 00 00 00 4d | 45 54 48 4f 44 20 4f 70 |.N.1...M|ETHOD Op|
|000004f0| 65 6e 5f 54 61 62 6c 65 | 28 20 29 20 43 4c 41 53 |en_Table|( ) CLAS|
|00000500| 53 20 53 74 61 6e 64 61 | 72 64 53 51 4c 44 69 61 |S Standa|rdSQLDia|
|00000510| 6c 6f 67 53 75 62 20 00 | 40 00 1f 00 00 00 53 54 |logSub .|@.....ST|
|00000520| 41 4e 44 41 52 44 53 51 | 4c 44 49 41 4c 4f 47 53 |ANDARDSQ|LDIALOGS|
|00000530| 55 42 3a 47 45 54 54 41 | 42 4c 45 53 00 51 00 02 |UB:GETTA|BLES.Q..|
|00000540| 00 00 00 02 00 44 00 02 | 00 00 00 03 00 48 00 04 |.....D..|.....H..|
|00000550| 00 00 00 0f fa a7 2e 4d | 00 02 00 00 00 15 00 45 |.......M|.......E|
|00000560| 00 02 00 00 00 00 00 46 | 00 02 00 00 00 02 00 47 |.......F|.......G|
|00000570| 00 02 00 00 00 ff ff 49 | 00 02 00 00 00 00 00 41 |.......I|.......A|
|00000580| 00 c3 03 00 00 4d 45 54 | 48 4f 44 20 47 65 74 54 |.....MET|HOD GetT|
|00000590| 61 62 6c 65 73 28 29 20 | 43 4c 41 53 53 20 53 74 |ables() |CLASS St|
|000005a0| 61 6e 64 61 72 64 53 51 | 4c 44 69 61 6c 6f 67 53 |andardSQ|LDialogS|
|000005b0| 75 62 20 0d 0a 0d 0a 09 | 6c 6f 63 61 6c 20 6f 45 |ub .....|local oE|
|000005c0| 72 72 6f 72 20 61 73 20 | 75 73 75 61 6c 0d 0a 09 |rror as |usual...|
|000005d0| 6c 6f 63 61 6c 20 73 54 | 61 62 6c 65 4e 61 6d 65 |local sT|ableName|
|000005e0| 20 61 73 20 73 74 72 69 | 6e 67 0d 0a 09 6c 6f 63 | as stri|ng...loc|
|000005f0| 61 6c 20 73 49 64 65 6e | 74 43 68 61 72 20 61 73 |al sIden|tChar as|
|00000600| 20 73 74 72 69 6e 67 0d | 0a 09 0d 0a 09 62 65 67 | string.|.....beg|
|00000610| 69 6e 20 73 65 71 75 65 | 6e 63 65 0d 0a 09 0d 0a |in seque|nce.....|
|00000620| 09 73 49 64 65 6e 74 43 | 68 61 72 20 3a 3d 20 6f |.sIdentC|har := o|
|00000630| 43 6f 6e 6e 3a 49 6e 66 | 6f 28 20 53 51 4c 5f 49 |Conn:Inf|o( SQL_I|
|00000640| 44 45 4e 54 49 46 49 45 | 52 5f 51 55 4f 54 45 5f |DENTIFIE|R_QUOTE_|
|00000650| 43 48 41 52 29 0d 0a 09 | 69 66 20 73 49 64 65 6e |CHAR)...|if sIden|
|00000660| 74 43 68 61 72 20 3d 20 | 22 20 22 0d 0a 09 09 73 |tChar = |" "....s|
|00000670| 49 64 65 6e 74 43 68 61 | 72 20 3a 3d 20 4e 55 4c |IdentCha|r := NUL|
|00000680| 4c 5f 53 54 52 49 4e 47 | 0d 0a 09 65 6e 64 69 66 |L_STRING|...endif|
|00000690| 0d 0a 20 0d 0a 09 73 65 | 6c 66 3a 50 6f 69 6e 74 |.. ...se|lf:Point|
|000006a0| 65 72 20 3a 3d 20 50 6f | 69 6e 74 65 72 7b 20 50 |er := Po|inter{ P|
|000006b0| 4f 49 4e 54 45 52 48 4f | 55 52 47 4c 41 53 53 20 |OINTERHO|URGLASS |
|000006c0| 7d 0d 0a 0d 0a 09 6f 44 | 43 54 61 62 6c 65 4c 69 |}.....oD|CTableLi|
|000006d0| 73 74 42 6f 78 3a 43 6c | 65 61 72 28 29 0d 0a 09 |stBox:Cl|ear()...|
|000006e0| 0d 0a 20 20 20 20 6f 54 | 61 62 6c 65 73 20 3a 3d |.. oT|ables :=|
|000006f0| 20 53 51 4c 4c 69 73 74 | 54 61 62 6c 65 73 7b 20 | SQLList|Tables{ |
|00000700| 2c 20 2c 20 2c 20 2c 20 | 6f 43 6f 6e 6e 20 7d 0d |, , , , |oConn }.|
|00000710| 0a 0d 0a 20 20 20 20 64 | 6f 20 77 68 69 6c 65 20 |... d|o while |
|00000720| 6f 54 61 62 6c 65 73 3a | 46 65 74 63 68 28 29 0d |oTables:|Fetch().|
|00000730| 0a 20 20 20 20 20 20 69 | 66 20 6f 54 61 62 6c 65 |. i|f oTable|
|00000740| 73 3a 54 61 62 6c 65 5f | 4f 77 6e 65 72 20 21 3d |s:Table_|Owner !=|
|00000750| 20 4e 49 4c 0d 0a 20 20 | 20 20 20 20 09 73 54 61 | NIL.. | .sTa|
|00000760| 62 6c 65 4e 61 6d 65 20 | 3a 3d 20 73 49 64 65 6e |bleName |:= sIden|
|00000770| 74 43 68 61 72 20 2b 20 | 6f 54 61 62 6c 65 73 3a |tChar + |oTables:|
|00000780| 54 61 62 6c 65 5f 4f 77 | 6e 65 72 20 2b 20 73 49 |Table_Ow|ner + sI|
|00000790| 64 65 6e 74 43 68 61 72 | 20 2b 20 22 2e 22 20 2b |dentChar| + "." +|
|000007a0| 20 3b 0d 0a 09 09 09 09 | 20 20 20 20 20 20 73 49 | ;......| sI|
|000007b0| 64 65 6e 74 43 68 61 72 | 20 2b 20 6f 54 61 62 6c |dentChar| + oTabl|
|000007c0| 65 73 3a 54 61 62 6c 65 | 5f 4e 61 6d 65 20 2b 20 |es:Table|_Name + |
|000007d0| 73 49 64 65 6e 74 43 68 | 61 72 20 0d 0a 20 20 09 |sIdentCh|ar .. .|
|000007e0| 20 20 65 6c 73 65 20 0d | 0a 09 09 73 54 61 62 6c | else .|...sTabl|
|000007f0| 65 4e 61 6d 65 20 3a 3d | 20 73 49 64 65 6e 74 43 |eName :=| sIdentC|
|00000800| 68 61 72 20 2b 20 6f 54 | 61 62 6c 65 73 3a 54 61 |har + oT|ables:Ta|
|00000810| 62 6c 65 5f 4e 61 6d 65 | 20 2b 20 73 49 64 65 6e |ble_Name| + sIden|
|00000820| 74 43 68 61 72 20 0d 0a | 09 20 20 65 6e 64 69 66 |tChar ..|. endif|
|00000830| 0d 0a 09 20 20 6f 44 43 | 54 61 62 6c 65 4c 69 73 |... oDC|TableLis|
|00000840| 74 42 6f 78 3a 41 64 64 | 49 74 65 6d 28 20 73 54 |tBox:Add|Item( sT|
|00000850| 61 62 6c 65 4e 61 6d 65 | 20 29 0d 0a 09 65 6e 64 |ableName| )...end|
|00000860| 64 6f 0d 0a 0d 0a 09 6f | 44 43 54 61 62 6c 65 4c |do.....o|DCTableL|
|00000870| 69 73 74 42 6f 78 3a 43 | 75 72 72 65 6e 74 49 74 |istBox:C|urrentIt|
|00000880| 65 6d 4e 6f 20 3a 3d 20 | 31 0d 0a 0d 0a 20 20 20 |emNo := |1.... |
|00000890| 20 6f 54 61 62 6c 65 73 | 3a 43 6c 6f 73 65 28 29 | oTables|:Close()|
|000008a0| 0d 0a 0d 0a 09 73 65 6c | 66 3a 50 6f 69 6e 74 65 |.....sel|f:Pointe|
|000008b0| 72 20 3a 3d 20 50 6f 69 | 6e 74 65 72 7b 7d 0d 0a |r := Poi|nter{}..|
|000008c0| 09 0d 0a 20 20 20 20 72 | 65 63 6f 76 65 72 20 75 |... r|ecover u|
|000008d0| 73 69 6e 67 20 6f 45 72 | 72 6f 72 0d 0a 09 20 20 |sing oEr|ror... |
|000008e0| 20 20 53 68 6f 77 45 72 | 72 6f 72 28 20 6f 45 72 | ShowEr|ror( oEr|
|000008f0| 72 6f 72 20 29 0d 0a 09 | 20 20 20 20 6f 43 6f 6e |ror )...| oCon|
|00000900| 6e 3a 44 69 73 63 6f 6e | 6e 65 63 74 28 29 0d 0a |n:Discon|nect()..|
|00000910| 09 20 20 20 20 72 65 74 | 75 72 6e 20 46 41 4c 53 |. ret|urn FALS|
|00000920| 45 0d 0a 20 20 20 20 65 | 6e 64 20 73 65 71 75 65 |E.. e|nd seque|
|00000930| 6e 63 65 0d 0a 0d 0a 09 | 72 65 74 75 72 6e 20 54 |nce.....|return T|
|00000940| 52 55 45 0d 0a 0d 0a 00 | 4e 00 2f 00 00 00 4d 45 |RUE.....|N./...ME|
|00000950| 54 48 4f 44 20 47 65 74 | 54 61 62 6c 65 73 28 29 |THOD Get|Tables()|
|00000960| 20 43 4c 41 53 53 20 53 | 74 61 6e 64 61 72 64 53 | CLASS S|tandardS|
|00000970| 51 4c 44 69 61 6c 6f 67 | 53 75 62 20 00 40 00 0a |QLDialog|Sub .@..|
|00000980| 00 00 00 53 48 4f 57 45 | 52 52 4f 52 00 51 00 02 |...SHOWE|RROR.Q..|
|00000990| 00 00 00 02 00 44 00 02 | 00 00 00 03 00 48 00 04 |.....D..|.....H..|
|000009a0| 00 00 00 0f fa a7 2e 4d | 00 02 00 00 00 11 00 45 |.......M|.......E|
|000009b0| 00 02 00 00 00 00 00 46 | 00 02 00 00 00 02 00 47 |.......F|.......G|
|000009c0| 00 02 00 00 00 ff ff 49 | 00 02 00 00 00 00 00 41 |.......I|.......A|
|000009d0| 00 90 02 00 00 46 55 4e | 43 20 53 68 6f 77 45 72 |.....FUN|C ShowEr|
|000009e0| 72 6f 72 28 20 6f 53 51 | 4c 45 72 72 6f 72 49 6e |ror( oSQ|LErrorIn|
|000009f0| 66 6f 20 29 0d 0a 0d 0a | 09 6c 6f 63 61 6c 20 73 |fo )....|.local s|
|00000a00| 4d 73 67 20 61 73 20 73 | 74 72 69 6e 67 0d 0a 0d |Msg as s|tring...|
|00000a10| 0a 20 20 20 20 69 66 20 | 6f 53 51 4c 45 72 72 6f |. if |oSQLErro|
|00000a20| 72 49 6e 66 6f 20 21 3d | 20 4e 49 4c 0d 0a 0d 0a |rInfo !=| NIL....|
|00000a30| 20 20 09 20 20 69 66 20 | 49 73 49 6e 73 74 61 6e | . if |IsInstan|
|00000a40| 63 65 4f 66 28 20 6f 53 | 51 4c 45 72 72 6f 72 49 |ceOf( oS|QLErrorI|
|00000a50| 6e 66 6f 2c 20 23 53 51 | 4c 45 72 72 6f 72 49 6e |nfo, #SQ|LErrorIn|
|00000a60| 66 6f 20 29 0d 0a 09 20 | 20 20 20 20 4d 65 73 73 |fo )... | Mess|
|00000a70| 61 67 65 42 6f 78 28 20 | 30 2c 20 6f 53 51 4c 45 |ageBox( |0, oSQLE|
|00000a80| 72 72 6f 72 49 6e 66 6f | 3a 45 72 72 6f 72 4d 65 |rrorInfo|:ErrorMe|
|00000a90| 73 73 61 67 65 2c 09 20 | 20 20 20 20 20 20 3b 0d |ssage,. | ;.|
|00000aa0| 0a 09 09 20 09 20 20 09 | 20 20 6f 53 51 4c 45 72 |... . .| oSQLEr|
|00000ab0| 72 6f 72 49 6e 66 6f 3a | 53 51 4c 53 74 61 74 65 |rorInfo:|SQLState|
|00000ac0| 2c 20 4d 42 5f 49 43 4f | 4e 49 4e 46 4f 52 4d 41 |, MB_ICO|NINFORMA|
|00000ad0| 54 49 4f 4e 29 0d 0a 09 | 20 20 65 6c 73 65 0d 0a |TION)...| else..|
|00000ae0| 09 09 73 4d 73 67 20 3a | 3d 20 22 53 75 62 73 79 |..sMsg :|= "Subsy|
|00000af0| 73 3a 20 22 20 2b 20 41 | 53 53 54 52 49 4e 47 28 |s: " + A|SSTRING(|
|00000b00| 6f 53 51 4c 45 72 72 6f | 72 49 6e 66 6f 3a 53 75 |oSQLErro|rInfo:Su|
|00000b10| 62 73 79 73 74 65 6d 29 | 20 2b 20 20 20 20 20 20 |bsystem)| + |
|00000b20| 20 20 3b 0d 0a 20 09 09 | 09 20 20 20 20 22 20 4d | ;.. ..|. " M|
|00000b30| 65 74 68 6f 64 53 65 6c | 66 3a 20 22 20 2b 20 41 |ethodSel|f: " + A|
|00000b40| 53 53 54 52 49 4e 47 28 | 6f 53 51 4c 45 72 72 6f |SSTRING(|oSQLErro|
|00000b50| 72 49 6e 66 6f 3a 4d 65 | 74 68 6f 64 53 65 6c 66 |rInfo:Me|thodSelf|
|00000b60| 29 20 2b 20 20 20 3b 0d | 0a 09 20 09 09 09 22 20 |) + ;.|.. ..." |
|00000b70| 46 75 6e 63 53 79 6d 3a | 20 22 20 2b 20 41 53 53 |FuncSym:| " + ASS|
|00000b80| 54 52 49 4e 47 28 6f 53 | 51 4c 45 72 72 6f 72 49 |TRING(oS|QLErrorI|
|00000b90| 6e 66 6f 3a 46 75 6e 63 | 53 79 6d 29 20 2b 09 09 |nfo:Func|Sym) +..|
|00000ba0| 20 20 3b 0d 0a 09 09 09 | 09 22 20 43 61 6c 6c 46 | ;.....|." CallF|
|00000bb0| 75 6e 63 53 79 6d 3a 20 | 22 20 2b 20 41 53 53 54 |uncSym: |" + ASST|
|00000bc0| 52 49 4e 47 28 6f 53 51 | 4c 45 72 72 6f 72 49 6e |RING(oSQ|LErrorIn|
|00000bd0| 66 6f 3a 43 61 6c 6c 46 | 75 6e 63 53 79 6d 29 20 |fo:CallF|uncSym) |
|00000be0| 0d 0a 09 09 4d 65 73 73 | 61 67 65 42 6f 78 28 20 |....Mess|ageBox( |
|00000bf0| 30 2c 20 53 54 52 49 4e | 47 32 50 53 5a 28 73 4d |0, STRIN|G2PSZ(sM|
|00000c00| 73 67 29 2c 09 20 20 20 | 20 20 20 20 3b 0d 0a 09 |sg),. | ;...|
|00000c10| 09 20 09 20 20 09 20 20 | 09 6f 53 51 4c 45 72 72 |. . . |.oSQLErr|
|00000c20| 6f 72 49 6e 66 6f 3a 44 | 65 73 63 72 69 70 74 69 |orInfo:D|escripti|
|00000c30| 6f 6e 2c 20 4d 42 5f 49 | 43 4f 4e 49 4e 46 4f 52 |on, MB_I|CONINFOR|
|00000c40| 4d 41 54 49 4f 4e 29 20 | 09 20 20 0d 0a 09 20 20 |MATION) |. ... |
|00000c50| 65 6e 64 69 66 0d 0a 20 | 20 20 20 65 6e 64 69 66 |endif.. | endif|
|00000c60| 0d 0a 0d 0a 00 4e 00 20 | 00 00 00 46 55 4e 43 20 |.....N. |...FUNC |
|00000c70| 53 68 6f 77 45 72 72 6f | 72 28 20 6f 53 51 4c 45 |ShowErro|r( oSQLE|
|00000c80| 72 72 6f 72 49 6e 66 6f | 20 29 00 40 00 22 00 00 |rrorInfo| ).@."..|
|00000c90| 00 53 54 41 4e 44 41 52 | 44 53 51 4c 44 49 41 4c |.STANDAR|DSQLDIAL|
|00000ca0| 4f 47 53 55 42 3a 4c 49 | 53 54 42 4f 58 43 4c 49 |OGSUB:LI|STBOXCLI|
|00000cb0| 43 4b 00 51 00 02 00 00 | 00 02 00 44 00 02 00 00 |CK.Q....|...D....|
|00000cc0| 00 03 00 48 00 04 00 00 | 00 0f fa a7 2e 4d 00 02 |...H....|.....M..|
|00000cd0| 00 00 00 15 00 45 00 02 | 00 00 00 00 00 46 00 02 |.....E..|.....F..|
|00000ce0| 00 00 00 02 00 47 00 02 | 00 00 00 ff ff 49 00 02 |.....G..|.....I..|
|00000cf0| 00 00 00 00 00 41 00 57 | 00 00 00 4d 45 54 48 4f |.....A.W|...METHO|
|00000d00| 44 20 4c 69 73 74 42 6f | 78 43 6c 69 63 6b 28 20 |D ListBo|xClick( |
|00000d10| 6f 45 76 65 6e 74 20 29 | 20 43 4c 41 53 53 20 53 |oEvent )| CLASS S|
|00000d20| 74 61 6e 64 61 72 64 53 | 51 4c 44 69 61 6c 6f 67 |tandardS|QLDialog|
|00000d30| 53 75 62 20 0d 0a 0d 0a | 20 09 73 65 6c 66 3a 4f |Sub ....| .self:O|
|00000d40| 70 65 6e 5f 54 61 62 6c | 65 28 29 0d 0a 20 09 0d |pen_Tabl|e().. ..|
|00000d50| 0a 00 4e 00 3a 00 00 00 | 4d 45 54 48 4f 44 20 4c |..N.:...|METHOD L|
|00000d60| 69 73 74 42 6f 78 43 6c | 69 63 6b 28 20 6f 45 76 |istBoxCl|ick( oEv|
|00000d70| 65 6e 74 20 29 20 43 4c | 41 53 53 20 53 74 61 6e |ent ) CL|ASS Stan|
|00000d80| 64 61 72 64 53 51 4c 44 | 69 61 6c 6f 67 53 75 62 |dardSQLD|ialogSub|
|00000d90| 20 00 40 00 1d 00 00 00 | 53 51 4c 53 54 4d 54 54 | .@.....|SQLSTMTT|
|00000da0| 45 53 54 53 55 42 3a 45 | 58 45 43 55 54 45 42 55 |ESTSUB:E|XECUTEBU|
|00000db0| 54 54 4f 4e 00 51 00 02 | 00 00 00 02 00 44 00 02 |TTON.Q..|.....D..|
|00000dc0| 00 00 00 03 00 48 00 04 | 00 00 00 0f fa a7 2e 4d |.....H..|.......M|
|00000dd0| 00 02 00 00 00 15 00 45 | 00 02 00 00 00 00 00 46 |.......E|.......F|
|00000de0| 00 02 00 00 00 02 00 47 | 00 02 00 00 00 ff ff 49 |.......G|.......I|
|00000df0| 00 02 00 00 00 00 00 41 | 00 68 02 00 00 4d 45 54 |.......A|.h...MET|
|00000e00| 48 4f 44 20 45 78 65 63 | 75 74 65 42 75 74 74 6f |HOD Exec|uteButto|
|00000e10| 6e 28 20 29 20 43 4c 41 | 53 53 20 53 51 4c 53 74 |n( ) CLA|SS SQLSt|
|00000e20| 6d 74 54 65 73 74 53 75 | 62 20 0d 0a 0d 0a 20 20 |mtTestSu|b .... |
|00000e30| 20 20 6c 6f 63 61 6c 20 | 6f 53 74 6d 74 20 09 61 | local |oStmt .a|
|00000e40| 73 20 53 51 4c 53 74 61 | 74 65 6d 65 6e 74 0d 0a |s SQLSta|tement..|
|00000e50| 20 20 20 20 6c 6f 63 61 | 6c 20 6f 45 72 72 6f 72 | loca|l oError|
|00000e60| 09 61 73 20 55 53 55 41 | 4c 0d 0a 20 20 20 20 6c |.as USUA|L.. l|
|00000e70| 6f 63 61 6c 20 63 53 74 | 61 74 65 6d 65 6e 74 09 |ocal cSt|atement.|
|00000e80| 61 73 20 53 54 52 49 4e | 47 0d 0a 0d 0a 20 20 20 |as STRIN|G.... |
|00000e90| 20 62 65 67 69 6e 20 73 | 65 71 75 65 6e 63 65 0d | begin s|equence.|
|00000ea0| 0a 20 20 20 20 0d 0a 20 | 20 20 20 63 53 74 61 74 |. .. | cStat|
|00000eb0| 65 6d 65 6e 74 20 3a 3d | 20 6f 44 43 53 74 61 74 |ement :=| oDCStat|
|00000ec0| 65 6d 65 6e 74 54 65 78 | 74 3a 54 65 78 74 56 61 |ementTex|t:TextVa|
|00000ed0| 6c 75 65 20 0d 0a 0d 0a | 20 20 20 20 6f 53 74 6d |lue ....| oStm|
|00000ee0| 74 20 3a 3d 20 53 51 4c | 53 74 61 74 65 6d 65 6e |t := SQL|Statemen|
|00000ef0| 74 7b 20 63 53 74 61 74 | 65 6d 65 6e 74 2c 20 6f |t{ cStat|ement, o|
|00000f00| 43 6f 6e 6e 20 7d 0d 0a | 0d 0a 20 20 20 20 6f 53 |Conn }..|.. oS|
|00000f10| 74 6d 74 3a 45 78 65 63 | 75 74 65 28 29 0d 0a 20 |tmt:Exec|ute().. |
|00000f20| 20 20 20 0d 0a 20 20 20 | 20 69 66 20 49 73 4e 69 | .. | if IsNi|
|00000f30| 6c 28 20 6f 53 74 6d 74 | 3a 53 74 61 74 75 73 20 |l( oStmt|:Status |
|00000f40| 29 0d 0a 09 20 20 20 20 | 20 4d 65 73 73 61 67 65 |)... | Message|
|00000f50| 42 6f 78 28 20 30 2c 20 | 73 74 72 69 6e 67 32 70 |Box( 0, |string2p|
|00000f60| 73 7a 28 22 53 74 61 74 | 65 6d 65 6e 74 20 73 75 |sz("Stat|ement su|
|00000f70| 63 63 65 73 73 66 75 6c | 6c 79 20 65 78 65 63 75 |ccessful|ly execu|
|00000f80| 74 65 64 22 29 2c 20 20 | 3b 0d 0a 09 09 20 09 20 |ted"), |;.... . |
|00000f90| 20 09 20 20 73 74 72 69 | 6e 67 32 70 73 7a 28 22 | . stri|ng2psz("|
|00000fa0| 53 51 4c 20 53 74 61 74 | 65 6d 65 6e 74 22 29 2c |SQL Stat|ement"),|
|00000fb0| 20 4d 42 5f 49 43 4f 4e | 49 4e 46 4f 52 4d 41 54 | MB_ICON|INFORMAT|
|00000fc0| 49 4f 4e 29 0d 0a 09 65 | 6c 73 65 0d 0a 09 09 53 |ION)...e|lse....S|
|00000fd0| 68 6f 77 45 72 72 6f 72 | 28 20 6f 53 74 6d 74 3a |howError|( oStmt:|
|00000fe0| 45 72 72 49 6e 66 6f 20 | 29 20 20 20 20 0d 0a 09 |ErrInfo |) ...|
|00000ff0| 65 6e 64 69 66 20 20 20 | 20 0d 0a 0d 0a 20 20 20 |endif | .... |
|00001000| 20 72 65 63 6f 76 65 72 | 20 75 73 69 6e 67 20 6f | recover| using o|
|00001010| 45 72 72 6f 72 0d 0a 09 | 20 20 20 20 53 68 6f 77 |Error...| Show|
|00001020| 45 72 72 6f 72 28 20 6f | 45 72 72 6f 72 20 29 0d |Error( o|Error ).|
|00001030| 0a 20 20 20 20 65 6e 64 | 20 73 65 71 75 65 6e 63 |. end| sequenc|
|00001040| 65 0d 0a 0d 0a 09 6f 53 | 74 6d 74 3a 46 72 65 65 |e.....oS|tmt:Free|
|00001050| 53 74 6d 74 28 20 53 51 | 4c 5f 44 52 4f 50 20 29 |Stmt( SQ|L_DROP )|
|00001060| 0d 0a 0d 0a 00 4e 00 2e | 00 00 00 4d 45 54 48 4f |.....N..|...METHO|
|00001070| 44 20 45 78 65 63 75 74 | 65 42 75 74 74 6f 6e 28 |D Execut|eButton(|
|00001080| 20 29 20 43 4c 41 53 53 | 20 53 51 4c 53 74 6d 74 | ) CLASS| SQLStmt|
|00001090| 54 65 73 74 53 75 62 20 | 00 40 00 1c 00 00 00 53 |TestSub |.@.....S|
|000010a0| 51 4c 53 54 4d 54 54 45 | 53 54 53 55 42 3a 43 41 |QLSTMTTE|STSUB:CA|
|000010b0| 4e 43 45 4c 42 55 54 54 | 4f 4e 00 51 00 02 00 00 |NCELBUTT|ON.Q....|
|000010c0| 00 02 00 44 00 02 00 00 | 00 03 00 48 00 04 00 00 |...D....|...H....|
|000010d0| 00 0f fa a7 2e 4d 00 02 | 00 00 00 15 00 45 00 02 |.....M..|.....E..|
|000010e0| 00 00 00 00 00 46 00 02 | 00 00 00 02 00 47 00 02 |.....F..|.....G..|
|000010f0| 00 00 00 ff ff 49 00 02 | 00 00 00 00 00 41 00 5e |.....I..|.....A.^|
|00001100| 00 00 00 4d 45 54 48 4f | 44 20 43 61 6e 63 65 6c |...METHO|D Cancel|
|00001110| 42 75 74 74 6f 6e 28 20 | 29 20 43 4c 41 53 53 20 |Button( |) CLASS |
|00001120| 53 51 4c 53 74 6d 74 54 | 65 73 74 53 75 62 20 0d |SQLStmtT|estSub .|
|00001130| 0a 0d 0a 09 6f 43 6f 6e | 6e 3a 44 69 73 63 6f 6e |....oCon|n:Discon|
|00001140| 6e 65 63 74 28 29 0d 0a | 0d 0a 09 73 65 6c 66 3a |nect()..|...self:|
|00001150| 45 6e 64 44 69 61 6c 6f | 67 28 30 29 0d 0a 0d 0a |EndDialo|g(0)....|
|00001160| 00 4e 00 2d 00 00 00 4d | 45 54 48 4f 44 20 43 61 |.N.-...M|ETHOD Ca|
|00001170| 6e 63 65 6c 42 75 74 74 | 6f 6e 28 20 29 20 43 4c |ncelButt|on( ) CL|
|00001180| 41 53 53 20 53 51 4c 53 | 74 6d 74 54 65 73 74 53 |ASS SQLS|tmtTestS|
|00001190| 75 62 20 00 40 00 1f 00 | 00 00 53 54 41 4e 44 41 |ub .@...|..STANDA|
|000011a0| 52 44 53 48 45 4c 4c 57 | 49 4e 44 4f 57 3a 4e 45 |RDSHELLW|INDOW:NE|
|000011b0| 57 53 51 4c 53 54 4d 54 | 00 51 00 02 00 00 00 02 |WSQLSTMT|.Q......|
|000011c0| 00 44 00 02 00 00 00 03 | 00 48 00 04 00 00 00 0f |.D......|.H......|
|000011d0| fa a7 2e 4d 00 02 00 00 | 00 15 00 45 00 02 00 00 |...M....|...E....|
|000011e0| 00 00 00 46 00 02 00 00 | 00 02 00 47 00 02 00 00 |...F....|...G....|
|000011f0| 00 ff ff 49 00 02 00 00 | 00 00 00 41 00 15 01 00 |...I....|...A....|
|00001200| 00 4d 45 54 48 4f 44 20 | 4e 65 77 53 51 4c 53 74 |.METHOD |NewSQLSt|
|00001210| 6d 74 28 29 20 43 4c 41 | 53 53 20 53 74 61 6e 64 |mt() CLA|SS Stand|
|00001220| 61 72 64 53 68 65 6c 6c | 57 69 6e 64 6f 77 0d 0a |ardShell|Window..|
|00001230| 09 6c 6f 63 61 6c 20 6f | 43 6f 6e 6e 20 61 73 20 |.local o|Conn as |
|00001240| 53 51 4c 43 6f 6e 6e 65 | 63 74 69 6f 6e 20 20 0d |SQLConne|ction .|
|00001250| 0a 09 6c 6f 63 61 6c 20 | 6f 53 51 4c 53 74 6d 74 |..local |oSQLStmt|
|00001260| 53 75 62 20 61 73 20 53 | 51 4c 53 74 6d 74 54 65 |Sub as S|QLStmtTe|
|00001270| 73 74 53 75 62 20 0d 0a | 0d 0a 09 6f 43 6f 6e 6e |stSub ..|...oConn|
|00001280| 20 3a 3d 20 53 51 4c 43 | 6f 6e 6e 65 63 74 69 6f | := SQLC|onnectio|
|00001290| 6e 7b 7d 09 0d 0a 09 0d | 0a 09 69 66 20 6f 43 6f |n{}.....|..if oCo|
|000012a0| 6e 6e 3a 44 72 69 76 65 | 72 43 6f 6e 6e 65 63 74 |nn:Drive|rConnect|
|000012b0| 28 20 73 65 6c 66 3a 48 | 61 6e 64 6c 65 28 29 20 |( self:H|andle() |
|000012c0| 29 0d 0a 09 09 6f 53 51 | 4c 53 74 6d 74 53 75 62 |)....oSQ|LStmtSub|
|000012d0| 20 3a 3d 20 53 51 4c 53 | 74 6d 74 54 65 73 74 53 | := SQLS|tmtTestS|
|000012e0| 75 62 7b 73 65 6c 66 2c | 20 6f 43 6f 6e 6e 7d 0d |ub{self,| oConn}.|
|000012f0| 0a 09 09 6f 53 51 4c 53 | 74 6d 74 53 75 62 3a 53 |...oSQLS|tmtSub:S|
|00001300| 68 6f 77 28 29 20 20 20 | 0d 0a 09 65 6e 64 69 66 |how() |...endif|
|00001310| 0d 0a 09 0d 0a 00 4e 00 | 2e 00 00 00 4d 45 54 48 |......N.|....METH|
|00001320| 4f 44 20 4e 65 77 53 51 | 4c 53 74 6d 74 28 29 20 |OD NewSQ|LStmt() |
|00001330| 43 4c 41 53 53 20 53 74 | 61 6e 64 61 72 64 53 68 |CLASS St|andardSh|
|00001340| 65 6c 6c 57 69 6e 64 6f | 77 00 40 00 21 00 00 00 |ellWindo|w.@.!...|
|00001350| 53 54 41 4e 44 41 52 44 | 53 48 45 4c 4c 57 49 4e |STANDARD|SHELLWIN|
|00001360| 44 4f 57 3a 4e 45 57 53 | 51 4c 57 49 4e 44 4f 57 |DOW:NEWS|QLWINDOW|
|00001370| 00 51 00 02 00 00 00 02 | 00 44 00 02 00 00 00 03 |.Q......|.D......|
|00001380| 00 48 00 04 00 00 00 0f | fa a7 2e 4d 00 02 00 00 |.H......|...M....|
|00001390| 00 15 00 45 00 02 00 00 | 00 00 00 46 00 02 00 00 |...E....|...F....|
|000013a0| 00 02 00 47 00 02 00 00 | 00 ff ff 49 00 02 00 00 |...G....|...I....|
|000013b0| 00 00 00 41 00 28 01 00 | 00 4d 45 54 48 4f 44 20 |...A.(..|.METHOD |
|000013c0| 4e 65 77 53 51 4c 57 69 | 6e 64 6f 77 28 29 20 43 |NewSQLWi|ndow() C|
|000013d0| 4c 41 53 53 20 53 74 61 | 6e 64 61 72 64 53 68 65 |LASS Sta|ndardShe|
|000013e0| 6c 6c 57 69 6e 64 6f 77 | 0d 0a 09 6c 6f 63 61 6c |llWindow|...local|
|000013f0| 20 6f 43 6f 6e 6e 20 61 | 73 20 53 51 4c 43 6f 6e | oConn a|s SQLCon|
|00001400| 6e 65 63 74 69 6f 6e 20 | 20 20 0d 0a 09 6c 6f 63 |nection | ...loc|
|00001410| 61 6c 20 6f 53 51 4c 44 | 69 61 6c 6f 67 53 75 62 |al oSQLD|ialogSub|
|00001420| 20 61 73 20 53 74 61 6e | 64 61 72 64 53 51 4c 44 | as Stan|dardSQLD|
|00001430| 69 61 6c 6f 67 53 75 62 | 20 0d 0a 0d 0a 09 6f 43 |ialogSub| .....oC|
|00001440| 6f 6e 6e 20 3a 3d 20 53 | 51 4c 43 6f 6e 6e 65 63 |onn := S|QLConnec|
|00001450| 74 69 6f 6e 7b 7d 09 0d | 0a 09 0d 0a 09 69 66 20 |tion{}..|.....if |
|00001460| 6f 43 6f 6e 6e 3a 44 72 | 69 76 65 72 43 6f 6e 6e |oConn:Dr|iverConn|
|00001470| 65 63 74 28 20 73 65 6c | 66 3a 48 61 6e 64 6c 65 |ect( sel|f:Handle|
|00001480| 28 29 20 29 0d 0a 09 09 | 6f 53 51 4c 44 69 61 6c |() )....|oSQLDial|
|00001490| 6f 67 53 75 62 20 3a 3d | 20 53 74 61 6e 64 61 72 |ogSub :=| Standar|
|000014a0| 64 53 51 4c 44 69 61 6c | 6f 67 53 75 62 7b 73 65 |dSQLDial|ogSub{se|
|000014b0| 6c 66 2c 20 6f 43 6f 6e | 6e 7d 0d 0a 09 09 6f 53 |lf, oCon|n}....oS|
|000014c0| 51 4c 44 69 61 6c 6f 67 | 53 75 62 3a 53 68 6f 77 |QLDialog|Sub:Show|
|000014d0| 28 29 20 0d 0a 09 65 6e | 64 69 66 0d 0a 09 0d 0a |() ...en|dif.....|
|000014e0| 00 4e 00 30 00 00 00 4d | 45 54 48 4f 44 20 4e 65 |.N.0...M|ETHOD Ne|
|000014f0| 77 53 51 4c 57 69 6e 64 | 6f 77 28 29 20 43 4c 41 |wSQLWind|ow() CLA|
|00001500| 53 53 20 53 74 61 6e 64 | 61 72 64 53 68 65 6c 6c |SS Stand|ardShell|
|00001510| 57 69 6e 64 6f 77 00 40 | 00 18 00 00 00 53 51 4c |Window.@|.....SQL|
|00001520| 53 54 4d 54 54 45 53 54 | 53 55 42 3a 52 4f 4c 4c |STMTTEST|SUB:ROLL|
|00001530| 42 41 43 4b 00 51 00 02 | 00 00 00 02 00 44 00 02 |BACK.Q..|.....D..|
|00001540| 00 00 00 03 00 48 00 04 | 00 00 00 0f fa a7 2e 4d |.....H..|.......M|
|00001550| 00 02 00 00 00 15 00 45 | 00 02 00 00 00 00 00 46 |.......E|.......F|
|00001560| 00 02 00 00 00 02 00 47 | 00 02 00 00 00 ff ff 49 |.......G|.......I|
|00001570| 00 02 00 00 00 00 00 41 | 00 72 01 00 00 4d 45 54 |.......A|.r...MET|
|00001580| 48 4f 44 20 52 6f 6c 6c | 62 61 63 6b 28 20 29 20 |HOD Roll|back( ) |
|00001590| 43 4c 41 53 53 20 53 51 | 4c 53 74 6d 74 54 65 73 |CLASS SQ|LStmtTes|
|000015a0| 74 53 75 62 20 0d 0a 0d | 0a 09 6c 6f 63 61 6c 20 |tSub ...|..local |
|000015b0| 6f 53 74 6d 74 20 09 61 | 73 20 53 51 4c 53 74 61 |oStmt .a|s SQLSta|
|000015c0| 74 65 6d 65 6e 74 0d 0a | 0d 0a 09 6f 53 74 6d 74 |tement..|...oStmt|
|000015d0| 20 3a 3d 20 53 51 4c 53 | 74 61 74 65 6d 65 6e 74 | := SQLS|tatement|
|000015e0| 7b 20 2c 20 6f 43 6f 6e | 6e 20 7d 0d 0a 0d 0a 09 |{ , oCon|n }.....|
|000015f0| 6f 53 74 6d 74 3a 52 6f | 6c 6c 62 61 63 6b 28 29 |oStmt:Ro|llback()|
|00001600| 0d 0a 20 20 20 20 0d 0a | 09 69 66 20 49 73 4e 69 |.. ..|.if IsNi|
|00001610| 6c 28 20 6f 53 74 6d 74 | 3a 53 74 61 74 75 73 20 |l( oStmt|:Status |
|00001620| 29 0d 0a 09 20 20 20 20 | 20 4d 65 73 73 61 67 65 |)... | Message|
|00001630| 42 6f 78 28 20 30 2c 20 | 73 74 72 69 6e 67 32 70 |Box( 0, |string2p|
|00001640| 73 7a 28 22 52 4f 4c 4c | 42 41 43 4b 20 73 75 63 |sz("ROLL|BACK suc|
|00001650| 63 65 73 73 66 75 6c 22 | 29 2c 20 20 3b 0d 0a 09 |cessful"|), ;...|
|00001660| 09 20 09 20 20 09 20 20 | 73 74 72 69 6e 67 32 70 |. . . |string2p|
|00001670| 73 7a 28 22 53 51 4c 20 | 53 74 61 74 65 6d 65 6e |sz("SQL |Statemen|
|00001680| 74 22 29 2c 20 4d 42 5f | 49 43 4f 4e 49 4e 46 4f |t"), MB_|ICONINFO|
|00001690| 52 4d 41 54 49 4f 4e 29 | 0d 0a 09 65 6c 73 65 0d |RMATION)|...else.|
|000016a0| 0a 09 09 53 68 6f 77 45 | 72 72 6f 72 28 20 6f 53 |...ShowE|rror( oS|
|000016b0| 74 6d 74 3a 45 72 72 49 | 6e 66 6f 20 29 20 20 20 |tmt:ErrI|nfo ) |
|000016c0| 20 0d 0a 09 65 6e 64 69 | 66 20 20 20 20 0d 0a 0d | ...endi|f ...|
|000016d0| 0a 09 6f 53 74 6d 74 3a | 46 72 65 65 53 74 6d 74 |..oStmt:|FreeStmt|
|000016e0| 28 20 53 51 4c 5f 44 52 | 4f 50 20 29 0d 0a 00 4e |( SQL_DR|OP )...N|
|000016f0| 00 29 00 00 00 4d 45 54 | 48 4f 44 20 52 6f 6c 6c |.)...MET|HOD Roll|
|00001700| 62 61 63 6b 28 20 29 20 | 43 4c 41 53 53 20 53 51 |back( ) |CLASS SQ|
|00001710| 4c 53 74 6d 74 54 65 73 | 74 53 75 62 20 00 40 00 |LStmtTes|tSub .@.|
|00001720| 1c 00 00 00 53 51 4c 53 | 54 4d 54 54 45 53 54 53 |....SQLS|TMTTESTS|
|00001730| 55 42 3a 43 52 45 41 54 | 45 46 52 4f 4d 44 42 00 |UB:CREAT|EFROMDB.|
|00001740| 51 00 02 00 00 00 02 00 | 44 00 02 00 00 00 03 00 |Q.......|D.......|
|00001750| 48 00 04 00 00 00 0f fa | a7 2e 4d 00 02 00 00 00 |H.......|..M.....|
|00001760| 15 00 45 00 02 00 00 00 | 00 00 46 00 02 00 00 00 |..E.....|..F.....|
|00001770| 02 00 47 00 02 00 00 00 | ff ff 49 00 02 00 00 00 |..G.....|..I.....|
|00001780| 00 00 41 00 ed 06 00 00 | 4d 45 54 48 4f 44 20 43 |..A.....|METHOD C|
|00001790| 72 65 61 74 65 46 72 6f | 6d 44 42 28 20 29 20 43 |reateFro|mDB( ) C|
|000017a0| 4c 41 53 53 20 53 51 4c | 53 74 6d 74 54 65 73 74 |LASS SQL|StmtTest|
|000017b0| 53 75 62 20 0d 0a 0d 0a | 09 6c 6f 63 61 6c 20 6f |Sub ....|.local o|
|000017c0| 4f 44 20 61 73 20 4f 70 | 65 6e 44 69 61 6c 6f 67 |OD as Op|enDialog|
|000017d0| 20 0d 0a 09 6c 6f 63 61 | 6c 20 6f 54 42 20 61 73 | ...loca|l oTB as|
|000017e0| 20 54 65 78 74 42 6f 78 | 20 0d 0a 09 6c 6f 63 61 | TextBox| ...loca|
|000017f0| 6c 20 6f 44 42 46 69 6c | 65 20 61 73 20 44 42 46 |l oDBFil|e as DBF|
|00001800| 69 6c 65 53 70 65 63 0d | 0a 09 6c 6f 63 61 6c 20 |ileSpec.|..local |
|00001810| 61 44 42 53 74 72 75 63 | 74 20 61 73 20 61 72 72 |aDBStruc|t as arr|
|00001820| 61 79 0d 0a 09 6c 6f 63 | 61 6c 20 63 53 74 61 74 |ay...loc|al cStat|
|00001830| 65 6d 65 6e 74 09 61 73 | 20 73 74 72 69 6e 67 0d |ement.as| string.|
|00001840| 0a 09 6c 6f 63 61 6c 20 | 77 49 6e 64 65 78 20 20 |..local |wIndex |
|00001850| 61 73 20 77 6f 72 64 0d | 0a 09 6c 6f 63 61 6c 20 |as word.|..local |
|00001860| 73 49 64 65 6e 74 43 68 | 61 72 20 61 73 20 73 74 |sIdentCh|ar as st|
|00001870| 72 69 6e 67 20 0d 0a 0d | 0a 09 28 6f 4f 44 20 3a |ring ...|..(oOD :|
|00001880| 3d 20 4f 70 65 6e 44 69 | 61 6c 6f 67 7b 73 65 6c |= OpenDi|alog{sel|
|00001890| 66 2c 20 22 2a 2e 64 62 | 66 22 7d 29 3a 53 68 6f |f, "*.db|f"}):Sho|
|000018a0| 77 28 29 0d 0a 09 0d 0a | 09 69 66 20 21 65 6d 70 |w().....|.if !emp|
|000018b0| 74 79 28 6f 4f 44 3a 46 | 69 6c 65 4e 61 6d 65 29 |ty(oOD:F|ileName)|
|000018c0| 0d 0a 0d 0a 09 09 69 66 | 20 28 6c 65 6e 28 6f 4f |......if| (len(oO|
|000018d0| 44 3a 46 69 6c 65 4e 61 | 6d 65 29 20 3e 20 33 20 |D:FileNa|me) > 3 |
|000018e0| 29 20 2e 41 4e 44 2e 20 | 28 75 70 70 65 72 28 72 |) .AND. |(upper(r|
|000018f0| 69 67 68 74 28 6f 4f 44 | 3a 46 69 6c 65 4e 61 6d |ight(oOD|:FileNam|
|00001900| 65 2c 20 34 29 29 20 3d | 3d 20 22 2e 44 42 46 22 |e, 4)) =|= ".DBF"|
|00001910| 29 0d 0a 09 09 09 6f 44 | 42 46 69 6c 65 20 3a 3d |).....oD|BFile :=|
|00001920| 20 44 42 46 69 6c 65 53 | 70 65 63 7b 6f 4f 44 3a | DBFileS|pec{oOD:|
|00001930| 46 69 6c 65 4e 61 6d 65 | 7d 20 0d 0a 09 09 09 0d |FileName|} ......|
|00001940| 0a 09 09 09 69 66 20 6f | 44 42 46 69 6c 65 3a 46 |....if o|DBFile:F|
|00001950| 69 6e 64 28 29 0d 0a 09 | 09 09 09 61 44 42 53 74 |ind()...|...aDBSt|
|00001960| 72 75 63 74 20 3a 3d 20 | 6f 44 42 46 69 6c 65 3a |ruct := |oDBFile:|
|00001970| 44 42 53 74 72 75 63 74 | 09 0d 0a 09 09 09 09 0d |DBStruct|........|
|00001980| 0a 09 09 09 09 73 49 64 | 65 6e 74 43 68 61 72 20 |.....sId|entChar |
|00001990| 3a 3d 20 6f 43 6f 6e 6e | 3a 49 6e 66 6f 28 20 53 |:= oConn|:Info( S|
|000019a0| 51 4c 5f 49 44 45 4e 54 | 49 46 49 45 52 5f 51 55 |QL_IDENT|IFIER_QU|
|000019b0| 4f 54 45 5f 43 48 41 52 | 29 0d 0a 09 09 09 09 69 |OTE_CHAR|)......i|
|000019c0| 66 20 73 49 64 65 6e 74 | 43 68 61 72 20 3d 20 22 |f sIdent|Char = "|
|000019d0| 20 22 0d 0a 09 09 09 09 | 09 73 49 64 65 6e 74 43 | "......|.sIdentC|
|000019e0| 68 61 72 20 3a 3d 20 4e | 55 4c 4c 5f 53 54 52 49 |har := N|ULL_STRI|
|000019f0| 4e 47 0d 0a 09 09 09 09 | 65 6e 64 69 66 0d 0a 20 |NG......|endif.. |
|00001a00| 0d 0a 09 09 09 09 63 53 | 74 61 74 65 6d 65 6e 74 |......cS|tatement|
|00001a10| 20 3a 3d 20 22 63 72 65 | 61 74 65 20 74 61 62 6c | := "cre|ate tabl|
|00001a20| 65 20 22 20 2b 20 73 49 | 64 65 6e 74 43 68 61 72 |e " + sI|dentChar|
|00001a30| 20 2b 20 20 41 53 53 54 | 52 49 4e 47 28 6f 44 42 | + ASST|RING(oDB|
|00001a40| 46 69 6c 65 3a 46 69 6c | 65 4e 61 6d 65 29 20 2b |File:Fil|eName) +|
|00001a50| 20 73 49 64 65 6e 74 43 | 68 61 72 20 2b 20 20 22 | sIdentC|har + "|
|00001a60| 20 28 20 22 0d 0a 09 09 | 09 09 46 4f 52 20 77 49 | ( "....|..FOR wI|
|00001a70| 6e 64 65 78 20 3a 3d 20 | 31 20 54 4f 20 41 4c 45 |ndex := |1 TO ALE|
|00001a80| 4e 28 61 44 42 53 74 72 | 75 63 74 29 0d 0a 09 09 |N(aDBStr|uct)....|
|00001a90| 09 09 09 63 53 74 61 74 | 65 6d 65 6e 74 20 2b 3d |...cStat|ement +=|
|00001aa0| 20 20 73 49 64 65 6e 74 | 43 68 61 72 20 2b 20 61 | sIdent|Char + a|
|00001ab0| 44 42 53 74 72 75 63 74 | 5b 77 49 6e 64 65 78 2c |DBStruct|[wIndex,|
|00001ac0| 44 42 53 5f 4e 41 4d 45 | 5d 20 2b 20 73 49 64 65 |DBS_NAME|] + sIde|
|00001ad0| 6e 74 43 68 61 72 20 0d | 0a 09 09 09 09 09 69 66 |ntChar .|......if|
|00001ae0| 20 20 61 44 42 53 74 72 | 75 63 74 5b 77 49 6e 64 | aDBStr|uct[wInd|
|00001af0| 65 78 2c 44 42 53 5f 54 | 59 50 45 5d 20 3d 20 22 |ex,DBS_T|YPE] = "|
|00001b00| 4e 22 0d 0a 09 09 09 09 | 09 09 69 66 20 20 61 44 |N"......|..if aD|
|00001b10| 42 53 74 72 75 63 74 5b | 77 49 6e 64 65 78 2c 44 |BStruct[|wIndex,D|
|00001b20| 42 53 5f 4c 45 4e 5d 20 | 3c 3d 20 35 20 0d 0a 09 |BS_LEN] |<= 5 ...|
|00001b30| 09 09 09 09 09 09 63 53 | 74 61 74 65 6d 65 6e 74 |......cS|tatement|
|00001b40| 20 2b 3d 20 22 20 73 6d | 61 6c 6c 69 6e 74 22 0d | += " sm|allint".|
|00001b50| 0a 09 09 09 09 09 09 65 | 6c 73 65 69 66 20 20 61 |.......e|lseif a|
|00001b60| 44 42 53 74 72 75 63 74 | 5b 77 49 6e 64 65 78 2c |DBStruct|[wIndex,|
|00001b70| 44 42 53 5f 4c 45 4e 5d | 20 3c 3d 20 31 31 0d 0a |DBS_LEN]| <= 11..|
|00001b80| 09 09 09 09 09 09 09 63 | 53 74 61 74 65 6d 65 6e |.......c|Statemen|
|00001b90| 74 20 2b 3d 20 22 20 69 | 6e 74 65 67 65 72 22 0d |t += " i|nteger".|
|00001ba0| 0a 09 09 09 09 09 09 65 | 6c 73 65 20 0d 0a 09 09 |.......e|lse ....|
|00001bb0| 09 09 09 09 09 63 53 74 | 61 74 65 6d 65 6e 74 20 |.....cSt|atement |
|00001bc0| 2b 3d 20 22 20 66 6c 6f | 61 74 22 0d 0a 20 20 20 |+= " flo|at".. |
|00001bd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001be0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001bf0| 20 20 20 20 20 20 20 65 | 6e 64 69 66 0d 0a 09 09 | e|ndif....|
|00001c00| 09 09 09 65 6c 73 65 0d | 0a 09 09 09 09 09 09 63 |...else.|.......c|
|00001c10| 53 74 61 74 65 6d 65 6e | 74 20 2b 3d 20 22 20 63 |Statemen|t += " c|
|00001c20| 68 61 72 28 22 20 2b 20 | 61 6c 6c 74 72 69 6d 28 |har(" + |alltrim(|
|00001c30| 61 73 73 74 72 69 6e 67 | 28 61 44 42 53 74 72 75 |asstring|(aDBStru|
|00001c40| 63 74 5b 77 49 6e 64 65 | 78 2c 44 42 53 5f 4c 45 |ct[wInde|x,DBS_LE|
|00001c50| 4e 5d 29 29 20 2b 20 22 | 29 22 20 0d 0a 09 09 09 |N])) + "|)" .....|
|00001c60| 09 09 65 6e 64 69 66 0d | 0a 09 09 09 09 09 69 66 |..endif.|......if|
|00001c70| 20 77 49 6e 64 65 78 20 | 21 3d 20 41 4c 45 4e 28 | wIndex |!= ALEN(|
|00001c80| 61 44 42 53 74 72 75 63 | 74 29 0d 0a 09 09 09 09 |aDBStruc|t)......|
|00001c90| 09 09 63 53 74 61 74 65 | 6d 65 6e 74 20 2b 3d 20 |..cState|ment += |
|00001ca0| 22 2c 20 22 0d 0a 09 09 | 09 09 09 65 6e 64 69 66 |", "....|...endif|
|00001cb0| 0d 0a 09 09 09 09 4e 45 | 58 54 0d 0a 09 09 09 09 |......NE|XT......|
|00001cc0| 63 53 74 61 74 65 6d 65 | 6e 74 20 2b 3d 20 22 29 |cStateme|nt += ")|
|00001cd0| 22 20 0d 0a 0d 0a 09 09 | 09 09 6f 44 43 53 74 61 |" ......|..oDCSta|
|00001ce0| 74 65 6d 65 6e 74 54 65 | 78 74 3a 54 65 78 74 56 |tementTe|xt:TextV|
|00001cf0| 61 6c 75 65 20 3a 3d 20 | 63 53 74 61 74 65 6d 65 |alue := |cStateme|
|00001d00| 6e 74 0d 0a 09 09 09 09 | 0d 0a 09 09 09 09 6f 54 |nt......|......oT|
|00001d10| 42 20 3a 3d 20 54 65 78 | 74 42 6f 78 7b 73 65 6c |B := Tex|tBox{sel|
|00001d20| 66 2c 20 3b 0d 0a 09 09 | 09 09 09 09 09 09 22 53 |f, ;....|......"S|
|00001d30| 51 4c 20 73 74 61 74 65 | 6d 65 6e 74 22 2c 20 3b |QL state|ment", ;|
|00001d40| 0d 0a 09 09 09 09 09 09 | 09 20 20 20 09 22 43 52 |........|. ."CR|
|00001d50| 45 41 54 45 20 54 41 42 | 4c 45 20 73 74 61 74 65 |EATE TAB|LE state|
|00001d60| 6d 65 6e 74 20 67 65 6e | 65 72 61 74 65 64 20 73 |ment gen|erated s|
|00001d70| 75 63 63 65 73 73 66 75 | 6c 6c 79 22 7d 0d 0a 09 |uccessfu|lly"}...|
|00001d80| 09 09 09 6f 54 42 3a 54 | 79 70 65 20 3a 3d 20 42 |...oTB:T|ype := B|
|00001d90| 55 54 54 4f 4e 4f 4b 41 | 59 0d 0a 09 09 09 09 6f |UTTONOKA|Y......o|
|00001da0| 54 42 3a 53 68 6f 77 28 | 29 0d 0a 09 09 09 65 6e |TB:Show(|).....en|
|00001db0| 64 69 66 0d 0a 09 09 65 | 6c 73 65 0d 0a 09 09 09 |dif....e|lse.....|
|00001dc0| 6f 54 42 20 3a 3d 20 54 | 65 78 74 42 6f 78 7b 09 |oTB := T|extBox{.|
|00001dd0| 73 65 6c 66 2c 20 3b 0d | 0a 09 09 09 09 09 09 09 |self, ;.|........|
|00001de0| 22 46 69 6c 65 20 4f 70 | 65 6e 20 45 72 72 6f 72 |"File Op|en Error|
|00001df0| 22 2c 20 3b 0d 0a 09 09 | 09 09 09 09 20 20 20 09 |", ;....|.... .|
|00001e00| 22 43 61 6e 6e 6f 74 20 | 6f 70 65 6e 20 22 20 2b |"Cannot |open " +|
|00001e10| 20 6f 4f 44 3a 46 69 6c | 65 4e 61 6d 65 20 2b 20 | oOD:Fil|eName + |
|00001e20| 22 20 2d 20 4e 6f 74 20 | 61 20 44 42 46 20 66 69 |" - Not |a DBF fi|
|00001e30| 6c 65 22 7d 0d 0a 09 09 | 09 6f 54 42 3a 54 79 70 |le"}....|.oTB:Typ|
|00001e40| 65 20 3a 3d 20 42 55 54 | 54 4f 4e 4f 4b 41 59 0d |e := BUT|TONOKAY.|
|00001e50| 0a 09 09 09 6f 54 42 3a | 53 68 6f 77 28 29 0d 0a |....oTB:|Show()..|
|00001e60| 09 09 65 6e 64 69 66 0d | 0a 09 65 6e 64 69 66 0d |..endif.|..endif.|
|00001e70| 0a 20 0d 0a 00 4e 00 2d | 00 00 00 4d 45 54 48 4f |. ...N.-|...METHO|
|00001e80| 44 20 43 72 65 61 74 65 | 46 72 6f 6d 44 42 28 20 |D Create|FromDB( |
|00001e90| 29 20 43 4c 41 53 53 20 | 53 51 4c 53 74 6d 74 54 |) CLASS |SQLStmtT|
|00001ea0| 65 73 74 53 75 62 20 00 | 40 00 0f 00 00 00 53 51 |estSub .|@.....SQ|
|00001eb0| 4c 53 54 4d 54 54 45 53 | 54 53 55 42 00 51 00 02 |LSTMTTES|TSUB.Q..|
|00001ec0| 00 00 00 02 00 44 00 02 | 00 00 00 03 00 48 00 04 |.....D..|.....H..|
|00001ed0| 00 00 00 f7 55 a5 2e 4d | 00 02 00 00 00 17 00 45 |....U..M|.......E|
|00001ee0| 00 02 00 00 00 00 00 46 | 00 02 00 00 00 02 00 47 |.......F|.......G|
|00001ef0| 00 02 00 00 00 ff ff 49 | 00 02 00 00 00 00 00 41 |.......I|.......A|
|00001f00| 00 52 00 00 00 43 4c 41 | 53 53 20 53 51 4c 53 74 |.R...CLA|SS SQLSt|
|00001f10| 6d 74 54 65 73 74 53 75 | 62 20 49 4e 48 45 52 49 |mtTestSu|b INHERI|
|00001f20| 54 20 53 51 4c 53 74 6d | 74 54 65 73 74 0d 0a 09 |T SQLStm|tTest...|
|00001f30| 49 4e 53 54 41 4e 43 45 | 20 6f 43 6f 6e 6e 20 61 |INSTANCE| oConn a|
|00001f40| 73 20 53 51 4c 43 6f 6e | 6e 65 63 74 69 6f 6e 20 |s SQLCon|nection |
|00001f50| 0d 0a 09 09 0d 0a 00 4e | 00 29 00 00 00 43 4c 41 |.......N|.)...CLA|
|00001f60| 53 53 20 53 51 4c 53 74 | 6d 74 54 65 73 74 53 75 |SS SQLSt|mtTestSu|
|00001f70| 62 20 49 4e 48 45 52 49 | 54 20 53 51 4c 53 74 6d |b INHERI|T SQLStm|
|00001f80| 74 54 65 73 74 00 40 00 | 14 00 00 00 53 51 4c 53 |tTest.@.|....SQLS|
|00001f90| 54 4d 54 54 45 53 54 53 | 55 42 3a 49 4e 49 54 00 |TMTTESTS|UB:INIT.|
|00001fa0| 51 00 02 00 00 00 02 00 | 44 00 02 00 00 00 03 00 |Q.......|D.......|
|00001fb0| 48 00 04 00 00 00 0f fa | a7 2e 4d 00 02 00 00 00 |H.......|..M.....|
|00001fc0| 15 00 45 00 02 00 00 00 | 00 00 46 00 02 00 00 00 |..E.....|..F.....|
|00001fd0| 02 00 47 00 02 00 00 00 | ff ff 49 00 02 00 00 00 |..G.....|..I.....|
|00001fe0| 00 00 41 00 f8 00 00 00 | 4d 45 54 48 4f 44 20 49 |..A.....|METHOD I|
|00001ff0| 4e 49 54 28 6f 50 61 72 | 65 6e 74 2c 20 6f 43 6f |NIT(oPar|ent, oCo|
|00002000| 6e 6e 65 63 74 29 20 43 | 4c 41 53 53 20 53 51 4c |nnect) C|LASS SQL|
|00002010| 53 74 6d 74 54 65 73 74 | 53 75 62 0d 0a 0d 0a 73 |StmtTest|Sub....s|
|00002020| 75 70 65 72 3a 69 6e 69 | 74 28 6f 50 61 72 65 6e |uper:ini|t(oParen|
|00002030| 74 29 0d 0a 6f 43 6f 6e | 6e 20 3a 3d 20 6f 43 6f |t)..oCon|n := oCo|
|00002040| 6e 6e 65 63 74 20 0d 0a | 6f 44 43 41 75 74 6f 43 |nnect ..|oDCAutoC|
|00002050| 6f 6d 6d 69 74 3a 43 68 | 65 63 6b 65 64 20 3a 3d |ommit:Ch|ecked :=|
|00002060| 20 54 52 55 45 20 0d 0a | 0d 0a 6f 43 6f 6e 6e 3a | TRUE ..|..oConn:|
|00002070| 53 65 74 43 6f 6e 6e 65 | 63 74 4f 70 74 69 6f 6e |SetConne|ctOption|
|00002080| 28 53 51 4c 5f 41 55 54 | 4f 43 4f 4d 4d 49 54 2c |(SQL_AUT|OCOMMIT,|
|00002090| 31 29 20 0d 0a 09 09 09 | 0d 0a 6f 43 43 43 68 65 |1) .....|..oCCChe|
|000020a0| 63 6b 70 6f 69 6e 74 3a | 44 69 73 61 62 6c 65 28 |ckpoint:|Disable(|
|000020b0| 29 0d 0a 6f 43 43 52 6f | 6c 6c 62 61 63 6b 3a 44 |)..oCCRo|llback:D|
|000020c0| 69 73 61 62 6c 65 28 29 | 20 0d 0a 09 20 0d 0a 72 |isable()| ... ..r|
|000020d0| 65 74 75 72 6e 20 73 65 | 6c 66 20 0d 0a 0d 0a 00 |eturn se|lf .....|
|000020e0| 4e 00 34 00 00 00 4d 45 | 54 48 4f 44 20 49 4e 49 |N.4...ME|THOD INI|
|000020f0| 54 28 6f 50 61 72 65 6e | 74 2c 20 6f 43 6f 6e 6e |T(oParen|t, oConn|
|00002100| 65 63 74 29 20 43 4c 41 | 53 53 20 53 51 4c 53 74 |ect) CLA|SS SQLSt|
|00002110| 6d 74 54 65 73 74 53 75 | 62 00 40 00 1a 00 00 00 |mtTestSu|b.@.....|
|00002120| 53 51 4c 53 54 4d 54 54 | 45 53 54 53 55 42 3a 43 |SQLSTMTT|ESTSUB:C|
|00002130| 48 45 43 4b 50 4f 49 4e | 54 00 51 00 02 00 00 00 |HECKPOIN|T.Q.....|
|00002140| 02 00 44 00 02 00 00 00 | 03 00 48 00 04 00 00 00 |..D.....|..H.....|
|00002150| 0f fa a7 2e 4d 00 02 00 | 00 00 15 00 45 00 02 00 |....M...|....E...|
|00002160| 00 00 00 00 46 00 02 00 | 00 00 02 00 47 00 02 00 |....F...|....G...|
|00002170| 00 00 ff ff 49 00 02 00 | 00 00 00 00 41 00 73 01 |....I...|....A.s.|
|00002180| 00 00 4d 45 54 48 4f 44 | 20 43 68 65 63 6b 70 6f |..METHOD| Checkpo|
|00002190| 69 6e 74 28 20 29 20 43 | 4c 41 53 53 20 53 51 4c |int( ) C|LASS SQL|
|000021a0| 53 74 6d 74 54 65 73 74 | 53 75 62 0d 0a 0d 0a 09 |StmtTest|Sub.....|
|000021b0| 6c 6f 63 61 6c 20 6f 53 | 74 6d 74 20 09 61 73 20 |local oS|tmt .as |
|000021c0| 53 51 4c 53 74 61 74 65 | 6d 65 6e 74 0d 0a 0d 0a |SQLState|ment....|
|000021d0| 09 6f 53 74 6d 74 20 3a | 3d 20 53 51 4c 53 74 61 |.oStmt :|= SQLSta|
|000021e0| 74 65 6d 65 6e 74 7b 20 | 2c 20 6f 43 6f 6e 6e 20 |tement{ |, oConn |
|000021f0| 7d 0d 0a 09 0d 0a 09 6f | 53 74 6d 74 3a 43 6f 6d |}......o|Stmt:Com|
|00002200| 6d 69 74 28 29 0d 0a 20 | 20 20 20 0d 0a 09 69 66 |mit().. | ...if|
|00002210| 20 49 73 4e 69 6c 28 20 | 6f 53 74 6d 74 3a 53 74 | IsNil( |oStmt:St|
|00002220| 61 74 75 73 20 29 0d 0a | 09 20 20 20 20 20 4d 65 |atus )..|. Me|
|00002230| 73 73 61 67 65 42 6f 78 | 28 20 30 2c 20 73 74 72 |ssageBox|( 0, str|
|00002240| 69 6e 67 32 70 73 7a 28 | 22 43 4f 4d 4d 49 54 20 |ing2psz(|"COMMIT |
|00002250| 73 75 63 63 65 73 73 66 | 75 6c 22 29 2c 20 20 3b |successf|ul"), ;|
|00002260| 0d 0a 09 09 20 09 20 20 | 09 20 20 73 74 72 69 6e |.... . |. strin|
|00002270| 67 32 70 73 7a 28 22 53 | 51 4c 20 53 74 61 74 65 |g2psz("S|QL State|
|00002280| 6d 65 6e 74 22 29 2c 20 | 4d 42 5f 49 43 4f 4e 49 |ment"), |MB_ICONI|
|00002290| 4e 46 4f 52 4d 41 54 49 | 4f 4e 29 0d 0a 09 65 6c |NFORMATI|ON)...el|
|000022a0| 73 65 0d 0a 09 09 53 68 | 6f 77 45 72 72 6f 72 28 |se....Sh|owError(|
|000022b0| 20 6f 53 74 6d 74 3a 45 | 72 72 49 6e 66 6f 20 29 | oStmt:E|rrInfo )|
|000022c0| 20 20 20 20 0d 0a 09 65 | 6e 64 69 66 20 20 20 20 | ...e|ndif |
|000022d0| 0d 0a 0d 0a 09 6f 53 74 | 6d 74 3a 46 72 65 65 53 |.....oSt|mt:FreeS|
|000022e0| 74 6d 74 28 20 53 51 4c | 5f 44 52 4f 50 20 29 0d |tmt( SQL|_DROP ).|
|000022f0| 0a 09 0d 0a 00 4e 00 2a | 00 00 00 4d 45 54 48 4f |.....N.*|...METHO|
|00002300| 44 20 43 68 65 63 6b 70 | 6f 69 6e 74 28 20 29 20 |D Checkp|oint( ) |
|00002310| 43 4c 41 53 53 20 53 51 | 4c 53 74 6d 74 54 65 73 |CLASS SQ|LStmtTes|
|00002320| 74 53 75 62 00 40 00 15 | 00 00 00 53 54 41 4e 44 |tSub.@..|...STAND|
|00002330| 41 52 44 53 51 4c 44 49 | 41 4c 4f 47 53 55 42 00 |ARDSQLDI|ALOGSUB.|
|00002340| 51 00 02 00 00 00 02 00 | 44 00 02 00 00 00 03 00 |Q.......|D.......|
|00002350| 48 00 04 00 00 00 dd f3 | a7 2e 4d 00 02 00 00 00 |H.......|..M.....|
|00002360| 17 00 45 00 02 00 00 00 | 00 00 46 00 02 00 00 00 |..E.....|..F.....|
|00002370| 02 00 47 00 02 00 00 00 | ff ff 49 00 02 00 00 00 |..G.....|..I.....|
|00002380| 00 00 41 00 b5 00 00 00 | 43 4c 41 53 53 20 53 74 |..A.....|CLASS St|
|00002390| 61 6e 64 61 72 64 53 51 | 4c 44 69 61 6c 6f 67 53 |andardSQ|LDialogS|
|000023a0| 75 62 20 49 4e 48 45 52 | 49 54 20 53 74 61 6e 64 |ub INHER|IT Stand|
|000023b0| 61 72 64 53 51 4c 44 69 | 61 6c 6f 67 20 0d 0a 09 |ardSQLDi|alog ...|
|000023c0| 49 4e 53 54 41 4e 43 45 | 20 6f 43 6f 6e 6e 20 61 |INSTANCE| oConn a|
|000023d0| 73 20 53 51 4c 43 6f 6e | 6e 65 63 74 69 6f 6e 0d |s SQLCon|nection.|
|000023e0| 0a 09 49 4e 53 54 41 4e | 43 45 20 6f 54 61 62 6c |..INSTAN|CE oTabl|
|000023f0| 65 73 20 61 73 20 53 51 | 4c 4c 69 73 74 54 61 62 |es as SQ|LListTab|
|00002400| 6c 65 73 0d 0a 09 49 4e | 53 54 41 4e 43 45 20 6f |les...IN|STANCE o|
|00002410| 53 65 6c 65 63 74 20 61 | 73 20 53 51 4c 53 65 6c |Select a|s SQLSel|
|00002420| 65 63 74 0d 0a 09 49 4e | 53 54 41 4e 43 45 20 6f |ect...IN|STANCE o|
|00002430| 4d 79 50 61 72 65 6e 74 | 0d 0a 0d 0a 00 4e 00 36 |MyParent|.....N.6|
|00002440| 00 00 00 43 4c 41 53 53 | 20 53 74 61 6e 64 61 72 |...CLASS| Standar|
|00002450| 64 53 51 4c 44 69 61 6c | 6f 67 53 75 62 20 49 4e |dSQLDial|ogSub IN|
|00002460| 48 45 52 49 54 20 53 74 | 61 6e 64 61 72 64 53 51 |HERIT St|andardSQ|
|00002470| 4c 44 69 61 6c 6f 67 20 | 00 40 00 1a 00 00 00 53 |LDialog |.@.....S|
|00002480| 54 41 4e 44 41 52 44 53 | 51 4c 44 49 41 4c 4f 47 |TANDARDS|QLDIALOG|
|00002490| 53 55 42 3a 49 4e 49 54 | 00 51 00 02 00 00 00 02 |SUB:INIT|.Q......|
|000024a0| 00 44 00 02 00 00 00 03 | 00 48 00 04 00 00 00 0f |.D......|.H......|
|000024b0| fa a7 2e 4d 00 02 00 00 | 00 15 00 45 00 02 00 00 |...M....|...E....|
|000024c0| 00 00 00 46 00 02 00 00 | 00 02 00 47 00 02 00 00 |...F....|...G....|
|000024d0| 00 ff ff 49 00 02 00 00 | 00 00 00 41 00 a3 00 00 |...I....|...A....|
|000024e0| 00 4d 45 54 48 4f 44 20 | 49 4e 49 54 28 6f 50 61 |.METHOD |INIT(oPa|
|000024f0| 72 65 6e 74 2c 20 6f 43 | 6f 6e 6e 65 63 74 29 20 |rent, oC|onnect) |
|00002500| 43 4c 41 53 53 20 53 74 | 61 6e 64 61 72 64 53 51 |CLASS St|andardSQ|
|00002510| 4c 44 69 61 6c 6f 67 53 | 75 62 20 0d 0a 0d 0a 73 |LDialogS|ub ....s|
|00002520| 75 70 65 72 3a 69 6e 69 | 74 28 6f 50 61 72 65 6e |uper:ini|t(oParen|
|00002530| 74 29 0d 0a 0d 0a 6f 4d | 79 50 61 72 65 6e 74 20 |t)....oM|yParent |
|00002540| 3a 3d 20 6f 50 61 72 65 | 6e 74 0d 0a 6f 43 6f 6e |:= oPare|nt..oCon|
|00002550| 6e 20 3a 3d 20 6f 43 6f | 6e 6e 65 63 74 0d 0a 73 |n := oCo|nnect..s|
|00002560| 65 6c 66 3a 47 65 74 54 | 61 62 6c 65 73 28 29 0d |elf:GetT|ables().|
|00002570| 0a 0d 0a 72 65 74 75 72 | 6e 20 73 65 6c 66 0d 0a |...retur|n self..|
|00002580| 20 0d 0a 00 4e 00 3b 00 | 00 00 4d 45 54 48 4f 44 | ...N.;.|..METHOD|
|00002590| 20 49 4e 49 54 28 6f 50 | 61 72 65 6e 74 2c 20 6f | INIT(oP|arent, o|
|000025a0| 43 6f 6e 6e 65 63 74 29 | 20 43 4c 41 53 53 20 53 |Connect)| CLASS S|
|000025b0| 74 61 6e 64 61 72 64 53 | 51 4c 44 69 61 6c 6f 67 |tandardS|QLDialog|
|000025c0| 53 75 62 20 00 40 00 1b | 00 00 00 53 51 4c 53 54 |Sub .@..|...SQLST|
|000025d0| 4d 54 54 45 53 54 53 55 | 42 3a 42 55 54 54 4f 4e |MTTESTSU|B:BUTTON|
|000025e0| 43 4c 49 43 4b 00 51 00 | 02 00 00 00 02 00 44 00 |CLICK.Q.|......D.|
|000025f0| 02 00 00 00 03 00 48 00 | 04 00 00 00 0f fa a7 2e |......H.|........|
|00002600| 4d 00 02 00 00 00 15 00 | 45 00 02 00 00 00 00 00 |M.......|E.......|
|00002610| 46 00 02 00 00 00 02 00 | 47 00 02 00 00 00 ff ff |F.......|G.......|
|00002620| 49 00 02 00 00 00 00 00 | 41 00 9f 01 00 00 4d 45 |I.......|A.....ME|
|00002630| 54 48 4f 44 20 42 75 74 | 74 6f 6e 43 6c 69 63 6b |THOD But|tonClick|
|00002640| 28 20 6f 43 6f 6e 74 72 | 6f 6c 45 76 65 6e 74 20 |( oContr|olEvent |
|00002650| 29 20 43 4c 41 53 53 20 | 53 51 4c 53 74 6d 74 54 |) CLASS |SQLStmtT|
|00002660| 65 73 74 53 75 62 09 0d | 0a 0d 0a 09 73 75 70 65 |estSub..|....supe|
|00002670| 72 3a 42 75 74 74 6f 6e | 43 6c 69 63 6b 28 20 6f |r:Button|Click( o|
|00002680| 43 6f 6e 74 72 6f 6c 45 | 76 65 6e 74 20 29 0d 0a |ControlE|vent )..|
|00002690| 09 0d 0a 09 69 66 20 6f | 43 6f 6e 74 72 6f 6c 45 |....if o|ControlE|
|000026a0| 76 65 6e 74 3a 43 6f 6e | 74 72 6f 6c 20 3d 3d 20 |vent:Con|trol == |
|000026b0| 6f 44 43 41 75 74 6f 43 | 6f 6d 6d 69 74 20 0d 0a |oDCAutoC|ommit ..|
|000026c0| 09 09 69 66 20 6f 44 43 | 41 75 74 6f 43 6f 6d 6d |..if oDC|AutoComm|
|000026d0| 69 74 3a 43 68 65 63 6b | 65 64 20 0d 0a 09 09 09 |it:Check|ed .....|
|000026e0| 6f 43 6f 6e 6e 3a 53 65 | 74 43 6f 6e 6e 65 63 74 |oConn:Se|tConnect|
|000026f0| 4f 70 74 69 6f 6e 28 53 | 51 4c 5f 41 55 54 4f 43 |Option(S|QL_AUTOC|
|00002700| 4f 4d 4d 49 54 2c 31 29 | 20 0d 0a 09 09 09 0d 0a |OMMIT,1)| .......|
|00002710| 09 09 09 6f 43 43 43 68 | 65 63 6b 70 6f 69 6e 74 |...oCCCh|eckpoint|
|00002720| 3a 44 69 73 61 62 6c 65 | 28 29 0d 0a 09 09 09 6f |:Disable|().....o|
|00002730| 43 43 52 6f 6c 6c 62 61 | 63 6b 3a 44 69 73 61 62 |CCRollba|ck:Disab|
|00002740| 6c 65 28 29 20 0d 0a 09 | 09 65 6c 73 65 0d 0a 09 |le() ...|.else...|
|00002750| 09 09 6f 43 6f 6e 6e 3a | 53 65 74 43 6f 6e 6e 65 |..oConn:|SetConne|
|00002760| 63 74 4f 70 74 69 6f 6e | 28 53 51 4c 5f 41 55 54 |ctOption|(SQL_AUT|
|00002770| 4f 43 4f 4d 4d 49 54 2c | 30 29 20 0d 0a 09 09 09 |OCOMMIT,|0) .....|
|00002780| 0d 0a 09 09 09 6f 43 43 | 43 68 65 63 6b 70 6f 69 |.....oCC|Checkpoi|
|00002790| 6e 74 3a 45 6e 61 62 6c | 65 28 29 0d 0a 09 09 09 |nt:Enabl|e().....|
|000027a0| 6f 43 43 52 6f 6c 6c 62 | 61 63 6b 3a 45 6e 61 62 |oCCRollb|ack:Enab|
|000027b0| 6c 65 28 29 20 0d 0a 09 | 09 65 6e 64 69 66 0d 0a |le() ...|.endif..|
|000027c0| 09 65 6e 64 69 66 09 0d | 0a 20 0d 0a 00 4e 00 3a |.endif..|. ...N.:|
|000027d0| 00 00 00 4d 45 54 48 4f | 44 20 42 75 74 74 6f 6e |...METHO|D Button|
|000027e0| 43 6c 69 63 6b 28 20 6f | 43 6f 6e 74 72 6f 6c 45 |Click( o|ControlE|
|000027f0| 76 65 6e 74 20 29 20 43 | 4c 41 53 53 20 53 51 4c |vent ) C|LASS SQL|
|00002800| 53 74 6d 74 54 65 73 74 | 53 75 62 09 00 40 00 1d |StmtTest|Sub..@..|
|00002810| 00 00 00 53 54 41 4e 44 | 41 52 44 53 48 45 4c 4c |...STAND|ARDSHELL|
|00002820| 57 49 4e 44 4f 57 3a 41 | 44 44 43 48 49 4c 44 00 |WINDOW:A|DDCHILD.|
|00002830| 51 00 02 00 00 00 02 00 | 44 00 02 00 00 00 03 00 |Q.......|D.......|
|00002840| 48 00 04 00 00 00 0f fa | a7 2e 4d 00 02 00 00 00 |H.......|..M.....|
|00002850| 15 00 45 00 02 00 00 00 | 00 00 46 00 02 00 00 00 |..E.....|..F.....|
|00002860| 02 00 47 00 02 00 00 00 | ff ff 49 00 02 00 00 00 |..G.....|..I.....|
|00002870| 00 00 41 00 5f 00 00 00 | 4d 45 54 48 4f 44 20 41 |..A._...|METHOD A|
|00002880| 64 64 43 68 69 6c 64 28 | 20 6f 4e 65 77 43 68 69 |ddChild(| oNewChi|
|00002890| 6c 64 20 29 20 43 4c 41 | 53 53 20 53 74 61 6e 64 |ld ) CLA|SS Stand|
|000028a0| 61 72 64 53 68 65 6c 6c | 57 69 6e 64 6f 77 0d 0a |ardShell|Window..|
|000028b0| 0d 0a 09 61 61 64 64 28 | 61 43 68 69 6c 64 57 69 |...aadd(|aChildWi|
|000028c0| 6e 64 6f 77 73 2c 20 6f | 4e 65 77 43 68 69 6c 64 |ndows, o|NewChild|
|000028d0| 29 0d 0a 20 0d 0a 00 4e | 00 37 00 00 00 4d 45 54 |).. ...N|.7...MET|
|000028e0| 48 4f 44 20 41 64 64 43 | 68 69 6c 64 28 20 6f 4e |HOD AddC|hild( oN|
|000028f0| 65 77 43 68 69 6c 64 20 | 29 20 43 4c 41 53 53 20 |ewChild |) CLASS |
|00002900| 53 74 61 6e 64 61 72 64 | 53 68 65 6c 6c 57 69 6e |Standard|ShellWin|
|00002910| 64 6f 77 00 40 00 0c 00 | 00 00 53 51 4c 53 54 4d |dow.@...|..SQLSTM|
|00002920| 54 54 45 53 54 00 51 00 | 02 00 00 00 02 00 44 00 |TTEST.Q.|......D.|
|00002930| 02 00 00 00 0a 00 48 00 | 04 00 00 00 66 bb b6 2e |......H.|....f...|
|00002940| 4d 00 02 00 00 00 0a 00 | 45 00 02 00 00 00 00 00 |M.......|E.......|
|00002950| 46 00 02 00 00 00 02 00 | 47 00 02 00 00 00 ff ff |F.......|G.......|
|00002960| 49 00 02 00 00 00 00 00 | 42 00 a2 09 00 00 53 51 |I.......|B.....SQ|
|00002970| 4c 53 74 6d 74 54 65 73 | 74 00 00 00 00 00 00 00 |LStmtTes|t.......|
|00002980| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002990| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 46 |........|.......F|
|000029b0| 4f 52 4d 3a 44 49 41 4c | 4f 47 57 49 4e 44 4f 57 |ORM:DIAL|OGWINDOW|
|000029c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029f0| 53 51 4c 20 53 74 61 74 | 65 6d 65 6e 74 20 50 72 |SQL Stat|ement Pr|
|00002a00| 6f 63 65 73 73 6f 72 00 | 00 00 00 00 00 00 00 00 |ocessor.|........|
|00002a10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a30| 00 05 00 0a 00 f5 01 c8 | 00 00 00 ff ff 00 00 00 |........|........|
|00002a40| 00 80 00 c8 80 01 00 00 | 00 6d 00 48 79 70 65 72 |........|.m.Hyper|
|00002a50| 4c 61 62 65 6c 28 2c 22 | 53 51 4c 20 53 74 61 74 |Label(,"|SQL Stat|
|00002a60| 65 6d 65 6e 74 20 50 72 | 6f 63 65 73 73 6f 72 22 |ement Pr|ocessor"|
|00002a70| 2c 2c 29 00 48 79 70 65 | 72 4c 61 62 65 6c 28 2c |,,).Hype|rLabel(,|
|00002a80| 2c 22 45 78 65 63 75 74 | 65 20 61 20 53 51 4c 53 |,"Execut|e a SQLS|
|00002a90| 74 61 74 65 6d 65 6e 74 | 22 2c 29 00 48 79 70 65 |tatement|",).Hype|
|00002aa0| 72 4c 61 62 65 6c 28 23 | 53 51 4c 53 74 6d 74 54 |rLabel(#|SQLStmtT|
|00002ab0| 65 73 74 2c 2c 2c 29 00 | 53 74 61 74 65 6d 65 6e |est,,,).|Statemen|
|00002ac0| 74 54 65 78 74 00 00 00 | 00 00 00 00 00 00 00 00 |tText...|........|
|00002ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002af0| 00 00 00 00 00 00 00 01 | 00 43 4f 4e 54 52 4f 4c |........|.CONTROL|
|00002b00| 3a 54 45 58 54 43 4f 4e | 54 52 4f 4c 3a 45 44 49 |:TEXTCON|TROL:EDI|
|00002b10| 54 3a 4d 55 4c 54 49 4c | 49 4e 45 45 44 49 54 00 |T:MULTIL|INEEDIT.|
|00002b20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b70| 00 00 00 00 00 00 00 00 | 00 00 00 08 00 0c 00 d9 |........|........|
|00002b80| 01 58 00 02 00 ff ff 00 | 00 00 00 44 00 81 40 00 |.X......|...D..@.|
|00002b90| 00 00 00 1e 00 48 79 70 | 65 72 4c 61 62 65 6c 28 |.....Hyp|erLabel(|
|00002ba0| 23 53 74 61 74 65 6d 65 | 6e 74 54 65 78 74 2c 2c |#Stateme|ntText,,|
|00002bb0| 2c 29 00 45 78 65 63 75 | 74 65 42 75 74 74 6f 6e |,).Execu|teButton|
|00002bc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002bf0| 00 00 02 00 43 4f 4e 54 | 52 4f 4c 3a 54 45 58 54 |....CONT|ROL:TEXT|
|00002c00| 43 4f 4e 54 52 4f 4c 3a | 42 55 54 54 4f 4e 3a 50 |CONTROL:|BUTTON:P|
|00002c10| 55 53 48 42 55 54 54 4f | 4e 00 00 00 00 00 00 00 |USHBUTTO|N.......|
|00002c20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c30| 00 00 00 00 00 45 78 65 | 63 75 74 65 00 00 00 00 |.....Exe|cute....|
|00002c40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c70| 00 00 00 00 00 00 09 00 | 61 00 8f 00 79 00 02 00 |........|a...y...|
|00002c80| ff ff 00 00 00 00 00 00 | 01 40 00 00 00 00 62 00 |........|.@....b.|
|00002c90| 48 79 70 65 72 4c 61 62 | 65 6c 28 2c 22 45 78 65 |HyperLab|el(,"Exe|
|00002ca0| 63 75 74 65 22 2c 2c 29 | 00 48 79 70 65 72 4c 61 |cute",,)|.HyperLa|
|00002cb0| 62 65 6c 28 2c 2c 22 45 | 78 65 63 75 74 65 20 74 |bel(,,"E|xecute t|
|00002cc0| 68 65 20 53 51 4c 20 53 | 74 61 74 65 6d 65 6e 74 |he SQL S|tatement|
|00002cd0| 22 2c 29 00 48 79 70 65 | 72 4c 61 62 65 6c 28 23 |",).Hype|rLabel(#|
|00002ce0| 45 78 65 63 75 74 65 42 | 75 74 74 6f 6e 2c 2c 2c |ExecuteB|utton,,,|
|00002cf0| 29 00 43 72 65 61 74 65 | 46 72 6f 6d 44 42 00 00 |).Create|FromDB..|
|00002d00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002d10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002d20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002d30| 00 03 00 43 4f 4e 54 52 | 4f 4c 3a 54 45 58 54 43 |...CONTR|OL:TEXTC|
|00002d40| 4f 4e 54 52 4f 4c 3a 42 | 55 54 54 4f 4e 3a 50 55 |ONTROL:B|UTTON:PU|
|00002d50| 53 48 42 55 54 54 4f 4e | 00 00 00 00 00 00 00 00 |SHBUTTON|........|
|00002d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002d70| 00 00 00 00 43 72 65 61 | 74 65 20 54 61 62 6c 65 |....Crea|te Table|
|00002d80| 20 66 72 6f 6d 20 44 42 | 00 00 00 00 00 00 00 00 | from DB|........|
|00002d90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002da0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002db0| 00 00 00 00 00 09 00 82 | 00 8f 00 98 00 02 00 ff |........|........|
|00002dc0| ff 00 00 00 00 00 00 01 | 40 00 00 00 00 80 00 48 |........|@......H|
|00002dd0| 79 70 65 72 4c 61 62 65 | 6c 28 2c 22 43 72 65 61 |yperLabe|l(,"Crea|
|00002de0| 74 65 20 54 61 62 6c 65 | 20 66 72 6f 6d 20 44 42 |te Table| from DB|
|00002df0| 22 2c 2c 29 00 48 79 70 | 65 72 4c 61 62 65 6c 28 |",,).Hyp|erLabel(|
|00002e00| 2c 2c 22 47 65 6e 65 72 | 61 74 65 20 27 43 72 65 |,,"Gener|ate 'Cre|
|00002e10| 61 74 65 20 74 61 62 6c | 65 2e 2e 2e 27 20 75 73 |ate tabl|e...' us|
|00002e20| 69 6e 67 20 64 62 61 73 | 65 20 66 69 6c 65 22 2c |ing dbas|e file",|
|00002e30| 29 00 48 79 70 65 72 4c | 61 62 65 6c 28 23 43 72 |).HyperL|abel(#Cr|
|00002e40| 65 61 74 65 46 72 6f 6d | 44 42 2c 2c 2c 29 00 43 |eateFrom|DB,,,).C|
|00002e50| 68 65 63 6b 70 6f 69 6e | 74 00 00 00 00 00 00 00 |heckpoin|t.......|
|00002e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002e80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 04 00 |........|........|
|00002e90| 43 4f 4e 54 52 4f 4c 3a | 54 45 58 54 43 4f 4e 54 |CONTROL:|TEXTCONT|
|00002ea0| 52 4f 4c 3a 42 55 54 54 | 4f 4e 3a 50 55 53 48 42 |ROL:BUTT|ON:PUSHB|
|00002eb0| 55 54 54 4f 4e 00 00 00 | 00 00 00 00 00 00 00 00 |UTTON...|........|
|00002ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ed0| 00 43 6f 6d 6d 69 74 00 | 00 00 00 00 00 00 00 00 |.Commit.|........|
|00002ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f10| 00 00 af 00 62 00 35 01 | 78 00 02 00 ff ff 00 00 |....b.5.|x.......|
|00002f20| 00 00 00 00 01 40 00 00 | 00 00 57 00 48 79 70 65 |.....@..|..W.Hype|
|00002f30| 72 4c 61 62 65 6c 28 2c | 22 43 6f 6d 6d 69 74 22 |rLabel(,|"Commit"|
|00002f40| 2c 2c 29 00 48 79 70 65 | 72 4c 61 62 65 6c 28 2c |,,).Hype|rLabel(,|
|00002f50| 2c 22 43 68 65 63 6b 70 | 6f 69 6e 74 20 63 68 61 |,"Checkp|oint cha|
|00002f60| 6e 67 65 73 22 2c 29 00 | 48 79 70 65 72 4c 61 62 |nges",).|HyperLab|
|00002f70| 65 6c 28 23 43 68 65 63 | 6b 70 6f 69 6e 74 2c 2c |el(#Chec|kpoint,,|
|00002f80| 2c 29 00 52 6f 6c 6c 62 | 61 63 6b 00 00 00 00 00 |,).Rollb|ack.....|
|00002f90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002fa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002fb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002fc0| 00 00 05 00 43 4f 4e 54 | 52 4f 4c 3a 54 45 58 54 |....CONT|ROL:TEXT|
|00002fd0| 43 4f 4e 54 52 4f 4c 3a | 42 55 54 54 4f 4e 3a 50 |CONTROL:|BUTTON:P|
|00002fe0| 55 53 48 42 55 54 54 4f | 4e 00 00 00 00 00 00 00 |USHBUTTO|N.......|
|00002ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003000| 00 00 00 00 00 52 6f 6c | 6c 62 61 63 6b 00 00 00 |.....Rol|lback...|
|00003010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003040| 00 00 00 00 00 00 af 00 | 82 00 35 01 98 00 02 00 |........|..5.....|
|00003050| ff ff 00 00 00 00 00 00 | 01 40 00 00 00 00 55 00 |........|.@....U.|
|00003060| 48 79 70 65 72 4c 61 62 | 65 6c 28 2c 22 52 6f 6c |HyperLab|el(,"Rol|
|00003070| 6c 62 61 63 6b 22 2c 2c | 29 00 48 79 70 65 72 4c |lback",,|).HyperL|
|00003080| 61 62 65 6c 28 2c 2c 22 | 52 6f 6c 6c 62 61 63 6b |abel(,,"|Rollback|
|00003090| 20 63 68 61 6e 67 65 73 | 22 2c 29 00 48 79 70 65 | changes|",).Hype|
|000030a0| 72 4c 61 62 65 6c 28 23 | 52 6f 6c 6c 62 61 63 6b |rLabel(#|Rollback|
|000030b0| 2c 2c 2c 29 00 41 75 74 | 6f 43 6f 6d 6d 69 74 00 |,,,).Aut|oCommit.|
|000030c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000030d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000030e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000030f0| 00 00 00 00 06 00 43 4f | 4e 54 52 4f 4c 3a 54 45 |......CO|NTROL:TE|
|00003100| 58 54 43 4f 4e 54 52 4f | 4c 3a 42 55 54 54 4f 4e |XTCONTRO|L:BUTTON|
|00003110| 3a 43 48 45 43 4b 42 4f | 58 00 00 00 00 00 00 00 |:CHECKBO|X.......|
|00003120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003130| 00 00 00 00 00 00 00 41 | 75 74 6f 43 6f 6d 6d 69 |.......A|utoCommi|
|00003140| 74 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |t.......|........|
|00003150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003170| 00 00 00 00 00 00 00 00 | 6b 01 64 00 d2 01 76 00 |........|k.d...v.|
|00003180| 02 00 ff ff 00 00 00 00 | 03 00 01 40 00 00 00 00 |........|...@....|
|00003190| 62 00 48 79 70 65 72 4c | 61 62 65 6c 28 2c 22 41 |b.HyperL|abel(,"A|
|000031a0| 75 74 6f 43 6f 6d 6d 69 | 74 22 2c 2c 29 00 48 79 |utoCommi|t",,).Hy|
|000031b0| 70 65 72 4c 61 62 65 6c | 28 2c 2c 22 54 75 72 6e |perLabel|(,,"Turn|
|000031c0| 20 41 75 74 6f 63 6f 6d | 6d 69 74 20 4f 4e 20 6f | Autocom|mit ON o|
|000031d0| 72 20 4f 46 46 22 2c 29 | 00 48 79 70 65 72 4c 61 |r OFF",)|.HyperLa|
|000031e0| 62 65 6c 28 23 41 75 74 | 6f 43 6f 6d 6d 69 74 2c |bel(#Aut|oCommit,|
|000031f0| 2c 2c 29 00 43 61 6e 63 | 65 6c 42 75 74 74 6f 6e |,,).Canc|elButton|
|00003200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003230| 00 00 00 07 00 43 4f 4e | 54 52 4f 4c 3a 54 45 58 |.....CON|TROL:TEX|
|00003240| 54 43 4f 4e 54 52 4f 4c | 3a 42 55 54 54 4f 4e 3a |TCONTROL|:BUTTON:|
|00003250| 50 55 53 48 42 55 54 54 | 4f 4e 00 00 00 00 00 00 |PUSHBUTT|ON......|
|00003260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003270| 00 00 00 00 00 00 43 61 | 6e 63 65 6c 00 00 00 00 |......Ca|ncel....|
|00003280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000032a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000032b0| 00 00 00 00 00 00 00 55 | 01 82 00 db 01 9a 00 02 |.......U|........|
|000032c0| 00 ff ff 00 00 00 00 00 | 00 01 40 00 00 00 00 35 |........|..@....5|
|000032d0| 00 48 79 70 65 72 4c 61 | 62 65 6c 28 2c 22 43 61 |.HyperLa|bel(,"Ca|
|000032e0| 6e 63 65 6c 22 2c 2c 29 | 00 48 79 70 65 72 4c 61 |ncel",,)|.HyperLa|
|000032f0| 62 65 6c 28 23 43 61 6e | 63 65 6c 42 75 74 74 6f |bel(#Can|celButto|
|00003300| 6e 2c 2c 2c 29 00 00 00 | 00 00 00 00 00 00 00 00 |n,,,)...|........|
|00003310| 51 00 02 00 00 00 02 00 | 52 00 02 00 00 00 03 00 |Q.......|R.......|
|00003320| 4f 00 0e 00 00 00 04 00 | 53 51 4c 53 54 4d 54 54 |O.......|SQLSTMTT|
|00003330| 45 53 54 00 4f 00 1c 00 | 00 00 03 00 53 51 4c 53 |EST.O...|....SQLS|
|00003340| 54 4d 54 54 45 53 54 5f | 53 54 41 54 45 4d 45 4e |TMTTEST_|STATEMEN|
|00003350| 54 54 45 58 54 00 4f 00 | 1c 00 00 00 03 00 53 51 |TTEXT.O.|......SQ|
|00003360| 4c 53 54 4d 54 54 45 53 | 54 5f 45 58 45 43 55 54 |LSTMTTES|T_EXECUT|
|00003370| 45 42 55 54 54 4f 4e 00 | 4f 00 1b 00 00 00 03 00 |EBUTTON.|O.......|
|00003380| 53 51 4c 53 54 4d 54 54 | 45 53 54 5f 43 52 45 41 |SQLSTMTT|EST_CREA|
|00003390| 54 45 46 52 4f 4d 44 42 | 00 4f 00 19 00 00 00 03 |TEFROMDB|.O......|
|000033a0| 00 53 51 4c 53 54 4d 54 | 54 45 53 54 5f 43 48 45 |.SQLSTMT|TEST_CHE|
|000033b0| 43 4b 50 4f 49 4e 54 00 | 4f 00 17 00 00 00 03 00 |CKPOINT.|O.......|
|000033c0| 53 51 4c 53 54 4d 54 54 | 45 53 54 5f 52 4f 4c 4c |SQLSTMTT|EST_ROLL|
|000033d0| 42 41 43 4b 00 4f 00 19 | 00 00 00 03 00 53 51 4c |BACK.O..|.....SQL|
|000033e0| 53 54 4d 54 54 45 53 54 | 5f 41 55 54 4f 43 4f 4d |STMTTEST|_AUTOCOM|
|000033f0| 4d 49 54 00 4f 00 1b 00 | 00 00 03 00 53 51 4c 53 |MIT.O...|....SQLS|
|00003400| 54 4d 54 54 45 53 54 5f | 43 41 4e 43 45 4c 42 55 |TMTTEST_|CANCELBU|
|00003410| 54 54 4f 4e 00 4f 00 0e | 00 00 00 03 00 53 51 4c |TTON.O..|.....SQL|
|00003420| 53 54 4d 54 54 45 53 54 | 00 4f 00 13 00 00 00 03 |STMTTEST|.O......|
|00003430| 00 53 51 4c 53 54 4d 54 | 54 45 53 54 3a 49 4e 49 |.SQLSTMT|TEST:INI|
|00003440| 54 00 40 00 0c 00 00 00 | 53 51 4c 53 54 4d 54 54 |T.@.....|SQLSTMTT|
|00003450| 45 53 54 00 51 00 02 00 | 00 00 02 00 44 00 02 00 |EST.Q...|....D...|
|00003460| 00 00 04 00 48 00 04 00 | 00 00 66 bb b6 2e 4d 00 |....H...|..f...M.|
|00003470| 02 00 00 00 00 00 45 00 | 02 00 00 00 05 00 46 00 |......E.|......F.|
|00003480| 02 00 00 00 02 00 47 00 | 02 00 00 00 ff ff 49 00 |......G.|......I.|
|00003490| 02 00 00 00 00 00 41 00 | eb 03 00 00 52 45 53 4f |......A.|....RESO|
|000034a0| 55 52 43 45 20 53 51 4c | 53 74 6d 74 54 65 73 74 |URCE SQL|StmtTest|
|000034b0| 20 44 49 41 4c 4f 47 20 | 20 36 2c 20 32 31 2c 20 | DIALOG | 6, 21, |
|000034c0| 32 37 38 2c 20 39 39 0d | 0a 53 54 59 4c 45 09 44 |278, 99.|.STYLE.D|
|000034d0| 53 5f 4d 4f 44 41 4c 46 | 52 41 4d 45 20 7c 20 57 |S_MODALF|RAME | W|
|000034e0| 53 5f 50 4f 50 55 50 20 | 7c 20 57 53 5f 43 41 50 |S_POPUP || WS_CAP|
|000034f0| 54 49 4f 4e 20 7c 20 57 | 53 5f 53 59 53 4d 45 4e |TION | W|S_SYSMEN|
|00003500| 55 0d 0a 43 41 50 54 49 | 4f 4e 09 22 53 51 4c 20 |U..CAPTI|ON."SQL |
|00003510| 53 74 61 74 65 6d 65 6e | 74 20 50 72 6f 63 65 73 |Statemen|t Proces|
|00003520| 73 6f 72 22 0d 0a 46 4f | 4e 54 09 38 2c 20 22 4d |sor"..FO|NT.8, "M|
|00003530| 53 20 53 61 6e 73 20 53 | 65 72 69 66 22 0d 0a 42 |S Sans S|erif"..B|
|00003540| 45 47 49 4e 0d 0a 09 43 | 4f 4e 54 52 4f 4c 09 22 |EGIN...C|ONTROL."|
|00003550| 22 2c 20 53 51 4c 53 54 | 4d 54 54 45 53 54 5f 53 |", SQLST|MTTEST_S|
|00003560| 54 41 54 45 4d 45 4e 54 | 54 45 58 54 2c 20 22 45 |TATEMENT|TEXT, "E|
|00003570| 64 69 74 22 2c 20 45 53 | 5f 41 55 54 4f 56 53 43 |dit", ES|_AUTOVSC|
|00003580| 52 4f 4c 4c 20 7c 20 45 | 53 5f 4d 55 4c 54 49 4c |ROLL | E|S_MULTIL|
|00003590| 49 4e 45 20 7c 20 45 53 | 5f 4c 45 46 54 20 7c 20 |INE | ES|_LEFT | |
|000035a0| 57 53 5f 54 41 42 53 54 | 4f 50 20 7c 20 57 53 5f |WS_TABST|OP | WS_|
|000035b0| 43 48 49 4c 44 20 7c 20 | 57 53 5f 42 4f 52 44 45 |CHILD | |WS_BORDE|
|000035c0| 52 2c 20 35 2c 20 37 2c | 20 32 36 36 2c 20 34 37 |R, 5, 7,| 266, 47|
|000035d0| 20 0d 0a 09 43 4f 4e 54 | 52 4f 4c 09 22 45 78 65 | ...CONT|ROL."Exe|
|000035e0| 63 75 74 65 22 2c 20 53 | 51 4c 53 54 4d 54 54 45 |cute", S|QLSTMTTE|
|000035f0| 53 54 5f 45 58 45 43 55 | 54 45 42 55 54 54 4f 4e |ST_EXECU|TEBUTTON|
|00003600| 2c 20 22 42 75 74 74 6f | 6e 22 2c 20 42 53 5f 50 |, "Butto|n", BS_P|
|00003610| 55 53 48 42 55 54 54 4f | 4e 20 7c 20 57 53 5f 54 |USHBUTTO|N | WS_T|
|00003620| 41 42 53 54 4f 50 20 7c | 20 57 53 5f 43 48 49 4c |ABSTOP || WS_CHIL|
|00003630| 44 2c 20 35 2c 20 36 30 | 2c 20 37 37 2c 20 31 35 |D, 5, 60|, 77, 15|
|00003640| 20 0d 0a 09 43 4f 4e 54 | 52 4f 4c 09 22 43 72 65 | ...CONT|ROL."Cre|
|00003650| 61 74 65 20 54 61 62 6c | 65 20 66 72 6f 6d 20 44 |ate Tabl|e from D|
|00003660| 42 22 2c 20 53 51 4c 53 | 54 4d 54 54 45 53 54 5f |B", SQLS|TMTTEST_|
|00003670| 43 52 45 41 54 45 46 52 | 4f 4d 44 42 2c 20 22 42 |CREATEFR|OMDB, "B|
|00003680| 75 74 74 6f 6e 22 2c 20 | 42 53 5f 50 55 53 48 42 |utton", |BS_PUSHB|
|00003690| 55 54 54 4f 4e 20 7c 20 | 57 53 5f 54 41 42 53 54 |UTTON | |WS_TABST|
|000036a0| 4f 50 20 7c 20 57 53 5f | 43 48 49 4c 44 2c 20 35 |OP | WS_|CHILD, 5|
|000036b0| 2c 20 38 30 2c 20 37 37 | 2c 20 31 34 20 0d 0a 09 |, 80, 77|, 14 ...|
|000036c0| 43 4f 4e 54 52 4f 4c 09 | 22 43 6f 6d 6d 69 74 22 |CONTROL.|"Commit"|
|000036d0| 2c 20 53 51 4c 53 54 4d | 54 54 45 53 54 5f 43 48 |, SQLSTM|TTEST_CH|
|000036e0| 45 43 4b 50 4f 49 4e 54 | 2c 20 22 42 75 74 74 6f |ECKPOINT|, "Butto|
|000036f0| 6e 22 2c 20 42 53 5f 50 | 55 53 48 42 55 54 54 4f |n", BS_P|USHBUTTO|
|00003700| 4e 20 7c 20 57 53 5f 54 | 41 42 53 54 4f 50 20 7c |N | WS_T|ABSTOP ||
|00003710| 20 57 53 5f 43 48 49 4c | 44 2c 20 31 30 30 2c 20 | WS_CHIL|D, 100, |
|00003720| 36 30 2c 20 37 37 2c 20 | 31 34 20 0d 0a 09 43 4f |60, 77, |14 ...CO|
|00003730| 4e 54 52 4f 4c 09 22 52 | 6f 6c 6c 62 61 63 6b 22 |NTROL."R|ollback"|
|00003740| 2c 20 53 51 4c 53 54 4d | 54 54 45 53 54 5f 52 4f |, SQLSTM|TTEST_RO|
|00003750| 4c 4c 42 41 43 4b 2c 20 | 22 42 75 74 74 6f 6e 22 |LLBACK, |"Button"|
|00003760| 2c 20 42 53 5f 50 55 53 | 48 42 55 54 54 4f 4e 20 |, BS_PUS|HBUTTON |
|00003770| 7c 20 57 53 5f 54 41 42 | 53 54 4f 50 20 7c 20 57 || WS_TAB|STOP | W|
|00003780| 53 5f 43 48 49 4c 44 2c | 20 31 30 30 2c 20 38 30 |S_CHILD,| 100, 80|
|00003790| 2c 20 37 37 2c 20 31 34 | 20 0d 0a 09 43 4f 4e 54 |, 77, 14| ...CONT|
|000037a0| 52 4f 4c 09 22 41 75 74 | 6f 43 6f 6d 6d 69 74 22 |ROL."Aut|oCommit"|
|000037b0| 2c 20 53 51 4c 53 54 4d | 54 54 45 53 54 5f 41 55 |, SQLSTM|TTEST_AU|
|000037c0| 54 4f 43 4f 4d 4d 49 54 | 2c 20 22 42 75 74 74 6f |TOCOMMIT|, "Butto|
|000037d0| 6e 22 2c 20 42 53 5f 41 | 55 54 4f 43 48 45 43 4b |n", BS_A|UTOCHECK|
|000037e0| 42 4f 58 20 7c 20 57 53 | 5f 54 41 42 53 54 4f 50 |BOX | WS|_TABSTOP|
|000037f0| 20 7c 20 57 53 5f 43 48 | 49 4c 44 2c 20 32 30 37 | | WS_CH|ILD, 207|
|00003800| 2c 20 36 32 2c 20 35 39 | 2c 20 31 31 20 0d 0a 09 |, 62, 59|, 11 ...|
|00003810| 43 4f 4e 54 52 4f 4c 09 | 22 43 61 6e 63 65 6c 22 |CONTROL.|"Cancel"|
|00003820| 2c 20 53 51 4c 53 54 4d | 54 54 45 53 54 5f 43 41 |, SQLSTM|TTEST_CA|
|00003830| 4e 43 45 4c 42 55 54 54 | 4f 4e 2c 20 22 42 75 74 |NCELBUTT|ON, "But|
|00003840| 74 6f 6e 22 2c 20 42 53 | 5f 50 55 53 48 42 55 54 |ton", BS|_PUSHBUT|
|00003850| 54 4f 4e 20 7c 20 57 53 | 5f 54 41 42 53 54 4f 50 |TON | WS|_TABSTOP|
|00003860| 20 7c 20 57 53 5f 43 48 | 49 4c 44 2c 20 31 39 35 | | WS_CH|ILD, 195|
|00003870| 2c 20 38 30 2c 20 37 37 | 2c 20 31 35 20 0d 0a 45 |, 80, 77|, 15 ..E|
|00003880| 4e 44 0d 0a 0d 0a 00 4e | 00 2c 00 00 00 52 45 53 |ND.....N|.,...RES|
|00003890| 4f 55 52 43 45 20 53 51 | 4c 53 74 6d 74 54 65 73 |OURCE SQ|LStmtTes|
|000038a0| 74 20 44 49 41 4c 4f 47 | 20 20 36 2c 20 32 31 2c |t DIALOG| 6, 21,|
|000038b0| 20 32 37 38 2c 20 39 39 | 00 40 00 1a 00 00 00 53 | 278, 99|.@.....S|
|000038c0| 51 4c 53 54 4d 54 54 45 | 53 54 5f 53 54 41 54 45 |QLSTMTTE|ST_STATE|
|000038d0| 4d 45 4e 54 54 45 58 54 | 00 51 00 02 00 00 00 01 |MENTTEXT|.Q......|
|000038e0| 00 44 00 02 00 00 00 03 | 00 48 00 04 00 00 00 66 |.D......|.H.....f|
|000038f0| bb b6 2e 4d 00 02 00 00 | 00 1b 00 45 00 02 00 00 |...M....|...E....|
|00003900| 00 00 00 46 00 02 00 00 | 00 02 00 47 00 02 00 00 |...F....|...G....|
|00003910| 00 ff ff 49 00 02 00 00 | 00 00 00 41 00 32 00 00 |...I....|...A.2..|
|00003920| 00 53 54 41 54 49 43 20 | 44 45 46 49 4e 45 20 53 |.STATIC |DEFINE S|
|00003930| 51 4c 53 54 4d 54 54 45 | 53 54 5f 53 54 41 54 45 |QLSTMTTE|ST_STATE|
|00003940| 4d 45 4e 54 54 45 58 54 | 20 3a 3d 20 31 30 30 20 |MENTTEXT| := 100 |
|00003950| 0d 0a 00 4e 00 30 00 00 | 00 53 54 41 54 49 43 20 |...N.0..|.STATIC |
|00003960| 44 45 46 49 4e 45 20 53 | 51 4c 53 54 4d 54 54 45 |DEFINE S|QLSTMTTE|
|00003970| 53 54 5f 53 54 41 54 45 | 4d 45 4e 54 54 45 58 54 |ST_STATE|MENTTEXT|
|00003980| 20 3a 3d 20 31 30 30 20 | 00 40 00 1a 00 00 00 53 | := 100 |.@.....S|
|00003990| 51 4c 53 54 4d 54 54 45 | 53 54 5f 45 58 45 43 55 |QLSTMTTE|ST_EXECU|
|000039a0| 54 45 42 55 54 54 4f 4e | 00 51 00 02 00 00 00 01 |TEBUTTON|.Q......|
|000039b0| 00 44 00 02 00 00 00 03 | 00 48 00 04 00 00 00 66 |.D......|.H.....f|
|000039c0| bb b6 2e 4d 00 02 00 00 | 00 1b 00 45 00 02 00 00 |...M....|...E....|
|000039d0| 00 00 00 46 00 02 00 00 | 00 02 00 47 00 02 00 00 |...F....|...G....|
|000039e0| 00 ff ff 49 00 02 00 00 | 00 00 00 41 00 32 00 00 |...I....|...A.2..|
|000039f0| 00 53 54 41 54 49 43 20 | 44 45 46 49 4e 45 20 53 |.STATIC |DEFINE S|
|00003a00| 51 4c 53 54 4d 54 54 45 | 53 54 5f 45 58 45 43 55 |QLSTMTTE|ST_EXECU|
|00003a10| 54 45 42 55 54 54 4f 4e | 20 3a 3d 20 31 30 31 20 |TEBUTTON| := 101 |
|00003a20| 0d 0a 00 4e 00 30 00 00 | 00 53 54 41 54 49 43 20 |...N.0..|.STATIC |
|00003a30| 44 45 46 49 4e 45 20 53 | 51 4c 53 54 4d 54 54 45 |DEFINE S|QLSTMTTE|
|00003a40| 53 54 5f 45 58 45 43 55 | 54 45 42 55 54 54 4f 4e |ST_EXECU|TEBUTTON|
|00003a50| 20 3a 3d 20 31 30 31 20 | 00 40 00 19 00 00 00 53 | := 101 |.@.....S|
|00003a60| 51 4c 53 54 4d 54 54 45 | 53 54 5f 43 52 45 41 54 |QLSTMTTE|ST_CREAT|
|00003a70| 45 46 52 4f 4d 44 42 00 | 51 00 02 00 00 00 01 00 |EFROMDB.|Q.......|
|00003a80| 44 00 02 00 00 00 03 00 | 48 00 04 00 00 00 66 bb |D.......|H.....f.|
|00003a90| b6 2e 4d 00 02 00 00 00 | 1b 00 45 00 02 00 00 00 |..M.....|..E.....|
|00003aa0| 00 00 46 00 02 00 00 00 | 02 00 47 00 02 00 00 00 |..F.....|..G.....|
|00003ab0| ff ff 49 00 02 00 00 00 | 00 00 41 00 31 00 00 00 |..I.....|..A.1...|
|00003ac0| 53 54 41 54 49 43 20 44 | 45 46 49 4e 45 20 53 51 |STATIC D|EFINE SQ|
|00003ad0| 4c 53 54 4d 54 54 45 53 | 54 5f 43 52 45 41 54 45 |LSTMTTES|T_CREATE|
|00003ae0| 46 52 4f 4d 44 42 20 3a | 3d 20 31 30 32 20 0d 0a |FROMDB :|= 102 ..|
|00003af0| 00 4e 00 2f 00 00 00 53 | 54 41 54 49 43 20 44 45 |.N./...S|TATIC DE|
|00003b00| 46 49 4e 45 20 53 51 4c | 53 54 4d 54 54 45 53 54 |FINE SQL|STMTTEST|
|00003b10| 5f 43 52 45 41 54 45 46 | 52 4f 4d 44 42 20 3a 3d |_CREATEF|ROMDB :=|
|00003b20| 20 31 30 32 20 00 40 00 | 17 00 00 00 53 51 4c 53 | 102 .@.|....SQLS|
|00003b30| 54 4d 54 54 45 53 54 5f | 43 48 45 43 4b 50 4f 49 |TMTTEST_|CHECKPOI|
|00003b40| 4e 54 00 51 00 02 00 00 | 00 01 00 44 00 02 00 00 |NT.Q....|...D....|
|00003b50| 00 03 00 48 00 04 00 00 | 00 66 bb b6 2e 4d 00 02 |...H....|.f...M..|
|00003b60| 00 00 00 1b 00 45 00 02 | 00 00 00 00 00 46 00 02 |.....E..|.....F..|
|00003b70| 00 00 00 02 00 47 00 02 | 00 00 00 ff ff 49 00 02 |.....G..|.....I..|
|00003b80| 00 00 00 00 00 41 00 2f | 00 00 00 53 54 41 54 49 |.....A./|...STATI|
|00003b90| 43 20 44 45 46 49 4e 45 | 20 53 51 4c 53 54 4d 54 |C DEFINE| SQLSTMT|
|00003ba0| 54 45 53 54 5f 43 48 45 | 43 4b 50 4f 49 4e 54 20 |TEST_CHE|CKPOINT |
|00003bb0| 3a 3d 20 31 30 33 20 0d | 0a 00 4e 00 2d 00 00 00 |:= 103 .|..N.-...|
|00003bc0| 53 54 41 54 49 43 20 44 | 45 46 49 4e 45 20 53 51 |STATIC D|EFINE SQ|
|00003bd0| 4c 53 54 4d 54 54 45 53 | 54 5f 43 48 45 43 4b 50 |LSTMTTES|T_CHECKP|
|00003be0| 4f 49 4e 54 20 3a 3d 20 | 31 30 33 20 00 40 00 15 |OINT := |103 .@..|
|00003bf0| 00 00 00 53 51 4c 53 54 | 4d 54 54 45 53 54 5f 52 |...SQLST|MTTEST_R|
|00003c00| 4f 4c 4c 42 41 43 4b 00 | 51 00 02 00 00 00 01 00 |OLLBACK.|Q.......|
|00003c10| 44 00 02 00 00 00 03 00 | 48 00 04 00 00 00 66 bb |D.......|H.....f.|
|00003c20| b6 2e 4d 00 02 00 00 00 | 1b 00 45 00 02 00 00 00 |..M.....|..E.....|
|00003c30| 00 00 46 00 02 00 00 00 | 02 00 47 00 02 00 00 00 |..F.....|..G.....|
|00003c40| ff ff 49 00 02 00 00 00 | 00 00 41 00 2d 00 00 00 |..I.....|..A.-...|
|00003c50| 53 54 41 54 49 43 20 44 | 45 46 49 4e 45 20 53 51 |STATIC D|EFINE SQ|
|00003c60| 4c 53 54 4d 54 54 45 53 | 54 5f 52 4f 4c 4c 42 41 |LSTMTTES|T_ROLLBA|
|00003c70| 43 4b 20 3a 3d 20 31 30 | 34 20 0d 0a 00 4e 00 2b |CK := 10|4 ...N.+|
|00003c80| 00 00 00 53 54 41 54 49 | 43 20 44 45 46 49 4e 45 |...STATI|C DEFINE|
|00003c90| 20 53 51 4c 53 54 4d 54 | 54 45 53 54 5f 52 4f 4c | SQLSTMT|TEST_ROL|
|00003ca0| 4c 42 41 43 4b 20 3a 3d | 20 31 30 34 20 00 40 00 |LBACK :=| 104 .@.|
|00003cb0| 17 00 00 00 53 51 4c 53 | 54 4d 54 54 45 53 54 5f |....SQLS|TMTTEST_|
|00003cc0| 41 55 54 4f 43 4f 4d 4d | 49 54 00 51 00 02 00 00 |AUTOCOMM|IT.Q....|
|00003cd0| 00 01 00 44 00 02 00 00 | 00 03 00 48 00 04 00 00 |...D....|...H....|
|00003ce0| 00 66 bb b6 2e 4d 00 02 | 00 00 00 1b 00 45 00 02 |.f...M..|.....E..|
|00003cf0| 00 00 00 00 00 46 00 02 | 00 00 00 02 00 47 00 02 |.....F..|.....G..|
|00003d00| 00 00 00 ff ff 49 00 02 | 00 00 00 00 00 41 00 2f |.....I..|.....A./|
|00003d10| 00 00 00 53 54 41 54 49 | 43 20 44 45 46 49 4e 45 |...STATI|C DEFINE|
|00003d20| 20 53 51 4c 53 54 4d 54 | 54 45 53 54 5f 41 55 54 | SQLSTMT|TEST_AUT|
|00003d30| 4f 43 4f 4d 4d 49 54 20 | 3a 3d 20 31 30 35 20 0d |OCOMMIT |:= 105 .|
|00003d40| 0a 00 4e 00 2d 00 00 00 | 53 54 41 54 49 43 20 44 |..N.-...|STATIC D|
|00003d50| 45 46 49 4e 45 20 53 51 | 4c 53 54 4d 54 54 45 53 |EFINE SQ|LSTMTTES|
|00003d60| 54 5f 41 55 54 4f 43 4f | 4d 4d 49 54 20 3a 3d 20 |T_AUTOCO|MMIT := |
|00003d70| 31 30 35 20 00 40 00 19 | 00 00 00 53 51 4c 53 54 |105 .@..|...SQLST|
|00003d80| 4d 54 54 45 53 54 5f 43 | 41 4e 43 45 4c 42 55 54 |MTTEST_C|ANCELBUT|
|00003d90| 54 4f 4e 00 51 00 02 00 | 00 00 01 00 44 00 02 00 |TON.Q...|....D...|
|00003da0| 00 00 03 00 48 00 04 00 | 00 00 66 bb b6 2e 4d 00 |....H...|..f...M.|
|00003db0| 02 00 00 00 1b 00 45 00 | 02 00 00 00 00 00 46 00 |......E.|......F.|
|00003dc0| 02 00 00 00 02 00 47 00 | 02 00 00 00 ff ff 49 00 |......G.|......I.|
|00003dd0| 02 00 00 00 00 00 41 00 | 31 00 00 00 53 54 41 54 |......A.|1...STAT|
|00003de0| 49 43 20 44 45 46 49 4e | 45 20 53 51 4c 53 54 4d |IC DEFIN|E SQLSTM|
|00003df0| 54 54 45 53 54 5f 43 41 | 4e 43 45 4c 42 55 54 54 |TTEST_CA|NCELBUTT|
|00003e00| 4f 4e 20 3a 3d 20 31 30 | 36 20 0d 0a 00 4e 00 2f |ON := 10|6 ...N./|
|00003e10| 00 00 00 53 54 41 54 49 | 43 20 44 45 46 49 4e 45 |...STATI|C DEFINE|
|00003e20| 20 53 51 4c 53 54 4d 54 | 54 45 53 54 5f 43 41 4e | SQLSTMT|TEST_CAN|
|00003e30| 43 45 4c 42 55 54 54 4f | 4e 20 3a 3d 20 31 30 36 |CELBUTTO|N := 106|
|00003e40| 20 00 40 00 0c 00 00 00 | 53 51 4c 53 54 4d 54 54 | .@.....|SQLSTMTT|
|00003e50| 45 53 54 00 51 00 02 00 | 00 00 02 00 44 00 02 00 |EST.Q...|....D...|
|00003e60| 00 00 03 00 48 00 04 00 | 00 00 66 bb b6 2e 4d 00 |....H...|..f...M.|
|00003e70| 02 00 00 00 17 00 45 00 | 02 00 00 00 00 00 46 00 |......E.|......F.|
|00003e80| 02 00 00 00 02 00 47 00 | 02 00 00 00 ff ff 49 00 |......G.|......I.|
|00003e90| 02 00 00 00 00 00 41 00 | 3f 01 00 00 43 4c 41 53 |......A.|?...CLAS|
|00003ea0| 53 20 53 51 4c 53 74 6d | 74 54 65 73 74 20 49 4e |S SQLStm|tTest IN|
|00003eb0| 48 45 52 49 54 20 44 49 | 41 4c 4f 47 57 49 4e 44 |HERIT DI|ALOGWIND|
|00003ec0| 4f 57 20 0d 0a 0d 0a 09 | 50 52 4f 54 45 43 54 20 |OW .....|PROTECT |
|00003ed0| 6f 44 43 53 74 61 74 65 | 6d 65 6e 74 54 65 78 74 |oDCState|mentText|
|00003ee0| 20 41 53 20 4d 55 4c 54 | 49 4c 49 4e 45 45 44 49 | AS MULT|ILINEEDI|
|00003ef0| 54 0d 0a 09 50 52 4f 54 | 45 43 54 20 6f 43 43 45 |T...PROT|ECT oCCE|
|00003f00| 78 65 63 75 74 65 42 75 | 74 74 6f 6e 20 41 53 20 |xecuteBu|tton AS |
|00003f10| 50 55 53 48 42 55 54 54 | 4f 4e 0d 0a 09 50 52 4f |PUSHBUTT|ON...PRO|
|00003f20| 54 45 43 54 20 6f 43 43 | 43 72 65 61 74 65 46 72 |TECT oCC|CreateFr|
|00003f30| 6f 6d 44 42 20 41 53 20 | 50 55 53 48 42 55 54 54 |omDB AS |PUSHBUTT|
|00003f40| 4f 4e 0d 0a 09 50 52 4f | 54 45 43 54 20 6f 43 43 |ON...PRO|TECT oCC|
|00003f50| 43 68 65 63 6b 70 6f 69 | 6e 74 20 41 53 20 50 55 |Checkpoi|nt AS PU|
|00003f60| 53 48 42 55 54 54 4f 4e | 0d 0a 09 50 52 4f 54 45 |SHBUTTON|...PROTE|
|00003f70| 43 54 20 6f 43 43 52 6f | 6c 6c 62 61 63 6b 20 41 |CT oCCRo|llback A|
|00003f80| 53 20 50 55 53 48 42 55 | 54 54 4f 4e 0d 0a 09 50 |S PUSHBU|TTON...P|
|00003f90| 52 4f 54 45 43 54 20 6f | 44 43 41 75 74 6f 43 6f |ROTECT o|DCAutoCo|
|00003fa0| 6d 6d 69 74 20 41 53 20 | 43 48 45 43 4b 42 4f 58 |mmit AS |CHECKBOX|
|00003fb0| 0d 0a 09 50 52 4f 54 45 | 43 54 20 6f 43 43 43 61 |...PROTE|CT oCCCa|
|00003fc0| 6e 63 65 6c 42 75 74 74 | 6f 6e 20 41 53 20 50 55 |ncelButt|on AS PU|
|00003fd0| 53 48 42 55 54 54 4f 4e | 0d 0a 00 4e 00 28 00 00 |SHBUTTON|...N.(..|
|00003fe0| 00 43 4c 41 53 53 20 53 | 51 4c 53 74 6d 74 54 65 |.CLASS S|QLStmtTe|
|00003ff0| 73 74 20 49 4e 48 45 52 | 49 54 20 44 49 41 4c 4f |st INHER|IT DIALO|
|00004000| 47 57 49 4e 44 4f 57 20 | 00 40 00 11 00 00 00 53 |GWINDOW |.@.....S|
|00004010| 51 4c 53 54 4d 54 54 45 | 53 54 3a 49 4e 49 54 00 |QLSTMTTE|ST:INIT.|
|00004020| 51 00 02 00 00 00 02 00 | 44 00 02 00 00 00 03 00 |Q.......|D.......|
|00004030| 48 00 04 00 00 00 66 bb | b6 2e 4d 00 02 00 00 00 |H.....f.|..M.....|
|00004040| 15 00 45 00 02 00 00 00 | 00 00 46 00 02 00 00 00 |..E.....|..F.....|
|00004050| 02 00 47 00 02 00 00 00 | ff ff 49 00 02 00 00 00 |..G.....|..I.....|
|00004060| 00 00 41 00 43 05 00 00 | 4d 45 54 48 4f 44 20 49 |..A.C...|METHOD I|
|00004070| 4e 49 54 28 6f 50 61 72 | 65 6e 74 29 20 43 4c 41 |NIT(oPar|ent) CLA|
|00004080| 53 53 20 53 51 4c 53 74 | 6d 74 54 65 73 74 20 0d |SS SQLSt|mtTest .|
|00004090| 0a 0d 0a 73 75 70 65 72 | 3a 69 6e 69 74 28 6f 50 |...super|:init(oP|
|000040a0| 61 72 65 6e 74 2c 52 65 | 73 6f 75 72 63 65 49 44 |arent,Re|sourceID|
|000040b0| 7b 22 53 51 4c 53 74 6d | 74 54 65 73 74 22 7d 2c |{"SQLStm|tTest"},|
|000040c0| 54 52 55 45 29 0d 0a 0d | 0a 6f 44 43 53 74 61 74 |TRUE)...|.oDCStat|
|000040d0| 65 6d 65 6e 74 54 65 78 | 74 20 3a 3d 20 4d 75 6c |ementTex|t := Mul|
|000040e0| 74 69 4c 69 6e 65 45 64 | 69 74 7b 73 65 6c 66 2c |tiLineEd|it{self,|
|000040f0| 52 65 73 6f 75 72 63 65 | 49 44 7b 53 51 4c 53 54 |Resource|ID{SQLST|
|00004100| 4d 54 54 45 53 54 5f 53 | 54 41 54 45 4d 45 4e 54 |MTTEST_S|TATEMENT|
|00004110| 54 45 58 54 7d 7d 0d 0a | 6f 44 43 53 74 61 74 65 |TEXT}}..|oDCState|
|00004120| 6d 65 6e 74 54 65 78 74 | 3a 48 79 70 65 72 4c 61 |mentText|:HyperLa|
|00004130| 62 65 6c 20 3a 3d 20 48 | 79 70 65 72 4c 61 62 65 |bel := H|yperLabe|
|00004140| 6c 7b 23 53 74 61 74 65 | 6d 65 6e 74 54 65 78 74 |l{#State|mentText|
|00004150| 2c 2c 2c 7d 0d 0a 0d 0a | 6f 43 43 45 78 65 63 75 |,,,}....|oCCExecu|
|00004160| 74 65 42 75 74 74 6f 6e | 20 3a 3d 20 50 75 73 68 |teButton| := Push|
|00004170| 42 75 74 74 6f 6e 7b 73 | 65 6c 66 2c 52 65 73 6f |Button{s|elf,Reso|
|00004180| 75 72 63 65 49 44 7b 53 | 51 4c 53 54 4d 54 54 45 |urceID{S|QLSTMTTE|
|00004190| 53 54 5f 45 58 45 43 55 | 54 45 42 55 54 54 4f 4e |ST_EXECU|TEBUTTON|
|000041a0| 7d 7d 0d 0a 6f 43 43 45 | 78 65 63 75 74 65 42 75 |}}..oCCE|xecuteBu|
|000041b0| 74 74 6f 6e 3a 48 79 70 | 65 72 4c 61 62 65 6c 20 |tton:Hyp|erLabel |
|000041c0| 3a 3d 20 48 79 70 65 72 | 4c 61 62 65 6c 7b 23 45 |:= Hyper|Label{#E|
|000041d0| 78 65 63 75 74 65 42 75 | 74 74 6f 6e 2c 22 45 78 |xecuteBu|tton,"Ex|
|000041e0| 65 63 75 74 65 22 2c 22 | 45 78 65 63 75 74 65 20 |ecute","|Execute |
|000041f0| 74 68 65 20 53 51 4c 20 | 53 74 61 74 65 6d 65 6e |the SQL |Statemen|
|00004200| 74 22 2c 7d 0d 0a 0d 0a | 6f 43 43 43 72 65 61 74 |t",}....|oCCCreat|
|00004210| 65 46 72 6f 6d 44 42 20 | 3a 3d 20 50 75 73 68 42 |eFromDB |:= PushB|
|00004220| 75 74 74 6f 6e 7b 73 65 | 6c 66 2c 52 65 73 6f 75 |utton{se|lf,Resou|
|00004230| 72 63 65 49 44 7b 53 51 | 4c 53 54 4d 54 54 45 53 |rceID{SQ|LSTMTTES|
|00004240| 54 5f 43 52 45 41 54 45 | 46 52 4f 4d 44 42 7d 7d |T_CREATE|FROMDB}}|
|00004250| 0d 0a 6f 43 43 43 72 65 | 61 74 65 46 72 6f 6d 44 |..oCCCre|ateFromD|
|00004260| 42 3a 48 79 70 65 72 4c | 61 62 65 6c 20 3a 3d 20 |B:HyperL|abel := |
|00004270| 48 79 70 65 72 4c 61 62 | 65 6c 7b 23 43 72 65 61 |HyperLab|el{#Crea|
|00004280| 74 65 46 72 6f 6d 44 42 | 2c 22 43 72 65 61 74 65 |teFromDB|,"Create|
|00004290| 20 54 61 62 6c 65 20 66 | 72 6f 6d 20 44 42 22 2c | Table f|rom DB",|
|000042a0| 22 47 65 6e 65 72 61 74 | 65 20 27 43 72 65 61 74 |"Generat|e 'Creat|
|000042b0| 65 20 74 61 62 6c 65 2e | 2e 2e 27 20 75 73 69 6e |e table.|..' usin|
|000042c0| 67 20 64 62 61 73 65 20 | 66 69 6c 65 22 2c 7d 0d |g dbase |file",}.|
|000042d0| 0a 0d 0a 6f 43 43 43 68 | 65 63 6b 70 6f 69 6e 74 |...oCCCh|eckpoint|
|000042e0| 20 3a 3d 20 50 75 73 68 | 42 75 74 74 6f 6e 7b 73 | := Push|Button{s|
|000042f0| 65 6c 66 2c 52 65 73 6f | 75 72 63 65 49 44 7b 53 |elf,Reso|urceID{S|
|00004300| 51 4c 53 54 4d 54 54 45 | 53 54 5f 43 48 45 43 4b |QLSTMTTE|ST_CHECK|
|00004310| 50 4f 49 4e 54 7d 7d 0d | 0a 6f 43 43 43 68 65 63 |POINT}}.|.oCCChec|
|00004320| 6b 70 6f 69 6e 74 3a 48 | 79 70 65 72 4c 61 62 65 |kpoint:H|yperLabe|
|00004330| 6c 20 3a 3d 20 48 79 70 | 65 72 4c 61 62 65 6c 7b |l := Hyp|erLabel{|
|00004340| 23 43 68 65 63 6b 70 6f | 69 6e 74 2c 22 43 6f 6d |#Checkpo|int,"Com|
|00004350| 6d 69 74 22 2c 22 43 68 | 65 63 6b 70 6f 69 6e 74 |mit","Ch|eckpoint|
|00004360| 20 63 68 61 6e 67 65 73 | 22 2c 7d 0d 0a 0d 0a 6f | changes|",}....o|
|00004370| 43 43 52 6f 6c 6c 62 61 | 63 6b 20 3a 3d 20 50 75 |CCRollba|ck := Pu|
|00004380| 73 68 42 75 74 74 6f 6e | 7b 73 65 6c 66 2c 52 65 |shButton|{self,Re|
|00004390| 73 6f 75 72 63 65 49 44 | 7b 53 51 4c 53 54 4d 54 |sourceID|{SQLSTMT|
|000043a0| 54 45 53 54 5f 52 4f 4c | 4c 42 41 43 4b 7d 7d 0d |TEST_ROL|LBACK}}.|
|000043b0| 0a 6f 43 43 52 6f 6c 6c | 62 61 63 6b 3a 48 79 70 |.oCCRoll|back:Hyp|
|000043c0| 65 72 4c 61 62 65 6c 20 | 3a 3d 20 48 79 70 65 72 |erLabel |:= Hyper|
|000043d0| 4c 61 62 65 6c 7b 23 52 | 6f 6c 6c 62 61 63 6b 2c |Label{#R|ollback,|
|000043e0| 22 52 6f 6c 6c 62 61 63 | 6b 22 2c 22 52 6f 6c 6c |"Rollbac|k","Roll|
|000043f0| 62 61 63 6b 20 63 68 61 | 6e 67 65 73 22 2c 7d 0d |back cha|nges",}.|
|00004400| 0a 0d 0a 6f 44 43 41 75 | 74 6f 43 6f 6d 6d 69 74 |...oDCAu|toCommit|
|00004410| 20 3a 3d 20 43 68 65 63 | 6b 42 6f 78 7b 73 65 6c | := Chec|kBox{sel|
|00004420| 66 2c 52 65 73 6f 75 72 | 63 65 49 44 7b 53 51 4c |f,Resour|ceID{SQL|
|00004430| 53 54 4d 54 54 45 53 54 | 5f 41 55 54 4f 43 4f 4d |STMTTEST|_AUTOCOM|
|00004440| 4d 49 54 7d 7d 0d 0a 6f | 44 43 41 75 74 6f 43 6f |MIT}}..o|DCAutoCo|
|00004450| 6d 6d 69 74 3a 48 79 70 | 65 72 4c 61 62 65 6c 20 |mmit:Hyp|erLabel |
|00004460| 3a 3d 20 48 79 70 65 72 | 4c 61 62 65 6c 7b 23 41 |:= Hyper|Label{#A|
|00004470| 75 74 6f 43 6f 6d 6d 69 | 74 2c 22 41 75 74 6f 43 |utoCommi|t,"AutoC|
|00004480| 6f 6d 6d 69 74 22 2c 22 | 54 75 72 6e 20 41 75 74 |ommit","|Turn Aut|
|00004490| 6f 63 6f 6d 6d 69 74 20 | 4f 4e 20 6f 72 20 4f 46 |ocommit |ON or OF|
|000044a0| 46 22 2c 7d 0d 0a 0d 0a | 6f 43 43 43 61 6e 63 65 |F",}....|oCCCance|
|000044b0| 6c 42 75 74 74 6f 6e 20 | 3a 3d 20 50 75 73 68 42 |lButton |:= PushB|
|000044c0| 75 74 74 6f 6e 7b 73 65 | 6c 66 2c 52 65 73 6f 75 |utton{se|lf,Resou|
|000044d0| 72 63 65 49 44 7b 53 51 | 4c 53 54 4d 54 54 45 53 |rceID{SQ|LSTMTTES|
|000044e0| 54 5f 43 41 4e 43 45 4c | 42 55 54 54 4f 4e 7d 7d |T_CANCEL|BUTTON}}|
|000044f0| 0d 0a 6f 43 43 43 61 6e | 63 65 6c 42 75 74 74 6f |..oCCCan|celButto|
|00004500| 6e 3a 48 79 70 65 72 4c | 61 62 65 6c 20 3a 3d 20 |n:HyperL|abel := |
|00004510| 48 79 70 65 72 4c 61 62 | 65 6c 7b 23 43 61 6e 63 |HyperLab|el{#Canc|
|00004520| 65 6c 42 75 74 74 6f 6e | 2c 22 43 61 6e 63 65 6c |elButton|,"Cancel|
|00004530| 22 2c 2c 7d 0d 0a 0d 0a | 73 65 6c 66 3a 48 79 70 |",,}....|self:Hyp|
|00004540| 65 72 4c 61 62 65 6c 20 | 3a 3d 20 48 79 70 65 72 |erLabel |:= Hyper|
|00004550| 4c 61 62 65 6c 7b 23 53 | 51 4c 53 74 6d 74 54 65 |Label{#S|QLStmtTe|
|00004560| 73 74 2c 22 53 51 4c 20 | 53 74 61 74 65 6d 65 6e |st,"SQL |Statemen|
|00004570| 74 20 50 72 6f 63 65 73 | 73 6f 72 22 2c 22 45 78 |t Proces|sor","Ex|
|00004580| 65 63 75 74 65 20 61 20 | 53 51 4c 53 74 61 74 65 |ecute a |SQLState|
|00004590| 6d 65 6e 74 22 2c 7d 0d | 0a 0d 0a 72 65 74 75 72 |ment",}.|...retur|
|000045a0| 6e 20 73 65 6c 66 0d 0a | 0d 0a 00 4e 00 28 00 00 |n self..|...N.(..|
|000045b0| 00 4d 45 54 48 4f 44 20 | 49 4e 49 54 28 6f 50 61 |.METHOD |INIT(oPa|
|000045c0| 72 65 6e 74 29 20 43 4c | 41 53 53 20 53 51 4c 53 |rent) CL|ASS SQLS|
|000045d0| 74 6d 74 54 65 73 74 20 | 00 40 00 12 00 00 00 53 |tmtTest |.@.....S|
|000045e0| 54 41 4e 44 41 52 44 53 | 51 4c 44 49 41 4c 4f 47 |TANDARDS|QLDIALOG|
|000045f0| 00 51 00 02 00 00 00 02 | 00 44 00 02 00 00 00 0a |.Q......|.D......|
|00004600| 00 48 00 04 00 00 00 71 | bb b6 2e 4d 00 02 00 00 |.H.....q|...M....|
|00004610| 00 0a 00 45 00 02 00 00 | 00 00 00 46 00 02 00 00 |...E....|...F....|
|00004620| 00 02 00 47 00 02 00 00 | 00 ff ff 49 00 02 00 00 |...G....|...I....|
|00004630| 00 00 00 42 00 9a 05 00 | 00 53 74 61 6e 64 61 72 |...B....|.Standar|
|00004640| 64 53 51 4c 44 69 61 6c | 6f 67 00 00 00 00 00 00 |dSQLDial|og......|
|00004650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004670| 00 00 00 00 00 00 00 00 | 00 00 46 4f 52 4d 3a 44 |........|..FORM:D|
|00004680| 49 41 4c 4f 47 57 49 4e | 44 4f 57 00 00 00 00 00 |IALOGWIN|DOW.....|
|00004690| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000046a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000046b0| 00 00 00 00 00 00 00 00 | 00 00 00 4f 70 65 6e 20 |........|...Open |
|000046c0| 61 20 53 51 4c 20 54 61 | 62 6c 65 00 00 00 00 00 |a SQL Ta|ble.....|
|000046d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000046e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000046f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 0b 00 fd ff |........|........|
|00004700| 80 01 3a 01 00 00 ff ff | 00 00 00 00 80 00 c8 80 |..:.....|........|
|00004710| 01 00 00 00 44 00 48 79 | 70 65 72 4c 61 62 65 6c |....D.Hy|perLabel|
|00004720| 28 2c 22 4f 70 65 6e 20 | 61 20 53 51 4c 20 54 61 |(,"Open |a SQL Ta|
|00004730| 62 6c 65 22 2c 2c 29 00 | 48 79 70 65 72 4c 61 62 |ble",,).|HyperLab|
|00004740| 65 6c 28 23 53 74 61 6e | 64 61 72 64 53 51 4c 44 |el(#Stan|dardSQLD|
|00004750| 69 61 6c 6f 67 2c 2c 2c | 29 00 74 68 65 46 69 78 |ialog,,,|).theFix|
|00004760| 65 64 54 65 78 74 32 00 | 00 00 00 00 00 00 00 00 |edText2.|........|
|00004770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004780| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004790| 00 00 00 00 00 00 00 00 | 00 00 00 43 4f 4e 54 52 |........|...CONTR|
|000047a0| 4f 4c 3a 54 45 58 54 43 | 4f 4e 54 52 4f 4c 3a 46 |OL:TEXTC|ONTROL:F|
|000047b0| 49 58 45 44 54 45 58 54 | 00 00 00 00 00 00 00 00 |IXEDTEXT|........|
|000047c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000047d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 53 65 6c 65 |........|....Sele|
|000047e0| 63 74 20 61 20 54 61 62 | 6c 65 00 00 00 00 00 00 |ct a Tab|le......|
|000047f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004800| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 1c 00 0b |........|........|
|00004820| 00 ed 00 20 00 02 00 ff | ff 00 00 00 00 00 00 00 |... ....|........|
|00004830| 50 00 00 00 00 3e 00 48 | 79 70 65 72 4c 61 62 65 |P....>.H|yperLabe|
|00004840| 6c 28 2c 22 53 65 6c 65 | 63 74 20 61 20 54 61 62 |l(,"Sele|ct a Tab|
|00004850| 6c 65 22 2c 2c 29 00 48 | 79 70 65 72 4c 61 62 65 |le",,).H|yperLabe|
|00004860| 6c 28 23 74 68 65 46 69 | 78 65 64 54 65 78 74 32 |l(#theFi|xedText2|
|00004870| 2c 2c 2c 29 00 54 61 62 | 6c 65 4c 69 73 74 42 6f |,,,).Tab|leListBo|
|00004880| 78 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |x.......|........|
|00004890| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000048a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000048b0| 00 00 00 00 00 00 43 4f | 4e 54 52 4f 4c 3a 54 45 |......CO|NTROL:TE|
|000048c0| 58 54 43 4f 4e 54 52 4f | 4c 3a 42 41 53 45 4c 49 |XTCONTRO|L:BASELI|
|000048d0| 53 54 42 4f 58 3a 4c 49 | 53 54 42 4f 58 00 00 00 |STBOX:LI|STBOX...|
|000048e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000048f0| 00 00 00 00 00 00 00 4f | 44 42 43 20 54 61 62 6c |.......O|DBC Tabl|
|00004900| 65 73 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |es......|........|
|00004910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004920| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004930| 00 00 00 00 00 00 00 00 | 1c 00 1d 00 3d 01 d1 00 |........|....=...|
|00004940| 02 00 ff ff 00 00 00 00 | 03 01 a1 50 00 00 00 00 |........|...P....|
|00004950| 57 00 48 79 70 65 72 4c | 61 62 65 6c 28 2c 22 4f |W.HyperL|abel(,"O|
|00004960| 44 42 43 20 54 61 62 6c | 65 73 22 2c 2c 29 00 48 |DBC Tabl|es",,).H|
|00004970| 79 70 65 72 4c 61 62 65 | 6c 28 2c 2c 22 4f 44 42 |yperLabe|l(,,"ODB|
|00004980| 43 20 54 61 62 6c 65 73 | 22 2c 29 00 48 79 70 65 |C Tables|",).Hype|
|00004990| 72 4c 61 62 65 6c 28 23 | 54 61 62 6c 65 4c 69 73 |rLabel(#|TableLis|
|000049a0| 74 42 6f 78 2c 2c 2c 29 | 00 4f 70 65 6e 5f 54 61 |tBox,,,)|.Open_Ta|
|000049b0| 62 6c 65 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |ble.....|........|
|000049c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000049d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000049e0| 00 00 00 00 00 00 00 00 | 00 00 43 4f 4e 54 52 4f |........|..CONTRO|
|000049f0| 4c 3a 54 45 58 54 43 4f | 4e 54 52 4f 4c 3a 42 55 |L:TEXTCO|NTROL:BU|
|00004a00| 54 54 4f 4e 3a 50 55 53 | 48 42 55 54 54 4f 4e 00 |TTON:PUS|HBUTTON.|
|00004a10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004a20| 00 00 00 00 00 00 00 00 | 00 00 00 4f 70 65 6e 20 |........|...Open |
|00004a30| 54 61 62 6c 65 2e 2e 2e | 00 00 00 00 00 00 00 00 |Table...|........|
|00004a40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 32 00 f2 00 |........|....2...|
|00004a70| b0 00 0a 01 02 00 ff ff | 00 00 00 00 00 00 01 40 |........|.......@|
|00004a80| 00 00 00 00 3a 00 48 79 | 70 65 72 4c 61 62 65 6c |....:.Hy|perLabel|
|00004a90| 28 2c 22 4f 70 65 6e 20 | 54 61 62 6c 65 2e 2e 2e |(,"Open |Table...|
|00004aa0| 22 2c 2c 29 00 48 79 70 | 65 72 4c 61 62 65 6c 28 |",,).Hyp|erLabel(|
|00004ab0| 23 4f 70 65 6e 5f 54 61 | 62 6c 65 2c 2c 2c 29 00 |#Open_Ta|ble,,,).|
|00004ac0| 43 61 6e 63 65 6c 00 00 | 00 00 00 00 00 00 00 00 |Cancel..|........|
|00004ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004b00| 00 43 4f 4e 54 52 4f 4c | 3a 54 45 58 54 43 4f 4e |.CONTROL|:TEXTCON|
|00004b10| 54 52 4f 4c 3a 42 55 54 | 54 4f 4e 3a 50 55 53 48 |TROL:BUT|TON:PUSH|
|00004b20| 42 55 54 54 4f 4e 00 00 | 00 00 00 00 00 00 00 00 |BUTTON..|........|
|00004b30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004b40| 00 00 43 61 6e 63 65 6c | 00 00 00 00 00 00 00 00 |..Cancel|........|
|00004b50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004b60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004b80| 00 00 00 da 00 f2 00 2a | 01 0a 01 02 00 ff ff 00 |.......*|........|
|00004b90| 00 00 00 00 00 01 40 00 | 00 00 00 2f 00 48 79 70 |......@.|.../.Hyp|
|00004ba0| 65 72 4c 61 62 65 6c 28 | 2c 22 43 61 6e 63 65 6c |erLabel(|,"Cancel|
|00004bb0| 22 2c 2c 29 00 48 79 70 | 65 72 4c 61 62 65 6c 28 |",,).Hyp|erLabel(|
|00004bc0| 23 43 61 6e 63 65 6c 2c | 2c 2c 29 00 00 00 00 00 |#Cancel,|,,).....|
|00004bd0| 00 00 00 51 00 02 00 00 | 00 02 00 52 00 02 00 00 |...Q....|...R....|
|00004be0| 00 03 00 4f 00 14 00 00 | 00 04 00 53 54 41 4e 44 |...O....|...STAND|
|00004bf0| 41 52 44 53 51 4c 44 49 | 41 4c 4f 47 00 4f 00 22 |ARDSQLDI|ALOG.O."|
|00004c00| 00 00 00 03 00 53 54 41 | 4e 44 41 52 44 53 51 4c |.....STA|NDARDSQL|
|00004c10| 44 49 41 4c 4f 47 5f 54 | 48 45 46 49 58 45 44 54 |DIALOG_T|HEFIXEDT|
|00004c20| 45 58 54 32 00 4f 00 21 | 00 00 00 03 00 53 54 41 |EXT2.O.!|.....STA|
|00004c30| 4e 44 41 52 44 53 51 4c | 44 49 41 4c 4f 47 5f 54 |NDARDSQL|DIALOG_T|
|00004c40| 41 42 4c 45 4c 49 53 54 | 42 4f 58 00 4f 00 1f 00 |ABLELIST|BOX.O...|
|00004c50| 00 00 03 00 53 54 41 4e | 44 41 52 44 53 51 4c 44 |....STAN|DARDSQLD|
|00004c60| 49 41 4c 4f 47 5f 4f 50 | 45 4e 5f 54 41 42 4c 45 |IALOG_OP|EN_TABLE|
|00004c70| 00 4f 00 1b 00 00 00 03 | 00 53 54 41 4e 44 41 52 |.O......|.STANDAR|
|00004c80| 44 53 51 4c 44 49 41 4c | 4f 47 5f 43 41 4e 43 45 |DSQLDIAL|OG_CANCE|
|00004c90| 4c 00 4f 00 14 00 00 00 | 03 00 53 54 41 4e 44 41 |L.O.....|..STANDA|
|00004ca0| 52 44 53 51 4c 44 49 41 | 4c 4f 47 00 4f 00 19 00 |RDSQLDIA|LOG.O...|
|00004cb0| 00 00 03 00 53 54 41 4e | 44 41 52 44 53 51 4c 44 |....STAN|DARDSQLD|
|00004cc0| 49 41 4c 4f 47 3a 49 4e | 49 54 00 40 00 12 00 00 |IALOG:IN|IT.@....|
|00004cd0| 00 53 54 41 4e 44 41 52 | 44 53 51 4c 44 49 41 4c |.STANDAR|DSQLDIAL|
|00004ce0| 4f 47 00 51 00 02 00 00 | 00 02 00 44 00 02 00 00 |OG.Q....|...D....|
|00004cf0| 00 04 00 48 00 04 00 00 | 00 71 bb b6 2e 4d 00 02 |...H....|.q...M..|
|00004d00| 00 00 00 00 00 45 00 02 | 00 00 00 05 00 46 00 02 |.....E..|.....F..|
|00004d10| 00 00 00 02 00 47 00 02 | 00 00 00 ff ff 49 00 02 |.....G..|.....I..|
|00004d20| 00 00 00 00 00 41 00 d8 | 02 00 00 52 45 53 4f 55 |.....A..|...RESOU|
|00004d30| 52 43 45 20 53 74 61 6e | 64 61 72 64 53 51 4c 44 |RCE Stan|dardSQLD|
|00004d40| 69 61 6c 6f 67 20 44 49 | 41 4c 4f 47 20 20 39 2c |ialog DI|ALOG 9,|
|00004d50| 20 31 33 2c 20 32 30 37 | 2c 20 31 37 37 0d 0a 53 | 13, 207|, 177..S|
|00004d60| 54 59 4c 45 09 44 53 5f | 4d 4f 44 41 4c 46 52 41 |TYLE.DS_|MODALFRA|
|00004d70| 4d 45 20 7c 20 57 53 5f | 50 4f 50 55 50 20 7c 20 |ME | WS_|POPUP | |
|00004d80| 57 53 5f 43 41 50 54 49 | 4f 4e 20 7c 20 57 53 5f |WS_CAPTI|ON | WS_|
|00004d90| 53 59 53 4d 45 4e 55 0d | 0a 43 41 50 54 49 4f 4e |SYSMENU.|.CAPTION|
|00004da0| 09 22 4f 70 65 6e 20 61 | 20 53 51 4c 20 54 61 62 |."Open a| SQL Tab|
|00004db0| 6c 65 22 0d 0a 46 4f 4e | 54 09 38 2c 20 22 4d 53 |le"..FON|T.8, "MS|
|00004dc0| 20 53 61 6e 73 20 53 65 | 72 69 66 22 0d 0a 42 45 | Sans Se|rif"..BE|
|00004dd0| 47 49 4e 0d 0a 09 43 4f | 4e 54 52 4f 4c 09 22 53 |GIN...CO|NTROL."S|
|00004de0| 65 6c 65 63 74 20 61 20 | 54 61 62 6c 65 22 2c 20 |elect a |Table", |
|00004df0| 53 54 41 4e 44 41 52 44 | 53 51 4c 44 49 41 4c 4f |STANDARD|SQLDIALO|
|00004e00| 47 5f 54 48 45 46 49 58 | 45 44 54 45 58 54 32 2c |G_THEFIX|EDTEXT2,|
|00004e10| 20 22 53 74 61 74 69 63 | 22 2c 20 53 53 5f 4c 45 | "Static|", SS_LE|
|00004e20| 46 54 20 7c 20 57 53 5f | 43 48 49 4c 44 20 7c 20 |FT | WS_|CHILD | |
|00004e30| 57 53 5f 56 49 53 49 42 | 4c 45 2c 20 31 36 2c 20 |WS_VISIB|LE, 16, |
|00004e40| 37 2c 20 31 31 39 2c 20 | 31 33 20 0d 0a 09 43 4f |7, 119, |13 ...CO|
|00004e50| 4e 54 52 4f 4c 09 22 4f | 44 42 43 20 54 61 62 6c |NTROL."O|DBC Tabl|
|00004e60| 65 73 22 2c 20 53 54 41 | 4e 44 41 52 44 53 51 4c |es", STA|NDARDSQL|
|00004e70| 44 49 41 4c 4f 47 5f 54 | 41 42 4c 45 4c 49 53 54 |DIALOG_T|ABLELIST|
|00004e80| 42 4f 58 2c 20 22 4c 69 | 73 74 42 6f 78 22 2c 20 |BOX, "Li|stBox", |
|00004e90| 4c 42 53 5f 4e 4f 49 4e | 54 45 47 52 41 4c 48 45 |LBS_NOIN|TEGRALHE|
|00004ea0| 49 47 48 54 20 7c 20 4c | 42 53 5f 53 4f 52 54 20 |IGHT | L|BS_SORT |
|00004eb0| 7c 20 4c 42 53 5f 4e 4f | 54 49 46 59 20 7c 20 57 || LBS_NO|TIFY | W|
|00004ec0| 53 5f 54 41 42 53 54 4f | 50 20 7c 20 57 53 5f 43 |S_TABSTO|P | WS_C|
|00004ed0| 48 49 4c 44 20 7c 20 57 | 53 5f 56 49 53 49 42 4c |HILD | W|S_VISIBL|
|00004ee0| 45 20 7c 20 57 53 5f 42 | 4f 52 44 45 52 20 7c 20 |E | WS_B|ORDER | |
|00004ef0| 57 53 5f 56 53 43 52 4f | 4c 4c 2c 20 31 36 2c 20 |WS_VSCRO|LL, 16, |
|00004f00| 31 38 2c 20 31 36 35 2c | 20 31 31 31 20 0d 0a 09 |18, 165,| 111 ...|
|00004f10| 43 4f 4e 54 52 4f 4c 09 | 22 4f 70 65 6e 20 54 61 |CONTROL.|"Open Ta|
|00004f20| 62 6c 65 2e 2e 2e 22 2c | 20 53 54 41 4e 44 41 52 |ble...",| STANDAR|
|00004f30| 44 53 51 4c 44 49 41 4c | 4f 47 5f 4f 50 45 4e 5f |DSQLDIAL|OG_OPEN_|
|00004f40| 54 41 42 4c 45 2c 20 22 | 42 75 74 74 6f 6e 22 2c |TABLE, "|Button",|
|00004f50| 20 42 53 5f 50 55 53 48 | 42 55 54 54 4f 4e 20 7c | BS_PUSH|BUTTON ||
|00004f60| 20 57 53 5f 54 41 42 53 | 54 4f 50 20 7c 20 57 53 | WS_TABS|TOP | WS|
|00004f70| 5f 43 48 49 4c 44 2c 20 | 32 39 2c 20 31 34 39 2c |_CHILD, |29, 149,|
|00004f80| 20 37 32 2c 20 31 35 20 | 0d 0a 09 43 4f 4e 54 52 | 72, 15 |...CONTR|
|00004f90| 4f 4c 09 22 43 61 6e 63 | 65 6c 22 2c 20 53 54 41 |OL."Canc|el", STA|
|00004fa0| 4e 44 41 52 44 53 51 4c | 44 49 41 4c 4f 47 5f 43 |NDARDSQL|DIALOG_C|
|00004fb0| 41 4e 43 45 4c 2c 20 22 | 42 75 74 74 6f 6e 22 2c |ANCEL, "|Button",|
|00004fc0| 20 42 53 5f 50 55 53 48 | 42 55 54 54 4f 4e 20 7c | BS_PUSH|BUTTON ||
|00004fd0| 20 57 53 5f 54 41 42 53 | 54 4f 50 20 7c 20 57 53 | WS_TABS|TOP | WS|
|00004fe0| 5f 43 48 49 4c 44 2c 20 | 31 32 35 2c 20 31 34 39 |_CHILD, |125, 149|
|00004ff0| 2c 20 34 36 2c 20 31 35 | 20 0d 0a 45 4e 44 0d 0a |, 46, 15| ..END..|
|00005000| 0d 0a 00 4e 00 33 00 00 | 00 52 45 53 4f 55 52 43 |...N.3..|.RESOURC|
|00005010| 45 20 53 74 61 6e 64 61 | 72 64 53 51 4c 44 69 61 |E Standa|rdSQLDia|
|00005020| 6c 6f 67 20 44 49 41 4c | 4f 47 20 20 39 2c 20 31 |log DIAL|OG 9, 1|
|00005030| 33 2c 20 32 30 37 2c 20 | 31 37 37 00 40 00 20 00 |3, 207, |177.@. .|
|00005040| 00 00 53 54 41 4e 44 41 | 52 44 53 51 4c 44 49 41 |..STANDA|RDSQLDIA|
|00005050| 4c 4f 47 5f 54 48 45 46 | 49 58 45 44 54 45 58 54 |LOG_THEF|IXEDTEXT|
|00005060| 32 00 51 00 02 00 00 00 | 01 00 44 00 02 00 00 00 |2.Q.....|..D.....|
|00005070| 03 00 48 00 04 00 00 00 | 71 bb b6 2e 4d 00 02 00 |..H.....|q...M...|
|00005080| 00 00 1b 00 45 00 02 00 | 00 00 00 00 46 00 02 00 |....E...|....F...|
|00005090| 00 00 02 00 47 00 02 00 | 00 00 ff ff 49 00 02 00 |....G...|....I...|
|000050a0| 00 00 00 00 41 00 38 00 | 00 00 53 54 41 54 49 43 |....A.8.|..STATIC|
|000050b0| 20 44 45 46 49 4e 45 20 | 53 54 41 4e 44 41 52 44 | DEFINE |STANDARD|
|000050c0| 53 51 4c 44 49 41 4c 4f | 47 5f 54 48 45 46 49 58 |SQLDIALO|G_THEFIX|
|000050d0| 45 44 54 45 58 54 32 20 | 3a 3d 20 31 30 30 20 0d |EDTEXT2 |:= 100 .|
|000050e0| 0a 00 4e 00 36 00 00 00 | 53 54 41 54 49 43 20 44 |..N.6...|STATIC D|
|000050f0| 45 46 49 4e 45 20 53 54 | 41 4e 44 41 52 44 53 51 |EFINE ST|ANDARDSQ|
|00005100| 4c 44 49 41 4c 4f 47 5f | 54 48 45 46 49 58 45 44 |LDIALOG_|THEFIXED|
|00005110| 54 45 58 54 32 20 3a 3d | 20 31 30 30 20 00 40 00 |TEXT2 :=| 100 .@.|
|00005120| 1f 00 00 00 53 54 41 4e | 44 41 52 44 53 51 4c 44 |....STAN|DARDSQLD|
|00005130| 49 41 4c 4f 47 5f 54 41 | 42 4c 45 4c 49 53 54 42 |IALOG_TA|BLELISTB|
|00005140| 4f 58 00 51 00 02 00 00 | 00 01 00 44 00 02 00 00 |OX.Q....|...D....|
|00005150| 00 03 00 48 00 04 00 00 | 00 71 bb b6 2e 4d 00 02 |...H....|.q...M..|
|00005160| 00 00 00 1b 00 45 00 02 | 00 00 00 00 00 46 00 02 |.....E..|.....F..|
|00005170| 00 00 00 02 00 47 00 02 | 00 00 00 ff ff 49 00 02 |.....G..|.....I..|
|00005180| 00 00 00 00 00 41 00 37 | 00 00 00 53 54 41 54 49 |.....A.7|...STATI|
|00005190| 43 20 44 45 46 49 4e 45 | 20 53 54 41 4e 44 41 52 |C DEFINE| STANDAR|
|000051a0| 44 53 51 4c 44 49 41 4c | 4f 47 5f 54 41 42 4c 45 |DSQLDIAL|OG_TABLE|
|000051b0| 4c 49 53 54 42 4f 58 20 | 3a 3d 20 31 30 31 20 0d |LISTBOX |:= 101 .|
|000051c0| 0a 00 4e 00 35 00 00 00 | 53 54 41 54 49 43 20 44 |..N.5...|STATIC D|
|000051d0| 45 46 49 4e 45 20 53 54 | 41 4e 44 41 52 44 53 51 |EFINE ST|ANDARDSQ|
|000051e0| 4c 44 49 41 4c 4f 47 5f | 54 41 42 4c 45 4c 49 53 |LDIALOG_|TABLELIS|
|000051f0| 54 42 4f 58 20 3a 3d 20 | 31 30 31 20 00 40 00 1d |TBOX := |101 .@..|
|00005200| 00 00 00 53 54 41 4e 44 | 41 52 44 53 51 4c 44 49 |...STAND|ARDSQLDI|
|00005210| 41 4c 4f 47 5f 4f 50 45 | 4e 5f 54 41 42 4c 45 00 |ALOG_OPE|N_TABLE.|
|00005220| 51 00 02 00 00 00 01 00 | 44 00 02 00 00 00 03 00 |Q.......|D.......|
|00005230| 48 00 04 00 00 00 71 bb | b6 2e 4d 00 02 00 00 00 |H.....q.|..M.....|
|00005240| 1b 00 45 00 02 00 00 00 | 00 00 46 00 02 00 00 00 |..E.....|..F.....|
|00005250| 02 00 47 00 02 00 00 00 | ff ff 49 00 02 00 00 00 |..G.....|..I.....|
|00005260| 00 00 41 00 35 00 00 00 | 53 54 41 54 49 43 20 44 |..A.5...|STATIC D|
|00005270| 45 46 49 4e 45 20 53 54 | 41 4e 44 41 52 44 53 51 |EFINE ST|ANDARDSQ|
|00005280| 4c 44 49 41 4c 4f 47 5f | 4f 50 45 4e 5f 54 41 42 |LDIALOG_|OPEN_TAB|
|00005290| 4c 45 20 3a 3d 20 31 30 | 32 20 0d 0a 00 4e 00 33 |LE := 10|2 ...N.3|
|000052a0| 00 00 00 53 54 41 54 49 | 43 20 44 45 46 49 4e 45 |...STATI|C DEFINE|
|000052b0| 20 53 54 41 4e 44 41 52 | 44 53 51 4c 44 49 41 4c | STANDAR|DSQLDIAL|
|000052c0| 4f 47 5f 4f 50 45 4e 5f | 54 41 42 4c 45 20 3a 3d |OG_OPEN_|TABLE :=|
|000052d0| 20 31 30 32 20 00 40 00 | 19 00 00 00 53 54 41 4e | 102 .@.|....STAN|
|000052e0| 44 41 52 44 53 51 4c 44 | 49 41 4c 4f 47 5f 43 41 |DARDSQLD|IALOG_CA|
|000052f0| 4e 43 45 4c 00 51 00 02 | 00 00 00 01 00 44 00 02 |NCEL.Q..|.....D..|
|00005300| 00 00 00 03 00 48 00 04 | 00 00 00 71 bb b6 2e 4d |.....H..|...q...M|
|00005310| 00 02 00 00 00 1b 00 45 | 00 02 00 00 00 00 00 46 |.......E|.......F|
|00005320| 00 02 00 00 00 02 00 47 | 00 02 00 00 00 ff ff 49 |.......G|.......I|
|00005330| 00 02 00 00 00 00 00 41 | 00 31 00 00 00 53 54 41 |.......A|.1...STA|
|00005340| 54 49 43 20 44 45 46 49 | 4e 45 20 53 54 41 4e 44 |TIC DEFI|NE STAND|
|00005350| 41 52 44 53 51 4c 44 49 | 41 4c 4f 47 5f 43 41 4e |ARDSQLDI|ALOG_CAN|
|00005360| 43 45 4c 20 3a 3d 20 31 | 30 33 20 0d 0a 00 4e 00 |CEL := 1|03 ...N.|
|00005370| 2f 00 00 00 53 54 41 54 | 49 43 20 44 45 46 49 4e |/...STAT|IC DEFIN|
|00005380| 45 20 53 54 41 4e 44 41 | 52 44 53 51 4c 44 49 41 |E STANDA|RDSQLDIA|
|00005390| 4c 4f 47 5f 43 41 4e 43 | 45 4c 20 3a 3d 20 31 30 |LOG_CANC|EL := 10|
|000053a0| 33 20 00 40 00 12 00 00 | 00 53 54 41 4e 44 41 52 |3 .@....|.STANDAR|
|000053b0| 44 53 51 4c 44 49 41 4c | 4f 47 00 51 00 02 00 00 |DSQLDIAL|OG.Q....|
|000053c0| 00 02 00 44 00 02 00 00 | 00 03 00 48 00 04 00 00 |...D....|...H....|
|000053d0| 00 71 bb b6 2e 4d 00 02 | 00 00 00 17 00 45 00 02 |.q...M..|.....E..|
|000053e0| 00 00 00 00 00 46 00 02 | 00 00 00 02 00 47 00 02 |.....F..|.....G..|
|000053f0| 00 00 00 ff ff 49 00 02 | 00 00 00 00 00 41 00 c7 |.....I..|.....A..|
|00005400| 00 00 00 43 4c 41 53 53 | 20 53 74 61 6e 64 61 72 |...CLASS| Standar|
|00005410| 64 53 51 4c 44 69 61 6c | 6f 67 20 49 4e 48 45 52 |dSQLDial|og INHER|
|00005420| 49 54 20 44 49 41 4c 4f | 47 57 49 4e 44 4f 57 20 |IT DIALO|GWINDOW |
|00005430| 0d 0a 0d 0a 09 50 52 4f | 54 45 43 54 20 6f 44 43 |.....PRO|TECT oDC|
|00005440| 74 68 65 46 69 78 65 64 | 54 65 78 74 32 20 41 53 |theFixed|Text2 AS|
|00005450| 20 46 49 58 45 44 54 45 | 58 54 0d 0a 09 50 52 4f | FIXEDTE|XT...PRO|
|00005460| 54 45 43 54 20 6f 44 43 | 54 61 62 6c 65 4c 69 73 |TECT oDC|TableLis|
|00005470| 74 42 6f 78 20 41 53 20 | 4c 49 53 54 42 4f 58 0d |tBox AS |LISTBOX.|
|00005480| 0a 09 50 52 4f 54 45 43 | 54 20 6f 43 43 4f 70 65 |..PROTEC|T oCCOpe|
|00005490| 6e 5f 54 61 62 6c 65 20 | 41 53 20 50 55 53 48 42 |n_Table |AS PUSHB|
|000054a0| 55 54 54 4f 4e 0d 0a 09 | 50 52 4f 54 45 43 54 20 |UTTON...|PROTECT |
|000054b0| 6f 43 43 43 61 6e 63 65 | 6c 20 41 53 20 50 55 53 |oCCCance|l AS PUS|
|000054c0| 48 42 55 54 54 4f 4e 0d | 0a 00 4e 00 2e 00 00 00 |HBUTTON.|..N.....|
|000054d0| 43 4c 41 53 53 20 53 74 | 61 6e 64 61 72 64 53 51 |CLASS St|andardSQ|
|000054e0| 4c 44 69 61 6c 6f 67 20 | 49 4e 48 45 52 49 54 20 |LDialog |INHERIT |
|000054f0| 44 49 41 4c 4f 47 57 49 | 4e 44 4f 57 20 00 40 00 |DIALOGWI|NDOW .@.|
|00005500| 17 00 00 00 53 54 41 4e | 44 41 52 44 53 51 4c 44 |....STAN|DARDSQLD|
|00005510| 49 41 4c 4f 47 3a 49 4e | 49 54 00 51 00 02 00 00 |IALOG:IN|IT.Q....|
|00005520| 00 02 00 44 00 02 00 00 | 00 03 00 48 00 04 00 00 |...D....|...H....|
|00005530| 00 71 bb b6 2e 4d 00 02 | 00 00 00 15 00 45 00 02 |.q...M..|.....E..|
|00005540| 00 00 00 00 00 46 00 02 | 00 00 00 02 00 47 00 02 |.....F..|.....G..|
|00005550| 00 00 00 ff ff 49 00 02 | 00 00 00 00 00 41 00 20 |.....I..|.....A. |
|00005560| 03 00 00 4d 45 54 48 4f | 44 20 49 4e 49 54 28 6f |...METHO|D INIT(o|
|00005570| 50 61 72 65 6e 74 29 20 | 43 4c 41 53 53 20 53 74 |Parent) |CLASS St|
|00005580| 61 6e 64 61 72 64 53 51 | 4c 44 69 61 6c 6f 67 20 |andardSQ|LDialog |
|00005590| 0d 0a 0d 0a 73 75 70 65 | 72 3a 69 6e 69 74 28 6f |....supe|r:init(o|
|000055a0| 50 61 72 65 6e 74 2c 52 | 65 73 6f 75 72 63 65 49 |Parent,R|esourceI|
|000055b0| 44 7b 22 53 74 61 6e 64 | 61 72 64 53 51 4c 44 69 |D{"Stand|ardSQLDi|
|000055c0| 61 6c 6f 67 22 7d 2c 54 | 52 55 45 29 0d 0a 0d 0a |alog"},T|RUE)....|
|000055d0| 6f 44 43 74 68 65 46 69 | 78 65 64 54 65 78 74 32 |oDCtheFi|xedText2|
|000055e0| 20 3a 3d 20 46 69 78 65 | 64 54 65 78 74 7b 73 65 | := Fixe|dText{se|
|000055f0| 6c 66 2c 52 65 73 6f 75 | 72 63 65 49 44 7b 53 54 |lf,Resou|rceID{ST|
|00005600| 41 4e 44 41 52 44 53 51 | 4c 44 49 41 4c 4f 47 5f |ANDARDSQ|LDIALOG_|
|00005610| 54 48 45 46 49 58 45 44 | 54 45 58 54 32 7d 7d 0d |THEFIXED|TEXT2}}.|
|00005620| 0a 6f 44 43 74 68 65 46 | 69 78 65 64 54 65 78 74 |.oDCtheF|ixedText|
|00005630| 32 3a 48 79 70 65 72 4c | 61 62 65 6c 20 3a 3d 20 |2:HyperL|abel := |
|00005640| 48 79 70 65 72 4c 61 62 | 65 6c 7b 23 74 68 65 46 |HyperLab|el{#theF|
|00005650| 69 78 65 64 54 65 78 74 | 32 2c 22 53 65 6c 65 63 |ixedText|2,"Selec|
|00005660| 74 20 61 20 54 61 62 6c | 65 22 2c 2c 7d 0d 0a 0d |t a Tabl|e",,}...|
|00005670| 0a 6f 44 43 54 61 62 6c | 65 4c 69 73 74 42 6f 78 |.oDCTabl|eListBox|
|00005680| 20 3a 3d 20 4c 69 73 74 | 42 6f 78 7b 73 65 6c 66 | := List|Box{self|
|00005690| 2c 52 65 73 6f 75 72 63 | 65 49 44 7b 53 54 41 4e |,Resourc|eID{STAN|
|000056a0| 44 41 52 44 53 51 4c 44 | 49 41 4c 4f 47 5f 54 41 |DARDSQLD|IALOG_TA|
|000056b0| 42 4c 45 4c 49 53 54 42 | 4f 58 7d 7d 0d 0a 6f 44 |BLELISTB|OX}}..oD|
|000056c0| 43 54 61 62 6c 65 4c 69 | 73 74 42 6f 78 3a 48 79 |CTableLi|stBox:Hy|
|000056d0| 70 65 72 4c 61 62 65 6c | 20 3a 3d 20 48 79 70 65 |perLabel| := Hype|
|000056e0| 72 4c 61 62 65 6c 7b 23 | 54 61 62 6c 65 4c 69 73 |rLabel{#|TableLis|
|000056f0| 74 42 6f 78 2c 22 4f 44 | 42 43 20 54 61 62 6c 65 |tBox,"OD|BC Table|
|00005700| 73 22 2c 22 4f 44 42 43 | 20 54 61 62 6c 65 73 22 |s","ODBC| Tables"|
|00005710| 2c 7d 0d 0a 0d 0a 6f 43 | 43 4f 70 65 6e 5f 54 61 |,}....oC|COpen_Ta|
|00005720| 62 6c 65 20 3a 3d 20 50 | 75 73 68 42 75 74 74 6f |ble := P|ushButto|
|00005730| 6e 7b 73 65 6c 66 2c 52 | 65 73 6f 75 72 63 65 49 |n{self,R|esourceI|
|00005740| 44 7b 53 54 41 4e 44 41 | 52 44 53 51 4c 44 49 41 |D{STANDA|RDSQLDIA|
|00005750| 4c 4f 47 5f 4f 50 45 4e | 5f 54 41 42 4c 45 7d 7d |LOG_OPEN|_TABLE}}|
|00005760| 0d 0a 6f 43 43 4f 70 65 | 6e 5f 54 61 62 6c 65 3a |..oCCOpe|n_Table:|
|00005770| 48 79 70 65 72 4c 61 62 | 65 6c 20 3a 3d 20 48 79 |HyperLab|el := Hy|
|00005780| 70 65 72 4c 61 62 65 6c | 7b 23 4f 70 65 6e 5f 54 |perLabel|{#Open_T|
|00005790| 61 62 6c 65 2c 22 4f 70 | 65 6e 20 54 61 62 6c 65 |able,"Op|en Table|
|000057a0| 2e 2e 2e 22 2c 2c 7d 0d | 0a 0d 0a 6f 43 43 43 61 |...",,}.|...oCCCa|
|000057b0| 6e 63 65 6c 20 3a 3d 20 | 50 75 73 68 42 75 74 74 |ncel := |PushButt|
|000057c0| 6f 6e 7b 73 65 6c 66 2c | 52 65 73 6f 75 72 63 65 |on{self,|Resource|
|000057d0| 49 44 7b 53 54 41 4e 44 | 41 52 44 53 51 4c 44 49 |ID{STAND|ARDSQLDI|
|000057e0| 41 4c 4f 47 5f 43 41 4e | 43 45 4c 7d 7d 0d 0a 6f |ALOG_CAN|CEL}}..o|
|000057f0| 43 43 43 61 6e 63 65 6c | 3a 48 79 70 65 72 4c 61 |CCCancel|:HyperLa|
|00005800| 62 65 6c 20 3a 3d 20 48 | 79 70 65 72 4c 61 62 65 |bel := H|yperLabe|
|00005810| 6c 7b 23 43 61 6e 63 65 | 6c 2c 22 43 61 6e 63 65 |l{#Cance|l,"Cance|
|00005820| 6c 22 2c 2c 7d 0d 0a 0d | 0a 73 65 6c 66 3a 48 79 |l",,}...|.self:Hy|
|00005830| 70 65 72 4c 61 62 65 6c | 20 3a 3d 20 48 79 70 65 |perLabel| := Hype|
|00005840| 72 4c 61 62 65 6c 7b 23 | 53 74 61 6e 64 61 72 64 |rLabel{#|Standard|
|00005850| 53 51 4c 44 69 61 6c 6f | 67 2c 22 4f 70 65 6e 20 |SQLDialo|g,"Open |
|00005860| 61 20 53 51 4c 20 54 61 | 62 6c 65 22 2c 2c 7d 0d |a SQL Ta|ble",,}.|
|00005870| 0a 0d 0a 72 65 74 75 72 | 6e 20 73 65 6c 66 0d 0a |...retur|n self..|
|00005880| 0d 0a 00 4e 00 2e 00 00 | 00 4d 45 54 48 4f 44 20 |...N....|.METHOD |
|00005890| 49 4e 49 54 28 6f 50 61 | 72 65 6e 74 29 20 43 4c |INIT(oPa|rent) CL|
|000058a0| 41 53 53 20 53 74 61 6e | 64 61 72 64 53 51 4c 44 |ASS Stan|dardSQLD|
|000058b0| 69 61 6c 6f 67 20 00 ff | ff 00 00 00 00 |ialog ..|..... |
+--------+-------------------------+-------------------------+--------+--------+
