/ Developer CD Series 1999 …ember: Reference Library / Apple Developer Reference Library (December 1999) (Disk 1).iso / pc / technical documentation / develop / develop issue 24 / develop issue 24 code / scriptable database 1.0a15.sea / Scriptable Database 1.0a15 / Scripting / TransactionSuite.cp

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 13 54 72 61 6e 73 61 | 63 74 69 6f 6e 53 75 69 |..Transa|ctionSui|
|00000010| 74 65 2e 63 70 00 00 00 | 00 00 00 00 00 00 00 00 |te.cp...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 01 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 2f 64 00 | 00 01 9a ad 4e f2 82 ad |...../d.|....N...|
|00000060| 4e f2 82 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |N.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 1d 73 00 00 |........|.....s..|
|00000080| 0d 23 69 6e 63 6c 75 64 | 65 20 22 54 72 61 6e 73 |.#includ|e "Trans|
|00000090| 61 63 74 69 6f 6e 53 75 | 69 74 65 2e 68 22 0d 23 |actionSu|ite.h".#|
|000000a0| 69 6e 63 6c 75 64 65 20 | 22 54 72 61 6e 73 61 63 |include |"Transac|
|000000b0| 74 69 6f 6e 2e 68 22 0d | 23 69 6e 63 6c 75 64 65 |tion.h".|#include|
|000000c0| 20 22 4d 6f 72 65 41 45 | 4d 2e 68 22 0d 23 69 6e | "MoreAE|M.h".#in|
|000000d0| 63 6c 75 64 65 20 22 45 | 76 65 6e 74 48 61 6e 64 |clude "E|ventHand|
|000000e0| 6c 65 72 54 61 62 6c 65 | 2e 68 22 0d 0d 0d 0d 0d |lerTable|.h".....|
|000000f0| 54 54 72 61 6e 73 61 63 | 74 69 6f 6e 4c 69 73 74 |TTransac|tionList|
|00000100| 20 54 54 72 61 6e 73 61 | 63 74 69 6f 6e 53 75 69 | TTransa|ctionSui|
|00000110| 74 65 3a 3a 67 54 72 61 | 6e 73 61 63 74 69 6f 6e |te::gTra|nsaction|
|00000120| 4c 69 73 74 3b 09 0d 6c | 6f 6e 67 20 54 54 72 61 |List;..l|ong TTra|
|00000130| 6e 73 61 63 74 69 6f 6e | 53 75 69 74 65 3a 3a 67 |nsaction|Suite::g|
|00000140| 54 72 61 6e 73 61 63 74 | 69 6f 6e 49 44 20 3d 20 |Transact|ionID = |
|00000150| 31 3b 0d 0d 2f 2f 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |1;..//--|--------|
|00000160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 2f |--------|------./|
|000001b0| 2f 20 54 54 72 61 6e 73 | 61 63 74 69 6f 6e 53 75 |/ TTrans|actionSu|
|000001c0| 69 74 65 3a 3a 49 6e 73 | 74 61 6c 6c 41 45 48 61 |ite::Ins|tallAEHa|
|000001d0| 6e 64 6c 65 72 73 3a 20 | 0d 2f 2f 2d 2d 2d 2d 2d |ndlers: |.//-----|
|000001e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000200| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000210| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000230| 2d 2d 2d 0d 76 6f 69 64 | 20 54 54 72 61 6e 73 61 |---.void| TTransa|
|00000240| 63 74 69 6f 6e 53 75 69 | 74 65 3a 3a 49 6e 73 74 |ctionSui|te::Inst|
|00000250| 61 6c 6c 41 45 48 61 6e | 64 6c 65 72 73 28 54 45 |allAEHan|dlers(TE|
|00000260| 76 65 6e 74 48 61 6e 64 | 6c 65 72 54 61 62 6c 65 |ventHand|lerTable|
|00000270| 26 20 65 76 65 6e 74 54 | 61 62 6c 65 29 0d 7b 09 |& eventT|able).{.|
|00000280| 0d 09 2f 2f 0d 09 2f 2f | 20 54 68 65 20 65 76 65 |..//..//| The eve|
|00000290| 6e 74 20 68 61 6e 64 6c | 65 72 20 74 61 62 6c 65 |nt handl|er table|
|000002a0| 20 77 69 6c 6c 20 63 72 | 65 61 74 65 20 61 20 55 | will cr|eate a U|
|000002b0| 50 50 20 69 66 20 69 74 | 20 6e 65 65 64 73 20 74 |PP if it| needs t|
|000002c0| 6f 0d 09 2f 2f 0d 09 46 | 61 69 6c 45 72 72 28 65 |o..//..F|ailErr(e|
|000002d0| 76 65 6e 74 54 61 62 6c | 65 2e 49 6e 73 74 61 6c |ventTabl|e.Instal|
|000002e0| 6c 48 61 6e 64 6c 65 72 | 28 6b 41 45 4d 69 73 63 |lHandler|(kAEMisc|
|000002f0| 53 74 61 6e 64 61 72 64 | 73 2c 20 6b 41 45 42 65 |Standard|s, kAEBe|
|00000300| 67 69 6e 54 72 61 6e 73 | 61 63 74 69 6f 6e 2c 20 |ginTrans|action, |
|00000310| 28 45 76 65 6e 74 48 61 | 6e 64 6c 65 72 50 72 6f |(EventHa|ndlerPro|
|00000320| 63 50 74 72 29 20 26 54 | 54 72 61 6e 73 61 63 74 |cPtr) &T|Transact|
|00000330| 69 6f 6e 53 75 69 74 65 | 3a 3a 42 65 67 69 6e 54 |ionSuite|::BeginT|
|00000340| 72 61 6e 73 61 63 74 69 | 6f 6e 2c 20 30 29 29 3b |ransacti|on, 0));|
|00000350| 0d 09 46 61 69 6c 45 72 | 72 28 65 76 65 6e 74 54 |..FailEr|r(eventT|
|00000360| 61 62 6c 65 2e 49 6e 73 | 74 61 6c 6c 48 61 6e 64 |able.Ins|tallHand|
|00000370| 6c 65 72 28 6b 41 45 4d | 69 73 63 53 74 61 6e 64 |ler(kAEM|iscStand|
|00000380| 61 72 64 73 2c 20 6b 41 | 45 45 6e 64 54 72 61 6e |ards, kA|EEndTran|
|00000390| 73 61 63 74 69 6f 6e 2c | 20 28 45 76 65 6e 74 48 |saction,| (EventH|
|000003a0| 61 6e 64 6c 65 72 50 72 | 6f 63 50 74 72 29 20 26 |andlerPr|ocPtr) &|
|000003b0| 54 54 72 61 6e 73 61 63 | 74 69 6f 6e 53 75 69 74 |TTransac|tionSuit|
|000003c0| 65 3a 3a 45 6e 64 54 72 | 61 6e 73 61 63 74 69 6f |e::EndTr|ansactio|
|000003d0| 6e 2c 20 30 29 29 3b 0d | 09 46 61 69 6c 45 72 72 |n, 0));.|.FailErr|
|000003e0| 28 65 76 65 6e 74 54 61 | 62 6c 65 2e 49 6e 73 74 |(eventTa|ble.Inst|
|000003f0| 61 6c 6c 48 61 6e 64 6c | 65 72 28 6b 41 45 4d 69 |allHandl|er(kAEMi|
|00000400| 73 63 53 74 61 6e 64 61 | 72 64 73 2c 20 6b 41 45 |scStanda|rds, kAE|
|00000410| 54 72 61 6e 73 61 63 74 | 69 6f 6e 54 65 72 6d 69 |Transact|ionTermi|
|00000420| 6e 61 74 65 64 2c 20 28 | 45 76 65 6e 74 48 61 6e |nated, (|EventHan|
|00000430| 64 6c 65 72 50 72 6f 63 | 50 74 72 29 20 26 54 54 |dlerProc|Ptr) &TT|
|00000440| 72 61 6e 73 61 63 74 69 | 6f 6e 53 75 69 74 65 3a |ransacti|onSuite:|
|00000450| 3a 54 65 72 6d 69 6e 61 | 74 65 54 72 61 6e 73 61 |:Termina|teTransa|
|00000460| 63 74 69 6f 6e 2c 20 30 | 29 29 3b 0d 7d 20 2f 2f |ction, 0|));.} //|
|00000470| 20 54 43 6f 72 65 53 75 | 69 74 65 3a 3a 49 6e 73 | TCoreSu|ite::Ins|
|00000480| 74 61 6c 6c 41 45 48 61 | 6e 64 6c 65 72 73 20 0d |tallAEHa|ndlers .|
|00000490| 0d 2f 2f 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.//-----|--------|
|000004a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2f 2f 20 54 |--------|---.// T|
|000004f0| 54 72 61 6e 73 61 63 74 | 69 6f 6e 53 75 69 74 65 |Transact|ionSuite|
|00000500| 3a 3a 47 65 6e 65 72 61 | 74 65 4e 65 77 54 72 61 |::Genera|teNewTra|
|00000510| 6e 73 61 63 74 69 6f 6e | 49 44 0d 2f 2f 2d 2d 2d |nsaction|ID.//---|
|00000520| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000530| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000540| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000550| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000560| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000570| 2d 2d 2d 2d 2d 0d 53 49 | 6e 74 33 32 20 54 54 72 |-----.SI|nt32 TTr|
|00000580| 61 6e 73 61 63 74 69 6f | 6e 53 75 69 74 65 3a 3a |ansactio|nSuite::|
|00000590| 47 65 6e 65 72 61 74 65 | 4e 65 77 54 72 61 6e 73 |Generate|NewTrans|
|000005a0| 61 63 74 69 6f 6e 49 44 | 28 29 0d 7b 0d 09 72 65 |actionID|().{..re|
|000005b0| 74 75 72 6e 20 2b 2b 67 | 54 72 61 6e 73 61 63 74 |turn ++g|Transact|
|000005c0| 69 6f 6e 49 44 3b 0d 7d | 0d 0d 2f 2f 2d 2d 2d 2d |ionID;.}|..//----|
|000005d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000600| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000610| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000620| 2d 2d 2d 2d 0d 2f 2f 20 | 54 54 72 61 6e 73 61 63 |----.// |TTransac|
|00000630| 74 69 6f 6e 53 75 69 74 | 65 3a 3a 42 65 67 69 6e |tionSuit|e::Begin|
|00000640| 54 72 61 6e 73 61 63 74 | 69 6f 6e 3a 20 0d 2f 2f |Transact|ion: .//|
|00000650| 0d 2f 2f 20 54 68 69 73 | 20 65 76 65 6e 74 20 69 |.// This| event i|
|00000660| 73 20 72 65 63 65 69 76 | 65 64 20 61 74 20 74 68 |s receiv|ed at th|
|00000670| 65 20 62 65 67 69 6e 6e | 69 6e 67 20 6f 66 20 61 |e beginn|ing of a|
|00000680| 20 6e 65 77 20 74 72 61 | 6e 73 61 63 74 69 6f 6e | new tra|nsaction|
|00000690| 2e 0d 2f 2f 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..//----|--------|
|000006a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 70 61 73 |--------|----.pas|
|000006f0| 63 61 6c 20 4f 53 45 72 | 72 20 54 54 72 61 6e 73 |cal OSEr|r TTrans|
|00000700| 61 63 74 69 6f 6e 53 75 | 69 74 65 3a 3a 42 65 67 |actionSu|ite::Beg|
|00000710| 69 6e 54 72 61 6e 73 61 | 63 74 69 6f 6e 28 54 41 |inTransa|ction(TA|
|00000720| 45 76 65 6e 74 26 20 61 | 65 2c 20 54 41 45 76 65 |Event& a|e, TAEve|
|00000730| 6e 74 26 20 72 65 70 6c | 79 2c 20 6c 6f 6e 67 20 |nt& repl|y, long |
|00000740| 2f 2a 20 72 65 66 43 6f | 6e 20 2a 2f 29 0d 7b 0d |/* refCo|n */).{.|
|00000750| 09 2f 2f 20 44 65 62 75 | 67 53 74 72 28 22 5c 70 |.// Debu|gStr("\p|
|00000760| 54 54 72 61 6e 73 61 63 | 74 69 6f 6e 53 75 69 74 |TTransac|tionSuit|
|00000770| 65 3a 3a 42 65 67 69 6e | 54 72 61 6e 73 61 63 74 |e::Begin|Transact|
|00000780| 69 6f 6e 22 29 3b 0d 09 | 54 41 45 54 72 61 6e 73 |ion");..|TAETrans|
|00000790| 61 63 74 69 6f 6e 20 74 | 28 61 65 2c 20 72 65 70 |action t|(ae, rep|
|000007a0| 6c 79 29 3b 0d 09 4f 53 | 45 72 72 20 65 72 72 20 |ly);..OS|Err err |
|000007b0| 3d 20 6e 6f 45 72 72 3b | 0d 09 0d 09 2f 2f 0d 09 |= noErr;|....//..|
|000007c0| 2f 2f 20 41 70 70 6c 65 | 53 63 72 69 70 74 20 69 |// Apple|Script i|
|000007d0| 6e 73 65 72 74 73 20 61 | 20 70 61 72 61 6d 65 74 |nserts a| paramet|
|000007e0| 65 72 20 6b 65 79 53 75 | 62 6a 65 63 74 41 74 74 |er keySu|bjectAtt|
|000007f0| 72 20 69 6e 20 74 68 65 | 0d 09 2f 2f 20 74 72 61 |r in the|..// tra|
|00000800| 6e 73 61 63 74 69 6f 6e | 2c 20 62 75 74 20 49 27 |nsaction|, but I'|
|00000810| 6d 20 6e 6f 74 20 73 75 | 72 65 20 68 6f 77 20 74 |m not su|re how t|
|00000820| 6f 20 73 70 65 63 69 66 | 79 20 77 68 61 74 20 64 |o specif|y what d|
|00000830| 61 74 61 0d 09 2f 2f 20 | 69 74 20 73 68 6f 75 6c |ata..// |it shoul|
|00000840| 64 20 63 6f 6e 74 61 69 | 6e 20 28 69 74 27 73 20 |d contai|n (it's |
|00000850| 61 20 6e 75 6c 6c 20 64 | 65 73 63 72 69 70 74 6f |a null d|escripto|
|00000860| 72 20 62 79 20 64 65 66 | 61 75 6c 74 29 2e 0d 09 |r by def|ault)...|
|00000870| 2f 2f 20 49 66 20 79 6f | 75 20 73 61 79 3a 0d 09 |// If yo|u say:..|
|00000880| 2f 2f 0d 09 2f 2f 09 09 | 77 69 74 68 20 74 72 61 |//..//..|with tra|
|00000890| 6e 73 61 63 74 69 6f 6e | 20 22 73 6f 6d 65 20 74 |nsaction| "some t|
|000008a0| 65 78 74 22 0d 09 2f 2f | 0d 09 2f 2f 20 74 68 65 |ext"..//|..// the|
|000008b0| 6e 20 22 73 6f 6d 65 20 | 74 65 78 74 22 20 77 69 |n "some |text" wi|
|000008c0| 6c 6c 20 62 65 20 69 6e | 20 74 68 65 20 64 69 72 |ll be in| the dir|
|000008d0| 65 63 74 20 6f 62 6a 65 | 63 74 20 6f 66 20 74 68 |ect obje|ct of th|
|000008e0| 65 0d 09 2f 2f 20 74 72 | 61 6e 73 61 63 74 69 6f |e..// tr|ansactio|
|000008f0| 6e 3b 20 6f 66 20 63 6f | 75 72 73 65 2c 20 6f 74 |n; of co|urse, ot|
|00000900| 68 65 72 20 64 61 74 61 | 20 74 79 70 65 73 20 28 |her data| types (|
|00000910| 65 2e 67 2e 20 6f 62 6a | 65 63 74 0d 09 2f 2f 20 |e.g. obj|ect..// |
|00000920| 73 70 65 63 69 66 69 65 | 72 73 29 20 63 6f 75 6c |specifie|rs) coul|
|00000930| 64 20 62 65 20 75 73 65 | 64 20 68 65 72 65 20 61 |d be use|d here a|
|00000940| 73 20 77 65 6c 6c 2c 20 | 61 6e 64 20 6d 69 67 68 |s well, |and migh|
|00000950| 74 20 62 65 0d 09 2f 2f | 20 75 73 65 66 75 6c 20 |t be..//| useful |
|00000960| 66 6f 72 20 73 6f 6d 65 | 20 74 79 70 65 73 20 6f |for some| types o|
|00000970| 66 20 74 72 61 6e 73 61 | 63 74 69 6f 6e 73 2e 0d |f transa|ctions..|
|00000980| 09 2f 2f 0d 09 2f 2f 20 | 49 74 20 6d 69 67 68 74 |.//..// |It might|
|00000990| 20 62 65 20 75 73 65 66 | 75 6c 20 74 6f 20 61 73 | be usef|ul to as|
|000009a0| 73 6f 63 69 61 74 65 20 | 74 68 65 20 73 75 62 6a |sociate |the subj|
|000009b0| 65 63 74 20 6f 66 20 74 | 68 65 0d 09 2f 2f 20 74 |ect of t|he..// t|
|000009c0| 72 61 6e 73 61 63 74 69 | 6f 6e 20 77 69 74 68 20 |ransacti|on with |
|000009d0| 74 68 65 20 74 72 61 6e | 73 61 63 74 69 6f 6e 20 |the tran|saction |
|000009e0| 6f 62 6a 65 63 74 20 73 | 6f 20 74 68 61 74 20 69 |object s|o that i|
|000009f0| 74 0d 09 2f 2f 20 28 74 | 68 65 20 73 75 62 6a 65 |t..// (t|he subje|
|00000a00| 63 74 29 20 6d 61 79 20 | 62 65 20 72 65 74 75 72 |ct) may |be retur|
|00000a10| 6e 65 64 20 61 6c 6f 6e | 67 20 77 69 74 68 20 74 |ned alon|g with t|
|00000a20| 68 65 20 65 72 72 6f 72 | 0d 09 2f 2f 20 63 6f 64 |he error|..// cod|
|00000a30| 65 20 77 68 65 6e 20 61 | 6e 20 65 76 65 6e 74 20 |e when a|n event |
|00000a40| 66 61 69 6c 73 20 64 75 | 65 20 74 6f 20 61 20 63 |fails du|e to a c|
|00000a50| 6f 6e 66 6c 69 63 74 20 | 77 69 74 68 20 73 6f 6d |onflict |with som|
|00000a60| 65 0d 09 2f 2f 20 6f 74 | 68 65 72 20 74 72 61 6e |e..// ot|her tran|
|00000a70| 73 61 63 74 69 6f 6e 2e | 0d 09 2f 2f 0d 09 0d 09 |saction.|..//....|
|00000a80| 2f 2f 0d 09 2f 2f 20 57 | 65 20 64 6f 6e 27 74 20 |//..// W|e don't |
|00000a90| 65 78 70 65 63 74 20 74 | 68 61 74 20 74 68 65 72 |expect t|hat ther|
|00000aa0| 65 20 77 69 6c 6c 20 62 | 65 20 61 20 74 72 61 6e |e will b|e a tran|
|00000ab0| 73 61 63 74 69 6f 6e 20 | 61 73 73 6f 63 69 61 74 |saction |associat|
|00000ac0| 65 64 0d 09 2f 2f 20 77 | 69 74 68 20 74 68 69 73 |ed..// w|ith this|
|00000ad0| 20 65 76 65 6e 74 2c 20 | 62 75 74 20 77 65 27 6c | event, |but we'l|
|00000ae0| 6c 20 74 65 73 74 20 66 | 6f 72 20 69 74 20 61 6e |l test f|or it an|
|00000af0| 79 77 61 79 0d 09 2f 2f | 0d 09 54 54 72 61 6e 73 |yway..//|..TTrans|
|00000b00| 61 63 74 69 6f 6e 2a 20 | 74 72 61 6e 73 61 63 74 |action* |transact|
|00000b10| 69 6f 6e 20 3d 20 54 54 | 72 61 6e 73 61 63 74 69 |ion = TT|ransacti|
|00000b20| 6f 6e 53 75 69 74 65 3a | 3a 47 65 74 54 72 61 6e |onSuite:|:GetTran|
|00000b30| 73 61 63 74 69 6f 6e 46 | 72 6f 6d 45 76 65 6e 74 |sactionF|romEvent|
|00000b40| 28 74 29 3b 0d 09 69 66 | 28 74 72 61 6e 73 61 63 |(t);..if|(transac|
|00000b50| 74 69 6f 6e 20 3d 3d 20 | 6e 69 6c 29 0d 09 7b 0d |tion == |nil)..{.|
|00000b60| 09 09 6c 6f 6e 67 20 74 | 72 61 6e 73 61 63 74 69 |..long t|ransacti|
|00000b70| 6f 6e 49 44 20 3d 20 54 | 54 72 61 6e 73 61 63 74 |onID = T|Transact|
|00000b80| 69 6f 6e 53 75 69 74 65 | 3a 3a 47 65 6e 65 72 61 |ionSuite|::Genera|
|00000b90| 74 65 4e 65 77 54 72 61 | 6e 73 61 63 74 69 6f 6e |teNewTra|nsaction|
|00000ba0| 49 44 28 29 3b 0d 09 09 | 54 54 72 61 6e 73 61 63 |ID();...|TTransac|
|00000bb0| 74 69 6f 6e 53 75 69 74 | 65 3a 3a 42 65 67 69 6e |tionSuit|e::Begin|
|00000bc0| 45 76 65 6e 74 54 72 61 | 6e 73 61 63 74 69 6f 6e |EventTra|nsaction|
|00000bd0| 28 74 2c 20 6b 4d 75 6c | 74 69 45 76 65 6e 74 54 |(t, kMul|tiEventT|
|00000be0| 72 61 6e 73 61 63 74 69 | 6f 6e 2c 20 74 72 61 6e |ransacti|on, tran|
|00000bf0| 73 61 63 74 69 6f 6e 49 | 44 2c 20 74 72 75 65 29 |sactionI|D, true)|
|00000c00| 3b 0d 09 09 0d 09 09 2f | 2f 0d 09 09 2f 2f 20 50 |;....../|/...// P|
|00000c10| 75 74 20 74 68 65 20 74 | 72 61 6e 73 61 63 74 69 |ut the t|ransacti|
|00000c20| 6f 6e 20 49 44 20 69 6e | 74 6f 20 74 68 65 20 72 |on ID in|to the r|
|00000c30| 65 73 75 6c 74 20 61 6e | 64 20 61 6c 73 6f 20 61 |esult an|d also a|
|00000c40| 20 27 6b 65 79 54 72 61 | 6e 73 61 63 74 69 6f 6e | 'keyTra|nsaction|
|00000c50| 49 44 41 74 74 72 27 0d | 09 09 2f 2f 20 28 41 70 |IDAttr'.|..// (Ap|
|00000c60| 70 6c 65 53 63 72 69 70 | 74 20 6c 6f 6f 6b 73 20 |pleScrip|t looks |
|00000c70| 61 74 20 74 68 69 73 20 | 70 61 72 61 6d 65 74 65 |at this |paramete|
|00000c80| 72 2d 2d 6e 6f 74 20 61 | 74 74 72 69 62 75 74 65 |r--not a|ttribute|
|00000c90| 2d 2d 69 6e 20 74 68 65 | 20 72 65 70 6c 79 29 0d |--in the| reply).|
|00000ca0| 09 09 2f 2f 0d 09 09 72 | 65 70 6c 79 2e 50 75 74 |..//...r|eply.Put|
|00000cb0| 53 49 6e 74 33 32 50 61 | 72 61 6d 65 74 65 72 28 |SInt32Pa|rameter(|
|00000cc0| 6b 65 79 54 72 61 6e 73 | 61 63 74 69 6f 6e 49 44 |keyTrans|actionID|
|00000cd0| 41 74 74 72 2c 20 74 72 | 61 6e 73 61 63 74 69 6f |Attr, tr|ansactio|
|00000ce0| 6e 49 44 29 3b 09 0d 09 | 09 72 65 70 6c 79 2e 50 |nID);...|.reply.P|
|00000cf0| 75 74 53 49 6e 74 33 32 | 50 61 72 61 6d 65 74 65 |utSInt32|Paramete|
|00000d00| 72 28 6b 65 79 41 45 52 | 65 73 75 6c 74 2c 20 74 |r(keyAER|esult, t|
|00000d10| 72 61 6e 73 61 63 74 69 | 6f 6e 49 44 29 3b 09 0d |ransacti|onID);..|
|00000d20| 09 7d 0d 09 0d 09 72 65 | 74 75 72 6e 20 65 72 72 |.}....re|turn err|
|00000d30| 3b 0d 7d 0d 0d 0d 2f 2f | 2d 2d 2d 2d 2d 2d 2d 2d |;.}...//|--------|
|00000d40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d90| 0d 2f 2f 20 54 54 72 61 | 6e 73 61 63 74 69 6f 6e |.// TTra|nsaction|
|00000da0| 53 75 69 74 65 3a 3a 45 | 6e 64 54 72 61 6e 73 61 |Suite::E|ndTransa|
|00000db0| 63 74 69 6f 6e 3a 20 0d | 2f 2f 0d 2f 2f 20 54 68 |ction: .|//.// Th|
|00000dc0| 69 73 20 65 76 65 6e 74 | 20 69 73 20 72 65 63 65 |is event| is rece|
|00000dd0| 69 76 65 64 20 61 74 20 | 74 68 65 20 65 6e 64 20 |ived at |the end |
|00000de0| 6f 66 20 61 20 73 75 63 | 63 65 73 73 66 75 6c 20 |of a suc|cessful |
|00000df0| 74 72 61 6e 73 61 63 74 | 69 6f 6e 0d 2f 2f 2d 2d |transact|ion.//--|
|00000e00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e50| 2d 2d 2d 2d 2d 2d 0d 70 | 61 73 63 61 6c 20 4f 53 |------.p|ascal OS|
|00000e60| 45 72 72 20 54 54 72 61 | 6e 73 61 63 74 69 6f 6e |Err TTra|nsaction|
|00000e70| 53 75 69 74 65 3a 3a 45 | 6e 64 54 72 61 6e 73 61 |Suite::E|ndTransa|
|00000e80| 63 74 69 6f 6e 28 54 41 | 45 76 65 6e 74 26 20 61 |ction(TA|Event& a|
|00000e90| 65 2c 20 54 41 45 76 65 | 6e 74 26 20 72 65 70 6c |e, TAEve|nt& repl|
|00000ea0| 79 2c 20 6c 6f 6e 67 20 | 2f 2a 20 72 65 66 43 6f |y, long |/* refCo|
|00000eb0| 6e 20 2a 2f 29 0d 7b 0d | 09 2f 2f 20 44 65 62 75 |n */).{.|.// Debu|
|00000ec0| 67 53 74 72 28 22 5c 70 | 54 54 72 61 6e 73 61 63 |gStr("\p|TTransac|
|00000ed0| 74 69 6f 6e 53 75 69 74 | 65 3a 3a 45 6e 64 54 72 |tionSuit|e::EndTr|
|00000ee0| 61 6e 73 61 63 74 69 6f | 6e 22 29 3b 0d 09 54 41 |ansactio|n");..TA|
|00000ef0| 45 54 72 61 6e 73 61 63 | 74 69 6f 6e 20 74 28 61 |ETransac|tion t(a|
|00000f00| 65 2c 20 72 65 70 6c 79 | 29 3b 0d 09 4f 53 45 72 |e, reply|);..OSEr|
|00000f10| 72 20 65 72 72 20 3d 20 | 6e 6f 45 72 72 3b 0d 09 |r err = |noErr;..|
|00000f20| 0d 09 2f 2f 0d 09 2f 2f | 20 47 65 74 20 74 68 65 |..//..//| Get the|
|00000f30| 20 74 72 61 6e 73 61 63 | 74 69 6f 6e 20 66 72 6f | transac|tion fro|
|00000f40| 6d 20 74 68 65 20 65 76 | 65 6e 74 20 61 6e 64 20 |m the ev|ent and |
|00000f50| 63 6f 6d 6d 69 74 20 69 | 74 73 20 63 68 61 6e 67 |commit i|ts chang|
|00000f60| 65 73 2e 0d 09 2f 2f 0d | 09 54 54 72 61 6e 73 61 |es...//.|.TTransa|
|00000f70| 63 74 69 6f 6e 2a 20 74 | 72 61 6e 73 61 63 74 69 |ction* t|ransacti|
|00000f80| 6f 6e 20 3d 20 54 54 72 | 61 6e 73 61 63 74 69 6f |on = TTr|ansactio|
|00000f90| 6e 53 75 69 74 65 3a 3a | 47 65 74 54 72 61 6e 73 |nSuite::|GetTrans|
|00000fa0| 61 63 74 69 6f 6e 46 72 | 6f 6d 45 76 65 6e 74 28 |actionFr|omEvent(|
|00000fb0| 74 29 3b 0d 09 69 66 28 | 74 72 61 6e 73 61 63 74 |t);..if(|transact|
|00000fc0| 69 6f 6e 20 21 3d 20 6e | 69 6c 29 0d 09 7b 0d 09 |ion != n|il)..{..|
|00000fd0| 09 54 54 72 61 6e 73 61 | 63 74 69 6f 6e 53 75 69 |.TTransa|ctionSui|
|00000fe0| 74 65 3a 3a 45 6e 64 45 | 76 65 6e 74 54 72 61 6e |te::EndE|ventTran|
|00000ff0| 73 61 63 74 69 6f 6e 28 | 74 2c 20 74 72 75 65 29 |saction(|t, true)|
|00001000| 3b 0d 09 7d 0d 0d 09 72 | 65 74 75 72 6e 20 65 72 |;..}...r|eturn er|
|00001010| 72 3b 0d 7d 0d 0d 2f 2f | 2d 2d 2d 2d 2d 2d 2d 2d |r;.}..//|--------|
|00001020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001070| 0d 2f 2f 20 54 54 72 61 | 6e 73 61 63 74 69 6f 6e |.// TTra|nsaction|
|00001080| 53 75 69 74 65 3a 3a 54 | 65 72 6d 69 6e 61 74 65 |Suite::T|erminate|
|00001090| 54 72 61 6e 73 61 63 74 | 69 6f 6e 3a 20 0d 2f 2f |Transact|ion: .//|
|000010a0| 0d 2f 2f 20 54 68 69 73 | 20 65 76 65 6e 74 20 69 |.// This| event i|
|000010b0| 73 20 72 65 63 65 69 76 | 65 64 20 77 68 65 6e 20 |s receiv|ed when |
|000010c0| 61 20 74 72 61 6e 73 61 | 63 74 69 6f 6e 20 69 73 |a transa|ction is|
|000010d0| 20 61 62 6f 72 74 65 64 | 20 64 75 65 20 74 6f 20 | aborted| due to |
|000010e0| 73 6f 6d 65 20 66 61 69 | 6c 75 72 65 0d 2f 2f 2d |some fai|lure.//-|
|000010f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001100| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001110| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001120| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001130| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001140| 2d 2d 2d 2d 2d 2d 2d 0d | 70 61 73 63 61 6c 20 4f |-------.|pascal O|
|00001150| 53 45 72 72 20 54 54 72 | 61 6e 73 61 63 74 69 6f |SErr TTr|ansactio|
|00001160| 6e 53 75 69 74 65 3a 3a | 54 65 72 6d 69 6e 61 74 |nSuite::|Terminat|
|00001170| 65 54 72 61 6e 73 61 63 | 74 69 6f 6e 28 54 41 45 |eTransac|tion(TAE|
|00001180| 76 65 6e 74 26 20 61 65 | 2c 20 54 41 45 76 65 6e |vent& ae|, TAEven|
|00001190| 74 26 20 72 65 70 6c 79 | 2c 20 6c 6f 6e 67 20 2f |t& reply|, long /|
|000011a0| 2a 20 72 65 66 43 6f 6e | 20 2a 2f 29 0d 7b 0d 09 |* refCon| */).{..|
|000011b0| 2f 2f 20 44 65 62 75 67 | 53 74 72 28 22 5c 70 54 |// Debug|Str("\pT|
|000011c0| 54 72 61 6e 73 61 63 74 | 69 6f 6e 53 75 69 74 65 |Transact|ionSuite|
|000011d0| 3a 3a 54 65 72 6d 69 6e | 61 74 65 54 72 61 6e 73 |::Termin|ateTrans|
|000011e0| 61 63 74 69 6f 6e 22 29 | 3b 0d 09 54 41 45 54 72 |action")|;..TAETr|
|000011f0| 61 6e 73 61 63 74 69 6f | 6e 20 74 28 61 65 2c 20 |ansactio|n t(ae, |
|00001200| 72 65 70 6c 79 29 3b 0d | 09 4f 53 45 72 72 20 65 |reply);.|.OSErr e|
|00001210| 72 72 20 3d 20 6e 6f 45 | 72 72 3b 0d 0d 09 54 54 |rr = noE|rr;...TT|
|00001220| 72 61 6e 73 61 63 74 69 | 6f 6e 2a 20 74 72 61 6e |ransacti|on* tran|
|00001230| 73 61 63 74 69 6f 6e 20 | 3d 20 54 54 72 61 6e 73 |saction |= TTrans|
|00001240| 61 63 74 69 6f 6e 53 75 | 69 74 65 3a 3a 47 65 74 |actionSu|ite::Get|
|00001250| 54 72 61 6e 73 61 63 74 | 69 6f 6e 46 72 6f 6d 45 |Transact|ionFromE|
|00001260| 76 65 6e 74 28 74 29 3b | 0d 09 69 66 28 74 72 61 |vent(t);|..if(tra|
|00001270| 6e 73 61 63 74 69 6f 6e | 20 21 3d 20 6e 69 6c 29 |nsaction| != nil)|
|00001280| 0d 09 7b 0d 09 09 54 54 | 72 61 6e 73 61 63 74 69 |..{...TT|ransacti|
|00001290| 6f 6e 53 75 69 74 65 3a | 3a 54 65 72 6d 69 6e 61 |onSuite:|:Termina|
|000012a0| 74 65 45 76 65 6e 74 54 | 72 61 6e 73 61 63 74 69 |teEventT|ransacti|
|000012b0| 6f 6e 28 74 2c 20 74 72 | 75 65 29 3b 0d 09 7d 0d |on(t, tr|ue);..}.|
|000012c0| 0d 09 72 65 74 75 72 6e | 20 65 72 72 3b 0d 7d 0d |..return| err;.}.|
|000012d0| 0d 2f 2f 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.//-----|--------|
|000012e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000012f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001300| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001320| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2f 2f 20 54 |--------|---.// T|
|00001330| 54 72 61 6e 73 61 63 74 | 69 6f 6e 53 75 69 74 65 |Transact|ionSuite|
|00001340| 3a 3a 47 65 74 54 72 61 | 6e 73 61 63 74 69 6f 6e |::GetTra|nsaction|
|00001350| 46 72 6f 6d 45 76 65 6e | 74 0d 2f 2f 0d 2f 2f 20 |FromEven|t.//.// |
|00001360| 4c 6f 6f 6b 20 75 70 20 | 74 68 65 20 74 72 61 6e |Look up |the tran|
|00001370| 73 61 63 74 69 6f 6e 20 | 61 73 73 6f 63 69 61 74 |saction |associat|
|00001380| 65 64 20 77 69 74 68 20 | 74 68 65 20 63 75 72 72 |ed with |the curr|
|00001390| 65 6e 74 20 65 76 65 6e | 74 2e 20 20 52 65 74 75 |ent even|t.  Retu|
|000013a0| 72 6e 20 6e 69 6c 20 69 | 66 20 74 68 65 72 65 0d |rn nil i|f there.|
|000013b0| 2f 2f 20 69 73 20 6e 6f | 20 69 74 65 6d 20 69 6e |// is no| item in|
|000013c0| 20 74 68 65 20 6c 69 73 | 74 20 74 68 61 74 20 6d | the lis|t that m|
|000013d0| 61 74 63 68 65 73 20 74 | 68 65 20 65 76 65 6e 74 |atches t|he event|
|000013e0| 27 73 20 74 72 61 6e 73 | 61 63 74 69 6f 6e 20 49 |'s trans|action I|
|000013f0| 44 2e 0d 2f 2f 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |D..//---|--------|
|00001400| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001410| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001420| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001430| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001440| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 54 54 |--------|-----.TT|
|00001450| 72 61 6e 73 61 63 74 69 | 6f 6e 2a 20 54 54 72 61 |ransacti|on* TTra|
|00001460| 6e 73 61 63 74 69 6f 6e | 53 75 69 74 65 3a 3a 47 |nsaction|Suite::G|
|00001470| 65 74 54 72 61 6e 73 61 | 63 74 69 6f 6e 46 72 6f |etTransa|ctionFro|
|00001480| 6d 45 76 65 6e 74 28 63 | 6f 6e 73 74 20 54 41 45 |mEvent(c|onst TAE|
|00001490| 54 72 61 6e 73 61 63 74 | 69 6f 6e 26 20 74 29 0d |Transact|ion& t).|
|000014a0| 7b 0d 09 54 54 72 61 6e | 73 61 63 74 69 6f 6e 2a |{..TTran|saction*|
|000014b0| 20 74 72 61 6e 73 61 63 | 74 69 6f 6e 20 3d 20 28 | transac|tion = (|
|000014c0| 54 54 72 61 6e 73 61 63 | 74 69 6f 6e 2a 29 74 2e |TTransac|tion*)t.|
|000014d0| 54 72 61 6e 73 61 63 74 | 69 6f 6e 43 61 63 68 65 |Transact|ionCache|
|000014e0| 28 29 3b 0d 09 69 66 28 | 74 72 61 6e 73 61 63 74 |();..if(|transact|
|000014f0| 69 6f 6e 20 3d 3d 20 6e | 69 6c 29 0d 09 7b 0d 09 |ion == n|il)..{..|
|00001500| 09 74 72 61 6e 73 61 63 | 74 69 6f 6e 20 3d 20 67 |.transac|tion = g|
|00001510| 54 72 61 6e 73 61 63 74 | 69 6f 6e 4c 69 73 74 2e |Transact|ionList.|
|00001520| 46 69 6e 64 54 72 61 6e | 73 61 63 74 69 6f 6e 28 |FindTran|saction(|
|00001530| 74 2e 47 65 74 54 72 61 | 6e 73 61 63 74 69 6f 6e |t.GetTra|nsaction|
|00001540| 49 44 28 29 29 3b 0d 09 | 09 28 28 54 41 45 54 72 |ID());..|.((TAETr|
|00001550| 61 6e 73 61 63 74 69 6f | 6e 26 29 74 29 2e 53 65 |ansactio|n&)t).Se|
|00001560| 74 54 72 61 6e 73 61 63 | 74 69 6f 6e 43 61 63 68 |tTransac|tionCach|
|00001570| 65 28 74 72 61 6e 73 61 | 63 74 69 6f 6e 29 3b 0d |e(transa|ction);.|
|00001580| 09 7d 0d 09 0d 09 72 65 | 74 75 72 6e 20 74 72 61 |.}....re|turn tra|
|00001590| 6e 73 61 63 74 69 6f 6e | 3b 0d 7d 0d 0d 2f 2f 2d |nsaction|;.}..//-|
|000015a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015f0| 2d 2d 2d 2d 2d 2d 2d 0d | 2f 2f 20 54 54 72 61 6e |-------.|// TTran|
|00001600| 73 61 63 74 69 6f 6e 53 | 75 69 74 65 3a 3a 42 65 |sactionS|uite::Be|
|00001610| 67 69 6e 45 76 65 6e 74 | 54 72 61 6e 73 61 63 74 |ginEvent|Transact|
|00001620| 69 6f 6e 0d 2f 2f 0d 2f | 2f 20 41 6e 20 65 76 65 |ion.//./|/ An eve|
|00001630| 6e 74 20 68 61 6e 64 6c | 65 72 20 63 61 6c 6c 73 |nt handl|er calls|
|00001640| 20 74 68 69 73 20 6d 65 | 74 68 6f 64 20 74 6f 20 | this me|thod to |
|00001650| 66 65 74 63 68 20 74 68 | 65 20 74 72 61 6e 73 61 |fetch th|e transa|
|00001660| 63 74 69 6f 6e 20 61 73 | 73 6f 63 69 61 74 65 64 |ction as|sociated|
|00001670| 20 77 69 74 68 0d 2f 2f | 20 74 68 65 20 67 69 76 | with.//| the giv|
|00001680| 65 6e 20 41 70 70 6c 65 | 45 76 65 6e 74 2e 20 20 |en Apple|Event.  |
|00001690| 49 66 20 74 68 65 20 41 | 70 70 6c 65 45 76 65 6e |If the A|ppleEven|
|000016a0| 74 20 69 73 20 6e 6f 74 | 20 70 61 72 74 20 6f 66 |t is not| part of|
|000016b0| 20 61 6e 79 20 74 72 61 | 6e 73 61 63 74 69 6f 6e | any tra|nsaction|
|000016c0| 2c 20 74 68 65 6e 0d 2f | 2f 20 62 79 20 64 65 66 |, then./|/ by def|
|000016d0| 61 75 6c 74 2c 20 61 20 | 6e 65 77 20 74 72 61 6e |ault, a |new tran|
|000016e0| 73 61 63 74 69 6f 6e 20 | 69 73 20 63 72 65 61 74 |saction |is creat|
|000016f0| 65 64 20 66 6f 72 20 74 | 68 65 20 65 78 63 6c 75 |ed for t|he exclu|
|00001700| 73 69 76 65 20 75 73 65 | 20 6f 66 20 74 68 69 73 |sive use| of this|
|00001710| 20 65 76 65 6e 74 2e 0d | 2f 2f 20 49 66 20 74 68 | event..|// If th|
|00001720| 65 20 65 76 65 6e 74 20 | 68 61 6e 64 6c 65 72 20 |e event |handler |
|00001730| 64 6f 65 73 20 6e 6f 74 | 20 72 65 71 75 69 72 65 |does not| require|
|00001740| 20 61 20 74 72 61 6e 73 | 61 63 74 69 6f 6e 20 28 | a trans|action (|
|00001750| 69 66 2c 20 66 6f 72 20 | 65 78 61 6d 70 6c 65 2c |if, for |example,|
|00001760| 20 74 68 65 20 65 76 65 | 6e 74 0d 2f 2f 20 6e 65 | the eve|nt.// ne|
|00001770| 76 65 72 20 6d 6f 64 69 | 66 69 65 73 20 74 68 65 |ver modi|fies the|
|00001780| 20 73 74 61 74 65 20 6f | 66 20 61 6e 79 20 74 72 | state o|f any tr|
|00001790| 61 6e 73 61 63 74 69 6f | 6e 2d 63 6f 6e 74 72 6f |ansactio|n-contro|
|000017a0| 6c 6c 65 64 20 6f 62 6a | 65 63 74 29 2c 20 74 68 |lled obj|ect), th|
|000017b0| 65 6e 20 69 74 20 63 61 | 6e 0d 2f 2f 20 70 61 73 |en it ca|n.// pas|
|000017c0| 73 20 27 66 61 6c 73 65 | 27 20 66 6f 72 20 74 72 |s 'false|' for tr|
|000017d0| 61 6e 73 61 63 74 69 6f | 6e 41 6c 77 61 79 73 4e |ansactio|nAlwaysN|
|000017e0| 65 65 64 65 64 20 74 6f | 20 73 75 70 70 72 65 73 |eeded to| suppres|
|000017f0| 73 20 63 72 65 61 74 69 | 6f 6e 20 6f 66 20 74 68 |s creati|on of th|
|00001800| 65 20 74 65 6d 70 6f 72 | 61 72 79 0d 2f 2f 20 74 |e tempor|ary.// t|
|00001810| 72 61 6e 73 61 63 74 69 | 6f 6e 2e 0d 2f 2f 0d 2f |ransacti|on..//./|
|00001820| 2f 20 6e 2e 62 2e 20 52 | 65 61 64 2d 6f 6e 6c 79 |/ n.b. R|ead-only|
|00001830| 20 65 76 65 6e 74 20 68 | 61 6e 64 6c 65 72 73 20 | event h|andlers |
|00001840| 73 68 6f 75 6c 64 20 61 | 6c 77 61 79 73 20 75 73 |should a|lways us|
|00001850| 65 20 74 68 65 20 74 72 | 61 6e 73 61 63 74 69 6f |e the tr|ansactio|
|00001860| 6e 20 61 73 73 6f 63 69 | 61 74 65 64 20 77 69 74 |n associ|ated wit|
|00001870| 68 0d 2f 2f 20 61 6e 20 | 65 76 65 6e 74 20 73 6f |h.// an |event so|
|00001880| 20 74 68 61 74 20 69 74 | 20 63 61 6e 20 27 73 65 | that it| can 'se|
|00001890| 65 27 20 63 68 61 6e 67 | 65 73 20 6d 61 64 65 20 |e' chang|es made |
|000018a0| 62 79 20 70 72 65 76 69 | 6f 75 73 20 65 76 65 6e |by previ|ous even|
|000018b0| 74 73 20 69 6e 20 74 68 | 65 20 73 61 6d 65 0d 2f |ts in th|e same./|
|000018c0| 2f 20 74 72 61 6e 73 61 | 63 74 69 6f 6e 2e 0d 2f |/ transa|ction../|
|000018d0| 2f 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |/-------|--------|
|000018e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000018f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001900| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 76 6f 69 64 20 54 |--------|-.void T|
|00001930| 54 72 61 6e 73 61 63 74 | 69 6f 6e 53 75 69 74 65 |Transact|ionSuite|
|00001940| 3a 3a 42 65 67 69 6e 45 | 76 65 6e 74 54 72 61 6e |::BeginE|ventTran|
|00001950| 73 61 63 74 69 6f 6e 28 | 54 41 45 54 72 61 6e 73 |saction(|TAETrans|
|00001960| 61 63 74 69 6f 6e 26 20 | 74 2c 20 42 6f 6f 6c 65 |action& |t, Boole|
|00001970| 61 6e 20 74 72 61 6e 73 | 61 63 74 69 6f 6e 41 6c |an trans|actionAl|
|00001980| 77 61 79 73 4e 65 65 64 | 65 64 20 2f 2a 3d 20 74 |waysNeed|ed /*= t|
|00001990| 72 75 65 2a 2f 29 0d 7b | 0d 09 42 65 67 69 6e 45 |rue*/).{|..BeginE|
|000019a0| 76 65 6e 74 54 72 61 6e | 73 61 63 74 69 6f 6e 28 |ventTran|saction(|
|000019b0| 74 2c 20 6b 53 69 6e 67 | 6c 65 45 76 65 6e 74 54 |t, kSing|leEventT|
|000019c0| 72 61 6e 73 61 63 74 69 | 6f 6e 2c 20 54 54 72 61 |ransacti|on, TTra|
|000019d0| 6e 73 61 63 74 69 6f 6e | 53 75 69 74 65 3a 3a 47 |nsaction|Suite::G|
|000019e0| 65 6e 65 72 61 74 65 4e | 65 77 54 72 61 6e 73 61 |enerateN|ewTransa|
|000019f0| 63 74 69 6f 6e 49 44 28 | 29 2c 20 74 72 61 6e 73 |ctionID(|), trans|
|00001a00| 61 63 74 69 6f 6e 41 6c | 77 61 79 73 4e 65 65 64 |actionAl|waysNeed|
|00001a10| 65 64 29 3b 0d 7d 0d 0d | 2f 2f 2d 2d 2d 2d 2d 2d |ed);.}..|//------|
|00001a20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a70| 2d 2d 0d 2f 2f 20 54 54 | 72 61 6e 73 61 63 74 69 |--.// TT|ransacti|
|00001a80| 6f 6e 53 75 69 74 65 3a | 3a 42 65 67 69 6e 45 76 |onSuite:|:BeginEv|
|00001a90| 65 6e 74 54 72 61 6e 73 | 61 63 74 69 6f 6e 0d 2f |entTrans|action./|
|00001aa0| 2f 0d 2f 2f 20 50 72 6f | 74 65 63 74 65 64 20 76 |/.// Pro|tected v|
|00001ab0| 65 72 73 69 6f 6e 20 6f | 66 20 61 62 6f 76 65 20 |ersion o|f above |
|00001ac0| 6d 65 74 68 6f 64 3b 20 | 61 20 74 72 61 6e 73 61 |method; |a transa|
|00001ad0| 63 74 69 6f 6e 54 79 70 | 65 20 6f 66 20 6b 4d 75 |ctionTyp|e of kMu|
|00001ae0| 6c 74 69 45 76 65 6e 74 | 54 72 61 6e 73 61 63 74 |ltiEvent|Transact|
|00001af0| 69 6f 6e 0d 2f 2f 20 63 | 61 6e 20 6f 6e 6c 79 20 |ion.// c|an only |
|00001b00| 62 65 20 70 72 6f 76 69 | 64 65 64 20 62 79 20 74 |be provi|ded by t|
|00001b10| 68 65 20 42 65 67 69 6e | 54 72 61 6e 73 61 63 74 |he Begin|Transact|
|00001b20| 69 6f 6e 20 65 76 65 6e | 74 2e 0d 2f 2f 2d 2d 2d |ion even|t..//---|
|00001b30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b80| 2d 2d 2d 2d 2d 0d 76 6f | 69 64 20 54 54 72 61 6e |-----.vo|id TTran|
|00001b90| 73 61 63 74 69 6f 6e 53 | 75 69 74 65 3a 3a 42 65 |sactionS|uite::Be|
|00001ba0| 67 69 6e 45 76 65 6e 74 | 54 72 61 6e 73 61 63 74 |ginEvent|Transact|
|00001bb0| 69 6f 6e 28 54 41 45 54 | 72 61 6e 73 61 63 74 69 |ion(TAET|ransacti|
|00001bc0| 6f 6e 26 20 74 2c 20 41 | 45 54 72 61 6e 73 61 63 |on& t, A|ETransac|
|00001bd0| 74 69 6f 6e 54 79 70 65 | 20 74 72 61 6e 73 61 63 |tionType| transac|
|00001be0| 74 69 6f 6e 54 79 70 65 | 2c 20 53 49 6e 74 33 32 |tionType|, SInt32|
|00001bf0| 20 74 72 61 6e 73 61 63 | 74 69 6f 6e 49 44 2c 20 | transac|tionID, |
|00001c00| 42 6f 6f 6c 65 61 6e 20 | 74 72 61 6e 73 61 63 74 |Boolean |transact|
|00001c10| 69 6f 6e 41 6c 77 61 79 | 73 4e 65 65 64 65 64 20 |ionAlway|sNeeded |
|00001c20| 2f 2a 3d 20 74 72 75 65 | 2a 2f 29 0d 7b 0d 09 2f |/*= true|*/).{../|
|00001c30| 2f 20 44 65 62 75 67 53 | 74 72 28 22 5c 70 54 54 |/ DebugS|tr("\pTT|
|00001c40| 72 61 6e 73 61 63 74 69 | 6f 6e 53 75 69 74 65 3a |ransacti|onSuite:|
|00001c50| 3a 42 65 67 69 6e 45 76 | 65 6e 74 54 72 61 6e 73 |:BeginEv|entTrans|
|00001c60| 61 63 74 69 6f 6e 22 29 | 3b 0d 09 54 54 72 61 6e |action")|;..TTran|
|00001c70| 73 61 63 74 69 6f 6e 2a | 20 74 72 61 6e 73 61 63 |saction*| transac|
|00001c80| 74 69 6f 6e 20 3d 20 54 | 54 72 61 6e 73 61 63 74 |tion = T|Transact|
|00001c90| 69 6f 6e 53 75 69 74 65 | 3a 3a 47 65 74 54 72 61 |ionSuite|::GetTra|
|00001ca0| 6e 73 61 63 74 69 6f 6e | 46 72 6f 6d 45 76 65 6e |nsaction|FromEven|
|00001cb0| 74 28 74 29 3b 0d 09 0d | 09 69 66 28 28 74 72 61 |t(t);...|.if((tra|
|00001cc0| 6e 73 61 63 74 69 6f 6e | 20 3d 3d 20 6e 69 6c 29 |nsaction| == nil)|
|00001cd0| 20 26 26 20 74 72 61 6e | 73 61 63 74 69 6f 6e 41 | && tran|sactionA|
|00001ce0| 6c 77 61 79 73 4e 65 65 | 64 65 64 29 0d 09 7b 0d |lwaysNee|ded)..{.|
|00001cf0| 09 09 74 72 61 6e 73 61 | 63 74 69 6f 6e 20 3d 20 |..transa|ction = |
|00001d00| 6e 65 77 20 54 54 72 61 | 6e 73 61 63 74 69 6f 6e |new TTra|nsaction|
|00001d10| 3b 0d 09 09 74 2e 53 65 | 74 54 72 61 6e 73 61 63 |;...t.Se|tTransac|
|00001d20| 74 69 6f 6e 43 61 63 68 | 65 28 74 72 61 6e 73 61 |tionCach|e(transa|
|00001d30| 63 74 69 6f 6e 29 3b 0d | 09 09 67 54 72 61 6e 73 |ction);.|..gTrans|
|00001d40| 61 63 74 69 6f 6e 4c 69 | 73 74 2e 41 64 64 54 72 |actionLi|st.AddTr|
|00001d50| 61 6e 73 61 63 74 69 6f | 6e 28 74 72 61 6e 73 61 |ansactio|n(transa|
|00001d60| 63 74 69 6f 6e 2c 20 74 | 72 61 6e 73 61 63 74 69 |ction, t|ransacti|
|00001d70| 6f 6e 49 44 2c 20 74 72 | 61 6e 73 61 63 74 69 6f |onID, tr|ansactio|
|00001d80| 6e 54 79 70 65 29 3b 0d | 09 7d 0d 7d 0d 0d 2f 2f |nType);.|.}.}..//|
|00001d90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001da0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001db0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001dd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001de0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 2f 2f 20 54 54 72 61 |--------|.// TTra|
|00001df0| 6e 73 61 63 74 69 6f 6e | 53 75 69 74 65 3a 3a 45 |nsaction|Suite::E|
|00001e00| 6e 64 45 76 65 6e 74 54 | 72 61 6e 73 61 63 74 69 |ndEventT|ransacti|
|00001e10| 6f 6e 0d 2f 2f 0d 2f 2f | 20 41 6e 20 65 76 65 6e |on.//.//| An even|
|00001e20| 74 20 68 61 6e 64 65 72 | 20 63 61 6c 6c 73 20 74 |t hander| calls t|
|00001e30| 68 69 73 20 6d 65 74 68 | 6f 64 20 77 68 65 6e 20 |his meth|od when |
|00001e40| 69 74 20 63 6f 6d 70 6c | 65 74 65 73 20 73 75 63 |it compl|etes suc|
|00001e50| 65 73 73 66 75 6c 6c 79 | 2e 20 20 49 66 20 74 68 |essfully|.  If th|
|00001e60| 69 73 20 65 76 65 6e 74 | 0d 2f 2f 20 69 73 20 70 |is event|.// is p|
|00001e70| 61 72 74 20 6f 66 20 73 | 6f 6d 65 20 74 72 61 6e |art of s|ome tran|
|00001e80| 73 61 63 74 69 6f 6e 2c | 20 74 68 65 6e 20 6e 6f |saction,| then no|
|00001e90| 20 61 63 74 69 6f 6e 20 | 69 73 20 74 61 6b 65 6e | action |is taken|
|00001ea0| 20 61 74 20 74 68 69 73 | 20 74 69 6d 65 2e 20 20 | at this| time.  |
|00001eb0| 49 66 20 74 68 65 20 65 | 76 65 6e 74 0d 2f 2f 20 |If the e|vent.// |
|00001ec0| 69 73 20 62 65 69 6e 67 | 20 65 78 65 63 75 74 65 |is being| execute|
|00001ed0| 64 20 6f 75 74 73 69 64 | 65 20 6f 66 20 61 6e 79 |d outsid|e of any|
|00001ee0| 20 74 72 61 6e 73 61 63 | 74 69 6f 6e 2c 20 74 68 | transac|tion, th|
|00001ef0| 6f 75 67 68 2c 20 74 68 | 65 6e 20 74 68 65 20 63 |ough, th|en the c|
|00001f00| 68 61 6e 67 65 73 20 69 | 74 20 61 66 66 65 63 74 |hanges i|t affect|
|00001f10| 65 64 0d 2f 2f 20 61 72 | 65 20 63 6f 6d 6d 69 74 |ed.// ar|e commit|
|00001f20| 74 65 64 20 61 6e 64 20 | 74 68 65 20 74 72 61 6e |ted and |the tran|
|00001f30| 73 61 63 74 69 6f 6e 20 | 69 73 20 64 65 6c 65 74 |saction |is delet|
|00001f40| 65 64 2e 0d 2f 2f 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ed..//--|--------|
|00001f50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001f60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001f70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001f80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001f90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 76 |--------|------.v|
|00001fa0| 6f 69 64 20 54 54 72 61 | 6e 73 61 63 74 69 6f 6e |oid TTra|nsaction|
|00001fb0| 53 75 69 74 65 3a 3a 45 | 6e 64 45 76 65 6e 74 54 |Suite::E|ndEventT|
|00001fc0| 72 61 6e 73 61 63 74 69 | 6f 6e 28 54 41 45 54 72 |ransacti|on(TAETr|
|00001fd0| 61 6e 73 61 63 74 69 6f | 6e 26 20 74 2c 20 42 6f |ansactio|n& t, Bo|
|00001fe0| 6f 6c 65 61 6e 20 61 6c | 77 61 79 73 44 65 6c 65 |olean al|waysDele|
|00001ff0| 74 65 54 72 61 6e 73 61 | 63 74 69 6f 6e 29 0d 7b |teTransa|ction).{|
|00002000| 0d 09 2f 2f 20 44 65 62 | 75 67 53 74 72 28 22 5c |..// Deb|ugStr("\|
|00002010| 70 54 54 72 61 6e 73 61 | 63 74 69 6f 6e 53 75 69 |pTTransa|ctionSui|
|00002020| 74 65 3a 3a 45 6e 64 45 | 76 65 6e 74 54 72 61 6e |te::EndE|ventTran|
|00002030| 73 61 63 74 69 6f 6e 22 | 29 3b 0d 09 54 54 72 61 |saction"|);..TTra|
|00002040| 6e 73 61 63 74 69 6f 6e | 2a 20 74 72 61 6e 73 61 |nsaction|* transa|
|00002050| 63 74 69 6f 6e 20 3d 20 | 54 54 72 61 6e 73 61 63 |ction = |TTransac|
|00002060| 74 69 6f 6e 53 75 69 74 | 65 3a 3a 47 65 74 54 72 |tionSuit|e::GetTr|
|00002070| 61 6e 73 61 63 74 69 6f | 6e 46 72 6f 6d 45 76 65 |ansactio|nFromEve|
|00002080| 6e 74 28 74 29 3b 0d 09 | 69 66 28 74 72 61 6e 73 |nt(t);..|if(trans|
|00002090| 61 63 74 69 6f 6e 20 21 | 3d 20 6e 69 6c 29 0d 09 |action !|= nil)..|
|000020a0| 7b 0d 09 09 2f 2f 0d 09 | 09 2f 2f 20 49 66 20 74 |{...//..|.// If t|
|000020b0| 68 69 73 20 65 76 65 6e | 74 20 77 61 73 20 6e 6f |his even|t was no|
|000020c0| 74 20 61 73 73 6f 63 69 | 61 74 65 64 20 77 69 74 |t associ|ated wit|
|000020d0| 68 20 61 6e 79 20 73 70 | 65 63 69 66 69 63 0d 09 |h any sp|ecific..|
|000020e0| 09 2f 2f 20 74 72 61 6e | 73 61 63 74 69 6f 6e 2c |.// tran|saction,|
|000020f0| 20 74 68 65 6e 20 74 68 | 65 72 65 20 77 69 6c 6c | then th|ere will|
|00002100| 20 6e 65 76 65 72 20 62 | 65 20 61 6e 20 65 6e 64 | never b|e an end|
|00002110| 0d 09 09 2f 2f 20 74 72 | 61 6e 73 61 63 74 69 6f |...// tr|ansactio|
|00002120| 6e 20 65 76 65 6e 74 2d | 2d 77 65 27 64 20 62 65 |n event-|-we'd be|
|00002130| 74 74 65 72 20 63 6f 6d | 6d 69 74 20 6f 75 72 20 |tter com|mit our |
|00002140| 63 68 61 6e 67 65 73 0d | 09 09 2f 2f 20 61 6e 64 |changes.|..// and|
|00002150| 20 64 65 6c 65 74 65 20 | 74 68 65 20 74 72 61 6e | delete |the tran|
|00002160| 73 61 63 74 69 6f 6e 20 | 72 69 67 68 74 20 6e 6f |saction |right no|
|00002170| 77 2e 0d 09 09 2f 2f 0d | 09 09 69 66 28 28 67 54 |w....//.|..if((gT|
|00002180| 72 61 6e 73 61 63 74 69 | 6f 6e 4c 69 73 74 2e 54 |ransacti|onList.T|
|00002190| 72 61 6e 73 61 63 74 69 | 6f 6e 54 79 70 65 28 74 |ransacti|onType(t|
|000021a0| 72 61 6e 73 61 63 74 69 | 6f 6e 29 20 3d 3d 20 6b |ransacti|on) == k|
|000021b0| 53 69 6e 67 6c 65 45 76 | 65 6e 74 54 72 61 6e 73 |SingleEv|entTrans|
|000021c0| 61 63 74 69 6f 6e 29 20 | 7c 7c 20 28 61 6c 77 61 |action) ||| (alwa|
|000021d0| 79 73 44 65 6c 65 74 65 | 54 72 61 6e 73 61 63 74 |ysDelete|Transact|
|000021e0| 69 6f 6e 20 3d 3d 20 74 | 72 75 65 29 29 0d 09 09 |ion == t|rue))...|
|000021f0| 7b 0d 09 09 09 2f 2f 20 | 44 65 62 75 67 53 74 72 |{....// |DebugStr|
|00002200| 28 22 5c 70 43 6f 6d 6d | 69 74 20 63 68 61 6e 67 |("\pComm|it chang|
|00002210| 65 73 20 61 6e 64 20 64 | 65 6c 65 74 65 20 74 72 |es and d|elete tr|
|00002220| 61 6e 73 61 63 74 69 6f | 6e 22 29 3b 0d 09 09 09 |ansactio|n");....|
|00002230| 74 72 61 6e 73 61 63 74 | 69 6f 6e 2d 3e 43 6f 6d |transact|ion->Com|
|00002240| 6d 69 74 43 68 61 6e 67 | 65 73 28 29 3b 0d 09 09 |mitChang|es();...|
|00002250| 09 67 54 72 61 6e 73 61 | 63 74 69 6f 6e 4c 69 73 |.gTransa|ctionLis|
|00002260| 74 2e 52 65 6d 6f 76 65 | 54 72 61 6e 73 61 63 74 |t.Remove|Transact|
|00002270| 69 6f 6e 28 74 72 61 6e | 73 61 63 74 69 6f 6e 29 |ion(tran|saction)|
|00002280| 3b 0d 09 09 09 64 65 6c | 65 74 65 20 74 72 61 6e |;....del|ete tran|
|00002290| 73 61 63 74 69 6f 6e 3b | 0d 09 09 09 74 2e 53 65 |saction;|....t.Se|
|000022a0| 74 54 72 61 6e 73 61 63 | 74 69 6f 6e 43 61 63 68 |tTransac|tionCach|
|000022b0| 65 28 6e 69 6c 29 3b 0d | 09 09 7d 0d 09 7d 0d 7d |e(nil);.|..}..}.}|
|000022c0| 0d 0d 2f 2f 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..//----|--------|
|000022d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000022e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000022f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002300| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 2f 2f 20 |--------|----.// |
|00002320| 54 54 72 61 6e 73 61 63 | 74 69 6f 6e 53 75 69 74 |TTransac|tionSuit|
|00002330| 65 3a 3a 54 65 72 6d 69 | 6e 61 74 65 45 76 65 6e |e::Termi|nateEven|
|00002340| 74 54 72 61 6e 73 61 63 | 74 69 6f 6e 0d 2f 2f 0d |tTransac|tion.//.|
|00002350| 2f 2f 20 41 6e 20 65 76 | 65 6e 74 20 68 61 6e 64 |// An ev|ent hand|
|00002360| 6c 65 72 20 63 61 6c 6c | 73 20 74 68 69 73 20 6d |ler call|s this m|
|00002370| 65 74 68 6f 64 20 69 66 | 20 74 68 65 20 65 76 65 |ethod if| the eve|
|00002380| 6e 74 20 66 61 69 6c 65 | 64 20 66 6f 72 20 73 6f |nt faile|d for so|
|00002390| 6d 65 20 72 65 61 73 6f | 6e 2e 0d 2f 2f 20 54 68 |me reaso|n..// Th|
|000023a0| 69 73 20 6d 65 74 68 6f | 64 20 77 69 6c 6c 20 62 |is metho|d will b|
|000023b0| 61 63 6b 20 6f 75 74 20 | 61 6c 6c 20 63 68 61 6e |ack out |all chan|
|000023c0| 67 65 73 20 61 6e 64 20 | 64 65 6c 65 74 65 20 74 |ges and |delete t|
|000023d0| 68 65 20 74 72 61 6e 73 | 61 63 74 69 6f 6e 2c 20 |he trans|action, |
|000023e0| 69 66 20 6e 65 63 65 73 | 73 61 72 79 2e 0d 2f 2f |if neces|sary..//|
|000023f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002400| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002410| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002420| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002430| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002440| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 76 6f 69 64 20 54 54 |--------|.void TT|
|00002450| 72 61 6e 73 61 63 74 69 | 6f 6e 53 75 69 74 65 3a |ransacti|onSuite:|
|00002460| 3a 54 65 72 6d 69 6e 61 | 74 65 45 76 65 6e 74 54 |:Termina|teEventT|
|00002470| 72 61 6e 73 61 63 74 69 | 6f 6e 28 54 41 45 54 72 |ransacti|on(TAETr|
|00002480| 61 6e 73 61 63 74 69 6f | 6e 26 20 74 2c 20 42 6f |ansactio|n& t, Bo|
|00002490| 6f 6c 65 61 6e 20 61 6c | 77 61 79 73 44 65 6c 65 |olean al|waysDele|
|000024a0| 74 65 54 72 61 6e 73 61 | 63 74 69 6f 6e 29 0d 7b |teTransa|ction).{|
|000024b0| 0d 09 2f 2f 20 44 65 62 | 75 67 53 74 72 28 22 5c |..// Deb|ugStr("\|
|000024c0| 70 54 54 72 61 6e 73 61 | 63 74 69 6f 6e 53 75 69 |pTTransa|ctionSui|
|000024d0| 74 65 3a 3a 54 65 72 6d | 69 6e 61 74 65 45 76 65 |te::Term|inateEve|
|000024e0| 6e 74 54 72 61 6e 73 61 | 63 74 69 6f 6e 22 29 3b |ntTransa|ction");|
|000024f0| 0d 09 54 54 72 61 6e 73 | 61 63 74 69 6f 6e 2a 20 |..TTrans|action* |
|00002500| 74 72 61 6e 73 61 63 74 | 69 6f 6e 20 3d 20 54 54 |transact|ion = TT|
|00002510| 72 61 6e 73 61 63 74 69 | 6f 6e 53 75 69 74 65 3a |ransacti|onSuite:|
|00002520| 3a 47 65 74 54 72 61 6e | 73 61 63 74 69 6f 6e 46 |:GetTran|sactionF|
|00002530| 72 6f 6d 45 76 65 6e 74 | 28 74 29 3b 0d 09 69 66 |romEvent|(t);..if|
|00002540| 28 74 72 61 6e 73 61 63 | 74 69 6f 6e 20 21 3d 20 |(transac|tion != |
|00002550| 6e 69 6c 29 0d 09 7b 0d | 09 09 2f 2f 0d 09 09 2f |nil)..{.|..//.../|
|00002560| 2f 20 41 6c 77 61 79 73 | 20 64 69 73 63 61 72 64 |/ Always| discard|
|00002570| 20 6f 75 72 20 63 68 61 | 6e 67 65 73 20 75 70 20 | our cha|nges up |
|00002580| 74 6f 20 6e 6f 77 2c 20 | 65 76 65 6e 20 69 66 20 |to now, |even if |
|00002590| 77 65 27 72 65 20 69 6e | 20 74 68 65 0d 09 09 2f |we're in| the.../|
|000025a0| 2f 20 6d 69 64 64 6c 65 | 20 6f 66 20 61 20 74 72 |/ middle| of a tr|
|000025b0| 61 6e 73 61 63 74 69 6f | 6e 2e 20 20 57 65 20 64 |ansactio|n.  We d|
|000025c0| 6f 6e 27 74 20 65 78 70 | 65 63 74 20 74 6f 20 67 |on't exp|ect to g|
|000025d0| 65 74 20 61 6e 79 20 6d | 6f 72 65 0d 09 09 2f 2f |et any m|ore...//|
|000025e0| 20 65 76 65 6e 74 73 20 | 69 6e 20 74 68 69 73 20 | events |in this |
|000025f0| 74 72 61 6e 73 61 63 74 | 69 6f 6e 2c 20 62 75 74 |transact|ion, but|
|00002600| 20 69 66 20 77 65 20 64 | 6f 2c 20 77 65 20 77 69 | if we d|o, we wi|
|00002610| 6c 6c 20 62 65 67 69 6e | 0d 09 09 2f 2f 20 6d 61 |ll begin|...// ma|
|00002620| 6b 69 6e 67 20 63 68 61 | 6e 67 65 73 20 61 67 61 |king cha|nges aga|
|00002630| 69 6e 20 66 72 6f 6d 20 | 74 68 65 20 62 65 67 69 |in from |the begi|
|00002640| 6e 6e 69 6e 67 2e 0d 09 | 09 2f 2f 0d 09 09 2f 2f |nning...|.//...//|
|00002650| 20 49 66 20 77 65 20 61 | 72 65 6e 27 74 20 69 6e | If we a|ren't in|
|00002660| 20 61 20 74 72 61 6e 73 | 61 63 74 69 6f 6e 2c 20 | a trans|action, |
|00002670| 74 68 65 6e 20 77 65 27 | 64 20 62 65 74 74 65 72 |then we'|d better|
|00002680| 20 64 65 6c 65 74 65 20 | 74 68 65 0d 09 09 2f 2f | delete |the...//|
|00002690| 20 74 72 61 6e 73 61 63 | 74 69 6f 6e 20 6f 62 6a | transac|tion obj|
|000026a0| 65 63 74 20 72 69 67 68 | 74 20 6e 6f 77 2e 0d 09 |ect righ|t now...|
|000026b0| 09 2f 2f 0d 09 09 74 72 | 61 6e 73 61 63 74 69 6f |.//...tr|ansactio|
|000026c0| 6e 2d 3e 44 69 73 63 61 | 72 64 43 68 61 6e 67 65 |n->Disca|rdChange|
|000026d0| 73 28 29 3b 0d 09 09 69 | 66 28 28 67 54 72 61 6e |s();...i|f((gTran|
|000026e0| 73 61 63 74 69 6f 6e 4c | 69 73 74 2e 54 72 61 6e |sactionL|ist.Tran|
|000026f0| 73 61 63 74 69 6f 6e 54 | 79 70 65 28 74 72 61 6e |sactionT|ype(tran|
|00002700| 73 61 63 74 69 6f 6e 29 | 20 3d 3d 20 6b 53 69 6e |saction)| == kSin|
|00002710| 67 6c 65 45 76 65 6e 74 | 54 72 61 6e 73 61 63 74 |gleEvent|Transact|
|00002720| 69 6f 6e 29 20 7c 7c 20 | 28 61 6c 77 61 79 73 44 |ion) || |(alwaysD|
|00002730| 65 6c 65 74 65 54 72 61 | 6e 73 61 63 74 69 6f 6e |eleteTra|nsaction|
|00002740| 20 3d 3d 20 74 72 75 65 | 29 29 0d 09 09 7b 0d 09 | == true|))...{..|
|00002750| 09 09 67 54 72 61 6e 73 | 61 63 74 69 6f 6e 4c 69 |..gTrans|actionLi|
|00002760| 73 74 2e 52 65 6d 6f 76 | 65 54 72 61 6e 73 61 63 |st.Remov|eTransac|
|00002770| 74 69 6f 6e 28 74 72 61 | 6e 73 61 63 74 69 6f 6e |tion(tra|nsaction|
|00002780| 29 3b 0d 09 09 09 64 65 | 6c 65 74 65 20 74 72 61 |);....de|lete tra|
|00002790| 6e 73 61 63 74 69 6f 6e | 3b 0d 09 09 09 74 2e 53 |nsaction|;....t.S|
|000027a0| 65 74 54 72 61 6e 73 61 | 63 74 69 6f 6e 43 61 63 |etTransa|ctionCac|
|000027b0| 68 65 28 6e 69 6c 29 3b | 0d 09 09 7d 0d 09 7d 0d |he(nil);|...}..}.|
|000027c0| 7d 0d 0d 0d 0d 2f 2f 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}....//-|--------|
|000027d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000027e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000027f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002800| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00002820| 2f 2f 20 54 54 72 61 6e | 73 61 63 74 69 6f 6e 4c |// TTran|sactionL|
|00002830| 69 73 74 3a 3a 41 64 64 | 54 72 61 6e 73 61 63 74 |ist::Add|Transact|
|00002840| 69 6f 6e 0d 2f 2f 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ion.//--|--------|
|00002850| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002860| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002870| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002880| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002890| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 76 |--------|------.v|
|000028a0| 6f 69 64 20 54 54 72 61 | 6e 73 61 63 74 69 6f 6e |oid TTra|nsaction|
|000028b0| 4c 69 73 74 3a 3a 41 64 | 64 54 72 61 6e 73 61 63 |List::Ad|dTransac|
|000028c0| 74 69 6f 6e 28 54 54 72 | 61 6e 73 61 63 74 69 6f |tion(TTr|ansactio|
|000028d0| 6e 2a 20 74 2c 20 6c 6f | 6e 67 20 74 72 61 6e 73 |n* t, lo|ng trans|
|000028e0| 61 63 74 69 6f 6e 49 44 | 2c 20 41 45 54 72 61 6e |actionID|, AETran|
|000028f0| 73 61 63 74 69 6f 6e 54 | 79 70 65 20 74 72 61 6e |sactionT|ype tran|
|00002900| 73 61 63 74 69 6f 6e 54 | 79 70 65 29 0d 7b 0d 09 |sactionT|ype).{..|
|00002910| 66 54 72 61 6e 73 61 63 | 74 69 6f 6e 4c 69 73 74 |fTransac|tionList|
|00002920| 2e 49 6e 73 65 72 74 41 | 74 45 6e 64 28 54 54 72 |.InsertA|tEnd(TTr|
|00002930| 61 6e 73 61 63 74 69 6f | 6e 52 65 63 6f 72 64 28 |ansactio|nRecord(|
|00002940| 74 2c 20 74 72 61 6e 73 | 61 63 74 69 6f 6e 49 44 |t, trans|actionID|
|00002950| 2c 20 74 72 61 6e 73 61 | 63 74 69 6f 6e 54 79 70 |, transa|ctionTyp|
|00002960| 65 29 29 3b 0d 7d 0d 0d | 2f 2f 2d 2d 2d 2d 2d 2d |e));.}..|//------|
|00002970| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002980| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002990| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000029a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000029b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000029c0| 2d 2d 0d 2f 2f 20 54 54 | 72 61 6e 73 61 63 74 69 |--.// TT|ransacti|
|000029d0| 6f 6e 4c 69 73 74 3a 3a | 46 69 6e 64 54 72 61 6e |onList::|FindTran|
|000029e0| 73 61 63 74 69 6f 6e 0d | 2f 2f 2d 2d 2d 2d 2d 2d |saction.|//------|
|000029f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002a00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002a10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002a20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002a30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002a40| 2d 2d 0d 54 54 72 61 6e | 73 61 63 74 69 6f 6e 2a |--.TTran|saction*|
|00002a50| 20 54 54 72 61 6e 73 61 | 63 74 69 6f 6e 4c 69 73 | TTransa|ctionLis|
|00002a60| 74 3a 3a 46 69 6e 64 54 | 72 61 6e 73 61 63 74 69 |t::FindT|ransacti|
|00002a70| 6f 6e 28 6c 6f 6e 67 20 | 74 72 61 6e 73 61 63 74 |on(long |transact|
|00002a80| 69 6f 6e 49 44 29 20 63 | 6f 6e 73 74 0d 7b 0d 09 |ionID) c|onst.{..|
|00002a90| 54 54 72 61 6e 73 61 63 | 74 69 6f 6e 2a 20 74 20 |TTransac|tion* t |
|00002aa0| 3d 20 6e 69 6c 3b 0d 09 | 66 6f 72 28 41 6e 49 74 |= nil;..|for(AnIt|
|00002ab0| 65 72 61 74 6f 72 4f 66 | 41 4c 69 73 74 4f 66 3c |eratorOf|AListOf<|
|00002ac0| 54 54 72 61 6e 73 61 63 | 74 69 6f 6e 52 65 63 6f |TTransac|tionReco|
|00002ad0| 72 64 3e 20 69 74 65 72 | 28 28 41 4c 69 73 74 4f |rd> iter|((AListO|
|00002ae0| 66 3c 54 54 72 61 6e 73 | 61 63 74 69 6f 6e 52 65 |f<TTrans|actionRe|
|00002af0| 63 6f 72 64 3e 2a 29 26 | 66 54 72 61 6e 73 61 63 |cord>*)&|fTransac|
|00002b00| 74 69 6f 6e 4c 69 73 74 | 29 3b 20 69 74 65 72 2e |tionList|); iter.|
|00002b10| 4d 6f 72 65 28 29 3b 20 | 69 74 65 72 2e 4e 65 78 |More(); |iter.Nex|
|00002b20| 74 28 29 29 0d 09 7b 0d | 09 09 69 66 28 69 74 65 |t())..{.|..if(ite|
|00002b30| 72 2e 43 75 72 72 65 6e | 74 28 29 2e 54 72 61 6e |r.Curren|t().Tran|
|00002b40| 73 61 63 74 69 6f 6e 49 | 44 28 29 20 3d 3d 20 74 |sactionI|D() == t|
|00002b50| 72 61 6e 73 61 63 74 69 | 6f 6e 49 44 29 0d 09 09 |ransacti|onID)...|
|00002b60| 7b 0d 09 09 09 74 20 3d | 20 69 74 65 72 2e 43 75 |{....t =| iter.Cu|
|00002b70| 72 72 65 6e 74 28 29 2e | 54 72 61 6e 73 61 63 74 |rrent().|Transact|
|00002b80| 69 6f 6e 28 29 3b 0d 09 | 09 09 62 72 65 61 6b 3b |ion();..|..break;|
|00002b90| 0d 09 09 7d 0d 09 7d 0d | 09 0d 09 72 65 74 75 72 |...}..}.|...retur|
|00002ba0| 6e 20 74 3b 0d 7d 0d 0d | 2f 2f 2d 2d 2d 2d 2d 2d |n t;.}..|//------|
|00002bb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002bc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002be0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002bf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c00| 2d 2d 0d 2f 2f 20 54 54 | 72 61 6e 73 61 63 74 69 |--.// TT|ransacti|
|00002c10| 6f 6e 4c 69 73 74 3a 3a | 52 65 6d 6f 76 65 54 72 |onList::|RemoveTr|
|00002c20| 61 6e 73 61 63 74 69 6f | 6e 0d 2f 2f 2d 2d 2d 2d |ansactio|n.//----|
|00002c30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c80| 2d 2d 2d 2d 0d 76 6f 69 | 64 20 54 54 72 61 6e 73 |----.voi|d TTrans|
|00002c90| 61 63 74 69 6f 6e 4c 69 | 73 74 3a 3a 52 65 6d 6f |actionLi|st::Remo|
|00002ca0| 76 65 54 72 61 6e 73 61 | 63 74 69 6f 6e 28 54 54 |veTransa|ction(TT|
|00002cb0| 72 61 6e 73 61 63 74 69 | 6f 6e 2a 20 74 72 61 6e |ransacti|on* tran|
|00002cc0| 73 61 63 74 69 6f 6e 29 | 0d 7b 0d 09 66 6f 72 28 |saction)|.{..for(|
|00002cd0| 41 6e 49 74 65 72 61 74 | 6f 72 4f 66 41 4c 69 73 |AnIterat|orOfALis|
|00002ce0| 74 4f 66 3c 54 54 72 61 | 6e 73 61 63 74 69 6f 6e |tOf<TTra|nsaction|
|00002cf0| 52 65 63 6f 72 64 3e 20 | 69 74 65 72 28 26 66 54 |Record> |iter(&fT|
|00002d00| 72 61 6e 73 61 63 74 69 | 6f 6e 4c 69 73 74 29 3b |ransacti|onList);|
|00002d10| 20 69 74 65 72 2e 4d 6f | 72 65 28 29 3b 20 69 74 | iter.Mo|re(); it|
|00002d20| 65 72 2e 4e 65 78 74 28 | 29 29 0d 09 7b 0d 09 09 |er.Next(|))..{...|
|00002d30| 69 66 28 69 74 65 72 2e | 43 75 72 72 65 6e 74 28 |if(iter.|Current(|
|00002d40| 29 2e 54 72 61 6e 73 61 | 63 74 69 6f 6e 28 29 20 |).Transa|ction() |
|00002d50| 3d 3d 20 74 72 61 6e 73 | 61 63 74 69 6f 6e 29 0d |== trans|action).|
|00002d60| 09 09 7b 0d 09 09 09 69 | 74 65 72 2e 52 65 6d 6f |..{....i|ter.Remo|
|00002d70| 76 65 43 75 72 72 65 6e | 74 28 29 3b 0d 09 09 7d |veCurren|t();...}|
|00002d80| 0d 09 7d 0d 7d 0d 0d 2f | 2f 2d 2d 2d 2d 2d 2d 2d |..}.}../|/-------|
|00002d90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002da0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002db0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002dd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002de0| 2d 0d 2f 2f 20 54 54 72 | 61 6e 73 61 63 74 69 6f |-.// TTr|ansactio|
|00002df0| 6e 4c 69 73 74 3a 3a 54 | 72 61 6e 73 61 63 74 69 |nList::T|ransacti|
|00002e00| 6f 6e 54 79 70 65 0d 2f | 2f 2d 2d 2d 2d 2d 2d 2d |onType./|/-------|
|00002e10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002e20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002e30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002e40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002e50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002e60| 2d 0d 41 45 54 72 61 6e | 73 61 63 74 69 6f 6e 54 |-.AETran|sactionT|
|00002e70| 79 70 65 20 54 54 72 61 | 6e 73 61 63 74 69 6f 6e |ype TTra|nsaction|
|00002e80| 4c 69 73 74 3a 3a 54 72 | 61 6e 73 61 63 74 69 6f |List::Tr|ansactio|
|00002e90| 6e 54 79 70 65 28 54 54 | 72 61 6e 73 61 63 74 69 |nType(TT|ransacti|
|00002ea0| 6f 6e 2a 20 74 72 61 6e | 73 61 63 74 69 6f 6e 29 |on* tran|saction)|
|00002eb0| 20 63 6f 6e 73 74 0d 7b | 0d 09 41 45 54 72 61 6e | const.{|..AETran|
|00002ec0| 73 61 63 74 69 6f 6e 54 | 79 70 65 20 74 20 3d 20 |sactionT|ype t = |
|00002ed0| 6b 4e 6f 53 75 63 68 54 | 72 61 6e 73 61 63 74 69 |kNoSuchT|ransacti|
|00002ee0| 6f 6e 3b 0d 09 66 6f 72 | 28 41 6e 49 74 65 72 61 |on;..for|(AnItera|
|00002ef0| 74 6f 72 4f 66 41 4c 69 | 73 74 4f 66 3c 54 54 72 |torOfALi|stOf<TTr|
|00002f00| 61 6e 73 61 63 74 69 6f | 6e 52 65 63 6f 72 64 3e |ansactio|nRecord>|
|00002f10| 20 69 74 65 72 28 28 41 | 4c 69 73 74 4f 66 3c 54 | iter((A|ListOf<T|
|00002f20| 54 72 61 6e 73 61 63 74 | 69 6f 6e 52 65 63 6f 72 |Transact|ionRecor|
|00002f30| 64 3e 2a 29 26 66 54 72 | 61 6e 73 61 63 74 69 6f |d>*)&fTr|ansactio|
|00002f40| 6e 4c 69 73 74 29 3b 20 | 69 74 65 72 2e 4d 6f 72 |nList); |iter.Mor|
|00002f50| 65 28 29 3b 20 69 74 65 | 72 2e 4e 65 78 74 28 29 |e(); ite|r.Next()|
|00002f60| 29 0d 09 7b 0d 09 09 69 | 66 28 69 74 65 72 2e 43 |)..{...i|f(iter.C|
|00002f70| 75 72 72 65 6e 74 28 29 | 2e 54 72 61 6e 73 61 63 |urrent()|.Transac|
|00002f80| 74 69 6f 6e 28 29 20 3d | 3d 20 74 72 61 6e 73 61 |tion() =|= transa|
|00002f90| 63 74 69 6f 6e 29 0d 09 | 09 7b 0d 09 09 09 74 20 |ction)..|.{....t |
|00002fa0| 3d 20 69 74 65 72 2e 43 | 75 72 72 65 6e 74 28 29 |= iter.C|urrent()|
|00002fb0| 2e 54 72 61 6e 73 61 63 | 74 69 6f 6e 54 79 70 65 |.Transac|tionType|
|00002fc0| 28 29 3b 0d 09 09 09 62 | 72 65 61 6b 3b 0d 09 09 |();....b|reak;...|
|00002fd0| 7d 0d 09 7d 0d 09 0d 09 | 72 65 74 75 72 6e 20 74 |}..}....|return t|
|00002fe0| 3b 0d 7d 0d 00 00 00 00 | 00 00 00 00 00 00 00 00 |;.}.....|........|
|00002ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003000| 00 00 01 00 00 00 01 54 | 00 00 00 54 00 00 00 46 |.......T|...T...F|
|00003010| 00 00 03 03 16 43 6f 6c | 6f 72 20 53 74 79 6c 65 |.....Col|or Style|
|00003020| 57 72 69 74 65 72 20 32 | 32 30 30 79 01 00 00 00 |Writer 2|200y....|
|00003030| 13 54 72 61 6e 73 61 63 | 74 69 6f 6e 53 75 69 74 |.Transac|tionSuit|
|00003040| 65 2e 63 70 02 00 00 00 | 54 45 58 54 43 57 49 45 |e.cp....|TEXTCWIE|
|00003050| 00 00 54 45 58 54 43 57 | 49 45 01 00 ff ff ff ff |..TEXTCW|IE......|
|00003060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003070| 00 00 ad 18 b0 47 00 00 | 2f 64 00 00 01 9a 00 00 |.....G..|/d......|
|00003080| 00 00 b4 0b 01 50 00 00 | 00 00 00 00 00 00 00 00 |.....P..|........|
|00003090| 00 00 1c 00 00 00 03 03 | 16 43 6f 6c 6f 72 20 53 |........|.Color S|
|000030a0| 74 79 6c 65 57 72 69 74 | 65 72 20 32 32 30 30 79 |tyleWrit|er 2200y|
|000030b0| 01 00 00 00 00 03 00 00 | 7d 8e ac d6 99 77 ac d6 |........|}....w..|
|000030c0| 9a 6d 00 00 00 00 00 00 | 00 00 00 00 00 00 05 00 |.m......|........|
|000030d0| 01 74 02 48 00 00 00 00 | 00 00 00 00 00 00 00 00 |.t.H....|........|
|000030e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000030f0| 00 00 00 00 00 00 16 00 | 00 00 03 03 10 82 b1 82 |........|........|
|00003100| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00003110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003120| 00 00 00 00 00 00 00 03 | 00 04 ff bb 04 45 02 09 |........|.....E..|
|00003130| 07 a1 ff bb 04 45 02 09 | 07 a1 ad 3e 95 da 00 00 |.....E..|...>....|
|00003140| 14 b2 00 00 14 c2 00 00 | 11 2f 01 00 00 00 00 04 |........|./......|
|00003150| 00 01 00 01 00 00 01 00 | 00 00 01 54 00 00 00 54 |........|...T...T|
|00003160| 00 00 00 46 02 9b 35 e8 | 26 90 00 00 00 1c 00 46 |...F..5.|&......F|
|00003170| 00 01 4d 50 53 52 00 00 | 00 12 4d 57 42 42 00 00 |..MPSR..|..MWBB..|
|00003180| 00 1e 03 ed ff ff 00 00 | 00 00 00 00 00 00 03 f0 |........|........|
|00003190| ff ff 00 00 00 4c 00 00 | 00 00 00 00 00 00 00 00 |.....L..|........|
|000031a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000031b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000031c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000031d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000031e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000031f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+