ࡱ> x3 bjbj ""bbl,,,,,,,`zzzk w`,zzzzzzzz -GGGGGG HG,zzzzzG,,zz\z ,z,z z  ,, z P* v(`z  r0 66 @R,,,, sQRtutv#$%234OJQJ<>*OJQJ >*OJQJCJEH<CJOJPJQJjCJOJPJQJU5 >*B*ph 5CJEH B*ph 5B*ph<7st~Ruv$4$a$ 1h/ =!"#$%3 bjbj ""bb l6r6rhkk w\( 9 iB@B Normal$h`ha$CJ_HmH sH tH JJ Heading 1$$$<@&`a$5KH<< Heading 2$<@&`5DD Heading 3$h<@&^h`5DD Heading 4$<@&^`5: : Heading 9 <@&`5<A@< Default Paragraph Font66 Comments$$1$a$5<JYJ Document Map-D M OJQJ^J88 Header$$`a$5<N"N Instructions$<<^`5<4Z24 Plain Text CJOJQJJBJ Table (Centered)$$`a$CJ@R@ Table (Lt.)$$`a$CJ TOC 1&& TOC 2 ^&& TOC 3 ^&& TOC 4 ^&& TOC 5 ^&& TOC 6 ^&& TOC 7 ^&& TOC 8 ^&& TOC 9 ^  z0MDevaulWC:\Documents and Settings\MDevaul\Application Data\Microsoft\Word\STARTUP\NewMacros.dotMDevauldC:\Documents and Settings\MDevaul\Application Data\Microsoft\Word\AutoRecovery save of MacrosNEW.asdMDevaul7C:\Documents and Settings\MDevaul\Desktop\MacrosNEW.dotMDevaul7C:\Documents and Settings\MDevaul\Desktop\MacrosNEW.dotMDeVaul4C:\Documents and Settings\MDeVaul\Desktop\Macros.dotgtsushimUC:\Documents and Settings\GTsushim\Application Data\Microsoft\Word\STARTUP\Macros.docgtsushimUC:\Documents and Settings\GTsushim\Application Data\Microsoft\Word\STARTUP\Macros.dot0=$>e?e@eAeBeCeDeEeFeGeHeIeJeKeLeMeNeOePeQeReSeTUVWXYZ[\]^_`abcdeeeeeeee(V" " V" " Vh" " V" " V" " V*" " V." " V1" " V+" " Vi" " V2" " V" " V!" " V0" " V#" " V)" " V" " V$" " V," " V" " V'" " V(" " V" " V" " V " " V!" " V"" " V#" " V$"" " V%%" " V&-" " V' " " V(&" " V)/" " V*" " V+j" " V," " V-" " V.g" " V/f" "  L (@ToolbarsCustom Popup 18374000BBU - BEES Est ToolsBBU - BEES Est ToolsO1hIzKeuuuu0(Est Temp Bees InsertmodBEEs.BeesInsert( English Est Bees EnglishmodBEEs.BeesEnglish ( Metric Est Bees MetricmodBEEs.BeesMetric ( Est ChangesBBUItemmodBEEs.BBUItem(ChangesBBUEst2modBEEs.BBUEst2(DODODODDOOOOO@p(??mslmlm( Disclaimer DisclaimermodAddenda.InsertDisclaimerBBU - Bid Book Editing ToolsBBU - Bid Book Editing Tools'gt[gt[gt[gt[gt[0 (Special ProvisionsMerge SpecialsmodBooks.MergeSpecials"(Proposal + ContractMerge ProposalmodBooks.MergeProposal"(Building SpecialsMerge BuildingsmodBooks.MergeBuildings"(Building ProposalBuilding ProposalmodBooks.BuildingProposal"(Informal SpecialsInformal SpecialsmodBooks.InformalSpecials"(Informal ProposalInformal ProposalmodBooks.InformalProposalBBU - FormattingBBU - FormattingsMg(}1K00@^0@rQ0@'Y >@!H/FCtrl+F9 w@(p( @ q@i r@q s@0@8  x@ z@ y@ {@ >@yPage#^P .Borders 0 > 5 ".@ Format Doc" .@y Format Para"*@ Auto Color0"( Delete Hidden Del Hid TxtmodAddenda.DelHidTxtBBU - StandardBBU - Standardv1uKepppp0<Pg Break .! Insert FileF1@Y@I :@iCopyC4q&PasteV>@y  View Page@.@ View Normal>@Spelling(RecheckRecheck SpellingmodMain.RecheckSpelling(p(??(TOC Of ContentsmodTools.TableOfContents%>1 Delete RowK(> Insert RowI; ,@Insert Picture)>@! Insert ColumnSE - 1999 SSP StylesSE - 1999 SSP Styles(gygygygygy0  :@ CommentsComments" :@FooterFooter" :@HeaderHeader" :@ Heading 1 Heading 1  :@Heading 1 No TOCHeading 1 No TOC  :@)Heading 1 Modified 14Heading 1 Modified 14  :@*Heading 1 Modified 14 No TOCHeading 1 Modified 14 No TOC  :@+Heading 1 Modified 18Heading 1 Modified 18" :@ Heading 2 Heading 2  :@Heading 2 No TOCHeading 2 No TOC" :@ Heading 3 Heading 3  :@Heading 3 No TOCHeading 3 No TOC" :@ Heading 4 Heading 4  *@, Heading 5 Heading 5  :@ Heading 9 Heading 9" :@ Indent 1 HangingIndent 1 Hanging  :@ Indent 2 HangingIndent 2 Hanging  *@-Indent 2 Hanging PLVIndent 2 Hanging PLV  *@.Indent 3 Hanging PLVIndent 3 Hanging PLV" :@ Instructions Instructions" :@ Normal Normal" :@Table (Centered)Table (Centered)  :@Table (Indent 1f)Table (Indent 1f)  :@ Table (Lt.) Table (Lt.)  :@ Table (Rt.) Table (Rt.)" :@Title_CenteredTitle_Centered" *@/Building NormalBuilding Normal" :@Default Para FontDefault Paragraph Font" :@ Flush LFlush LSE - DIST FormattingSE - DIST Formatting F18,F18,F18,F18,F18,0 @^@rQ@'Yq@is@@(p(gsx@z@y@ T@1 @(Toggle Hidden On/Off Toggle HiddenmodMain.ToggleHiddenSE - DIST SSP EditingSE - DIST SSP Editingv1K;K|1K;K|1K;K|1K;K|1K;K|0 ( Insert SSPSpecmodMain.InsertSpec"( INITIALSInitialsmodMain.Initials"( StrikeHide Strike HidemodMain.StrikeHide(p(878""( + INITIALSStrike Hide InitialsmodMain.StrikeHideInitials(p(878"( Underline UnderlinemodMain.Underline(pqp(?s"( + INITIALSUnderline InitialsmodMain.UnderlineInitials(pqp(?SE - DIST SSP ReferencesSE - DIST SSP Referencesv1K81K81K81K81K80 (Macros.modSites.OeWebBeesCodesOe Web Bees CodesmodSites.OeWebBeesCodes (Macros.modSites.OeWebStdSpecsOe Web Std SpecsmodSites.OeWebStdSpecs(wwwwwp({ (Macros.modSites.OeWebPseGuideOe Web Pse GuidemodSites.OeWebPseGuide(B33333333B33333333B33333333B333333B03333B33333333B""""p({ (Macros.modSites.OeWebSspIndexOe Web Ssp IndexmodSites.OeWebSspIndex (Macros.modSites.CtWebPhoneListCt Web Phone ListmodSites.CtWebPhoneListj (Macros.modSites.OeWeeklyStatusOe Weekly StatusmodSites.OeWeeklyStatus1SE - DIST SSP ToolsSE - DIST SSP Toolsv1K7v"1K7v"1K7v"1K7v"1K7v"0 (Show Non-Std StylesHighlight Unofficial Styles"modTools.HighlightUnofficialStyles "( Insert TOC Of ContentsmodTools.TableOfContents"( Insert IndexIndexmodTools.IndexSE - DIST StandardSE - DIST Standard 19Ev19Ev19Ev19Ev19Ev 0   i   "( Macros.modMain.PrintItAsYouSeeItPrint It As You See ItmodMain.PrintItAsYouSeeIt " "Y I "(Macros.modMain.ShowDocMap Show Doc MapmodMain.ShowDocMap (Macros.modMain.ToggleHidden Toggle HiddenmodMain.ToggleHidden(DDDDDOOOOOOOOODDDDDp(??? (Macros.modMain.ToggleParaMarksToggle Para MarksmodMain.ToggleParaMarksw28 SE - NROE SSP Editing (Icons)SE - NROE SSP Editing (Icons)XC#XCCXCCXCC 0 ( Macros.modMain.InsertSpecSpecmodMain.InsertSpec((p("(OE.modMain.InitialsInitialsmodMain.Initials((p("(OE.modMain.StrikeHideInitialsStrike Hide InitialsmodMain.StrikeHideInitials((p(tccUUwwwwww"(OE.modMain.Underline UnderlinemodMain.Underline((p(Ã (SuperUnderlineSuper UnderlinemodMain.SuperUnderline((p("( SuperStrike Super StrikemodMain.SuperStrike((p( (OE.modMain.StrikeHide Strike HidemodMain.StrikeHide((p(UUUU9}}9 "@((p(?? @((p(UUUU"L@9 "(OE.modMain.InsertHiddenPgBrk Hidden Pg BrkmodMain.InsertHiddenPgBrk((p(UUUU[WOgK"(OE.modMain.FontColorAutoFont Color AutomodMain.FontColorAuto((p( (OE.modMain.FontColorBlueFont Color BluemodMain.FontColorBlue((p( (OE.modMain.FontColorPinkFont Color PinkmodMain.FontColorPink((p( (OE.modMain.FontColorRedFont Color RedmodMain.FontColorRed((p( ( TemplateProject.PlainText.MAIN Plain TextPlainText.MAIN((p("(Macros.modMain.ToggleParaMarksToggle Para MarksmodMain.ToggleParaMarksw"(Macros.modMain.ToggleHidden Toggle HiddenmodMain.ToggleHidden((p(5uu5SE - NROE SSP Editing (Text)SE - NROE SSP Editing (Text)8-{ 0 ( OpenAddSSPSpecmodMain.InsertSpec"( SuperAstricksInitialsmodMain.Initials"( StrikeHideAddStrike Hide InitialsmodMain.StrikeHideInitials"( UnderlineBlue UnderlinemodMain.Underline (SuperUnderlineSuper UnderlinemodMain.SuperUnderline"( Superstrike Super StrikemodMain.SuperStrike (SuperStrikeOldSuper Strike OldmodMain.SuperStrikeOld ( StrikeHideStrike Hide InitialsmodMain.StrikeHideInitials ">@Strike Alt+F10 >@ Hide Ctrl+Shift+H"L<@9 TblToTxt"( PgBrkHidden Hidden Pg BrkmodMain.InsertHiddenPgBrk"( Black Font Color AutomodMain.FontColorAuto ( Blue Font Color BluemodMain.FontColorBlue ( Magenta Font Color PinkmodMain.FontColorPink ( Red Font Color RedmodMain.FontColorRed ( PlainText Plain TextPlainText.MAIN"(Macros.modMain.ToggleParaMarksToggle Para MarksmodMain.ToggleParaMarksw"(Macros.modMain.ToggleHidden Toggle HiddenmodMain.ToggleHidden((p(5uu5SE - NROE SSP Formatting #1SE - NROE SSP Formatting #1N>h*e3Jw1@@@@ 0 W]Q'Y8  y %1( ]u  SE - NROE SSP Formatting #2SE - NROE SSP Formatting #2&,Jk~&11111111 0y}YI %!qirqs7 6xzy{678 wSE - OCCS ToolsSE - OCCS Tools&3M;3M;3M;3M;3M;0(  PrintItAsYouSeeItPrint It As You See ItmodMain.PrintItAsYouSeeIt ( Save and Close Save ClosemodMain.SaveClose( 99 Header Fix Header Fix99modMain.HeaderFix99( MergeMergemodTools.Mergeh@SE - Payclauses etc.SE - Payclauses etc.4N-4N-4N-4N-4N-0 (@ Pay ClausesCustom Popup 43" (@Sub/SuperscriptsCustom Popup 39" (@Conform WordingCustom Popup 46Custom Popup 43 Custom Popup 430*@ Contract Item Contract Item*@ Extra Work Extra Work*@Full CompensationFull Compensation*@Modified Contract ItemModified Contract Item*@TransferTransferCustom Popup 39 Custom Popup 390*@""*@2nd2nd*@3rd3rd*@DegreeDegree*@ m2m2*@!m3m3*@"OKOKCustom Popup 46 Custom Popup 460 *@#Certificate of ComplianceCertificate of Compliance *@$Conformance-ProvisionsConformance-Provisions *@%Conformance-RequirementsConformance-Requirements *@&Conform-ProvisionsConform-Provisions *@'Conform-RequirementsConform-Requirements *@(DisposalDisposalSE - SSP EditingSE - SSP Editing'Mg8Mg8Mg8Mg8Mg80 "( Insert SSPSpecmodMain.InsertSpec"( INITIALSInitialsmodMain.Initials"("ADDED"Added modMain.Added"( "DELETED"DeletedmodMain.Deleted"("NEW"New SSPmodMain.NewSSP"( "UPDATED"UpdatedmodMain.Updated"( StrikeHide Strike HidemodMain.StrikeHide(p(878""( + INITIALSStrike Hide InitialsmodMain.StrikeHideInitials(p(878"( Underline UnderlinemodMain.Underline(pqp(?s"( + INITIALSUnderline InitialsmodMain.UnderlineInitials(pqp(? (Hidden Text On/Off Toggle HiddenmodMain.ToggleHidden"(Set Quick KeysSet Key BindingsmodMain.SetKeyBindingsSE - SSP FormattingSE - SSP Formatting#Z32CeZ32CeZ32CeZ32CeZ32Ce00@^0@rQ0@'Y"q@i @(p( s@"x@ {@ z@ y@" @  @ (@ %@1" T@1 @SE - SSP ReferencesSE - SSP Referencesp1Kj1Kj1Kj1Kj1Kj0 (Macros.modSites.OeWebHomePageOe Web Home PagemodSites.OeWebHomePage("0" "@" "0" "@" "0" "" """" """" 43CC4PPC5p(?(Macros.modSites.OeJobsDrive Oe Jobs DrivemodSites.OeJobsDrive(    p(????(Macros.modSites.OeWebBeesCodesOe Web Bees CodesmodSites.OeWebBeesCodes(Macros.modSites.OeWebStdSpecsOe Web Std SpecsmodSites.OeWebStdSpecs(wwwwwp({(Macros.modSites.OeWebPseGuideOe Web Pse GuidemodSites.OeWebPseGuide(B33333333B33333333B33333333B333333B03333B33333333B""""p({(Macros.modSites.OeWebSSPs Oe Web SSPsmodSites.OeWebSSPs(DDDD@O@O@O@O@O@O@O@OD@OO@DDDp((Macros.modSites.OeWebSspIndexOe Web Ssp IndexmodSites.OeWebSspIndex(Macros.modSites.CtWebPhoneListCt Web Phone ListmodSites.CtWebPhoneListj(Macros.modSites.OeWeeklyStatusOe Weekly StatusmodSites.OeWeeklyStatus1SE - SSP ToolsSE - SSP ToolsY.Mg..Mg..Mg..Mg..Mg.0( Merge Data MergemodTools.Merge(Highlight Non Std StylesHighlight Unofficial Styles"modTools.HighlightUnofficialStyles ( Insert TOC Of ContentsmodTools.TableOfContents( Insert IndexIndexmodTools.Index SE - Standard SE - Standard&3M~#3M~#3M~#3M~#3M~#0  i   @ "( Macros.modMain.PrintItAsYouSeeItPrint It As You See ItmodMain.PrintItAsYouSeeIt " "@i @i @q"Y I "(Macros.modMain.ShowDocMap Show Doc MapmodMain.ShowDocMap (Macros.modMain.ToggleHidden Toggle HiddenmodMain.ToggleHidden(DDDDDOOOOOOOOODDDDDp(??? (Macros.modMain.ToggleParaMarksToggle Para MarksmodMain.ToggleParaMarksw28 % a3LCustom Popup 18374000 Custom Popup 18374000g(Tg(Tg(Tg(Tg(T0 (@Select Toolbar GroupCustom Popup 18412734 ]u@ Custom Popup 18412734 Custom Popup 18412734(((((0 (Dist Spec. EngineerShow Tbar Dist SemodMain.ShowTbarDistSe (NR Spec. EngineerShow Tbar NroemodMain.ShowTbarNroe (MS Word StandardShow Tbar GenericmodMain.ShowTbarGeneric (HQ Spec. Engineer Show Tbar SemodMain.ShowTbarSe ( HQ Const StdsShow Tbar OCCSmodMain.ShowTbarOCCS (HQ Bid Book Unit Show Tbar BbumodMain.ShowTbarBbuCustom Popup 18468984 Custom Popup 18468984UnUnUnUnUn0 ]u@ kHeading 1 Modified 14Heading 1 Modified 14 No TOCHeading 1 Modified 18Indent 2 Hanging PLVIndent 3 Hanging PLVBuilding NormalTemplateProject.modMain.Added(TemplateProject.modMain.ClearKeyBindingsTemplateProject.modMain.Deleted%TemplateProject.modMain.FontColorAuto%TemplateProject.modMain.FontColorBlue&TemplateProject.modMain.FontColorGreen%TemplateProject.modMain.FontColorPink$TemplateProject.modMain.FontColorRed#TemplateProject.modMain.HeaderFix99 TemplateProject.modMain.Initials)TemplateProject.modMain.InsertHiddenPgBrk"TemplateProject.modMain.InsertSpec%TemplateProject.modMain.InsertSpecNewTemplateProject.modMain.NewSSP)TemplateProject.modMain.PrintItAsYouSeeIt&TemplateProject.modMain.PrintSelection'TemplateProject.modMain.RecheckSpelling!TemplateProject.modMain.SaveClose&TemplateProject.modMain.SetKeyBindings"TemplateProject.modMain.ShowDocMap#TemplateProject.modMain.ShowTbarBbu&TemplateProject.modMain.ShowTbarDistSe'TemplateProject.modMain.ShowTbarGeneric$TemplateProject.modMain.ShowTbarNroe$TemplateProject.modMain.ShowTbarOCCS"TemplateProject.modMain.ShowTbarSe"TemplateProject.modMain.StrikeHide*TemplateProject.modMain.StrikeHideInitials#TemplateProject.modMain.SuperStrike&TemplateProject.modMain.SuperUnderline$TemplateProject.modMain.ToggleHidden'TemplateProject.modMain.ToggleParaMarks!TemplateProject.modMain.Underline)TemplateProject.modMain.UnderlineInitialsTemplateProject.modMain.UpdatedHeading 1 No TOCHeading 2 No TOCHeading 3 No TOC  CommentsFlush LIndent 1 HangingIndent 2 Hanging InstructionsTable (Centered)Table (Indent 1f) Table (Lt.) Table (Rt.)Title_CenteredA  Contract Item Extra WorkFull CompensationModified Contract ItemTransfer"2nd3rdDegreem2m3OKCertificate of ComplianceConformance-ProvisionsConformance-RequirementsConform-ProvisionsConform-RequirementsDisposal9TemplateProject.modTools.HighlightUnofficialAddendaStyles2TemplateProject.modTools.HighlightUnofficialStylesTemplateProject.modTools.IndexTemplateProject.modTools.Merge(TemplateProject.modTools.TableOfContents(TEMPLATEPROJECT.MODMAIN.ADDEDTEMPLATEPROJECT.MODMAIN.NEWSSPTEMPLATEPROJECT.MODTOOLS.INDEXTEMPLATEPROJECT.MODTOOLS.MERGETEMPLATEPROJECT.MODMAIN.DELETEDTEMPLATEPROJECT.MODMAIN.UPDATED TEMPLATEPROJECT.MODMAIN.INITIALS!TEMPLATEPROJECT.MODMAIN.SAVECLOSE!TEMPLATEPROJECT.MODMAIN.UNDERLINE"TEMPLATEPROJECT.MODMAIN.INSERTSPEC"TEMPLATEPROJECT.MODMAIN.SHOWDOCMAP"TEMPLATEPROJECT.MODMAIN.SHOWTBARSE"TEMPLATEPROJECT.MODMAIN.STRIKEHIDE#TEMPLATEPROJECT.MODMAIN.HEADERFIX99#TEMPLATEPROJECT.MODMAIN.SHOWTBARBBU#TEMPLATEPROJECT.MODMAIN.SUPERSTRIKE$TEMPLATEPROJECT.MODMAIN.FONTCOLORRED$TEMPLATEPROJECT.MODMAIN.SHOWTBARNROE$TEMPLATEPROJECT.MODMAIN.SHOWTBAROCCS$TEMPLATEPROJECT.MODMAIN.TOGGLEHIDDEN%TEMPLATEPROJECT.MODMAIN.FONTCOLORAUTO%TEMPLATEPROJECT.MODMAIN.FONTCOLORBLUE %TEMPLATEPROJECT.MODMAIN.FONTCOLORPINK!%TEMPLATEPROJECT.MODMAIN.INSERTSPECNEW"&TEMPLATEPROJECT.MODMAIN.FONTCOLORGREEN#&TEMPLATEPROJECT.MODMAIN.PRINTSELECTION$&TEMPLATEPROJECT.MODMAIN.SETKEYBINDINGS%&TEMPLATEPROJECT.MODMAIN.SHOWTBARDISTSE&&TEMPLATEPROJECT.MODMAIN.SUPERUNDERLINE''TEMPLATEPROJECT.MODMAIN.RECHECKSPELLING('TEMPLATEPROJECT.MODMAIN.SHOWTBARGENERIC)'TEMPLATEPROJECT.MODMAIN.TOGGLEPARAMARKS*(TEMPLATEPROJECT.MODMAIN.CLEARKEYBINDINGS+(TEMPLATEPROJECT.MODTOOLS.TABLEOFCONTENTS,)TEMPLATEPROJECT.MODMAIN.INSERTHIDDENPGBRK-)TEMPLATEPROJECT.MODMAIN.PRINTITASYOUSEEIT)TEMPLATEPROJECT.MODMAIN.UNDERLINEINITIALS*TEMPLATEPROJECT.MODMAIN.STRIKEHIDEINITIALS.2TEMPLATEPROJECT.MODTOOLS.HIGHLIGHTUNOFFICIALSTYLES/9TEMPLATEPROJECT.MODTOOLS.HIGHLIGHTUNOFFICIALADDENDASTYLES@@@UnknownGz Times New Roman5Symbol3& z Arial5& zaTahoma?5 z Courier New"h &\=$0dMDevaulgtsushim% iD@D Normal$CJ OJPJQJ_HaJ mH sH tH <A@< Default Paragraph Font2O2 "Oh+'0l   ( 4 @LT\dMDevaul Macros.dot gtsushim6Microsoft Word 9.0@@0@v(՜.+,0 hp   Caltrans"  Titlem  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~yd;DRoot Entry F5 v(+1TableWordDocument""SummaryInformation(DocumentSummaryInformation8Macros )fv(` v(VBA )fv( v(ThisDocument   !"#$%&')*+,-./0123456789:;<=?@ABCDEFGHIJKMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~/R'q#xME (SLSS<N0{00020906-0000-0000-C000-000000000046}H(%H0(8eF xAttribute VB_Name = "ThisDocument" Bas0{00020P906-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomizD2frmUserInfo modTools MmodMain__SRP_2 <LR'ڤxME(SPSSS0{6D75DDAD-D207-4FA5-92F7-FA4F43B84A64}{93A8D48D-560B-4A29-9430-4588372C953A}0(%X0 % X```0eF  " (`  !(o`X6Attribute VB_Name = "frmUserInfo" Bas0{6D75DDAD-D207-4FA5-92F7-FA4F43B84A64}{93A8D48D-560B-4A29-9430-4588372C 953A} dGlobalSpacoFalse CreatablPredeclaIdTru BExpose0Templat@eDerivCustomizD4 P!% Sub cmdOK_Click() Word.App ation.itiAatxtIn  End' 995 9 9qC@q 0B@  0!B@d ^4> 0B@ <4> LJ 0B@Z 0B@ 0B@  ^4> 0B@ 0B@  ^4> 0B@ 0!nB@p 0!n!tB@p 0!n\"9d"5t(d9v T9x99|9~999q  0!nB@SS x$B@oPx]]# last filled element of array Fou]  (! ( ;  '  B!DB@ ! 0 If oStyle.InUse = True, the style *may* be used.d 1 somewhere in the document. It may also mean that 3 the style was used at one time but isn't used now. Er  Ix ! $66 It's official, so stop lookingFiyk Else + If we get here and the style wasn't in theDescri / official list, idx will be nOfficialStyles + 1On   Erro !A@kk e/spec  (td_s ( StdSpeo End Function BOfficial Styles go hereDefault Paragraph Font+ ErrNormal+0 Th Heading 1+ Heading 2+ Heading 3+ Heading 4+ Heading 9+Comments+ Instructions+OnFlush L +erIndent 1 Hanging +a.Indent 2 Hanging +Header + Footer + ErTable (Centered)+rrTable (Indent 1f)+ Table (Lt.)+ Not F Table (Rt.)+B Title_Centered+ & "Heading 1 No TOC+r"Heading 2 No TOC+Heading 3 No TOC+ro' iH GAB*** 11/14/01]]# last filled element of array]  ( (  '  B!D !'8R'wxME (<@<< <$0onte x00 ##  Wi%`ey U`+ H $$ >%``B@+CC Xi !n% P% " l %`& Fou D0 V08xHx08x0xeF   " H h        ("H p     (8@HPX`hpx  ",      8 6H 8 :   &(PX ` 2p 6      0 @ BH P h $(@Xx @`  " 0,8h  p    6 8 :0  p  &    2 6  X h  x      B  4 $ @ X p        @ ` x      0 P p      ( Hh(@Xx" ((Hp 8P hp " x L    0 2   ( @P Xh p   6 0 @X hx        8 @ X `x         (@ Xp       0 8P Xp x      (8 @P Xhpx       ( 0 H X p  "       f  8 X`h $ $LP hx  "     0HP JX  x]dx8B Added for Spec Engineers to run Merge File against JobFile cover. GAB*** 10/30/01 $B@ B! 999 0 If oStyle.InUse = True, the style *may* be used 1 somewhere in the document. It may also mean that 3 the style was used at one time but isn't used now.   ! $ It's official, so stop lookingy0k(  + If we get here and the style wasn't in the / official list, idx will be nOfficialStyles + 1   !A@kkx   ( ( o@ GAB*** 11/14/01-Official Styles for Addenda and Wages go hereDefault Paragraph Font+Normal+ Heading 1+ Heading 2+ Heading 3+ Heading 4+ Heading 9+Comments+ Instructions+Flush L +Indent 1 Hanging +Indent 2 Hanging +Header +Footer +Table (Centered)+Table (Indent 1f)+ Table (Lt.)+ Table (Rt.)+Title_Centered+Heading 1 No TOC+Heading 2 No TOC+Heading 3 No TOC+ Wages Styles followWages+Title_Centered+ Addenda Styles followAddenda Flush L+Addenda 2 Flush L+Addenda 3 Flush L+Center+Center1+Center2+Estimate+Flush L+Indent 1 + Indent 1f!+Indent 2"+ Indent 2f#+Indent 3$+Indent 3 Hanging%+ Indent 3f&+Indent Subparagraph'+Merge(+Sec. 5)+ Subparagraph*+Sub-Subparagraph++Table (Lt. H Ind),+Table (Lt. Hanging Indent)-+ Page Number.+TOC 1/+TOC 20+TOC 31+TOC 42+TOC 53+TOC 64+TOC 75+TOC 86+TOC 97+7'iE Thanks to Dave Rado, microsoft.public.word.docmanagement, 2001-08-29]x]]]  B!( !*---------------sDo Headers and Footers separately because cycling thru storyranges sometimes misses some Headers and Footers--------------- ,K .K 0K 2K 4K 6KT---------------S --------------- !nC@p5tB@p9d5t(d9 T9x 9@5t(8 7'&---------------d /if not found, search other stories of same type--------------- !:b--------------- !:. !nC@p5tB@p9d5t(d9 T9x 9@5t(8 7'&x k q --------------- ---------------k ---------------q ---------------n --------------- ---------------If not found, check Headers and footers; unfortunately, this method of cycling through them may convert any blank headers/ footers into non-blankones, but at least it won't miss any out--------------- &  B!< --------------- " !>--------------- "!@--------------- "!!d --------------- "!!nC@p5tB@p9d5t(d9 T9x 9@5t(8--------------- 7'&yk---------------q---------------k---------------k--------------- " " !B--------------- "!@--------------- "!!d --------------- "!!nC@p5tB@p9d5t(d9 T9x 9@5t(8--------------- 7'&y8k0---------------q---------------k---------------k--------------- " --------------- ---------------k`oX TableOfContents Macro GAB*** 10/15/01 WordBasic.EditFind Find:="TABLE OF CONTENTS", Direction:=0, MatchCase:=0, WholeWord:=0, PatternMatch:=0, SoundsLike:=0, Format:=0, Wrap:=2WordBasic.CharRight 3`WordBasic.InsertTableOfContents Outline:=1, From:=1, To:=3, RightAlignPageNumbers:=1, Replace:=0WordBasic.EditSelectAllWordBasic.UnlinkFields 0C@8 <4>C@:.InsertBreak Type:=wdPageBreak.MoveUp Unit:=wdLine, Count:=1C@8 <4>C@:q B  0!RHJLNP5FB@^ T7F(R 0B@  0!B@dqpoh0 Index Macro GAB*** 10/15/01 0 64C@2C@8C@8 <4>C@: lC@ <4>C@:q B   0! ZX \lR^`5NB@^ b7N(Rq8o0(Attribute VB_Name = "modTools" Option Explicit Dim Off0alStyleList(100) As SngpPubb Sub Merge() ' Added for Spec Engineers to run* File against Jobcover.DGAB*** 10/30/01alogs(wdDi MailwOpenDataSource@).ShowWith ActiveDocument. .Destina= wdSenqNewAbsach(False ddressField9#ject Supp@BlankLsTru1l.y>0.FirstRecordKefault La G End AG.ExecPause:=G* Sel:.WholeS0toryIJs.@Unlink MLeft Unit:=wdCharacter, Coun@=Ç Down AQ5 ,txAExAC3Cu@,c&2O,m9Find.ClearFormat@Replace?_I;TexbT\""T E3+waBPW.WrapS! Con; [. /ktcphCasar",W^ildcaj`ndsLikv All! c *d&OD Ǜ!SaveAs%  Highl`tUnoݩs@oW :n*s!Integer ' last fill wof 0arrave idx!System.Curs`3CWaa!Ap!.ScreenUpdngg>=lnӃ 2 E dInMb!sIfd.InUJThen!' m= Y, the s *may* be dsomewhere i nbd% It   o mea]ae' was" at o`ne ti` isn'tCnowka= 0 To ,qkLocal`>2(0)  It's ), soop lookiyExitN  o /If{NIp'Rwe get a`k/' l@,  w0y(+ gu>MoOAndv< (+.q=88Nbl88s[ qAGPrivaFun``J9(D'!5'%%Is go '𧰫Dӌ Ppgdh"ntiOt1)+"#O2!BHead) 1kt3z2t4z3t5z4t6z9t7rxCom[ѽQ#?8bIruRR9Flush, Lt1Ind0 1 HaQgS29er_UFoo_UTab(C Yd)oC%f%1Lt.=RkCTitle_U O E s- No TOC[22c023=_AT82S@Elqnda2s %' 1/14!.ҟ` e D@les If oStyle.InUse Thent' = True, the sv *may* be used |somewhere infdocument. It 9 also me2aat ?fwasa at one time but isn'tnow. CFor idx = 0 To nOfficial|xName`LocalList())#At's o6, rstop looking R`Exit XEndM Nex dx ywe get aALKdK', l9,aBNwillwN + 1KAZ> YIFindAnd Highlt (D^)@BCSystem .Curs= wdNormalApplication.ScreenUpdrÃgB Fou0PBoolCEach%In AveDuSt b SelQ CaPo.1RTyp '-G 3 Do sC3 s se1FtHelyca 0cyclpru _'ryr`Ps@sssr q 1B wdEvenQ;s ,0v t 1wdFirstv7Story, _ wdPrimaryFooterTHeafdT'- 2Case Else$`With oy.Find ;!.ClearFormatting!Repla@cement -Text = ""$G"Truw!YWrapwd1iCon\StyleNam%nHighl`=If .Ex@ecute(:=wdAll) Then>-!Found$sA'if not fA, suc@ther s@ies of sA typCBVADo hWhiWNN@~Range Is hҔ:SetM[_E߷J }c*_6 B.g ?ib.X 1j.$?lImm B;oaExit Do7Knd IfwE!P7` Loopsaq;3wSelectyC '?checDk cs a*fs; unfortunatelAthis Dm ethodcycl@ throughem may convert@ y blank hs/A inton-ones, $bu t 0tst #won't mis1 y ou'_Up S)cQ< EaA\Sion In ActiveDocurGsg#Q5wo.[UuP oysists:?pLen(f.Q) > 1Oscj o-OdQϘRpXKOdOdo.OdnOd&: Od?@& M/g"g9V\ ?j_ WssSd9:oNqjNOS3W"oNoNh?poNoNOoN.oNoN  ,0 `p " x  ,  kR'xMEPL(L6 LLL%P % X`  `  ` ++& ` Q X` n V`  `  `  X`   `   `   `  X `   `  ` % `  ; x` [ p%  ` q %  `   X`  `  `  `  X`   `  "`  &`  .X`  8` )) n` VV 8``k&&p x0d% `P`k%% xp%  ``k (( x S% X !```k!(( xP N%  "` `k"%%  x % #`P `k#''0 x 9%‐ @xXXXXX XX X8  x  ` @t @8 p @lO 8 @h @d @` 8 "   h @t @ p @lO 0 @h @d @` @ "xp 8@t @Hp ` @lO H@h @d @` H"(x@t @p @lO @@h @d @` P($8 0H@t @Xp p0@lO X@h @d @` X%P(@@t @p @lO X@h @d @` h@"`$$ ( 8H eF $*\Rffff*05461a69cd*\R1*#124*\R3*#4e*\R1*#17b*\R1*#c1*\R3*#2f*\R1*#c1*\R3*#4eW  20 4h   (8Pp "       @  H  P ` h  p x            0 8 " @ 8H              " 2 @ X `  h  x               (  H  ` x  "   $       ( 8 H `     "      8P`p  "   "   (0HPh "     8@H`h  "    "( P hpx 0 8@ " H P *h   "   : 8@(P x    "   4  @ X h p      Z 0 " 8 @ H h      0Hh    "  F V  Lx D B RX L FHP` hx  "  F ( JH D L F0x  "    48 px  R "    ( H `  $   "    8 H P ` hx   "  .  "  . 8@P" X .` "  .  "  . @ H X " ` <h     " * ! B(! 8p! !  ! ! ! " 0" H" `"p" " "   $" "" " # 0# P# " X# `# x# ## #"##$$0$T8$$$$ $$$"%8%"X%% %%% % % &&& &(&0&8&@&H&P&X&h&0&&"&'" 'H' h'x'"'''( ( @(P(p(d(( ) ) ()8)@)H)P)X)`)h)p)x)))B)") *0*P* p* * * * *** * + + +(+0+8+@+H+P+X+`+h+x+ ++ + + ++++,,,, ,(,0,@, `,p, , , ,,,,,,,,,,,-"(- P- `-p----T- .8.@. X. h. x.. ... . . /// /(/0/8/@/H/P/X/h/"/// / / 000 0(00080@0H0P0X0h0"00 001101T81111"1"12 (282X2p2 22 222222222233 03 @3P3p3 3 3 333333333334"(4 P4 `4p4444T4 585@5X5 h5 x5 555555555555"6 86H6 X6h6 x666666666666"7"(7 P7`77 77777T8X8p8x8 888 8899 9(9 " 09 (89 8`9 H9 :9 8 : 2X:B:  *::;  H;:h;  (;<;  $<:8<  (x<<<  $<:=  (H=<p=  .=D=  :(>Bh>  ,>>>  6 ?DX? % (?:? < @8 @  X@8p@  @:@  A8 A  XA8pA  A>A  B8 B  XB:xB  0BBB  60CBhC  2C<C (D "0D (8D `D xDD!DD D D eD pE E .&E E E t<E pF F ~<F G (G GHG H H G8H H H I I (I 0I @IHI PI`I "hI (pI I II!II I I eJ J J .&J K  K t<@K K K ~<K hL xL <L @M &PM <xM N N (N 8N HN PN `NhN pNN "N (N .N NN!NO O (O eHO O O .&P @P PP t<pP P P \1Q xQ $Q Q Q <Q R &R <R HS XS pS S S S SS SS "S (S T  T(T!0T@T PT `T eT U (U HU hU xU U U U t<U HV XV ~<xV V W G(W W &W < X X X X X X X YY Y(Y "0Y (8Y `Y YY!YY Y Y eY xZ Z .&Z Z Z t<[ [ [ ~<[ (\ 8\ <X\ ] &] <8] ] ] ] ] ^ ^  ^(^ 0^@^ "H^ &P^ x^ ^^!^^ ^ ^ e^ _ _ .&_ _ ` t< ` ` ` ~<` Ha Xa <xa b $0b <Xb b b c c (c 0c @cHc Pc`c pcx]  GAB*** ES-OE 9/20/01Item> This module contains the standard, typical SSP editing macrosD Gets User Initials from Word - Tools, Options, User Info dialog box GAB*** rev. 9/24/01 !blank' A@ B@B@.d' !!'kiX Strike and Hide Text GAB*** 9/24/01 0!N0 b9 b9r \9P55r R9Pkqo) Strikes and Hides Text adds USERINITIALS 2/4/00 Created - GAB***2 12/14/01 Fixed bug with "Comments" style - GAB***, 7/13/02 Fixed bug with style and hide - CKO 0!N b9 b9r \9P55r R9Pkq 0 4>C@:C@8 4>C@:5N( dC@F <4C@2 <4 LJC@HComments B%D9@ <4C@2q      !"#$%&'()*+,-./012345789:g=>?@ABC6EF\HIJKLUNOPQRSTGVWXYZ[]^_`abcefhjikwlnopqrstuvz{|}~With Selection .Font.StrikeThrough = True .Font.Hidden = True .Font.ColorIndex = wdRed' .MoveUp Unit:=wdParagraph, Count:=1 .TypeParagraph" .MoveUp Unit:=wdLine, Count:=1 .TypeText Text:=GetInitials' .MoveUp Unit:=wdParagraph, Count:=16 .MoveDown Unit:=wdLine, Count:=1, Extend:=wdExtend. .Style = ActiveDocument.Styles("Comments") .Font.ColorIndex = wdGreen8 .ParagraphFormat.FirstLineIndent = InchesToPoints(1)% .MoveRight Unit:=wdWord, Count:=1End Witho Original macro by NROE% Updated to VBA by GAB*** on 11/01/01 0 Select the paragraph 4>C@Z 4> LJC@:+ If NOT struck and hid then strike and hide- If struck and hid then un-strike and un-hide5N b9 b9r \9P55r R9Pkq ^4>C@C@8 <4>C@: dC@F <4 LJC@2Comments B%D9@ ^4>C@\qpoh Original macro by NROE CREATED GAB*** on 1/07/02 0 Select the paragraph 4>C@Z 4> LJC@:5N5V Z X9V 9Pd Z9V \9Pkpqh ^4>C@C@8 <4>C@: dC@F <4 LJC@2Comments B%D9@ ^4>C@\qoX1 Underlines Selected Text, Toggles back to Normal GAB*** 2/4/00 0!N5V Z X9V 9Pd( Z9V \9Pkqo, Underlines Selected Text, Adds USERINITIALS GAB*** 2/4/00 05N(V 5N(P 4>C@:C@8 <4>C@: dC@F 4>C@: <4> LJC@ZComments B%D9@ .Font.ColorIndex = wdGreen$b5T( 4>C@\qox Adds USERINITIALS GAB*** 2/04/00 REVISED 1/7/02 0 4>C@:C@8 4>C@:5N( dC@F <4C@2 <4 LJC@HComments B%D9@ <4C@2qhoX Adds "ADDED USERINITIALS" GAB*** 2/04/00 0 4>C@:C@8 4>C@:ADDED dC@F dC@F <4C@2 <4 LJC@HComments B%D9@ <4C@2q@o0X Adds "DELETED USERINITIALS" GAB*** 2/04/00 0 4>C@:C@8 4>C@: DELETED dC@F dC@F <4C@2 <4 LJC@HComments B%D9@ <4C@2qo Adds "NEW USERINITIALS" GAB*** 2/04/00 0 4>C@:C@8 4>C@:NEW dC@F dC@F <4C@2 <4 LJC@HComments B%D9@ <4C@2qo Adds "UPDATED USERINITIALS" GAB*** 2/04/00 0 4>C@:C@8 4>C@: UPDATED dC@F dC@F <4C@2 <4 LJC@HComments B%D9@ <4C@2q o  GAB*** 11/01/01# Toggles the display of hidden text B!f!h9n5l9lq0 o( X GAB 11/01/013 Toggles the display of ALL Non-Printing characters B!f!h9nturn off Show All over-ride5d9d5f9f5h9h5j9jq@ o8  PrintAllPages- Macro created 1/8/99 by Scott Fredrickson*** Revised GAB*** 4/19/2002 f!h!l (d  (kx f!h!j (dH  (k0    1-32000  B@o  RecheckSpelling Macro GAB*** 10/15/01 B@ B( B( 999999999q  B( B(  $(Standard $(Standard  B, ! BB@dP BB@k8 o0 @****************************************************************OInsert a Spec/document into current document. Put into production 4-20-2006 MRDECode written by Mikel DeVaul 3-1-2006 current macro InsertSpec hasn't=worked since converted to PC. WordBasic didn't work correctly;either. Inserted page break in the middle of spec document.LTested with users Heidi Borders and Rene' Walker new code works as expected.EUpdated SE and NROE toolbars and Key bindings F1 to reflect new code.@****************************************************************]X $. *.*9C@qx 0B@8 b 0!N(r l 0B@ b 0!N(ro(x@****************************************************************Insert a Spec/documentCCode written by Mikel DeVaul 3-1-2006 above macro InsertSpec hasn't=worked since converted to PC. WordBasic didn't work correctlyFEither. Still need to test with users Heidi Borders and Grace Tsushima@****************************************************************] $. *.*9C@qH 0B@8 b 0!N(r l 0B@ b 0!N(ro PrintSelection.MAIN Macro- Macro created 1/8/99 by Scott Fredrickson*** f!h!n (dF (kH     B@o Insert Hidden Page Break GAB*** 10/17/01 Created for NROE menu. 0 lC@.MoveUp Unit:=wdLine, Count:=1 <4 LJC@H5N(r <4>C@ZqoX GAB*** 3/20/02 f! f5h(l95h(lqdx f(k`oX' Macro recorded 10/17/01 by Greg Balzer  0!N(Po' Macro recorded 10/17/01 by Greg Balzer  0!N(Po' Macro recorded 10/17/01 by Greg Balzer  0!N(PoPX' Macro recorded 10/17/01 by Greg Balzer R 0!N(Po' Macro recorded 10/17/01 by Greg Balzer $ 0!N(Po5 Clears Function Key Settings in the ACTIVE Document. B'( *B@,o0# Macro recorded 5/2/02 by LauchlandVBA Version - Balzer;If ActiveWindow.ActivePane.View.Zoom.Percentage <> 100 Then2ActiveWindow.ActivePane.View.Zoom.Percentage = 100 End IfSelection.TypeParagraphActiveDocument.SaveSelection.TypeBackspaceWith ActiveWindow .Left = -10 .Top = -10 End Withd f!0!h!2(4 BB@6 BB@BWord Basic Version - LauchlandHas problems with Word 2000WordBasic.DocMove -11, 0WordBasic.FileSaveWordBasic.FileCloseoX Henry Lauchland 0B@  ^4> 0B@\ 0B@8 ^4> LJ 0B@\ l 0B@ f!h!: < f%>B@Bk  f!0!h!l @ f!0!h!l B f!0!h!l D F f!0!h(lkP J f!0!h(H 0B@  ^4> 0B@ L f!0!h(H ^4> LJ 0B@ ^4> 0B@ ^4> LJ 0B@\ ^4> 0B@ 0B@  ^4> 0B@ 0!nB@p 0!npage9d5t(d9v z9x99|9~999q 0!nB@ ^4> 0B@******************************d 0B@F ^4> 0B@ <4> LJ 0B@: ^4> 0B@ <4> LJ 0B@Z ^4> 0B@ 0B@8 <4> 0B@: ^4> LJ 0B@\Header B%D 0(@ ^4> 0B@ Page 1 of d 0B@F ^4 > 0B@ 0B@8 <4> 0B@:Normal B%D 0(@  0!R AttentionTVXZ`\ B!NB@P 0!n