/ Celestin Apprentice 7 / Apprentice-Release7.iso / Demos / A.D. Software / OOFILE 1.3b4d6.sit / OOFILE 1.3b4d6 / MacCodeWarriorDemo1.3b4d6 / docs / samples / ooftst26.cpp

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0c 6f 6f 66 74 73 74 | 32 36 2e 63 70 70 00 00 |..ooftst|26.cpp..|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 00 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 06 d7 00 | 00 01 9a af 53 9b 23 af |........|....S.#.|
|00000060| 53 9b 23 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |S.#.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 76 bb 00 00 |........|....v...|
|00000080| 2f 2f 20 43 6f 70 79 72 | 69 67 68 74 20 31 39 39 |// Copyr|ight 199|
|00000090| 34 20 41 2e 44 2e 20 53 | 6f 66 74 77 61 72 65 2e |4 A.D. S|oftware.|
|000000a0| 20 41 6c 6c 20 52 69 67 | 68 74 73 20 52 65 73 65 | All Rig|hts Rese|
|000000b0| 72 76 65 64 0d 0d 2f 2f | 20 4f 4f 46 54 45 53 54 |rved..//| OOFTEST|
|000000c0| 32 36 0d 0d 2f 2f 20 54 | 68 69 73 20 73 61 6d 70 |26..// T|his samp|
|000000d0| 6c 65 20 74 65 73 74 73 | 20 73 65 61 72 63 68 69 |le tests| searchi|
|000000e0| 6e 67 20 62 79 20 72 65 | 6c 61 74 65 64 20 66 69 |ng by re|lated fi|
|000000f0| 6c 65 73 2e 0d 0d 2f 2f | 20 53 69 6d 70 6c 65 20 |les...//| Simple |
|00000100| 73 74 72 65 61 6d 20 49 | 2f 4f 20 69 73 20 75 73 |stream I|/O is us|
|00000110| 65 64 20 74 6f 20 69 6e | 74 65 72 61 63 74 20 77 |ed to in|teract w|
|00000120| 69 74 68 20 74 68 65 20 | 75 73 65 72 2e 0d 23 69 |ith the |user..#i|
|00000130| 6e 63 6c 75 64 65 20 22 | 6f 6f 66 69 6c 65 2e 68 |nclude "|oofile.h|
|00000140| 22 0d 0d 23 69 6e 63 6c | 75 64 65 20 22 6f 6f 66 |"..#incl|ude "oof|
|00000150| 74 73 74 30 32 2e 68 22 | 0d 0d 2f 2f 20 67 6c 6f |tst02.h"|..// glo|
|00000160| 62 61 6c 20 76 61 72 69 | 61 62 6c 65 73 20 74 68 |bal vari|ables th|
|00000170| 61 74 20 64 65 66 69 6e | 65 20 74 68 65 20 64 61 |at defin|e the da|
|00000180| 74 61 62 61 73 65 20 75 | 73 69 6e 67 20 74 68 65 |tabase u|sing the|
|00000190| 20 6f 6f 66 74 73 74 30 | 32 20 63 6c 61 73 73 65 | ooftst0|2 classe|
|000001a0| 73 0d 0d 09 54 45 53 54 | 5f 43 4f 4e 4e 45 43 54 |s...TEST|_CONNECT|
|000001b0| 20 20 20 20 74 68 65 44 | 42 3b 0d 09 64 62 50 61 |    theD|B;..dbPa|
|000001c0| 74 69 65 6e 74 73 20 20 | 20 20 20 50 61 74 69 65 |tients  |   Patie|
|000001d0| 6e 74 73 3b 0d 09 64 62 | 56 69 73 69 74 73 09 56 |nts;..db|Visits.V|
|000001e0| 69 73 69 74 73 3b 0d 09 | 64 62 52 65 6c 61 74 69 |isits;..|dbRelati|
|000001f0| 6f 6e 73 68 69 70 20 50 | 61 74 69 65 6e 74 56 69 |onship P|atientVi|
|00000200| 73 69 74 73 28 50 61 74 | 69 65 6e 74 73 2e 56 69 |sits(Pat|ients.Vi|
|00000210| 73 69 74 73 2c 20 56 69 | 73 69 74 73 2e 50 61 74 |sits, Vi|sits.Pat|
|00000220| 69 65 6e 74 29 3b 0d 09 | 0d 69 6e 74 20 6d 61 69 |ient);..|.int mai|
|00000230| 6e 28 29 0d 7b 0d 09 63 | 6f 75 74 20 3c 3c 20 22 |n().{..c|out << "|
|00000240| 4f 4f 46 49 4c 45 20 56 | 61 6c 69 64 61 74 69 6f |OOFILE V|alidatio|
|00000250| 6e 20 53 75 69 74 65 20 | 2d 20 54 65 73 74 20 32 |n Suite |- Test 2|
|00000260| 36 5c 6e 22 0d 09 09 20 | 3c 3c 20 22 53 69 6d 70 |6\n"... |<< "Simp|
|00000270| 6c 65 20 74 65 73 74 20 | 6f 66 20 63 6f 75 6e 74 |le test |of count|
|00000280| 69 6e 67 20 72 65 6c 61 | 74 65 64 20 64 61 74 61 |ing rela|ted data|
|00000290| 22 20 3c 3c 20 65 6e 64 | 6c 0d 09 09 20 3c 3c 20 |" << end|l... << |
|000002a0| 22 61 6e 64 20 69 6e 74 | 65 72 73 65 63 74 69 6e |"and int|ersectin|
|000002b0| 67 20 72 65 6c 61 74 65 | 64 20 64 61 74 61 22 20 |g relate|d data" |
|000002c0| 3c 3c 20 65 6e 64 6c 0d | 09 09 20 3c 3c 20 22 61 |<< endl.|.. << "a|
|000002d0| 73 20 69 73 20 6f 66 74 | 65 6e 20 75 73 65 64 20 |s is oft|en used |
|000002e0| 69 6e 20 70 72 6f 64 75 | 63 69 6e 67 20 72 65 70 |in produ|cing rep|
|000002f0| 6f 72 74 73 20 6f 72 20 | 67 72 61 70 68 73 22 20 |orts or |graphs" |
|00000300| 3c 3c 20 65 6e 64 6c 20 | 3c 3c 20 65 6e 64 6c 3b |<< endl |<< endl;|
|00000310| 0d 09 0d 09 23 69 66 64 | 65 66 20 54 45 53 54 49 |....#ifd|ef TESTI|
|00000320| 4e 47 5f 44 42 41 53 45 | 0d 09 09 23 69 66 64 65 |NG_DBASE|...#ifde|
|00000330| 66 20 5f 4d 61 63 69 6e | 74 6f 73 68 0d 09 09 09 |f _Macin|tosh....|
|00000340| 63 6f 6e 73 74 20 63 68 | 61 72 2a 20 6b 45 78 69 |const ch|ar* kExi|
|00000350| 73 74 73 4e 61 6d 65 20 | 3d 20 20 22 3a 6f 6f 66 |stsName |=  ":oof|
|00000360| 74 73 74 30 32 3a 50 61 | 74 69 65 6e 74 73 2e 64 |tst02:Pa|tients.d|
|00000370| 62 66 22 3b 0d 09 09 09 | 63 6f 6e 73 74 20 63 68 |bf";....|const ch|
|00000380| 61 72 2a 20 6b 44 61 74 | 61 62 61 73 65 4e 61 6d |ar* kDat|abaseNam|
|00000390| 65 20 3d 20 22 3a 6f 6f | 66 74 73 74 30 32 3a 22 |e = ":oo|ftst02:"|
|000003a0| 3b 0d 09 09 23 65 6c 73 | 65 0d 09 09 09 63 6f 6e |;...#els|e....con|
|000003b0| 73 74 20 63 68 61 72 2a | 20 6b 45 78 69 73 74 73 |st char*| kExists|
|000003c0| 4e 61 6d 65 20 3d 20 20 | 20 22 50 61 74 69 65 6e |Name =  | "Patien|
|000003d0| 74 73 2e 64 62 66 22 0d | 09 09 09 63 6f 6e 73 74 |ts.dbf".|...const|
|000003e0| 20 63 68 61 72 2a 20 6b | 44 61 74 61 62 61 73 65 | char* k|Database|
|000003f0| 4e 61 6d 65 20 3d 20 22 | 22 3b 0d 09 09 23 65 6e |Name = "|";...#en|
|00000400| 64 69 66 09 0d 0d 09 23 | 65 6c 73 65 0d 09 09 63 |dif....#|else...c|
|00000410| 6f 6e 73 74 20 63 68 61 | 72 2a 20 6b 44 61 74 61 |onst cha|r* kData|
|00000420| 62 61 73 65 4e 61 6d 65 | 20 3d 20 22 6f 6f 66 74 |baseName| = "ooft|
|00000430| 73 74 30 32 2e 64 62 22 | 3b 0d 09 09 63 6f 6e 73 |st02.db"|;...cons|
|00000440| 74 20 63 68 61 72 2a 20 | 6b 45 78 69 73 74 73 4e |t char* |kExistsN|
|00000450| 61 6d 65 20 3d 20 6b 44 | 61 74 61 62 61 73 65 4e |ame = kD|atabaseN|
|00000460| 61 6d 65 3b 0d 09 23 65 | 6e 64 69 66 0d 09 0d 09 |ame;..#e|ndif....|
|00000470| 69 66 20 28 64 62 43 6f | 6e 6e 65 63 74 3a 3a 66 |if (dbCo|nnect::f|
|00000480| 69 6c 65 45 78 69 73 74 | 73 28 6b 45 78 69 73 74 |ileExist|s(kExist|
|00000490| 73 4e 61 6d 65 29 29 20 | 7b 0d 09 09 74 68 65 44 |sName)) |{...theD|
|000004a0| 42 2e 6f 70 65 6e 43 6f | 6e 6e 65 63 74 69 6f 6e |B.openCo|nnection|
|000004b0| 28 6b 44 61 74 61 62 61 | 73 65 4e 61 6d 65 29 3b |(kDataba|seName);|
|000004c0| 0d 09 7d 0d 09 65 6c 73 | 65 20 7b 0d 09 09 74 68 |..}..els|e {...th|
|000004d0| 65 44 42 2e 6e 65 77 43 | 6f 6e 6e 65 63 74 69 6f |eDB.newC|onnectio|
|000004e0| 6e 28 6b 44 61 74 61 62 | 61 73 65 4e 61 6d 65 29 |n(kDatab|aseName)|
|000004f0| 3b 0d 09 09 50 61 74 69 | 65 6e 74 73 2e 41 64 64 |;...Pati|ents.Add|
|00000500| 54 65 73 74 44 61 74 61 | 28 29 3b 0d 09 7d 0d 0d |TestData|();..}..|
|00000510| 09 63 6f 75 74 20 3c 3c | 20 74 68 65 44 42 20 3c |.cout <<| theDB <|
|00000520| 3c 20 65 6e 64 6c 3b 0d | 09 0d 09 50 61 74 69 65 |< endl;.|...Patie|
|00000530| 6e 74 73 2e 73 65 61 72 | 63 68 28 50 61 74 69 65 |nts.sear|ch(Patie|
|00000540| 6e 74 73 2e 4c 61 73 74 | 4e 61 6d 65 20 3d 3d 20 |nts.Last|Name == |
|00000550| 22 44 65 6e 74 22 29 3b | 0d 09 63 6f 75 74 20 3c |"Dent");|..cout <|
|00000560| 3c 20 22 4e 75 6d 62 65 | 72 20 6f 66 20 27 44 65 |< "Numbe|r of 'De|
|00000570| 6e 74 27 20 50 61 74 69 | 65 6e 74 73 20 20 3d 20 |nt' Pati|ents  = |
|00000580| 22 20 3c 3c 20 50 61 74 | 69 65 6e 74 73 2e 63 6f |" << Pat|ients.co|
|00000590| 75 6e 74 28 29 20 3c 3c | 20 65 6e 64 6c 3b 0d 09 |unt() <<| endl;..|
|000005a0| 0d 09 56 69 73 69 74 73 | 2e 73 65 61 72 63 68 28 |..Visits|.search(|
|000005b0| 56 69 73 69 74 73 2e 56 | 69 73 69 74 44 61 74 65 |Visits.V|isitDate|
|000005c0| 20 3c 20 22 31 2d 31 31 | 2d 31 39 39 34 22 29 3b | < "1-11|-1994");|
|000005d0| 0d 09 63 6f 75 74 20 3c | 3c 20 22 4e 75 6d 62 65 |..cout <|< "Numbe|
|000005e0| 72 20 6f 66 20 56 69 73 | 69 74 73 20 70 72 69 6f |r of Vis|its prio|
|000005f0| 72 20 31 2d 31 31 2d 31 | 39 39 34 20 3d 20 22 20 |r 1-11-1|994 = " |
|00000600| 3c 3c 20 56 69 73 69 74 | 73 2e 63 6f 75 6e 74 28 |<< Visit|s.count(|
|00000610| 29 20 3c 3c 20 65 6e 64 | 6c 3b 0d 09 0d 09 63 6f |) << end|l;....co|
|00000620| 75 74 20 3c 3c 20 22 4e | 75 6d 62 65 72 20 6f 66 |ut << "N|umber of|
|00000630| 20 56 69 73 69 74 73 20 | 72 65 6c 61 74 65 64 20 | Visits |related |
|00000640| 74 6f 20 73 65 6c 65 63 | 74 65 64 20 50 61 74 69 |to selec|ted Pati|
|00000650| 65 6e 74 73 20 3d 20 22 | 20 0d 09 09 20 3c 3c 20 |ents = "| ... << |
|00000660| 50 61 74 69 65 6e 74 73 | 2e 56 69 73 69 74 73 2e |Patients|.Visits.|
|00000670| 63 6f 75 6e 74 41 6c 6c | 52 65 6c 61 74 65 64 28 |countAll|Related(|
|00000680| 29 20 3c 3c 20 65 6e 64 | 6c 3b 0d 0d 09 63 6f 75 |) << end|l;...cou|
|00000690| 74 20 3c 3c 20 22 4e 75 | 6d 62 65 72 20 6f 66 20 |t << "Nu|mber of |
|000006a0| 56 69 73 69 74 73 20 72 | 65 6c 61 74 65 64 20 74 |Visits r|elated t|
|000006b0| 6f 20 73 65 6c 65 63 74 | 65 64 20 50 61 74 69 65 |o select|ed Patie|
|000006c0| 6e 74 73 20 70 72 69 6f | 72 20 31 2d 31 31 2d 31 |nts prio|r 1-11-1|
|000006d0| 39 39 34 20 3d 20 22 20 | 0d 09 09 20 3c 3c 20 50 |994 = " |... << P|
|000006e0| 61 74 69 65 6e 74 73 2e | 56 69 73 69 74 73 2e 63 |atients.|Visits.c|
|000006f0| 6f 75 6e 74 41 6c 6c 52 | 65 6c 61 74 65 64 49 6e |ountAllR|elatedIn|
|00000700| 28 56 69 73 69 74 73 29 | 20 3c 3c 20 65 6e 64 6c |(Visits)| << endl|
|00000710| 3b 0d 0d 09 63 6f 75 74 | 20 3c 3c 20 22 54 65 73 |;...cout| << "Tes|
|00000720| 74 20 43 6f 6d 70 6c 65 | 74 65 64 22 20 3c 3c 20 |t Comple|ted" << |
|00000730| 65 6e 64 6c 3b 0d 09 0d | 09 72 65 74 75 72 6e 20 |endl;...|.return |
|00000740| 45 58 49 54 5f 53 55 43 | 43 45 53 53 3b 0d 7d 20 |EXIT_SUC|CESS;.} |
|00000750| 20 20 20 20 20 20 0d 00 | 00 00 00 00 00 00 00 00 |      ..|........|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000780| 00 00 01 00 00 00 01 54 | 00 00 00 54 00 00 00 46 |.......T|...T...F|
|00000790| 1f ff ff c0 1f ff ff e0 | 1f ff ff f0 1f ff ff f0 |........|........|
|000007a0| 1f ff ff f0 1f ff ff f0 | 1f ff ff f0 1f ff ff f0 |........|........|
|000007b0| 0c 6f 6f 66 74 73 74 32 | 36 2e 63 70 70 32 02 00 |.ooftst2|6.cpp2..|
|000007c0| 00 00 50 61 72 74 53 49 | 54 21 00 00 00 00 00 00 |..PartSI|T!......|
|000007d0| 00 00 50 61 72 74 53 49 | 54 21 00 00 00 00 00 00 |..PartSI|T!......|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 b0 1b 76 00 00 00 | 00 00 00 00 01 9a ff f0 |....v...|........|
|00000800| 7f f0 40 38 56 2c 5a 3c | 56 04 5a 04 56 04 5f f4 |..@8V,Z<|V.Z.V._.|
|00000810| 5e 0c 5e 6c 5e 0c 5f f4 | 5a 04 56 04 5a 04 7f fc |^.^l^._.|Z.V.Z...|
|00000820| 7f f0 7f f8 7f fc 7f fc | 7f fc 7f fc 7f fc 7f fc |........|........|
|00000830| 7f fc 7f fc 7f fc 7f fc | 7f fc 7f fc 7f fc 7f fc |........|........|
|00000840| 00 00 00 ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000850| ff ff ff ff ff ff 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000860| 00 00 00 ff f5 f5 f5 f5 | f5 f5 f5 f5 f5 f5 f5 f5 |........|........|
|00000870| f5 f5 f5 f5 f5 ff ff 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000880| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00000890| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008a0| 00 00 00 00 00 00 00 03 | 00 04 00 65 00 dc 02 6c |........|...e...l|
|000008b0| 03 3b 00 65 00 dc 02 6c | 03 3b af 68 5b 5d 00 00 |.;.e...l|.;.h[]..|
|000008c0| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 00 04 |........|........|
|000008d0| 00 01 00 01 00 00 01 00 | 00 00 01 54 00 00 00 54 |........|...T...T|
|000008e0| 00 00 00 46 01 a3 eb 60 | 2a f8 00 00 00 1c 00 46 |...F...`|*......F|
|000008f0| 00 01 4d 50 53 52 00 00 | 00 12 4d 57 42 42 00 00 |..MPSR..|..MWBB..|
|00000900| 00 1e 03 ed ff ff 00 00 | 00 00 00 00 00 00 03 f0 |........|........|
|00000910| ff ff 00 00 00 4c 00 00 | 00 00 00 00 00 00 00 00 |.....L..|........|
|00000920| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000930| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000940| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+