Standard Jet DBnb` Ugr@?~1y0̝cAN7]D^(`T{6|߱wCϯ34ay[|*|OJl>`&_Љ$g'DeFx -V{N|miZKG8R5 5 ۇ ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jK-~%₨sV#jKV#jKV#jKV#jKV#o ۇ ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jK-~%₨sV#jKV#jKV#jKV#jKV#o ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKɛ1.<{,E{ */ε-V#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o      ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o      ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o      ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o      ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o  ) )ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o )   ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    VCS    2c ct  j  O      IdParentIdNameType DateCreate DateUpdateOwnerFlagsDatabaseConnect ForeignName RmtInfoShort RmtInfoLongLvLvPropLvModuleLvExtrasetni 8 Id ParentIdName        V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o     ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o   ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o ۇVCNS   2ObjectIdSIDACM FInheritablebc ObjectId !!H2|p,2~ H!Q !QQ|H! Q| 5! Q!2!Q!H2|p,2~Q QQ2p#|!!#2p! VC?S      ObjectId AttributeOrderName1Name2 ExpressionFlagilnzjtz ObjectIdAttribute  ()*!!!!!!!!!! ! !!! ! ! ! ! ! ! ! ! ! ! ! ! !  !! !"  !# !&)!)!)!5!$5!%5!&5       ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o      ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o  ) )ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o ) &    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o VCS     szRelationshipgrbitccolumnicolumnszObjectszColumnszReferencedObjectszReferencedColumn   szObjectszReferencedObjectszRelationship! ! ! ! ! ! !  !! !"  !# !&! &)!)!)!5!$5!%5!&5    dbDATABASErstCollegeai*\G{000204EF-0000-0000-C000-000000000046}#2.1#9#C:\WIN95\SYSTEM\ven2232.olb#Visual Basic For Applicationso*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#7.0#0#C:\MSOFFICE\ACCESS\MSACCESS.TLB#Microsoft Access for Windows 95j*\G{00025F01-0000-0000-C000-000000000046}#3.0#0#C:\WIN95\SYSTEM\MSJETSQL.TLB#Microsoft Jet SQL Help Topics*\G{00025E01-0000-0000-C000-000000000046}MSysDb/++'#pQForm_scuba_uD@40,gAD {qg]SI?56o{_VBA_PROJECT a^ *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#C:\Program Files\Microsoft Office\Office\MSACC8.OLB#Microsoft Access 8.0 Object Library*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL#Microsoft DAO 3.5 Object Library|3Form_scubaf2 17338b9880*D t>Form_scubafx 18338b9880*D? Form_scubo{N99 __A__ @ @ @ @"#$%&'()*!!!!! }X@dbO_@scuba_++++++++++)  W@dbO_@scuba_insert----------+  @I4W@dbO_@scuba_update----------+  _>>2&&&&&&$ `aO@aO@SysRel''''''''''% aO@aO@Modules((((((((((& aO@aO@Scripts((((((((((& QaO@QaO@Reports((((((((((& naO@naO@Forms&&&&&&&&&&$ `NaO@}aO_@MSysIMEXColumns0000000000. `aO@aO@MSysIMEXSpecs..........,  saO@N(N_@MSysModules*@xqB89KTT8,,,,,,,*  oaO@oaO@UserDefined,,,,,,,,,,*  cjaO@cjaO@SummaryInfoU@888,,,,,,,* @`;aO@`;aO@MSysRelationships@>>>>2222220 `;aO@`;aO@MSysQueries,,,,,,,,,,* `;aO@`;aO@MSysACEs))))))))))' `;aO@`;aO@MSysObjectsy@8888,,,,,,* `;aO@(N_@MSysDb9@333'''''''% @`;aO@`;aO@Relationshi@ @  @ @%2k  !%2k  3%2k $+%2k *`S%2k48 !#|QQ|H! !H2|p,2~!~|  2~ !H  H!%2k Q !Q2Q! |HQpQ2Q!~! QQ|H!QQ|H! 3Q| 5! Q!2!Q!H2|p,2~ !H| Q QQ2p#|!!#2p!!!#2p!p!o{~oQf.9t<ME7!u(N_@!u(N_@MSysModules***********  }X@dbO_@scuba_++++++++++)  W@dbO_@scuba_insert----------+  @I4W@dbO_@scuba_update----------+  _>>2&&&&&&$ `aO@aO@SysRel''''''''''% aO@aO@Modules((((((((((& aO@aO@Scripts((((((((((& QaO@QaO@Reports((((((((((& naO@naO@Forms&&&&&&&&&&$ `NaO@}aO_@MSysIMEXColumns0000000000. `aO@aO@MSysIMEXSpecs..........,  saO@N(N_@MSysModules2*@xqB89KUU9-------+  oaO@oaO@UserDefined,,,,,,,,,,*  cjaO@cjaO@SummaryInfoU@888,,,,,,,* @`;aO@`;aO@MSysRelationships@>>>>2222220 `;aO@`;aO@MSysQueries,,,,,,,,,,* `;aO@`;aO@MSysACEs))))))))))' `;aO@`;aO@MSysObjectsy@7ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jK-~%₨sV#jKV#jKV#jKV#jKV#o 7  @ @ @          [ Root EntryAkB_VBA_PROJECT S(84 {qg]SI? @ J @ @ @ @ @ @ @ @ @ @  ! % & ' ( ) * + , - . ` ` `# `$ `%`````````````` ` ` ` ` ````````[`[` [`!    y 01szObjectszColumnszReferencedObjectszReferencedColumn   szObjectszReferencedObjectszRelationshipFQ]u=i--o//u  TbNameGrptbcd'( TbIndex''cID FieldNameDataTypeStartWidth IndexType SkipColuE;}`@݆R~`@Form1@(LWF000|@  wvo@Xo@հ 纻8888888  wvo@#.$o@հ//////////- [܈O@32yAv@ٰU@T777+++++++) @ saO@N(N_@MSysModules2*@TxqB89KUU9-------+ !u(N_@ (N_@MSysModules,,,,,,,,,,* `aO@aO@MSysIMEXSpecs.........., `NaO@}aO_@MSysIMEXColumns0000000000.  _>>2&&&&&&$ `aO@aO@SysRel''''''''''% aO@aO@Modules((((((((((& aO@aO@Scripts((((((((((& QaO@QaO@Reports((((((((((& naO@naO@Forms&&&&&&&&&&$ `NaO@}aO_@MSysIMEXColumns0000000000. `aO@aO@MSysIMEXSpecs..........,  saO@N(N_@MSysModules2*@xqB89KUU9-------+  oaO@oaO@UserDefined,,,,,,,,,,*  cjaO@cjaO@SummaryInfoU@888,,,,,,,* @`;aO@`;aO@MSysRelationships@>>>>2222220 `;aO@`;aO@MSysQueries,,,,,,,,,,* `;aO@`;aO@MSysACEs))))))))))' `;aO@`;aO@MSysObjectsy@VCeN r    FlagsFormModuleNameReplicationVersionTypeTypeInfoVersionZIndex1{qg@  @@@@ D+u8 D2p! D~! # ! # 3 # !#|QQ|H! !H2|p,2~!~|  2~ !H  H!Q !Q2Q! |HQpQ2Q!~! Q| 5! Q!2!Q!H2|p,2~ !H| Q QQ2p#|!!#2p!TKKDValidationRuleValidationTextFilterOrderBy OrderByOn ColumnWidth ColumnOrder ColumnHidden DescriptionFormat InputMaskCaption DefaultValueRequiredAllow@e  [ @]]]]]] ] ] ] ] ] ] /o`QB qbO@1"s`QB>/  (        ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V       ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o      ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o      ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o     ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o     ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o   ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o     ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o   LVAL  @ @     ʾxxxxxٰհʾxxxxxٰհ(:Tʾxxxxxٰհ(:T"NjNj777ƑƑƑƑƑƑƑƑƑƑƑƑ>#|QD D+u8o#|QD D2p!w#|QD D~!y#|QD # !z#|QD # 3}~#|QD #6H| 6Q nQ +MSysDb/++'#+MSysDb/++'#?;+MSysDb/++'#?;+MSysDb/++'#?;+MSysDb/++'#?;+MSysDb/++'#?;+MSysDb/++'#xSyMSysDb/++'#xSyMSysDb/++'#qU:;xSyMSysDb/++'#qU:;xSyMSysDb/++'#qU:;Form_xSyMSysDb/++'#qU:;Form_xSyMSysDb/++'#qU:;Form_հuwHD8402Form_ٰԷgHD840#Form_ٰ5HD840'O+Form_ٰ2TIE951csprForm_ٰ1#tIE951Lock LVAL #i_VBA_MODULE0:b?>FDESTx9U=0 PSLS S ` Fx &0D   P ` p    8N LVAL &    (D   H X h x          "    >  XFxh    $ $ $ $ $ $    ,D0 ` p  "   &   $ $ $ $( $8 $H $X  h (Ex       "  "  @ <@     `    >  FxH &       8N   H X hx            0 "8 @ H  P h >   Fx    $(  $8  $H  $X  $h  $x      " LVAL ' . 4 0 H P  X @    x   6 O  ( $ 8  `  p  "     xpZ@Z`Z$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش $!f ϵ ʾϴ.A@4 '( '* ', '. '0'2a- ڵ带 ˻ $!f Ͻðϱ? T V $4'R R X B@f $!f Ͽϴ.A@4 '$ '( '* ', '. '0'2aHh@h8 B@B B@BlZZ$.̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> $!f ϷϿϴ.A@4 B@B B@BlXZXZx$. ٰ % . B@J- ο Է $ )$ ( )( * )* , ), . ). 0 )0 2 )2 B@> $ Է ϷǾϴ.A@4 $B@8 L(N P(N B@B B@Bl: ̸ Է³ ̸ Է 콺 6 ش LVAL ( ȭ鿡 Ÿ ⺻ α׷Դϴ.ZZZ8$. ٰ % . L(N P(N̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '( '* ', '. '0'2 $!f Է Ͻðϱ? T V $4'R R X L(N P(Na`hXa- ڵ带 ˻ "('( "*'* ",', ".'. "0'0 "2'2h B@B B@BlPZZ$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> B@B B@Bl 'ȸ ̺Ƚ ϴ ɴ߷.޺ڽ Ÿ Ƚŭ ̺Ƚ ʵ尪 Ų.ZZ0$. ٰ % .̸ (" $B@8= $!f B@H :B@8 B@<=%̺Ƚ ̹ ̺Ƚ "2 :!f )2 B@> "2'2= ̺ Ƚ B@B B@BlXP L(Nl80l C''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ٰ % . :  : 1997 2 28 : 1997 5 28A : Է, , ̺Ƚ, . : ʿ ۾ ϴ. LVAL +I''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' α׷ : հ> : α׷ ȭ Ͽ RAttribute VB_Name = "Form_հ " Basf0{C0ECBF10-402A-11D1-B4C6-44455P3540} |CreatablCTrue ]Pre declaId"Expose!Fals @TemplateDeriv%Cust0omizD$Option Com2p@ DTv  (";6#`#[ Ͻð"?;vbQues"+ vbYesNoM  7 ?7b`;Delet 5!}Q4gI !- r 9 R99 9 : HJ: <nd 4IfE&'Cl@ db.$a )mA !HNI: IIIIIIIII}I rQ I֑ @p A  ŸA ⺻ GD es f(Q;; ! !! o,ooz럲Vdo x 'Gȣ = " " "ּP(ȸ ̺Ƚh0intansMsgBox(̸.Text & " Է Ͻϱ?", vbQuestion + YesNo)N#If _vb& Then#@ 2.VisibleETrueBFalsE LVAL/z J@       J F "P x J "  J0 P   + 0  0@ "p &"    2" @h x  2"    2" @h x  2"    2" @0782=Bb c!e ghij,k!,P_@[Event Procedure]`#Detail m457U:;<2`abci̸[Event Procedure][Event Procedure]d25U682`qabcd Label1̸m457W:;<2`ab3cikȸȣd25]682`Rabucd Label3ȸȣm457W:;<2`DaPb3cikȭȣd25]682`aPbtcd Label5ȭȣm457U:<2`|a b4ci kּd25U682`a bcd Label7ּm457U:;<2`a bcTikd25U682`a bHcd Label9m457U:;<2`aGbcTikd25U682`aGbHcd Label11m457W:;<2`a. bc|ik ̺ȽGeneral Number0d25]682`a. b8cd Label13 ̺Ƚd5U682`h aTb c7dLabel18 h1]452`,aDb coghi [Event Procedure]h1452` aDb coghiԷ Է[Event Procedure]o025U8:2BbIcK dI efMl n ̹Ƚ Value List1;2;35852h1U452`abncg hi ȮȮ[Event Procedure]h1U45`a bcghi [Event Procedure]üü{LVAL0ZLQ/$ 95 ۰, 90 ų ũ B@$/ "A0" A0 )& B@(ULQ/$ 90 ۰, 85 ų ũ B@$/ "B+" B+ )& B@(PLQ/$ 85 ۰, 80 ų ũ B@$/ "B0" B0 )& B@(KLQ/$ 80 ۰, 75 ų ũ B@$/ "C+" C+ )& B@( FLQ/$ 75 ۰, 70 ų ũ B@$/ "C0" C0 )& B@(ALQ/$ 70 ۰, 65 ų ũ B@$/ "D+" D+ )& B@(<LQ/$ 65 ۰, 60 ų ũ B@$/ "D0" D0 )& B@(P/׿ 쿡 Ͽ B@$/ "F " F )& B@(k B@4/0 ڵ忡 ó Ƿ ڵ/+͸ Ű ۾ ڵ/ ݺ ۾ B@B B@BlH) @ ʵ带 ε ̿Ͽ ڵ= 1 ʷ ϴ ʵ带 óմϴ.ZZZ)$. (:) ʵ带 ε ̿ B@<)$ε ĵǾǷ)* óϱ Ͽ ڵκ)/ ö鼭 1 Ű ȴ.'8 !>^ͬb*@DESTDetailm̸d Label1mȸȣd Label3mȭȣd Label5mּd Label7m d Label9m d Label11m ̺Ƚd Label13d Label18h h Էo̹Ƚh Ȯh +LVAL7~~~~ozk\XITE_PL=.*  B@4 B@B B@B   ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o   [ [ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o [  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o   ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o   Tۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jK-~%₨sV#jKV#jKV#jKV#jKV#o ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKɛ1.<{,E{ */ε-V#jKV#jKV#o  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jK-~%₨sV#jKV#jKV#jKnd If #/:'J ڵ带 @˻%ȭrstScuba!  CtFCHuFCJw#G EC !.CloAOdbEC Sub Private  Command19_Click(@y Dim db As DATABASEEARecordset Set = CurrentDbA =.Open(" " .INDtEX"AQs'  ʵ εr̿ϿxAv  .@# FocusISeek "=BBAA0Edi`# #9fJKDM'LMLNLhNKMoNM fUPEDOATO$ PȮiO a'!-'uϴ ɴ߷&+ '޺  A F0._s _b"<@q__W,Ba@^_H^RE,#''ȡـ (*2)!(.= +!4.IC':"Aa; K Form_A7(C ancelInteger"o/LVAL2T VB@BX u T \!^A@ZX l C''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' α׷ : ó-1 :  : 1997 6 5? : ʵ带 ̿, ϴ : α׷Դϴ.Դϴ.C''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' %.D : ̺ ʵ带 ˻Ͽ ش л ϰó Ͽϴ.A@ZAttribute VB_Name = "Form_ó-1" Bas0{951FD09E-E222-11D0-B4C6-444553(540} |Cr@eatablTrue ]PredeclaId"ExposeFals @TemplateDeriv%CustomizD$Option Comp@ DTv   DM>BMDJɐϴ6ù ڵ @D !@RV DKA Dim db As DAT ABASErs tG-@Recordse@ Set = CurrentDb() CF=.OpeRn("b "   .MoveFni'"J ̵5Do UntiDl EOF 's&! τ$A Select CaQ ! 'FaX BIs >= 95'@ ų ũ) dit"Q o"A+"$n fWw |UP@DCG i)0G+%۰0, 90dQ.EE0de!0L&+ 989s85"B;;!t;8|;81,BCeAr:7S,8y7U_,cCa E._,s s7bx646G0!GXDx E D6bDxwE'׿  쿡 AIvF gB~U_a;End iForm_1 1d338b92b0*D0Form_i 30338ba185*D_x-1Form_% 2f338b9fa3*D!H)Form_ 2d338b9ad5*D`"Form_iX 6343b8a6a*D=0`Hx0F?>FDESTLVAL @ @ @ @ @ @ @ @ @ @  !"#$ % & ' ( ) * + , - . ` ` ``````````````` ` ` ` ` ````````[`[` [`!    ++ '- ).(, (* &* &, &, %+ "/'/#-#) $/#/(, +- ), $+ $* (,** '' '* &) %) &' () &0(,(.%, &+&* #) (*%' ')(,/#2), *-+) $) &) %+ $. +-+-'/*-+.-/--/1.20)4174!;1#45)>5.E=.NF9TG=UE;WF@YLGhVVdX]fWWi[Txuu}yľɷռsƆ~K-}-:HM#2>bTci@FVTWaicu]kcq^gXa{Wgx`oz[grVbrNZhPdpes|xr~`akGPZDNWCPU@PT0B3%(#' !($& &* %) &* (. (- '' $) #' $%#' (' $' !' %, &, !* #( )( )+ )+ ,+ +(+( *- /) .) -* ,+ ,*-,4-6.4.6.)'','. %, '/ $( !, #- #+ ', (1(- %. $+ &* /0 01+/ ). ++ *, .12/ .4%. */ ./)- ./ *- '+ %+ (/ (3%/ %- +/ *, %+ ') (( *) *. ). ,+ /- 0/-. (- ,//+ +*/, --*,$' ). '/$+%'%)#, &,#, $+ $/") %) %,"( !) #( %' &( $, %, '+(,-* ., )- (- '& &* .-,- &+ (+,/ +.(+ ','(%-'1), */#3&.*0*3.-+,//4'";.%I<*J<0G;(SD/F93RB:^KMbSPcMLlSWynjifb{uwwy{}|~#:@ MSysRelationshipsS R{ZLVAL 0i_VBA_PROJECTMa^ *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#C:\Program Files\Microsoft Office\Office\MSACC8.OLB#Microsoft Access 8.0 Object Library*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL#Microsoft DAO 3.5 Object Library3 Form_2 2a338b96ce*Dt>iForm_1 1d338b92b0*D0Form_i 30338ba185*D_x-1Form_% 2f338b9fa3*D!H)Form_ 2d338b9ad5*D``Hx0F?>FDESTDESTo?>FDESTL?>FDESTLVAL 1i_VBA_PROJECTa^ *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#C:\Program Files\Microsoft Office\Office\MSACC8.OLB#Microsoft Access 8.0 Object Library*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL#Microsoft DAO 3.5 Object Library;4Form_2 2a338b96ce*Dt>iForm_1 1d338b92b0*D0Form_i 13343b8b45*D_x3Form_% 2f338b9fa3*D!H)Form_ 2d338b9ad5*D`"Form_iX 6343b8a6a*D=0`Hx0F?>FDESTLVAL 2 . 4 0 H P  X @    x   6 O  ( $ 8  `  p  "     xpZ@Z`Z$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش $!f ϵ ʾϴ.A@4 '( '* ', '. '0'2a- ڵ带 ˻ $!f Ͻðϱ? T V $4'R R X B@f $!f Ͽϴ.A@4 '$ '( '* ', '. '0'2aHh@h8 B@B B@BlZZ$.̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> $!f ϷϿϴ.A@4 B@B B@BlXZXZx$. ٰ % . B@J- ο Է $ )$ ( )( * )* , ), . ). 0 )0 2 )2 B@> $ Է ϷǾϴ.A@4 $B@8 L(N P(N B@B B@Bl: ̸ Է³ ̸ Է 콺 6 ش LVAL 4 ȭ鿡 Ÿ ⺻ α׷Դϴ.ZZZ8$. ٰ % . L(N P(N̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '( '* ', '. '0'2 $!f Է Ͻðϱ? T V $4'R R X L(N P(Na`hXa- ڵ带 ˻ "('( "*'* ",', ".'. "0'0 "2'2h B@B B@BlPZZ$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> B@B B@Bl 'ȸ ̺Ƚ ϴ ɴ߷.޺ڽ Ÿ Ƚŭ ̺Ƚ ʵ尪 Ų.ZZ0$. ٰ % .̸ (" $B@8= $!f B@H :B@8 B@<=%̺Ƚ ̹ ̺Ƚ "2 :!f )2 B@> "2'2= ̺ Ƚ B@B B@BlXP L(Nl80l C''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ٰ % . :  : 1997 2 28 : 1997 5 28A : Է, , ̺Ƚ, . : ʿ ۾ ϴ. LVAL 4i_VBA_PROJECTa^ *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#C:\Program Files\Microsoft Office\Office\MSACC8.OLB#Microsoft Access 8.0 Object Library*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL#Microsoft DAO 3.5 Object Library;4Form_2 19343b8bb3*Dt>iForm_1 1a343b8bb3*D0Form_i 17343b8bb3*D_xi7Form_% 1b343b8bb4*D!H)Form_ 1c343b8bb4*D`"Form_iX 6343b8a6a*D=0`Hx0F?>FDESTLVAL 5I''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' α׷ : հ> : α׷ ȭ Ͽ RAttribute VB_Name = "Form_հ " Basf0{C0ECBF10-402A-11D1-B4C6-44455P3540} |CreatablCTrue ]Pre declaId"Expose!Fals @TemplateDeriv%Cust0omizD$Option Com2p@ DTv  (";6#`#[ Ͻð"?;vbQues"+ vbYesNoM  7 ?7b`;Delet 5!}Q4gI !- r 9 R99 9 : HJ: <nd 4IfE&'Cl@ db.$a )mA !HNI: IIIIIIIII}I rQ I֑ @p A  ŸA ⺻ GD es f(Q;; ! !! o,ooz럲Vdo x 'Gȣ = " " "ּP(ȸ ̺Ƚh0intansMsgBox(̸.Text & " Է Ͻϱ?", vbQuestion + YesNo)N#If _vb& Then#@ 2.VisibleETrueBFalsE +LVAL7PGRAM FILES\COMMON MICROSOFT SHARED\w350.DLL#Microsoft 3.5 Object LibrXaryH Form_ٰ2  _VBA_MODULE2VBt_MvDULED H1i ,7t>"(+@1<@ 4 "H@,A@=@7_CA`Է)!__ 纒<"=0!Q__SRP_0 K)^Form_հForm_հrU~~~~~~~~~~~~R *@DEST  a  Y) 1Q  Form_scubaf2 Form_scubafxForm_scuba_Form_scuba_insertForm_scuba_update SCUBA.mdbForm_ٰ1F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLLVBA  xJ_N? 3C:\Program Files\Microsoft Office\Office\MSACC8.OLBAccess nd If #/:'J ڵ带 @˻%ȭrstScuba!  CtFCHuFCJw#G EC !.CloAOdbEC Sub Private  Command19_Click(@y Dim db As DATABASEEARecordset Set = CurrentDbA =.Open(" " .INDtEX"AQs'  ʵ εr̿ϿxAv  .@# FocusISeek "=BBAA0Edi`# #9fJKDM'LMLNLhNKMoNM fUPEDOATO$ PȮiO a'!-'uϴ ɴ߷&+ '޺  A F0._s _b"<@q__W,Ba@^_H^RE,#''ȡـ (*2)!(.= +!4.IC':"Aa; K Form_A7(C ancelInteger"o/LVAL 9i_VBA_MODULE=b?>FDESTx)_E3 @[LS SFDESTx9U=0 PSLS S (*,.02xp @` @P @@ < @, @ @ @ @ @ @ @ @ @ @ 0:2p @` @P @@ < @, @ @ @ @ @ @ @ @ @ @ @| `(x h P@p ME J   8 @ X "`  "  D H 4 @ PH " (  0 > ` Fx &0D   P ` p    8N LVAL ?    (D   H X h x          "    >  XFxh    $ $ $ $ $ $    ,D0 ` p  "   &   $ $ $ $( $8 $H $X  h (Ex       "  "  @ <@     `    >  FxH &       8N   H X hx            0 "8 @ H  P h >   Fx    $(  $8  $H  $X  $h  $x      " LVAL @ . 4 0 H P  X @    x   6 O  ( $ 8  `  p  "     xpZ@Z`Z$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش $!f ϵ ʾϴ.A@4 '( '* ', '. '0'2a- ڵ带 ˻ $!f Ͻðϱ? T V $4'R R X B@f $!f Ͽϴ.A@4 '$ '( '* ', '. '0'2aHh@h8 B@B B@BlZZ$.̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> $!f ϷϿϴ.A@4 B@B B@BlXZXZx$. ٰ % . B@J- ο Է $ )$ ( )( * )* , ), . ). 0 )0 2 )2 B@> $ Է ϷǾϴ.A@4 $B@8 L(N P(N B@B B@Bl: ̸ Է³ ̸ Է 콺 6 ش LVAL P ȭ鿡 Ÿ ⺻ α׷Դϴ.ZZZ8$. ٰ % . L(N P(N̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '( '* ', '. '0'2 $!f Է Ͻðϱ? T V $4'R R X L(N P(Na`hXa- ڵ带 ˻ "('( "*'* ",', ".'. "0'0 "2'2h B@B B@BlPZZ$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> B@B B@Bl 'ȸ ̺Ƚ ϴ ɴ߷.޺ڽ Ÿ Ƚŭ ̺Ƚ ʵ尪 Ų.ZZ0$. ٰ % .̸ (" $B@8= $!f B@H :B@8 B@<=%̺Ƚ ̹ ̺Ƚ "2 :!f )2 B@> "2'2= ̺ Ƚ B@B B@BlXP L(Nl80l C''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ٰ % . :  : 1997 2 28 : 1997 5 28A : Է, , ̺Ƚ, . : ʿ ۾ ϴ. LVAL Di_VBA_MODULEA*@DESTCT ɮC89K*@DESTx9_*@DEST*@DESTU~~i7z>BF~JvNRVZp^bfjnrrvD @[LS S8LX8L>LLLL0 pFz &0D    0 @ P `p x 8P     (D   ( 8 H X h x       "  H 4h >  Fz0  x  & & & & & &   ,D ( 8 H "P  p  4 &   & & & & & & &  ( (E8  ` pLVAL H    "( 0 "  @ < @   X x   48    > Fz &@  h x    8P     (0  8 "X "h "x " " "    " `  p 4 >(  h Fzx   &  &  &  &  &  &  0  @  P ` "h .p 4    4    z0  H 6 X S   $"    "   80H   ( xpDim db As DATABASE̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش $!f ϵ ʾϴ.A@4 '( '* ', '. '0'2a- ڵ带 ˻ $!f Ͻðϱ? T V $4'R R X B@fLVAL I $!f Ͽϴ.A@4 '$ '( '* ', '. '0'2aHh@h8 B@B B@BlDim db As DATABASE̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> $!f ϷϿϴ.A@4 B@B B@BlXDim db As DATABASEDim rstScuba As Recordset B@J- ο Է $ )$ ( )( * )* , ), . ). 0 )0 2 )2 B@> $ Է ϷǾϴ.A@4 $B@8 L(N P(N B@B B@Bl: ̸ Է³ ̸ Է 콺 6 ش ȭ鿡 Ÿ ⺻ α׷Դϴ.Dim db As DATABASEDim rstScuba As Recordset L(N P(N̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '( '* ', '. '0'2 $!f Է Ͻðϱ? T V $4'R R X L(N P(Na`hXa- ڵ带 ˻ "('( "*'* ",', ".'. "0'0 "2'2h B@B B@BlPDim db As DATABASEDim rstScuba As Recordset̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )LVAL J( * )* , ), . ). 0 )0 2 )2 B@> B@B B@Bl 'ȸ ̺Ƚ ϴ ɴ߷.޺ڽ Ÿ Ƚŭ ̺Ƚ ʵ尪 Ų.Dim rstScuba As Recordset̸ (" $B@8= $!f B@H :B@8 B@<=%̺Ƚ ̹ ̺Ƚ "2 :!f )2 B@> "2'2= ̺ Ƚ B@B B@BlXP L(Nl80C'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''Dim rstScuba As Recordset :  : 1997 2 28 : 199710 8A : Է, , ̺Ƚ, . : ʿ ۾ ϴ. I''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' α׷ : հ> : α׷ ȭ Ͽ Z xZ Z Dim db As DATABASEDim rstScuba As RecordsetDim intans As IntegerSet db = CurrentDb()-Set rstScuba = db.OpenRecordset("ٰ")Set db = CurrentDb()-Set rstScuba = db.OpenRecordset("ٰ")Set db = CurrentDb()-Set rstScuba = db.OpenRecordset("ٰ")Dim intans As IntegerSet db = CurrentDb()-Set rstScuba = db.OpenRecordset("ٰ")Set db = CurrentDb()-Set rstScuba = db.OpenRecordset("ٰ")Set db = CurrentDb()-Set rstScuba = db.OpenRecordset("ٰ") @lH$. ٰ % .Set db = CurrentDb() -Set rstScuba = db.OpenRecordset("ٰ")YLVAL KAttribute VB_Name = "Form_հ" Bas0{DF0A5443-AEC9-11D0-8BD9CD38AE 394B} |Cr@eatablTrue ]PredeclaId"ExposeFals @TemplateDeriv%CustomizD$Option Comp@ DTv  + X+=+bovov+++++F AddN ewo ' 0οÕ` !Ka$O$ t~!$$$!$C S$X$ $y $Ǿ^1Qr.Visi4Q)s6 N)Tq_BeforeUpdР(Cancel'T?-bDblA 0Is}Ip` Q I6 @ Ÿ qɗԔ $d ϰeϰŻϰtp0 q%"!Ј,$G̸ܳ.Tex$t '  Է³ D`Ͽ ˻ If rstScuba.NoMatch Then ' ش xH&ȭȣ @= " "ּȸW ,̺Ƚ08intans MsgBox(A& " Ͻðϱ?", vbQuestion +YesNo)'u/vb.VisiblBeETrueFalsE nd IfBBF'p ڵrÃHoE!CqFDrGCtFCHuFCJwGLVAL L E C .CloAOdbEC Sub Private  Command19_Click(@y 'Dim db As DATABASERecordset @Set = CurrentDb-' =@.Open("" @.INDEX"AQtd}ʵ }ε9||`}^Focus%Seek "=^"_Z#6fEdi#$cJKLML#NMNgMNMJO)N lUP`EDNPTPFPȮO =a'!-'u`@߷&+ '޺ڽ Ÿ ŭ  F.Y_`c_`$c" =@r_`#K` XfX@.^_^!S,#''(ȡ*`3c*!.=f+4h_%J# _'t  RRR Form_(C ancel1PIntegerKpPn QtPr pq :4__SRP_2rU H 1 I )q9 a qq I!qA@>azzz@Ba@ FQ i9@JaQ~~~@Navvv@Rai@Va@Z 1 @^9ppp@b@fALVAL M@ jQ @ nQ y@rarrr9@ vQ y c5qGG_8 Dx! x <xztx! x <'%'%'%'%'%'%'%'%'$%'4%'D%'T%>tFd%_8 x6dTD4$_8 \kQD'4'D'Ttx! x <lt*Fd /tx6dTD4:%! :%! 8:%! :%! :%! (%! PmPtx! x <'4'D'T lt *Fd^</tx6dTD4<i _8 D'4'D'Ttx! x <lt *Fd /tx6dTD4:%! :%! :%! 8:%! :%! :%! (%! Pk _8  _4 X $m HtxdTD4$p_8 Dx! x <xztx! x <'%'%'%'%'%'%'%'%'$%'4%'D%'T%>tFd%_8 x6dTD4$ _8 &x! Qxod%: %_8 (5d&x! 0Qxod%: %_8 (5d&x! Qxod%:%_8 (5d&x! Qxod%:%_8 (5d&x! Qxod%:%_8 (5d&x! HQxod%:%_8 (5d_8 dD'4'D'Ttx! x <lt*Fd /tx6dTD4 _8  _4 X $ HtxdTD4$ _8 &x! QxoX%:h%_8 (5X&x! QxoX%:h %LVAL N_8 (5X&x! 0QxoX%:h %_8 (5X&x! QxoX%:h%_8 (5X&x! QxoX%:h%_8 (5X&x! QxoX%:h%_8 (5X&x! HQxoX%:h%_8 (5X_8 dE''('8Xx! x LX:hH x6 XH8(x! x <xx! xx xx! lx x _8  _4 X d$ $xXH8(8$ x! xx xx! lx x_8 Dztx! x <'%'%'%'%'%'%'%'%'$%'4%'D%'T%>tFd%_8 x6dTD4$_8 \k:%! :%! 8:%! :%! :%! (%! PPtx! x <'4'D'T lt*Fd^</tx6dTD4<x! xx xx! lx x"d: %_8 $d! 5d"d: %_8 $d! 85d"d:%_8 $d! 5d"d:%_8 $d! 5d"d:%_8 $d! 5d"d:%_8 $d! P5d _8  _4 X $ HtxdTD4$,_8 Dx! x <xztx! x <'%'%'%'%'%'%'%'%'$%'4%'D%'T%>tFd%_8 x6dTD4$ _8 &x! Qxod%: %_8 (5d&x! 0Qxod%: %_8 (5d&x! Qxod%:%_8 (5d&x! Qxod%:%_8 (5d&x! Qxod%:%_8 (5d&x! HQxod%:%_8 (5d_8 d _8  _4 X $ HtxdTD4$h_8 Dx! x <xztx! x <'%'%'%'%'%'%'%'%'$%'4%'D%'T%>tFd%_8 x6~LVALdTD4$x! x Hx _8 Sd:%_8 $dtx! x `>tFTD%:%_8 (x6dTD_8 d"d:%_8 $d! P5d _8  _4 X h$ HtxdTD4$lx"$ Qx40x'H%'X%'h%_4 Qx86hXHx! xx x4l$ xhXH4 8 <Fnjrrvbw__SRP_3rU $1` $q` $` (` &(1`,&$q`$` ( `0& 94@I4 i8@8<@<pLVALNr    FlagsFormModuleNameReplicationVersionTypeTypeInfoVersionZIndex1S R{ZLVAL pI''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' α׷ : հ> : α׷ ȭ Ͽ RAttribute VB_Name = "Form_հ " Basf0{C0ECBF10-402A-11D1-B4C6-44455P3540} |CreatablCTrue ]Pre declaId"Expose!Fals @TemplateDeriv%Cust0omizD$Option Com2p@ DTv  (";6#`#[ Ͻð"?;vbQues"+ vbYesNoM  7 ?7b`;Delet 5!}Q4gI !- r 9 R99 9 : HJ: <nd 4IfE&'Cl@ db.$a )mA !HNI: IIIIIIIII}I rQ I֑ @p A  ŸA ⺻ GD es f(Q;; ! !! o,ooz럲Vdo x 'Gȣ = " " "ּP(ȸ ̺Ƚh0intansMsgBox(̸.Text & " Է Ͻϱ?", vbQuestion + YesNo)N#If _vb& Then#@ 2.VisibleETrueBFalsE LVAL Ri_VBA_MODULEA*@DESTCT ɮC89K*@DESTx9_*@DEST*@DESTU~~i7z>BF~JvNRVZp^bfjnrrvD @[LS S8LX8L>LLLL0 pFz &0D    0 @ P `p x 8P     (D   ( 8 H X h x       "  H 4h >  Fz0  x  & & & & & &   ,D ( 8 H "P  p  4 &   & & & & & & &  ( (E8  ` pLVAL W    "( 0 "  @ < @   X x   48    > Fz &@  h x    8P     (0  8 "X "h "x " " "    " `  p 4 >(  h Fzx   &  &  &  &  &  &  0  @  P ` "h .p 4    4    z0  H 6 X S   $"    "   80H   ( xpDim db As DATABASE̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش $!f ϵ ʾϴ.A@4 '( '* ', '. '0'2a- ڵ带 ˻ $!f Ͻðϱ? T V $4'R R X B@fLVAL X $!f Ͽϴ.A@4 '$ '( '* ', '. '0'2aHh@h8 B@B B@BlDim db As DATABASE̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> $!f ϷϿϴ.A@4 B@B B@BlXDim db As DATABASEDim rstScuba As Recordset B@J- ο Է $ )$ ( )( * )* , ), . ). 0 )0 2 )2 B@> $ Է ϷǾϴ.A@4 $B@8 L(N P(N B@B B@Bl: ̸ Է³ ̸ Է 콺 6 ش ȭ鿡 Ÿ ⺻ α׷Դϴ.Dim db As DATABASEDim rstScuba As Recordset L(N P(N̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '( '* ', '. '0'2 $!f Է Ͻðϱ? T V $4'R R X L(N P(Na`hXa- ڵ带 ˻ "('( "*'* ",', ".'. "0'0 "2'2h B@B B@BlPDim db As DATABASEDim rstScuba As Recordset̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )LVAL Y( * )* , ), . ). 0 )0 2 )2 B@> B@B B@Bl 'ȸ ̺Ƚ ϴ ɴ߷.޺ڽ Ÿ Ƚŭ ̺Ƚ ʵ尪 Ų.Dim rstScuba As Recordset̸ (" $B@8= $!f B@H :B@8 B@<=%̺Ƚ ̹ ̺Ƚ "2 :!f )2 B@> "2'2= ̺ Ƚ B@B B@BlXP L(Nl80C'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''Dim rstScuba As Recordset :  : 1997 2 28 : 199710 8A : Է, , ̺Ƚ, . : ʿ ۾ ϴ. I''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' α׷ : հ> : α׷ ȭ Ͽ Z xZ Z Dim db As DATABASEDim rstScuba As RecordsetDim intans As IntegerSet db = CurrentDb()-Set rstScuba = db.OpenRecordset("ٰ")Set db = CurrentDb()-Set rstScuba = db.OpenRecordset("ٰ")Set db = CurrentDb()-Set rstScuba = db.OpenRecordset("ٰ")Dim intans As IntegerSet db = CurrentDb()-Set rstScuba = db.OpenRecordset("ٰ")Set db = CurrentDb()-Set rstScuba = db.OpenRecordset("ٰ")Set db = CurrentDb()-Set rstScuba = db.OpenRecordset("ٰ") @lH$. ٰ % .Set db = CurrentDb() -Set rstScuba = db.OpenRecordset("ٰ")YLVAL aAttribute VB_Name = "Form_հ" Bas0{DF0A5443-AEC9-11D0-8BD9CD38AE 394B} |Cr@eatablTrue ]PredeclaId"ExposeFals @TemplateDeriv%CustomizD$Option Comp@ DTv  + X+=+bovov+++++F AddN ewo ' 0οÕ` !Ka$O$ t~!$$$!$C S$X$ $y $Ǿ^1Qr.Visi4Q)s6 N)Tq_BeforeUpdР(Cancel'T?-bDblA 0Is}Ip` Q I6 @ Ÿ qɗԔ $d ϰeϰŻϰtp0 q%"!Ј,$G̸ܳ.Tex$t '  Է³ D`Ͽ ˻ If rstScuba.NoMatch Then ' ش xH&ȭȣ @= " "ּȸW ,̺Ƚ08intans MsgBox(A& " Ͻðϱ?", vbQuestion +YesNo)'u/vb.VisiblBeETrueFalsE nd IfBBF'p ڵrÃHoE!CqFDrGCtFCHuFCJwG@#|QD%2k  !l! #|QD%2k  3g! #|QD%2k $+b!#|QD%2k *`SZ!#|QD%2k48D! H| 6!Q B!! 6!Q B!! 6!Q B!!!Q B!!!Q B!!Q F!!Q S! 6!Q S! 6!Q S! 6!Q S!!Q S!!Q S!Q X!VC N\\     (  ID̸ȸȣȭȣּ ̺Ƚ \^\_oX\ ̸ȸȣ PrimaryKeyMSysDb$//# Form_scuba_QouD8, Form_scuba_insert?DTgF:."Form_scuba_update-e5F:."Form_scubaf22$> TA5) Form_scubaf1~JY"##A5) Form_scubafx9$E1A5) Lock S{qg@@ ;[ L\"__ @@@  D+u8 D2p! D~! # ! # 3 # !#|QQ|H! !H2|p,2~!~|  2~ !H  H!Q !Q2Q! |HQpQ2Q!~! QQ|H!QQ|H! 3Q| 5! Q!2!Q!H2|p,2~ !H| Q QQ2p#|!!#2p!7ڸ5005745-23賲ö  7ڸ5005745-2388 DZ Ŵ浿 333ڿ<82 *ڸ5004753-1234 DZ Ÿ 345ȸ:60  5α500321-1234ֽ ϵ 555ȸ2.(  02004435-7765 浿 324̿1-'  ̱2003779-5643λ 234ڿ3/) 1005559-8833 ǵ 123ȸʺ3/) *2002765-3322λ 7793/) Kڵ1003994-3378ֽ ϵ 876ǻ縶3-) 輱2001555-9922 赿 333ڿʺ3/) 'ȫ浿1002657-0034 657л1-' ѿ1001753-8899 Ÿ 5435/) X[I7] G#:]G)%Z]):]l:]l] l$] (E:]*O?$]8u($]9h?]9h?]MSysDb$//# Form_scuba_QouD8, Form_scuba_insert?DTgF:."Form_scuba_update-e5F:."Form_scubaf22$> TA5) Form_scubaf1~JY"##A5) Form_scubafx9$E1A5) Lock B[@@@ !   !] !   3] !   F] !   j] 3   !] 3   3] 3   F] 3   X] j   F]  j   X]  j   j] ]  j] RmtInfoLongLvLvPropLvModuleLvExtrasetni 8 Id ParentIdName        V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o     ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o   ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o ۇ4&~~~~ozk\XITE_PL=.*     ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o   [ [ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o [  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o   ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o   Tۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jK-~%₨sV#jKV#jKV#jKV#jKV#o ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKɛ1.<{,E{ */ε-V#jKV#jKV#o  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jK-~%₨sV#jKV#jKV#jKV#jKV#o  ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o     ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o      ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o   Tۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o     ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o LVAL b E C .CloAOdbEC Sub Private  Command19_Click(@y 'Dim db As DATABASERecordset @Set = CurrentDb-' =@.Open("" @.INDEX"AQtd}ʵ }ε9||`}^Focus%Seek "=^"_Z#6fEdi#$cJKLML#NMNgMNMJO)N lUP`EDNPTPFPȮO =a'!-'u`@߷&+ '޺ڽ Ÿ ŭ  F.Y_`c_`$c" =@r_`#K` XfX@.^_^!S,#''(ȡ*`3c*!.=f+4h_%J# _'t  RRR Form_(C ancel1PIntegerKpPn QtPr pq :4__SRP_2rU H 1 I )q9 a qq I!qA@>azzz@Ba@ FQ i9@JaQ~~~@Navvv@Rai@Va@Z 1 @^9ppp@b@fALVAL c@ jQ @ nQ y@rarrr9@ vQ y c5qGG_8 Dx! x <xztx! x <'%'%'%'%'%'%'%'%'$%'4%'D%'T%>tFd%_8 x6dTD4$_8 \kQD'4'D'Ttx! x <lt*Fd /tx6dTD4:%! :%! 8:%! :%! :%! (%! PmPtx! x <'4'D'T lt *Fd^</tx6dTD4<i _8 D'4'D'Ttx! x <lt *Fd /tx6dTD4:%! :%! :%! 8:%! :%! :%! (%! Pk _8  _4 X $m HtxdTD4$p_8 Dx! x <xztx! x <'%'%'%'%'%'%'%'%'$%'4%'D%'T%>tFd%_8 x6dTD4$ _8 &x! Qxod%: %_8 (5d&x! 0Qxod%: %_8 (5d&x! Qxod%:%_8 (5d&x! Qxod%:%_8 (5d&x! Qxod%:%_8 (5d&x! HQxod%:%_8 (5d_8 dD'4'D'Ttx! x <lt*Fd /tx6dTD4 _8  _4 X $ HtxdTD4$ _8 &x! QxoX%:h%_8 (5X&x! QxoX%:h %LVAL d_8 (5X&x! 0QxoX%:h %_8 (5X&x! QxoX%:h%_8 (5X&x! QxoX%:h%_8 (5X&x! QxoX%:h%_8 (5X&x! HQxoX%:h%_8 (5X_8 dE''('8Xx! x LX:hH x6 XH8(x! x <xx! xx xx! lx x _8  _4 X d$ $xXH8(8$ x! xx xx! lx x_8 Dztx! x <'%'%'%'%'%'%'%'%'$%'4%'D%'T%>tFd%_8 x6dTD4$_8 \k:%! :%! 8:%! :%! :%! (%! PPtx! x <'4'D'T lt*Fd^</tx6dTD4<x! xx xx! lx x"d: %_8 $d! 5d"d: %_8 $d! 85d"d:%_8 $d! 5d"d:%_8 $d! 5d"d:%_8 $d! 5d"d:%_8 $d! P5d _8  _4 X $ HtxdTD4$,_8 Dx! x <xztx! x <'%'%'%'%'%'%'%'%'$%'4%'D%'T%>tFd%_8 x6dTD4$ _8 &x! Qxod%: %_8 (5d&x! 0Qxod%: %_8 (5d&x! Qxod%:%_8 (5d&x! Qxod%:%_8 (5d&x! Qxod%:%_8 (5d&x! HQxod%:%_8 (5d_8 d _8  _4 X $ HtxdTD4$h_8 Dx! x <xztx! x <'%'%'%'%'%'%'%'%'$%'4%'D%'T%>tFd%_8 x6~LVALdTD4$x! x Hx _8 Sd:%_8 $dtx! x `>tFTD%:%_8 (x6dTD_8 d"d:%_8 $d! P5d _8  _4 X h$ HtxdTD4$lx"$ Qx40x'H%'X%'h%_4 Qx86hXHx! xx x4l$ xhXH4 8 <Fnjrrvbw__SRP_3rU $1` $q` $` (` &(1`,&$q`$` ( `0& 94@I4 i8@8<@<pLVAL0782=Bb c!e ghj,k,P_@[Event Procedure]`#Detail m457U:;<2`abci̸[Event Procedure][Event Procedure]d25U682`qabcd Label1̸m457W:;<2`ab3cikȸȣd25]682`Rabucd Label3ȸȣm457W:;<2`DaPb3cikȭȣd25]682`aPbtcd Label5ȭȣm457U:<2`|a b4ci kּd25U682`a bcd Label7ּm457U:;<2`a bcTikd25U682`a bHcd Label9m457U:;<2`aGbcTikd25U682`aGbHcd Label11m457W:;<2`a. bc|ik ̺ȽGeneral Number0d25]682`a. b8cd Label13 ̺Ƚd5U682`h aTb c7dLabel18 h1]452`,aDb coghi [Event Procedure]h1452` aDb coghiԷ Է[Event Procedure]o025U8:2BbIcK dI efMl n ̹Ƚ Value List1;2;35852h1U452`abncg hi ȮȮ[Event Procedure]h1U45`a bcghi [Event Procedure]üü{LVALͬCT ɮC89KDetailm̸d Label1mȸȣd Label3mȭȣd Label5mּd Label7m d Label9m d Label11m ̺Ƚd Label13d Label18h h Էo̹Ƚh Ȯh LVALNr    FlagsFormModuleNameReplicationVersionTypeTypeInfoVersionZIndex1S R{ZLVAL ii_VBA_PROJECTa^ *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#C:\Program Files\Microsoft Office\Office\MSACC8.OLB#Microsoft Access 8.0 Object Library*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL#Microsoft DAO 3.5 Object Library*;4 Form_2 19343b8bb3*Dt>iForm_1 1a343b8bb3*D0"Form_iX 6343b8a6a*D=0Form_% 1b343b8bb4*D!H)Form_ 1c343b8bb4*D`x`H0F?>FDEST *@DESTo?>FDESTL?>FDLVAL jESTN?>FDESTDESTh[_1Access+DATABASEpublicVBAPWin16~PWin32PMacP SCUBA.mdb97PMSJETSQL PDAOP Form_scubaf2]P _EvaluateP̸_BeforeUpdatePCancelP ̸_DblClickñPdb\PrstScubaoP RecordsetP CurrentDbSP OpenRecordset|PINDEXP̸#PNoMatch/3PȭȣP~PּCPPȸȣ`P ̺ȽPMsgBoxRP Ȯ_ClickPSetFocusP̹ȽPEdit+PUPDATEP Form_scubafxP Form_scubaf1\PForm_scuba_insertUP_Click PԷ_ClickL(PAddNewaPԷٰPVisiblePPintans{"P vbQuestionPvbYesNoPvbYesa?PCommand19_Click\P Form_Open-PForm_scuba_update&P_ClickPForm_scuba_եaP _Click*PDeletexPFormPDetail2PLabel1,PLabel3,PLabel5,PLabel7,PLabel9,PLabel11APLabel13CPLabel18HPȮTDPLabel20ePWhPDblClickPClickPCombo14%P'1PCollectPValueKPForm_ٰ1YPExpliciPtkP ̸mP BeforeUpdate6P_B_var_̸ׁPԷnP]P콺@P`Pش(P\PwPForm_ٰ2YP̸PForm_ٰxP _B_var_SetPForm_ٰԷUPForm_հPForm_հ 纻Pȭȣ_BeforeUpdate (Pl Zdirȱ0* pHd SCUBA.mdDb0@ = p *;4 J<  DAO>BDAO *\G{00025E01-:0C  0046}#4.0#0#C:\PROGRAM FILES\COMMON MICROSOFT SHARED\w350.DLL#Microsoft 3.5 Object LibrXaryHLVAL k Form_ٰ2  _VBA_MODULE2VBt_MvDULED H1i ,7t>"(+@1<@  /H@A@ H纻<"=0""@DbԷ)!bƒ__SRP_0 K)^rU~~~~~~~~~~~~R *@DEST    Form_scubaf2 Form_scubafxForm_scuba_Form_scuba_insertForm_scuba_update SCUBA.mdbForm_ٰ1F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLLVBA  xJ_N? 3C:\Program Files\Microsoft Office\Office\MSACC8.OLBAccess DAO^F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL 1p?>FDESTt?>FDESTxqB89Ks?>FDEST@C7?̸ȭȣSC7?Detailּȸȣ ̺Ƚ31?FormAC7?Label18̸_BeforeUpdate ̸_DblClick d@ČF1BJh)aN?! ٰqm. ̸1m.F;|? =   VBA332.DLL i S  ϵ ʾϴ. ȭȣ  ּ  ȸȣ ̺ȽForm_ٰ2x?>FDEST|?>FWLVALcF;|? =   VBA332.DLL i S  ϵ ʾϴ. ȭȣ  ּ  ȸȣ ̺ȽForm_ٰ2x?>FDEST|?>FDEDEST :FDESTLC7?̹ȽEC7?ȮLabel20 Ȯ_Click p\;|?Form_ٰw?>FDEST?>FDEST2\%Fo j~?>FDEST_ClickCommand19_Click h  ϷϿϴ.Form_ٰԷv?>FDEST?>FDEST@GC89K?>FDESTԷ_ClickԷ_Click Form_Open tP;|?    Է Ͻðϱ?  Է ϷǾϴ.Form_հForm_հ 纻*@DEST*@DESTCT ɮC89K*@DEST _Click 48  ϵ ʾϴ.  Ͻðϱ?  Ͽϴ. __SRP_1rU~~~~~~~~o    ( 8Cancel  H Q Xdb hrstScuba xintansHLVAL mi_VBA_MODULE0:b?>FDESTx9U=0 PSLS S ` Fx &0D   P ` p    8N LVAL 1    (D   H X h x          "    >  XFxh    $ $ $ $ $ $    ,D0 ` p  "   &   $ $ $ $( $8 $H $X  h (Ex       "  "  @ <@     `    >  FxH &       8N   H X hx            0 "8 @ H  P h >   Fx    $(  $8  $H  $X  $h  $x      " +LVAL7Nr    FlagsFormModuleNameReplicationVersionTypeTypeInfoVersionZIndex1nd If #/:'J ڵ带 @˻%ȭrstScuba!  CtFCHuFCJw#G EC !.CloAOdbEC Sub Private  Command19_Click(@y Dim db As DATABASEEARecordset Set = CurrentDbA =.Open(" " .INDtEX"AQs'  ʵ εr̿ϿxAv  .@# FocusISeek "=BBAA0Edi`# #9fJKDM'LMLNLhNKMoNM fUPEDOATO$ PȮiO a'!-'uϴ ɴ߷&+ '޺  A F0._s _b"<@q__W,Ba@^_H^RE,#''ȡـ (*2)!(.= +!4.IC':"Aa; K Form_A7(C ancelInteger"o/LVAL0782=Bb c!e ghij,k!,P_@[Event Procedure]`#Detail m457U:;<2`abci̸[Event Procedure][Event Procedure]d25U682`qabcd Label1̸m457W:;<2`ab3cikȸȣd25]682`Rabucd Label3ȸȣm457W:;<2`DaPb3cikȭȣd25]682`aPbtcd Label5ȭȣm457U:<2`|a b4ci kּd25U682`a bcd Label7ּm457U:;<2`a bcTikd25U682`a bHcd Label9m457U:;<2`aGbcTikd25U682`aGbHcd Label11m457W:;<2`a. bc|ik ̺ȽGeneral Number0d25]682`a. b8cd Label13 ̺Ƚd5U682`h aTb c7dLabel18 h1]452`,aDb coghi [Event Procedure]h1452` aDb coghiԷ Է[Event Procedure]o025U8:2BbIcK dI efMl n ̹Ƚ Value List1;2;35852h1U452`abncg hi ȮȮ[Event Procedure]h1U45`a bcghi [Event Procedure]üüLVAL ui_VBA_MODULEKr?>FDESTxqB89Kxo [LS S Fx &`$    .D (< H          xp`: ̸ Է³ ̸ Է 콺 6 ش ȭ鿡 Ÿ ⺻ α׷Դϴ.ZZ$.̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '(- ش Է³ ʱȭ '* ', '.@ '0'2 $!f ϵ ʾϴ.A@4a- ڵ带 ˻ "('(-* ش ڵ ʵ尪 ش Է³ "*'* ",', ".'. "0'0 "2'2h B@B B@Blhl C''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' :  α׷ : ٰ1 : 1997 2 28= : α׷ ̸Է³< : ̸ Է 콺 ش H : ȭ鿡 Ÿ, 쿡9 : ϵ ʾҴٴ ޽ ȭ鿡 Ÿϴ.I''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' : `LVALl1997 5 28 ٰ % .NAttribute VB_Name = "Form_1" Bas0{08B2E40F-7178-11D0-8B42-D9CD38AE394B} |CreatabBlTrue ]Predecla Id"ExposeFals @Template Deriv%CustomizD$Option Comp@ DTv  BDAO *\G{00025E01-:0C  0046}#4.0#0#C:\PROGRAM FILES\COMMON MICROSOFT SHARED\w350.DLL#Microsoft 3.5 Object LibrXaryHLVAL | Form_ٰ2  _VBA_MODULE2VBt_MvDULED H1i ,7t>"(+@1<@ 4 "H@LA@=0A`Է$)!d___SRP_0 K)^rU~~~~~~~~~~~~R *@DEST  Q  Form_scubaf2 Form_scubafxForm_scuba_Form_scuba_insertForm_scuba_update SCUBA.mdbForm_ٰ1F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLLVBA  xJ_N? 3C:\Program Files\Microsoft Office\Office\MSACC8.OLBAccess DAO^F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL 1p?>FDESTt?>FDESTxqB89Ks?>FDEST@C7?̸ȭȣSC7?Detailּȸȣ ̺Ƚ31?FormAC7?Label18̸_BeforeUpdate ̸_DblClick d@ČF1BJh)aN?! ٰqm. ̸1m.F;|? =   VBA332.DLL i S  ϵ ʾϴ. ȭȣ  ּ  ȸȣ ̺ȽForm_ٰ2x?>FDEST|?>FDEST :FDESTLC7?̹ȽEC7?ȮLabel20 Ȯ_Click p\;|?Form_ٰw?>FDEST?>FDEST2\%Fo j~?>FDEST_ClickCommand19_Click h  ϷϿϴ.Form_ٰԷv?>FDEST?>FDEST@GC89K?>FDESTԷ_ClickԷ_Click Form_Open tP;|?    Է Ͻðϱ?  Է ϷǾϴ.Form_հForm_հ 纻*@DEST*@DESTCT ɮC89K*@DEST _Click 48  ϵ ʾϴ.  Ͻðϱ?  Ͽϴ. __SRP_1rU~~~~~~~~o    ( 8Cancel  H Q Xdb hrstScuba xintansHLVAL ~Ӈs ) ~. Focus蓰`g`dHEdi/FT'g' mÆq2)D{u+rO8 UP^`^o '!tr ')*j*__SRP_2 rU ( ) Q q   y  1 Q y  9a@4avvv@8a@<a@@a1~~~@DaI@Ha@L@Pppp@Ta)rrr@XaAzzz@\a@ `1@da]?Tp"$ Qpx+p'@%'P%'`%x Qpt6`P@ t Dx<p! p <'%'%'%'%'%'%'%' %'%',%'@%'P%> ` Fx &$ 8 H X hx.D <    0 @ P`  h x  "   + >  Fx( , p , $ $ $ $ $ $   0 @ P` pxp0 ȭ Է³ Ͽ ͺ̽ ش  ڵ ʵ尪 F$KFZ@Z`$.Scub 0782=Bb c!e ghiJj&k4`#Detail m457U:;<2`abci̸[Event Procedure][Event Procedure]d25U682`qabcd Label1̸m457W:;<2`ab3cikȸȣd25]682`Rabucd Label3ȸȣm457W:;<2`DaPb3cikȭȣd25]682`aPbtcd Label5ȭȣm457U:<2`|a b4ci kּd25U682`a bcd Label7ּm457U:;<2`a bcTikd25U682`a bHcd Label9m457U:;<2`aGbcTikd25U682`aGbHcd Label11m457W:;<2`a. bc|ik ̺Ƚd25]682`a. b8cd Label13 ̺Ƚo025U8:2BbIc df efMl n̹Ƚ Value List1;2;35852h1U452`abncg hiȮȮ[Event Procedure]d25U682` aTb c7dLabel18 d25U682` a bcd Label20̹ȽLVAL i_VBA_PROJECTVa^ *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#C:\Program Files\Microsoft Office\Office\MSACC8.OLB#Microsoft Access 8.0 Object Library*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL#Microsoft DAO 3.5 Object Library$3 Form_2 28338b9424*Dt>Form_scubafx 27338b92b2*DA Form_scuba_i 1f338b92b1*Dc_x/"Form_scuba_insert 25338b92b2*DE!H'"Form_scuba_update 21338b92b2*D_`UForm_1 1d338b92b0*D0`Hx0F?LVAL i_VBA_MODULEgd`?>FDEST2\%Fo j_?>FDESTx^ _?>FDEST`?>FDEST VVU r4p8z<@~DHvLPTX\, [LS S(LX(L6LL<0<4<8<<<N0{B7135C32-A825-11D0-B246-C2D46F0AFB6A}L3"*\Rffff*c338b8c4d*\R2*#28*\R2*#2d*\R1*#90*\R1*#8f*\R1*#53*\R1*#51*\R0*#11 x ``kx!! xX $ tx =$ $$$`k |))%Hi  xXB@< $ tx̿$Z`8kN). x  $ t $(Pe$^@`8P$(*,.02t@p N@h` @P veNe@@ ious@< @, Ke@ Q@ y4@ 3E@( LVAL i_VBA_PROJECTa^ *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#C:\Program Files\Microsoft Office\Office\MSACC8.OLB#Microsoft Access 8.0 Object Library*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL#Microsoft DAO 3.5 Object Library(3 Form_2 2a338b96ce*Dt>iForm_scubafx 27338b92b2*DA Form_scuba_i 1f338b92b1*Dc_x/"Form_scuba_insert 25338b92b2*DE!H'Form_ 2d338b9ad5*D`Form_1 1d338b92b0*D0`Hx0F?>FDESLVALTH?>FDESTo?>FDESTL?>FDESTN?>FDESTP?>FDESThWZ1 Access+DATABASE VBAPWin16~PWin32PMacP SCUBA.mdb97PMSJETSQL P DAOP Form_scubaf2]P _EvaluateP̸_BeforeUpdatePCancelP ̸_DblClickñPdb\PrstScubaoP RecordsetP CurrentDbSP OpenRecordset|PINDEXP̸#PNoMatch/3PȭȣP~PּCPPȸȣ`P ̺ȽPMsgBoxRP Ȯ_ClickPSetFocusP̹ȽPEdit+PUPDATEP Form_scubafxP Form_scubaf1\P Form_scuba_insertUP_Click PԷ_ClickL(PAddNewaPԷٰPVisibleP 0782=Bb c!e ghi<j0kN[Event Procedure]`#Detail m457U:;<2`abci̸[Event Procedure]d25U682`qabcd Label1̸m457W:;<2`ab3cikȸȣd25]682`Rabucd Label3ȸȣm457W:;<2`DaPb3cikȭȣd25]682`aPbtcd Label5ȭȣm457U:<2`|a b4ci kּd25U682`a bcd Label7ּm457U:;<2`a bcTikd25U682`a bHcd Label9m457U:;<2`aGbcTikd25U682`aGbHcd Label11m457W:;<2`a. bc|ik ̺ȽGeneral Number0d25]682`a. b8cd Label13 ̺Ƚd5U682`h aTb c7dLabel18 h1]452`,aDb coghi [Event Procedure]h1452` aDb coghiԷ Է[Event Procedure]o025U8:2BbIcK dI efMl n ̹Ƚ Value List1;2;35852h1U452`abncg hi ȮȮ[Event Procedure]h1U45`a bcghi [Event Procedure]üüLVAL i_VBA_MODULEX?>FDESTx ot> e [LS S"(+@scubafx<<- 4 _H/= _inse$rt|'O! QE|S^Ԝ1< F :_?__SRP_0 K)^rU~~~~~~~~~~\ }?>FDEST  !  Form_scubaf2 Form_scubafxForm_scuba_Form_scuba_insertForm_scuba_update SCUBA.mdbForm_ٰ1F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLLVBA  xJ_N? 3C:\Program Files\Microsoft Office\Office\MSACC8.OLBAccess DAO^F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL 1p?>FDESTt?>FDESTxqB89Ks?>FDEST@C7?̸ȭȣSC7?Detailּȸȣ ̺Ƚ31?FormAC7?Label18̸_BeforeUpdate ̸_DblClick d@ČF1BJͬCT ɮC89KDetailm̸d Label1mȸȣd Label3mȭȣd Label5mּd Label7m d Label9m d Label11m ̺Ƚd Label13d Label18h h Էo̹Ƚh Ȯh PLVAL i_VBA_MODULEH8tb?>FDESTCT ɮC89Ka?>FDESTx_a?>FDESTb?>FDEST~~/z48<~@vDHLPpTX\`drhlD @[LS S(LX(L6LLLLFDEST@GC89K]?>FDESTx|!]?>FDEST^?>FDESTtt'4p8<@rDHzLP~TXv\`dhD @[LS S(LX(L6LLLLeForm_scubafx 27338b92b2*DA Form_scuba_i 1f338b92b1*Dc_x/"Form_scuba_insert 25338b92b2*DE!H'"Form_scuba_update 21338b92b2*D_`UForm_1 1d338b92b0*D0`Hx0F?LVAL t$\`xkXi x$DX$@` 8$(*,.02@p @` @P @0@ @< @H, @` @x @ @ @ @ @ @ @ @ 4 h$(*,.02@p @8` @PP @@ @0 4LP@ @   LP$(*,.@l @\ @L @< @8 @ ( @(  @@  @X @p @ @ @ @ @ @ @ h02TV4XXxH P $(*,.02@LVAL p @ ` @0 P @` @ @< @x , @  @ @ @ @ @ @ @8 @ @  8  $:2@p @P ` @h P @ @ @< @ , @  @ @ @ @( @@ @X @p @ @ @| XpXL@x pxxt ME "   (+8 > X Fx   $ $ $  $0 $@ $P  ` ,Dp    "  + &   $8 $H $X $h $x $ $   (ELVAL       0 " 8 @@ <     +  ( 8 > H Fx &     ( 8H 8NP            ( 8H  P ` p"x   + >  Fx  X  $h $x $ $ $ $     " . 48 p   +   x  6  OH  h $ x    "      xpZ@Z`$.Scuba % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> $!f ϷϿϴ.A@4 B@B B@Bl8ZZ$.Scuba % LVAL i_VBA_MODULEgd`?>FDEST2\%Fo j_?>FDESTx^ _?>FDEST`?>FDEST VVU r4p8z<@~DHvLPTX\, [LS S(LX(L6LL<0<4<8<<<N0{B7135C32-A825-11D0-B246-C2D46F0AFB6A}L3"*\Rffff*c338b8c4d*\R2*#28*\R2*#2d*\R1*#90*\R1*#8f*\R1*#53*\R1*#51*\R0*#11 x ``kx!! xX $ tx =$ $$$`k |))%Hi  xXB@< $ tx̿$Z`8kN). x  $ t $(Pe$^@`8P$(*,.02t@p N@h` @P veNe@@ ious@< @, Ke@ Q@ y4@ 3E@( LVAL X@@@ DG@X @p 3E@ F@ @ 4X FbF @` $(*,.02@@p DG@` @P |E@@ b@< DG@, @0 tG@H @@` DG@x @ tG@ @ DG@ @ F@ @ DGp4b@EFPX $(*,.02F@p @ ` @8P @h@ @< @, @ @ @ @ @ @ @( @@ @ @ 0XhxMEi " 6 "P x  + >  Fx : P  $ $ $ $ $ $   ,D  P ` p " x LVAL .F B@J- ο Է $ )$ ( )( * )* , ), . ). 0 )0 2 )2 B@> $ Է ϷǾϴ.A@4 $B@8 L(N P(N B@B B@Bl`: ̸ Է³ ̸ Է 콺 6 ش ȭ鿡 Ÿ ⺻ α׷Դϴ.ZZZ$.Scuba % . L(N P(N̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '( '* ', '. '0'2 $!f Է Ͻðϱ? T V $4'R R X L(N P(Na0h(a- ڵ带 ˻ "('( "*'* ",', ".'. "0'0 "2'2h B@B B@BlxZXZx$.Scuba % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> B@B B@Bl'ȸ ̺Ƚ ϴ ɴ߷.޺ڽ Ÿ Ƚŭ ̺Ƚ ʵ尪 Ų.ZZ$.Scuba % .̸ (" $B@8= $!f B@H :B@8 B@<=%̺Ƚ ̹ ̺Ƚ "2 :!f )2 B@> "2'2= ̺ Ƚ B@B B@Bl( L(NlAtLVAL tribute VB_Name = "Form_scuba_insert" " Bas0{4097B283-A947-11D0-8B43-D9CD38AE 394B} |Cr@eatablTrue ]PredeclaId"ExposeFals @TemplateDeriv%CustomizD$Option Comp@ DTv   U^U:fAd0dNewAs' @ο#R𤺸 C(@}% !K.Ga!G= GQGba!G  .GA G F!% GǾGB#a$H{"tu.Visi#QfnQ(QQ_DblCancelIntegeradf9 #Ca @ b شb9@K`ȭ@Ÿ ⺻ A% α׷bskkintans!&l7;_u^OeOeOedd*d#krd  If'2NoMatch The&n' v ̈ guWBLA HKdN8A {@0@"= 3?(/x?br?@ϽðQ??vbQuesB+ vbYesNo#62BQ b!b3A~@Do% D@EqBIfbR!o'B 0ڵ`<J&dX56W| Ux~ 0mand19QE@G"aU]CC. D.(&PFT&%&!&'&&[&I'&@Nu 'Z}'Ȯi'}1' [1:s Wɴ߷ v޺ڽx `ŭ W"̰ 'Ų`s/x/bZۿp/@+p (@)'ΰ ̺Ƚ rstScuba!| = T+.Text H.UPDATEt'( g dClose db. En d Sub&Pr ivate Form_Open(Cancel As Integer)Է.VisiblewFal.* __SRP_8LrU  ) Q q  1 Q y  q  1QLVAL )Q @41@8ppp@ <y1@@a@Da)rrrq@ H@LaAzzz@PaI@Ta1~~~@Xa@\avvv@`a@ d@ha`??0p"$ Qpx+p'@%'P%'`%x Qpt6`P@ t Dp! p <px<p! p <'%'%'%'%'%'%'%' %'%',%'@%'P%>8F\% t l6\L<(t \k:%! :%! 8: 0782=Bb c!e ghiJj0kz`#Detail m457U:;<2`abci̸[Event Procedure][Event Procedure]d25U682`qabcd Label1̸m457W:;<2`ab3cikȸȣd25]682`Rabucd Label3ȸȣm457W:;<2`DaPb3cikȭȣd25]682`aPbtcd Label5ȭȣm457U:<2`|a b4ci kּd25U682`a bcd Label7ּm457U:;<2`a bcTikd25U682`a bHcd Label9m457U:;<2`aGbcTikd25U682`aGbHcd Label11m457W:;<2`a. bc|ik ̺Ƚd25]682`a. b8cd Label13 ̺Ƚd5U682`h aTb c7dLabel18 h1U452`,aDb coghi [Event Procedure]LVALRME- "  @ <X    + > Fx8 &$    .D H< h           0xp`: ̸ Է³ ̸ Է 콺 6 ش ȭ鿡 Ÿ :%t (5`$p! HQpo`%:%t (5`t d t  x X,xtH<p`P@,  p"$ Qpx+p'@%'P%'`%x Qpt6`P@ t Dp! p <px<p! p <'%'%'%'%'%'%'%' %'%',%'@%'P%>eForm_scubafx 27338b92b2*DA Form_scuba_i 1f338b92b1*Dc_x/"Form_scuba_insert 25338b92b2*DE!H'Form_ 2b338b9a28*D`UForm_1 1d338b92b0*D0`Hx0F?>FDESLVAL <l<*F` /<p6`P@, t  x X0,xtH<p`P@, Pp"$ Qpx+p'@%'P%'`%x Qpt6`P@ t $p! Qpo`%:0%t (5`$p! Qpo`%:0 %t (5`$p! 0Qpo`%:0 %t (5`$p! Qpo`%:0 %t (5`$p! Qpo`%:0 %t (5`$p! Qpo`%:0%t (5`$p! HQpo`%:0%t (5`t dE'' '@`p! p L`:0P p6 `P@ p! p <pp! xp pp! lp p t  x Xl,xt$p`P@ Hl"$ Qlx+l'<%'L%'\%x Qlt6\L<l! xl ll! ll l t Dx8l! l <'%'%'%'%'%'%'%'%'%'(%'<%'L%>8F\% t l6\L<(t \k:%! :%! 8:%! :%! :%! (%! PN8l! l <'('<'L l8*F\^pr/8l6\L<(krl! xl ll! ll l \: %t $\! 5\ \: %t $\! 85\ \: %t $\! 5\ \: %t $\! 5\ \:%t $\! 5\ \:%t $\! P5\ t  x X,xtH8l\L<(`p"$ Qpx+p'@%'P%'`%x Qpt6`P@ t Dp! p <px<p! p <'%'%'%'%'%'%'%' %'%',%'@%'P%>"(+@scuba4fx<<-   _B/ _inse$rt|'O! QE|US^Ԝ1< F :_?__SRP_0K)^rU~~~~~~~~~a }?>FDEST  !  Form_scubaf2 Form_scubafxForm_scuba_Form_scuba_insertForm_scuba_update SCUBA.mdbForm_ٰ1F=C:\PROGR:%t (5`$p! HQpo`%:%t (5`t d t  x X,xtH<p`P@,  p"$ Qpx+p'@%'P%'`%x Qpt6`P@ t Dp! p <px<p! p <'%'%'%'%'%'%'%' %'%',%'@%'P%>~ B@B B@BlXP L(Nl80еAttribute VB_Name = "Form_scuba_" Bas0{DF0A5443-AEC9-11D0-8BD9CD38AE394B} |CreatablTrue ]PredeclaId"ExposeFals @Templat@eDeriv%CustomizD$Option Comp@ DTv  FDEST2\%Fo j~?>FDESTx^ ~?>FDEST?>FDEST, VV( r4p8z<@~DHvLPTX\( [LS S8F\% t l6\L<(t \k: %! : %! 8: %! : %! : %! (%! PN8l! l <'('<'L l8*F\^ pr/8l6\L<(krl! xl ll! ll l \:%t $\! 5\ \:%t $\! 85\ \:%t $\! 5\ \:%t $\! 5\ \:%t $\! 5\ \:%t $\! P5\ t  x X,xtH8l\L<(`p"$ Qpx+p'@%'P%'`%x Qpt6`P@ t Dp! p <px<p! p <'%'%'%'%'%'%'%' %'%',%'@%'P%>  Fxͬ@GC89KDetailm̸d Label1mȸȣd Label3mȭȣd Label5mּd Label7m d Label9m d Label11m ̺Ƚd Label13d Label18h PԷh PoP̹Ƚh PȮLVAL i_VBA_MODULEt.p^?>FDEST@GC89K]?>FDESTx|!]?>FDEST^?>FDESTtt'4p8<@rDHzLP~TXv\`dhD @[LS S(LX(L6LLLLeForm_scubafx 27338b92b2*DA Form_scuba_i 1f338b92b1*Dc_x/"Form_scuba_insert 25338b92b2*DE!H'Form_ 2d338b9ad5*D`(Form_1 1d338b92b0*D0`Hx0F?>FDESLVAL 8  LP$(*,.@l @ \ @ L @ < @8 @ ( @0  @H  @` @x @ @ @ @ @ @ @ p 02TV4XP X $(*,.02@p @ ` @8P @h@ @< @, @ @ @ @ @ @ @( @@ @ @ 0(@$:2@p @X` @pP @@ @< @, @ @ @ @ @0 @H @` @x @ @ @| x`L@x h PLVAL @px ME " (  0+@ > ` Fx &0D   P ` p    8N     (D   H X h x          "   + > 8 xFx    $ $ $ $ $  $0  @ ,DP    "  + &   $ $( $8 $H $X $h $x   (E       "  @  <`     +    > ( Fxh &      ( 8N0   h x      LVAL      (  0  @ P "X ` h  p + >   Fx  8  $H  $X  $h  $x  $  $      " . 4 P h p  x +    x   6 O(  H $ X    "      xpZ@Z`Z$.Scuba % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش $!f ϵ ʾϴ.A@4 '( '* ', '. '0'2a- ڵ带 ˻ $!f Ͻðϱ? T V $4'R R X B@f $!f Ͽϴ.A@4 '$ '( '* ', '. '0'2aHh@h8 B@B B@BlZZ$.Scuba % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> $!f ϷϿϴ.A@4 B@BLVAL i_VBA_MODULEl|?>FDEST :FDESTxr t>{?>FDEST|?>FDEST jji v48<~@DHLpPrTzX\`d4 [LS S(LX(L6LLL<8<<<N0{3AE90BE3-723C-11D0-8B42-D9CD38AE394B}(3 $*\Rffff*2a338b96ce*\R2*#28*\R2*#2d*\R1*#57*\R1*#59*\R0*#11*\R1*#51*\R1*#53*\R1*#8f*\R1*#90 ``8$$$$$`k**i  x $ t$6`|kC xX $ tx$$@HD```|+@a e`PX$0H$(*,.02@p @` @PLVALqgB@B B@BlXP L(Nl80еAttribute VB_Name = "Form_scuba_" Bas0{DF0A5443-AEC9-11D0-8BD9CD38AE394B} |CreatablTrue ]PredeclaId"ExposeFals @Templat@eDeriv%CustomizD$Option Comp@ DTv  Fx8 &$    .D H< h    LVAL        "(  .0 4`    +   x  6 OP p$      xp`: ̸ Է³ ̸ Է 콺 6 ش ȭ鿡 Ÿ ⺻ α׷Դϴ.ZZ$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '(- ش Է³ ʱȭ '* ', '.@ '0'2 $!f ϵ ʾϴ.A@4a- ڵ带 ˻ "('(-* ش ڵ ʵ尪 ش Է³ "*'* ",', ".'. "0'0 "2'2h B@B B@Bl( ȸ ̺Ƚ ϴ ɴ߷. ޺ڽ Ÿ Ƚŭ ̺Ƚʵ尪 Ų.Z@Z`$.̸ (" $B@8= $!f B@H :B@8 B@<=%̺Ƚ ̹ ̺Ƚ "2 :!f )2 B@> "2'2= ̺ Ƚ B@B B@BllC''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' α׷ : ٰ2 :  : 1997 2 28 : 1997 5 28A : LVAL α׷ ̺ȸ( : ϰ ϴ.̺ ٰ % .I'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''E : α׷ ̺Ƚ ޺ڽ ̿ϿG : ̹ ̺Ƚ ǥ "Ȯ"ư ȽŭJ : ̺Ƚ ų Ƿ ֽ^Attribute VB_Name = "Form_2" Bas0{3AE90BE3-723C-11D0-8B42-D9CD38AE394B} |CreatabBlTrue ]Predecla Id"ExposeFals @Template Deriv%CustomizD$Option Comp@ DTv  iForm_scubafx 27338b92b2*DA Form_scuba_i 1f338b92b1*Dc_x/"Form_scuba_insert 25338b92b2*DE!H'Form_ 2d338b9ad5*D`(Form_1 1d338b92b0*D0`Hx0F?>FDESLVAL B@BlXZXZx$.Scuba % . B@J- ο Է $ )$ ( )( * )* , ), . ). 0 )0 2 )2 B@> $ Է ϷǾϴ.A@4 $B@8 L(N P(N B@B B@Bl: ̸ Է³ ̸ Է 콺 6 ش ȭ鿡 Ÿ ⺻ α׷Դϴ.ZZZ8$.Scuba % . L(N P(N̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '( '* ', '. '0'2 $!f Է Ͻðϱ? T V $4'R R X L(N P(Na`hXa- ڵ带 ˻ "('( "*'* ",', ".'. "0'0 "2'2h B@B B@BlPZZ$.Scuba % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> B@B B@Bl 'ȸ ̺Ƚ ϴ ɴ߷.޺ڽ Ÿ Ƚŭ ̺Ƚ ʵ尪 Ų.ZZ0$.Scuba % .̸ (" $B@8= $!f B@H :B@8 B@<=%̺Ƚ ̹ ̺Ƚ "2 :!f )2 B@> "2'2= ̺ ȽLVAL B@B B@BlXP L(Nl80еAttribute VB_Name = "Form_scuba_" Bas0{DF0A5443-AEC9-11D0-8BD9CD38AE394B} |CreatablTrue ]PredeclaId"ExposeFals @Templat@eDeriv%CustomizD$Option Comp@ DTv   Fx : P  $ $ $ $ $ $   ,D LVAL  P ` p "P X " x @ <    (  0 > ` Fx &$ 8 H X hx.D <    0 @ P`  h x  "   @ >  Fx , P , $ $ $ $ $ $    0@  xp0 ȭ Է³ Ͽ ͺ̽ ش  ڵ ʵ尪 F$KFZ@Z`$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@<-* ȭ Է³ ̿Ͽ ͺ̽)(- ش ڵ尪 ), ( )(). * )*)0 , ),)2 . ). 0 )0 2 )2 B@> $!f ϷϿϴ.A@4 B@B B@Bl: ̸ Է³ ̸ Է 콺 6 ش ȭ鿡 Ÿ ⺻ α׷Դϴ.Z@Z`$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '(- ش Է³ ʱȭ 'LVAL * ', '. '0'2 $!f ϵ ʾϴ.A@4a- ڵ带 ˻ "('(-* ش ڵ ʵ尪 ش Է³ "*'* ",', ".'. "0'0 "2'2h B@B B@Bl`ZZ$.̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@<- ȭ Է³ ̿Ͽ-& ͺ̽ ش ڵ尪 ( )( * )* , ), . ). 0 )0 2 )2 B@> B@B B@Bll` ٰ % . XC'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''@ :  : 1997 2 28000046 : 1997 5 28OSOFT > : ֽ ϰ ϴ.E : ȭ Ͽ Ʒ ""1I''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' α׷ : ٰ? : α׷ "D : ư ٷ ǷMOD*Attribute VB_Name = "Form_" Bas0{B7135C32-A825-11D0-B246-C2D46F0AFB6A} |Creatabl!True ]Pr@edeclaId"ExposBeFals @TemplateDeriv%Cus`tomizD$Option Codmp@ DTv     Ʒ ."'ư ـ" 8Ƿ·#ֽ #4' x.uD  EP Su&b3#_Ck()E?'PLVALBƈLŕP Է³Sͺ̄4ش ڵ ʵ尪!GDim db As DATABASE arstScuba!Recordse[ Set= CurrentDbF= .Open(" 'X"b.INDEX!̸"s' bεQ́6J˻ .Focus  Seek "=",B .Textn ,B) &F , Edi 80& 8G79' >< %!୹ȣ-EpҁހȸdE̺Ƚw= 3-UP`UT @MsgBoxH:& " [@xCl db.$ EndpAb s@_Bef@oreUpdu(@CancelcIntegerZDblzQ:JQaQæ"a C&@Ia@Ÿ ⺻% '"0r__DQ@B?Dm ?D?D0?D?D?D?DE tqP?D;DoCoCfLoC Iff.NoMatch ThenG= X=SSTcM ʱȭ&4?7>:>:=z<0f::@ ϵ ʾ: E _+Pb1aT)Q?Cs4c3ߘdV?5FfWMIf߱MO'P P*Pamand19y???bc?e?? ? ?}? ???@~?6 ?i ?a +' .2B5 _ȣF00010000F00 .U'1Z0LVAL c ?    ?  4l"$ Qlx+l'<%'L%'\%x Qlt6\L< t Dl! l <lx8l! l <'%'%'%'%'%'%'%'%'%'(%'<%'L%>8F\% t l6\L<(t \kD'('<'L8l! l <l8 *F\ /8l6\L<(: %! : %! 8: %! : %! : %! (%! PN8l! l <'('<'L l8*F\^ pr/8l6\L<(kr t D'('<'L8l! l <l8*F\ /8l6\L<(: %! : %! : %! 8: %! : %! : %! (%! P t  x X,xtH8l\L<(0p"$ Qpx+p'@%'P%'`%x Qpt6`P@ t Dp! p <px<p! p <'%'%'%'%'%'%'%' %'%',%'@%'P%>L^"j  @@@  D+u8 D2p! D~! # ! # 3 # !#|QQ|H! !H2|p,2~!~|  2~ !H  H!Q !Q2Q! |HQpQ2Q!~! QQ|H! 0782=Bb c!e ghi<j%kQ[Event Procedure]`#Detail m457U:;<2`abci̸[Event Procedure][Event Procedure]d25U682`qabcd Label1̸m457W:;<2`ab3cikȸȣd25]682`Rabucd Label3ȸȣm457W:;<2`DaPb3cikȭȣd25]682`aPbtcd Label5ȭȣm457U:<2`|a b4ci kּd25U682`a bcd Label7ּm457U:;<2`a bcTikd25U682`a bHcd Label9m457U:;<2`aGbcTikd25U682`aGbHcd Label11m457W:;<2`a. bc|ik ̺ȽGeneral Number0d25]682`a. b8cd Label13 ̺Ƚd5U682`h aTb c7dLabel18 h1]452`,aDb coghi [Event Procedure]h1452` aDb coghiԷ Է[Event Procedure]o025U8:2BbIcK dI efMl n ̹Ƚ Value List1;2;35852h1U452`abncg hi ȮȮ[Event Procedure]LVALo`QB qbO@1"s`QB>/  (      ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o      ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o      ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o     ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o    ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o   ۇ O8V#jKrvwlrV#jKV#jKV#jKV#jKڷzO١ذ73_V#jKV#jKV#jKV#o ͬ@GC89KDetailm̸d Label1mȸȣd Label3mȭȣd Label5mּd Label7m d Label9m d Label11m ̺Ƚd Label13d Label18h PԷh PoP̹Ƚh PȮLVALNr    FlagsFormModuleNameReplicationVersionTypeTypeInfoVersionZIndex1S R{ZLVAL i_VBA_PROJECTa^ *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#C:\Program Files\Microsoft Office\Office\MSACC8.OLB#Microsoft Access 8.0 Object Library*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL#Microsoft DAO 3.5 Object Library3 Form_2 2a338b96ce*Dt>iForm_scubafx 27338b92b2*DA Form_scuba_i 1f338b92b1*Dc_x/Form_% 2e338b9d19*D!H'Form_ 2d338b9ad5*D`Form_1 1d338b92b0*D0`Hx0F?>FDESTLVAL `P@ p! p <pp! xp pp! lp p t  x Xl,xt$p`P@ Hl"$ Qlx+l'<%'L%'\%x Qlt6\L<l! xl ll! ll l t Dx8l! l <'%'%'%'%'%'%'%'%'%'(%'<%'L%>8F\% t l6\L<(t \k: %! : %! 8: %! : %! : %! (%! PN8l! l <'('<'L l8*F\^ pr/8l6\L<(krl! xl ll! ll l \:%t $\! 5\ \:%t $\! 85\ \:%t $\! 5\ \:%t $\! 5\ \:%t $\! 5\ \:%t $\! P5\ t  x X,xtH8l\L<(`p"$ Qpx+p'@%'P%'`%x Qpt6`P@ t Dp! p <px<p! p <'%'%'%'%'%'%'%' %'%',%'@%'P%>"(+@scubafx<<- 4 _H/=_G]Է'!k^T1< `:?/__SRP_0K)^rU~~~~~~~~~~\ ?>FDEST    Form_scubaf2 Form_scubafxForm_scuba_Form_scuba_insertForm_scuba_update SCUBA.mdbForm_ٰ1F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLLVBA  xJ_N? 3C:\Program Files\Microsoft Office\Office\MSACC8.OLBAccess DAO^F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL 1p?>FDESTt?>FDESTxqB89Ks?>FDEST@C7`! P5` t  x X,xtH<p`P@, T x! xx xG $ x<d`hlX+__SRP_dUrU x$ ` $) ` $i ` ( `,!&$ `$) ` (i `0!&pLVALwwwwvfffffffffgfvgxwvffffffgwxwwwwwwwwwwwwwwwwwwvffffffffffvfwwvffffffgwwwwwwwwwwvffffffffffgfwwwffffvffwwwwwwwwwwvfffffffffffffwvffffffhwwwwwwwwwvffffffffffffpffgvffffffhwwwwwwwwwvffffgffffffgpfffwffffffhwwwwwwwwwwwvfffffffffffgwffvfvfffffwwwwwwwwwwvfffgfvfffffwwfffffffffwwwwwwwwwwwwfffgfggffffwgffffffgffwwwwwwwwwwwwffffffvfffgfffffffff`wwwwwwwwwwwwvfffffffffgffffffff`wwwwwwwwwwwwvfffffffffgxfffffff`wwwwwwwwwwwwwwwfffffffffwxwwwwpwwwwwwwwwwwwwwwwwvffffffff 0782=Bb c!e ghi<j0kN[Event Procedure]`#Detail m457U:;<2`abci̸[Event Procedure]d25U682`qabcd Label1̸m457W:;<2`ab3cikȸȣd25]682`Rabucd Label3ȸȣm457W:;<2`DaPb3cikȭȣd25]682`aPbtcd Label5ȭȣm457U:<2`|a b4ci kּd25U682`a bcd Label7ּm457U:;<2`a bcTikd25U682`a bHcd Label9m457U:;<2`aGbcTikd25U682`aGbHcd Label11m457W:;<2`a. bc|ik ̺ȽGeneral Number0d25]682`a. b8cd Label13 ̺Ƚd5U682`h aTb c7dLabel18 h1]452`,aDb coghi [Event Procedure]h1452` aDb coghiԷ Է[Event Procedure]o025U8:2BbIcK dI efMl n ̹Ƚ Value List1;2;35852h1U452`abncg hi ȮȮ[Event Procedure]h1U45`a bcghi [Event Procedure]üüLVAL i_VBA_MODULE2^?>FDESTx!!=) @[LS S X Fx   $ $ $  $0 $@ $P  ` ,Dp    "   &   $ $( $8 $H $X $h $x   (E       "  "  @  <`LVAL     8    > ( Fxh &      ( 8N0   h x         (  0 @ P"X `h  p >  Fx  8  $H $X $h $x $ $     " . 4 P hp  x   x  6 O(  H $ X    "      xpZ@Z`$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> $!f ϷϿϴ.A@4 B@B B@Bl8ZZ$. B@J- ο Է $ )$ ( )( * )* , ), . ). 0 )0 2 )2 B@> $ Է ϷǾLVAL ϴ.A@4 $B@8 L(N P(N B@B B@Bl`: ̸ Է³ ̸ Է 콺 6 ش ȭ鿡 Ÿ ⺻ α׷Դϴ.ZZZ$. ٰ % . L(N P(N̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '( '* ', '. '0'2 $!f Է Ͻðϱ? T V $4'R R X L(N P(Na0h(a- ڵ带 ˻ "('( "*'* ",', ".'. "0'0 "2'2h B@B B@BlxZXZx$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> B@B B@Bl'ȸ ̺Ƚ ϴ ɴ߷.޺ڽ Ÿ Ƚŭ ̺Ƚ ʵ尪 Ų.ZZ$. ٰ % .̸ (" $B@8= $!f B@H :B@8 B@<=%̺Ƚ ̹ ̺Ƚ "2 :!f )2 B@> "2'2= ̺ Ƚ B@B B@Bl( L(Nll ٰ % .'' : α׷ :  : 1997 2 28 : LVAL 1997 5 28A : α׷ ̺ȸ. : ʿ ϸG : 2. ̵Ͻÿ "Է"ư ȭ鿡 Ÿ> : ʿ Է ȭ Ͽ Է°մϴ.L'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' α׷ : ٰԷO : 1. ϵǾ ִ ""ư ȭ鿡 ŸL''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''Attribute VB_Name = "Form_Էˆ" Bas0{4097B283-A947-11D0-8B43-D9CD38AE394B} |Creatabl!True ]Pr@edeclaId"ExposBeFals @TemplateDeriv%Cus`tomizD$Option Codmp@ DTv   2/=\ DP8 ˻  rstScuba.Edit x!ȣ = (H@ q8ּ8 8ȸ{ $̺ȽG (UPDATE Close db.End Sub Private Ȯ_Click() 'L < ϴ ߷΃D޺ڽ Ÿ ^ŭ" ʵ尪 Ų.ADim db As jABASl n Recordse Set = CurrentDb2A = .Open("ٰ"> .INDEX@]"̸P" .FocusHYSeek "=", BTex#̀v@m_ AK'`HeS0! 2mQ+Ah.. ./E(2'uȟ)BvN ȨAIForm_n(@CancelIntegermpԷ.VisibleFal_ _LVAL i_VBA_PROJECTa^ *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#C:\Program Files\Microsoft Office\Office\MSACC8.OLB#Microsoft Access 8.0 Object Library*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL#Microsoft DAO 3.5 Object Library3 Form_2 2a338b96ce*Dt>iForm_scubafx 27338b92b2*DA Form_scuba_i 1f338b92b1*Dc_x/Form_% 2e338b9d19*D!H)Form_ 2d338b9ad5*D`Form_1 1d338b92b0*D0`Hx0F?>FDESTLVAL H?>FDESTo?>FDESTL?>FDESTN?>FDESTP?>FDESThX[L1 Access+DATABASE VBAPWin16~PWin32PMacP SCUBA.mdb97PMSJETSQL P DAOP Form_scubaf2]P _EvaluateP̸_BeforeUpdatePCancelP ̸_DblClickñPdb\PrstScubaoP RecordsetP CurrentDbSP OpenRecordset|PINDEXP̸#PNoMatch/3PȭȣP~PּCPPȸȣ`P ̺ȽPMsgBoxRP Ȯ_ClickPSetFocusP̹ȽPEdit+PUPDATEP Form_scubafxP Form_scubaf1\P Form_scuba_insertUP_Click PԷ_ClickL(PAddNewaPԷٰPVisiblePPintans{"P vbQuestionPvbYesNoPvbYesa?PCommand19_Click\P Form_Open-P Form_scuba_update&P_ClickP Form_scuba_եaP _Click*PDeletexPFormPDetail2PLabel1,PLabel3,PLabel5,PLabel7,PLabel9,PLabel11APLabel13CPLabel18HPȮTDPLabel20ePWhPDblClickPClickPCombo14%P'1PCollectPValueKP Form_ٰ1YPExpliciPtkP ̸mP BeforeUpdate6P_B_var_̸ׁPԷnP]P콺@P`Pش(P\PwPForm_ٰ2YP̸PForm_ٰxP _B_var_SetPForm_ٰԷUPx cAldirر0* pHd SCUBA.mdDb0@ = p 3 J<  DAO>BDAO *\G{00025E01-:0C  0046}#4.0#0#C:\PROGRAM FILES\COMMON MICROSOFT SHARED\w350.DLL#Microsoft 3.5 Object LibrXaryH ForLVAL m_ٰ2  _VBA_MODULE2VBt_MvDULED H1i ,7t>"(+@scubafx<<- 4 _H/=_G]Է)!k^T1< `:?/__SRP_0K)^rU~~~~~~~~~~\ ?>FDEST    Form_scubaf2 Form_scubafxForm_scuba_Form_scuba_insertForm_scuba_update SCUBA.mdbForm_ٰ1F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLLVBA  xJ_N? 3C:\Program Files\Microsoft Office\Office\MSACC8.OLBAccess DAO^F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL 1p?>FDESTt?>FDESTxqB89Ks?>FDEST@C7?̸ȭȣSC7?Detailּȸȣ ̺Ƚ31?FormAC7?Label18̸_BeforeUpdate ̸_DblClick d@ČF1BJh)aN?! ٰqm. ̸1m.F;|? =   VBA332.DLL i S  ϵ ʾϴ. ȭȣ  ּ  ȸȣ ̺ȽForm_ٰ2x?>FLVALDEST|?>FDEST :FDESTLC7?̹ȽEC7?ȮLabel20 Ȯ_Click p\;|?Form_ٰw?>FDEST?>FDEST2\%Fo j~?>FDEST_ClickCommand19_Click h  ϷϿϴ.Form_ٰԷ#__SRP_1$rU~~~~~~s    ( 8Cancel  H Q XYLVAL i_VBA_MODULEH8tb?>FDESTCT ɮC89Ka?>FDESTx_a?>FDESTb?>FDEST~~/z48<~@vDHLPpTX\`drhlD @[LS S(LX(L6LLLL ` Fx &0D   P ` p    8N     (D   H X h x          "   + > 8 xFx    $ $ $ $ $  $0  @ ,DP    "  + &   $ $( $8 $H $X $h $x   (E       "  @  <`     +    > ( Fxh &      ( 8N0   h x      LVAL      (  0  @ P "X ` h  p + >   Fx  8  $H  $X  $h  $x  $  $      " . 4 P h p  x +    x   6 O(  H $ X    "      xpZ@Z`Z$.Scuba % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش $!f ϵ ʾϴ.A@4 '( '* ', '. '0'2a- ڵ带 ˻ $!f Ͻðϱ? T V $4'R R X B@f $!f Ͽϴ.A@4 '$ '( '* ', '. '0'2aHh@h8 B@B B@BlZZ$.Scuba % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> $!f ϷϿϴ.A@4 B@BLVAL B@BlXZXZx$.Scuba % . B@J- ο Է $ )$ ( )( * )* , ), . ). 0 )0 2 )2 B@> $ Է ϷǾϴ.A@4 $B@8 L(N P(N B@B B@Bl: ̸ Է³ ̸ Է 콺 6 ش ȭ鿡 Ÿ ⺻ α׷Դϴ.ZZZ8$.Scuba % . L(N P(N̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '( '* ', '. '0'2 $!f Է Ͻðϱ? T V $4'R R X L(N P(Na`hXa- ڵ带 ˻ "('( "*'* ",', ".'. "0'0 "2'2h B@B B@BlPZZ$.Scuba % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> B@B B@Bl 'ȸ ̺Ƚ ϴ ɴ߷.޺ڽ Ÿ Ƚŭ ̺Ƚ ʵ尪 Ų.ZZ0$.Scuba % .̸ (" $B@8= $!f B@H :B@8 B@<=%̺Ƚ ̹ ̺Ƚ "2 :!f )2 B@> "2'2= ̺ ȽLVAL B@B B@BlXP L(Nl80еAttribute VB_Name = "Form_scuba_" Bas0{DF0A5443-AEC9-11D0-8BD9CD38AE394B} |CreatablTrue ]PredeclaId"ExposeFals @Templat@eDeriv%CustomizD$Option Comp@ DTv  8F\% t l6\L<(t \kD'('<'L8l! l <l8 *F\ /8l6\L<(: %! : %! 8: %! : %! : %! (%! PN8l! l <'('<'L l8*F\^ pr/8l6\L<(kr t D'('<'L8l! l <l8*F\ /8l6\L<(: %! : %! : %! 8: %! : %! : %! (%! P t  x X,xtH8l\L<(0p"$ Qpx+p'@%'P%'`%x Qpt6`P@ t Dp! p <px<p! p <'%'%'%'%'%'%'%' %'%',%'@%'P%>8F\% t l6\L<(t \k: %! : %! 8: %! : %! : %! (%! PN8l! l <'('<'L l8*F\^ pr/8l6\L<(krl! xl ll! ll l \:%t $\! 5\ \:%t $\! 85\ \:%t $\! 5\ \:%t $\! 5\ \:%t $\! 5\ \:%t $\! P5\ t  x X,xtH8l\L<(`p"$ Qpx+p'@%'P%'`%x Qpt6`P@ t Dp! p <px<p! p <'%'%'%'%'%'%'%' %'%',%'@%'P%>iForm_scubafx 27338b92b2*DA Form_i 30338ba185*D_x/Form_% 2f338b9fa3*D!H)Form_ 2d338b9ad5*D`Form_1 1d338b92b0*D0`Hx0F?>FDESTHLVAL ?>FDESTo?>FDESTL?>FDESTN?>FDESTP?>FDESThY\|1 Access+DATABASE VBAPWin16~PWin32PMacP SCUBA.mdb97PMSJETSQL P DAOP Form_scubaf2]P _EvaluateP̸_BeforeUpdatePCancelP ̸_DblClickñPdb\PrstScubaoP RecordsetP CurrentDbSP OpenRecordset|PINDEXP̸#PNoMatch/3PȭȣP~PּCPPȸȣ`P ̺ȽPMsgBoxRP Ȯ_ClickPSetFocusP̹ȽPEdit+PUPDATEP Form_scubafxP Form_scubaf1\P Form_scuba_insertUP_Click PԷ_ClickL(PAddNewaPԷٰPVisiblePPintans{"P vbQuestionPvbYesNoPvbYesa?PCommand19_Click\P Form_Open-P Form_scuba_update&P_ClickP Form_scuba_եaP _Click*PDeletexPFormPDetail2PLabel1,PLabel3,PLabel5,PLabel7,PLabel9,PLabel11APLabel13CPLabel18HPȮTDPLabel20ePWhPDblClickPClickPCombo14%P'1PCollectPValueKP Form_ٰ1YPExpliciPtkP ̸mP BeforeUpdate6P_B_var_̸ׁPԷnP]P콺@P`Pش(P\PwPForm_ٰ2YP̸PForm_ٰxP _B_var_SetPForm_ٰԷUPForm_հPx AldirԱ0* pHd SCUBA.mdDb0@ = p 3 J<  DAO>BDAO *\G{00025E01-:0C  0046}#4.0#0#C:\PROGRAM FILES\COMMON MICROSOFT SHARED\w350.DLL#Microsoft 3.5 Object LibrXaryLVAL H Form_ٰ2  _VBA_MODULE2VBt_MvDULED H1i ,7t>"(+@scubafx<<- 4 H>LA>/>_A^Է$)!_T1< AO__SRP_0" K)^rU~~~~~~~~~~~W ?>FDEST  Q  Form_scubaf2 Form_scubafxForm_scuba_Form_scuba_insertForm_scuba_update SCUBA.mdbForm_ٰ1F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLLVBA  xJ_N? 3C:\Program Files\Microsoft Office\Office\MSACC8.OLBAccess DAO^F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL 1p?>FDESTt?>FDESTxqB89Ks?>FDEST@C7?̸ȭȣSC7?Detailּȸȣ ̺Ƚ31?FormAC7?Label18̸_BeforeUpdate ̸_DblClick d@ČF1BJh)aN?! ٰqm. ̸1m.F;|? =   VBA332.DLL i S  ϵ ʾϴ. ȭȣ  ּ  ȸȣ ̺ȽForm_LVALٰ2x?>FDEST|?>FDEST :FDESTLC7?̹ȽEC7?ȮLabel20 Ȯ_Click p\;|?Form_ٰw?>FDEST?>FDEST2\%Fo j~?>FDEST_ClickCommand19_Click h  ϷϿϴ.Form_ٰԷv?>FDEST?>FDEST@GC89K?>FDESTԷ_ClickԷ_Click Form_Open tP;|?    Է Ͻðϱ?  Է ϷǾϴ.Form_հP__SRP_1$rU~~~~~~s    ( 8Cancel  H Q XYLVAL i_VBA_MODULE;b?>FDESTx)_E-1 @[LS S ` Fx &0D   P ` p    8N     (D   H X h x          "    >  XFxh    $ $ $ $ $ $    ,D0 ` p  "   &   $ $ $ $( $8 $H $X  h (Ex       "  "  @ <@     `    >  FxH &       8N   H X hx            0 "8 @ H  P h > LVAL   Fx    $(  $8  $H  $X  $h  $x      " . 4 0 H P  X @    x   6 O  ( $ 8  `  p  "     xpZ@Z`Z$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش $!f ϵ ʾϴ.A@4 '( '* ', '. '0'2a- ڵ带 ˻ $!f Ͻðϱ? T V $4'R R X B@f $!f Ͽϴ.A@4 '$ '( '* ', '. '0'2aHh@h8 B@B B@BlZZ$.̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> $!f ϷϿϴ.A@4 B@B B@BlXZXZx$. ٰ % . B@J- ο Է $ )$ ( )( * )* , ), . ). 0 )0 2 )2LVAL B@> $ Է ϷǾϴ.A@4 $B@8 L(N P(N B@B B@Bl: ̸ Է³ ̸ Է 콺 6 ش ȭ鿡 Ÿ ⺻ α׷Դϴ.ZZZ8$. ٰ % . L(N P(N̸ ("-( ̸ ʵ ε ̿Ͽ ˻= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ !&- ش  '( '* ', '. '0'2 $!f Է Ͻðϱ? T V $4'R R X L(N P(Na`hXa- ڵ带 ˻ "('( "*'* ",', ".'. "0'0 "2'2h B@B B@BlPZZ$. ٰ % .̸ ("-( ̸ ʵ ε ̿Ͽ ˻ $B@8= $!f B@H-' ̸ Է³ ̸ ̿Ͽ ˻ B@< ( )( * )* , ), . ). 0 )0 2 )2 B@> B@B B@Bl 'ȸ ̺Ƚ ϴ ɴ߷.޺ڽ Ÿ Ƚŭ ̺Ƚ ʵ尪 Ų.ZZ0$. ٰ % .̸ (" $B@8= $!f B@H :B@8 B@<=%̺Ƚ ̹ ̺Ƚ "2 :!f )2 B@> "2'2= ̺ Ƚ B@B B@BlXP L(Nl80l C''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' ٰ % . : LVAL  : 1997 2 28 : 1997 5 28A : Է, , ̺Ƚ, . : ʿ ۾ ϴ. I''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' α׷ : հ> : α׷ ȭ Ͽ LAttribute VB_Name = "Form_հ" Bas0{DF0A5443-AEC9-11D0-8BD9CD38AE 394B} |Cr@eatablTrue ]PredeclaId"ExposeFals @TemplateDeriv%CustomizD$Option Comp@ DTv  l؛r-Dbl㢯a 0I|}I@ rQ 8I֑ @ A @ŸA ⺻x GD es }f(Q;; ! !! o,oozVdo ALVALM?x 'G0"  = " "ּPPȸ0 ̺Ƚ60intansMsgBox(̸.Text & " Է Ͻϱ?", vbQuestion + YesNo)N#If _vb& Then#@ 2.VisibleETrueBFalsE nd If #/:'J ڵ带 @˻%ȭrstScuba!   tFCHuFCJw#G EC !.CloAOdbEC Sub Private  Command19_Click(@y Dim db As DATABASEEARecordset Set = CurrentDbA =.Open(" " .INDtEX"AQs'  ʵ εr̿ϿxAv  .@# FocusISeek "=BBAA0EdiF#9fJKDM'LMLNLhNKMoNM fUPEDOATO$ PȮiO a'!-'uϴ ɴ߷&+ '޺  A F0._s _b"<@q__W,Ba@^_H^RE,#''ȡـ (*2)!(.= +!4.IC':"Aa; K Form_A7(C ancelInteger"o _LVAL i_VBA_PROJECTa^ *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#C:\Program Files\Microsoft Office\Office\MSACC8.OLB#Microsoft Access 8.0 Object Library*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL#Microsoft DAO 3.5 Object Library3 Form_2 2a338b96ce*Dt>iForm_scubafx 27338b92b2*DA Form_i 30338ba185*D_x-1Form_% 2f338b9fa3*D!H)Form_ 2d338b9ad5*D`Form_1 1d338b92b0*D0`Hx0F?>FDESTHLVAL ?>FDESTo?>FDESTL?>FDESTN?>FDESTP?>FDESThY\|1 Access+DATABASE VBAPWin16~PWin32PMacP SCUBA.mdb97PMSJETSQL P DAOP Form_scubaf2]P _EvaluateP̸_BeforeUpdatePCancelP ̸_DblClickñPdb\PrstScubaoP RecordsetP CurrentDbSP OpenRecordset|PINDEXP̸#PNoMatch/3PȭȣP~PּCPPȸȣ`P ̺ȽPMsgBoxRP Ȯ_ClickPSetFocusP̹ȽPEdit+PUPDATEP Form_scubafxP Form_scubaf1\P Form_scuba_insertUP_Click PԷ_ClickL(PAddNewaPԷٰPVisiblePPintans{"P vbQuestionPvbYesNoPvbYesa?PCommand19_Click\P Form_Open-P Form_scuba_update&P_ClickP Form_scuba_եaP _Click*PDeletexPFormPDetail2PLabel1,PLabel3,PLabel5,PLabel7,PLabel9,PLabel11APLabel13CPLabel18HPȮTDPLabel20ePWhPDblClickPClickPCombo14%P'1PCollectPValueKP Form_ٰ1YPExpliciPtkP ̸mP BeforeUpdate6P_B_var_̸ׁPԷnP]P콺@P`Pش(P\PwPForm_ٰ2YP̸PForm_ٰxP _B_var_SetPForm_ٰԷUPForm_հPx AldirԱ0* pHd SCUBA.mdDb0@ = p 3 J<  DAO>BDAO *\G{00025E01-:0C  0046}#4.0#0#C:\PROGRAM FILES\COMMON MICROSOFT SHARED\w350.DLL#Microsoft 3.5 Object LibrXaryLVAL H Form_ٰ2  _VBA_MODULE2VBt_MvDULED H1i ,7t>"(+@scubafx<<- 4 H>LA>-1>_A^Է$)!_T1< AO__SRP_0" K)^rU~~~~~~~~~~~W ?>FDEST  Q  Form_scubaf2 Form_scubafxForm_scuba_Form_scuba_insertForm_scuba_update SCUBA.mdbForm_ٰ1F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA332.DLLVBA  xJ_N? 3C:\Program Files\Microsoft Office\Office\MSACC8.OLBAccess DAO^F=C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\DAO\DAO350.DLL 1p?>FDESTt?>FDESTxqB89Ks?>FDEST@C7?̸ȭȣSC7?Detailּȸȣ ̺Ƚ31?FormAC7?Label18̸_BeforeUpdate ̸_DblClick d@ČF1BJh)aN?! ٰqm. ̸1m.F;|? =   VBA332.DLL i S  ϵ ʾϴ. ȭȣ  ּ  ȸȣ ̺ȽForm_LVALٰ2x?>FDEST|?>FDEST :FDESTLC7?̹ȽEC7?ȮLabel20 Ȯ_Click p\;|?Form_ٰw?>FDEST?>FDEST2\%Fo j~?>FDEST_ClickCommand19_Click h  ϷϿϴ.Form_ٰԷv?>FDEST?>FDEST@GC89K?>FDESTԷ_ClickԷ_Click Form_Open tP;|?    Է Ͻðϱ?  Է ϷǾϴ.Form_հP__SRP_1$rU~~~~~~s    ( 8Cancel  H Q XY