ࡱ>  Root EntryRoot Entry F`k:CompObj fWorkbook ~_VBA_PROJECT_CUR" kTk  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~SummaryInformation(4DocumentSummaryInformation80VBA kTkPROJECT  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{}~՜.+,D՜.+, HP X`hp x    Reports XLM Loc Table Excel 4.0 Macros$Oh+'0HPh Report ManagerMicrosoft Corp.CCreate reports by combining spreadsheet views with data scenarios. eaMicrosoft Excel@:b FMicrosoft Excel WorksheetBiff8Excel.Sheet.89qReports VBA (Private)Reports VBA (Private)CustomRepeat WrapperCustomRepeat WrapperThisWorkbookThisWorkbookID="{1A42490F-E979-11CF-B9BF-00AA004AE68D}" Module=Reports VBA PROJECTwm dir__SRP_0 __SRP_1   ( REPORT.DEFINEreport_name,se REPORT.DELET  REPORT.GETtype_ - REPORT.PRINTreport_name,copie  REPORT.PRINT?repor\p Ba= ThisWorkbook=Za5Z<X@"1* MS Sans Serif1Arial1Arial1Arial1Arial1* MS Sans Serif1* MS Sans Serif1* MS Sans Serif1*  MS Sans Serif"$"#,##0_);\("$"#,##0\)!"$"#,##0_);[Red]\("$"#,##0\)""$"#,##0.00_);\("$"#,##0.00\)'""$"#,##0.00_);[Red]\("$"#,##0.00\)7*2_("$"* #,##0_);_("$"* \(#,##0\);_("$"* "-"_);_(@_).))_(* #,##0_);_(* \(#,##0\);_(* "-"_);_(@_)?,:_("$"* #,##0.00_);_("$"* \(#,##0.00\);_("$"* "-"??_);_(@_)6+1_(* #,##0.00_);_(* \(#,##0.00\);_(* "-"??_);_(@_)#,##0\ "$";\-#,##0\ "$"!#,##0\ "$";[Red]\-#,##0\ "$""#,##0.00\ "$";\-#,##0.00\ "$"'"#,##0.00\ "$";[Red]\-#,##0.00\ "$";6_-* #,##0\ "$"_-;\-* #,##0\ "$"_-;_-* "-"\ "$"_-;_-@_-83_-* #,##0\ _$_-;\-* #,##0\ _$_-;_-* "-"\ _$_-;_-@_-C>_-* #,##0.00\ "$"_-;\-* #,##0.00\ "$"_-;_-* "-"??\ "$"_-;_-@_-@;_-* #,##0.00\ _$_-;\-* #,##0.00\ _$_-;_-* "-"??\ _$_-;_-@_-"$"#,##0;\-"$"#,##0"$"#,##0;[Red]\-"$"#,##0"$"#,##0.00;\-"$"#,##0.00#"$"#,##0.00;[Red]\-"$"#,##0.0050_-"$"* #,##0_-;\-"$"* #,##0_-;_-"$"* "-"_-;_-@_-,'_-* #,##0_-;\-* #,##0_-;_-* "-"_-;_-@_-=8_-"$"* #,##0.00_-;\-"$"* #,##0.00_-;_-"$"* "-"??_-;_-@_-4/_-* #,##0.00_-;\-* #,##0.00_-;_-* "-"??_-;_-@_-#,##0\ _F;\-#,##0\ _F#,##0\ _F;[Red]\-#,##0\ _F #,##0.00\ _F;\-#,##0.00\ _F% #,##0.00\ _F;[Red]\-#,##0.00\ _F#,##0\ "F";\-#,##0\ "F"!#,##0\ "F";[Red]\-#,##0\ "F""#,##0.00\ "F";\-#,##0.00\ "F"'"#,##0.00\ "F";[Red]\-#,##0.00\ "F" hh:mm hh:mm:ssdd/mm/yy\ hh:mm83_-* #,##0\ _F_-;\-* #,##0\ _F_-;_-* "-"\ _F_-;_-@_-@;_-* #,##0.00\ _F_-;\-* #,##0.00\ _F_-;_-* "-"??\ _F_-;_-@_-;6_-* #,##0\ "F"_-;\-* #,##0\ "F"_-;_-* "-"\ "F"_-;_-@_-C>_-* #,##0.00\ "F"_-;\-* #,##0.00\ "F"_-;_-* "-"??\ "F"_-;_-@_-#,##0;"-"#,##0#,##0;[Red]"-"#,##0#,##0.00;"-"#,##0.00#,##0.00;[Red]"-"#,##0.00"$"#,##0;"-""$"#,##0"$"#,##0;[Red]"-""$"#,##0"$"#,##0.00;"-""$"#,##0.00$"$"#,##0.00;[Red]"-""$"#,##0.00 dd/mmm/yy dd/mmm mmm/yy h:mm\ / h:mm:ss\ /#,##0"DM ";\-#,##0"DM "!#,##0"DM ";[Red]\-#,##0"DM ""#,##0.00"DM ";\-#,##0.00"DM "'"#,##0.00"DM ";[Red]\-#,##0.00"DM "                ( &                         "@ @  "@  "@  " @  @@  @   @  @    @    @    "@  " @    @      "@@  "@  " @  0@@  0  @  0 @  0    ("@       Comma [0]#Comma [0]_CustomRepeat Wrapper% Comma [0]_ImsToLocal TranslationComma_CustomRepeat Wrapper!Comma_ImsToLocal Translation Currency [0]&!Currency [0]_CustomRepeat Wrapper(#Currency [0]_CustomRepeat Wrapper_1(#Currency [0]_ImsToLocal Translation"Currency_CustomRepeat Wrapper$Currency_CustomRepeat Wrapper_1$Currency_ImsToLocal Translation Normal_CustomRepeat Wrapper"Normal_ImsToLocal Translation 8 ``i̜̙3f3333f3ffff333ff333f33f33BBB\`ś Reports XLM Loc TableReports VBA (Private)CustomRepeat Wrapper# wrn.testrept. __Command`$@&View&Report Manager...mcp01.PrintReport. F&ull Screen Print or define document reportsXLMAIN8.HLP!1731" __DemandLoad:/ __LongName:- __ReadOnly:0  ;A &ca.comments.)#;;;Y >ca.comments.);;;;;?(;A &ca.comments.)#;;;( ca.DialogList.;% ca.Dialogs.; - ca.DialogTemplates.;* ca.DoUpdateCode.;@G' ca.Functions.; , ca.PrivateDialogId.Reports) ca.StringTable.;P copies_num: copies_num:# CopyrightText:F"CustomRepeatWrapper* en00r.MacUpdate.;1 * en00r.WinUpdate.;1 1 ls01.AddEditReport.Mac.;% 1 ls01.AddEditReport.Win.;% ) ls01.Print.Mac.;). ) ls01.Print.Win.;). / ls01.PrintReport.Mac.;  / ls01.PrintReport.Win.; $ ls01.UDDs.;( lt01.Messages.; )lt01c.adjustingdbs.:%lt01c.printing.:# lt01c.report.:,lt01c.ReportCmdStatus.: +lt01c.restoresection.:(lt01c.savesection.:& lt02.Alerts.; '*lt02c.cancelchanges.: %lt02c.cantopen.:!# lt02c.copies.:)lt02c.DeleteReport.:'*lt02c.DeleteReport2.:(*lt02c.GtrZeroCopies.:O*lt02c.InvCharInName.:&+lt02c.NeedReportName.:%)lt02c.NeedSections.:)*lt02c.NineFwrCopies.:P%lt02c.noinsitu.:S(lt02c.nominimized.:$lt02c.noprint.:&lt02c.noproject.:(lt02c.noprotected.:+lt02c.noscenariolink.:+lt02c.noscenariosave.:*lt02c.noscenarioxla.:&lt02c.notdelete.:#$lt02c.notdone.:%lt02c.notexist.: &lt02c.notexists.:%lt02c.notprint.:$'lt02c.notrun.Mac.: 'lt02c.notrun.Win.: # lt02c.notyet.: 'lt02c.noviewlink.:'lt02c.noviewsave.:&lt02c.noviewxla.:(lt02c.noworkgroup.:! lt02c.page.:(lt02c.printcancel.:# lt02c.report.:"%lt02c.scenario.:,lt02c.ShowScenarioErr.:I-lt02c.ShowScenarioErr1.:J-lt02c.ShowScenarioErr2.:L(lt02c.ShowViewErr.:G)lt02c.ShowViewErr1.:H)lt02c.ShowViewErr2.:K! lt02c.view.:( lt03.Formulas.;*E)lt03c.AddEditTopic.:N&lt03c.addreport.:7)lt03c.copiesnumarg.:C$lt03c.current.:5(lt03c.currentpage.:6'lt03c.demandload.:/'lt03c.editreport.:8%lt03c.filemenu.:3%lt03c.help.mac.:+%lt03c.help.win.:*%lt03c.longname.:-%lt03c.norecord.:>&lt03c.pagesetup.:4,lt03c.pageslogicalarg.:B-lt03c.PrintReportTopic.:M%lt03c.readonly.:0)lt03c.recorddefine.:=)lt03c.recorddelete.:<(lt03c.recordprint.:;)lt03c.repeatdelete.:9(lt03c.repeatprint.::&lt03c.ReportCmd.:E*lt03c.reportnamearg.:@)lt03c.showprintarg.:D" lt03c.topic.:,'lt03c.typenumarg.:?)lt03c.VbaRecPrefix.:Q)lt03c.VbaRecSuffix.:R1lt03c.viewscenarioarrayarg.:A(lt03c.viewxla.mac.:2(lt03c.viewxla.win.:1/ lt04.udAddEditReport.;%' lt04.udPrint.;).- lt04.udPrintReport.; . mcc01.UpdateDialogs.;I[$mcc01a.ForceUpdate.! mcc01c.end.<gg) mcc02.AddMenus.;_g! mcc02c.bar.:s&mcc02c.menuhelp.:z&mcc02c.position.:b, mcc03.DeleteMenus.;jo. mcc04.RecalcCommand.;q|) mco01.AutoOpen.;%mco01c.runflag.:, mcp01.PrintReport.;03 mcp02.CustomRepeatDelete.;37$mcp02c.report.<2 mcp03.CustomRepeatPrint.;:>$mcp03c.copies.<$mcp03c.report.<' mcs01.Safety.;X_% mcs02.noop.;UV* mcx01.AutoClose.;* mds01.AddReport.;+ mds02.EditReport.;- mds03.RemoveReport.;$mds03c.report.:+ mds04.AddSection.;. mds05.RemoveSection.; - mds06.DefineReport.;*fmds06a.sectionarray.`hntest1*Sheet2test2*Sheet2>mds06a.sectionarray.`o*for&mds06c.document.: )mds06c.numsections.:* mds07.UpSection.;->, mds08.DownSection.;AR, mds09.ChangeSheet.;u !!ME_STUB;0Print or define document reports.MAINXL.HLP!1731Print or define document reports., mfs02.QueryDialog.;e! mfs02c.end.:" mfs02c.exit.:&mfs02c.holdflag.:k$mfs02c.result.:p&mfs02c.stackptr.:i! mfs02c.top.:o+ mfs03.InitDialog.;' mfs03a.which.;). ' mfs03a.which.;). !mfs03v.holdflag.!mfs03v.holdflag./ mfs04.ValidateDialog.;' mfs04a.which.;% ' mfs04a.which.;). &mfs04c.badfield.:(mfs04c.returnflag.:+ mfs05.LoadDialog.;' mfs05a.which.;% ' mfs05a.which.;% !mfs05v.holdflag.!mfs05v.holdflag.- mfs06.UpdateDialog.; mfs06a.which.- mfs07.UnLoadDialog.; mfs07a.which.&mfs07c.calcmode.:2 mfs08.TriggerEnableItem.;mfs08v.enable.mfs08v.itemref.mfs08v.trigger., mfs09.TriggerItem.;%mfs09v.itemref.:$%mfs09v.itemref.:  mfs09v.trigger. mfs09v.trigger.+ mfs10.EnableItem.;mfs10v.enable.mfs10v.enable.%mfs10v.itemref.:%mfs10v.itemref.: * mfs11.OpenAFile.;'mfs11c.errortrue.:# mfs11c.match.:" mfs11c.open.:(mfs11c.returnflag.:+ mfs11v.openfile. VIEWS.XLAC$mfs11v.openpath.!C:\WORK\XL5\LIBRARY\REPORTS\TEMP\* mfs20.ReportGet.;#Rmfs20a.reportnames.`|wrn.My._.Report. wrn.testrept.9mfs20a.reportnames.`wrn.foo..mfs20c.AbbrevActivePage.:# mfs20c.array.:%mfs20c.columns.:# mfs20c.pages.:(mfs20c.reportname.:&mfs20c.sections.:%mfs20c.typenum.:- mfs21.ReportDelete.;&;(mfs21c.reportname.:*- mfs22.ReportDefine.;>wFmfs22a.scenarios.`BestWorstLikelyKmfs22a.sectionsarray.`**Sheet1@mfs22a.sectionsarray.` *Best&mfs22c.AbbrevAP.:W(mfs22c.ActivePage.:V$mfs22c.define.:l# mfs22c.pages.:F(mfs22c.reportname.:D&mfs22c.scenario.:Z)mfs22c.scenarionas.:Q&mfs22c.sections.:O" mfs22c.view.:Y%mfs22c.viewnas.:P!mfs22v.section.!mfs22v.section.- mfs23.ReportPrint?.;z$mfs23c.copies.:$mfs23c.report.:(mfs23c.reportname.:, mfs24.ReportPrint.;$mfs24c.copies.:*mfs24c.printlogical.:(mfs24c.reportname.:, mfs25.PrintReport.;!; mfs25a.Pages.`Sheet1Sheet29mfs25a.scenarios.`P Scenario 12mfs25a.scenarios.`Pforgmfs25a.sectionsarray.`test1*Sheet2test2*Sheet2?mfs25a.sectionsarray.`T*forz mfs25a.views.` _Current_test2test1view of area3 (Sheet2)view of area1 (Sheet1)(mfs25c.ActivePage.:$mfs25c.copies.:&mfs25c.curpages.:)mfs25c.curscenario.:%mfs25c.curview.:! mfs25c.End.:!(mfs25c.fOldReport.:# mfs25c.pages.:# mfs25c.print.: (mfs25c.reportname.:&mfs25c.scenario.:)mfs25c.scenarionas.:&mfs25c.sections.:*mfs25c.ShowScenario.:&mfs25c.ShowView.:%mfs25c.thepage.:)mfs25c.thescenario.:%mfs25c.theview.:)mfs25c.theviewpage.:" mfs25c.view.:%mfs25c.viewnas.:&mfs25c.viewpage.:!mfs25v.section.!mfs25v.section.' mfs25v.thepage.Sheet2- mfs26.ReportToName.;$', mfs26v.reportname.testrept'mfs26v.reportname.foo- mfs27.NameToReport.;*.Qmfs27a.definename.`Plwrn.My._.Report. wrn.testrept.8mfs27a.definename.`plwrn.foo.) mfs28.CheckXLA.;1d&mfs28c.document.:9&mfs28c.lastlink.:Q" mfs28c.link.:I(mfs28c.returnflag.:8%mfs28c.xlapath.:F"mfs28v.alertflag."mfs28v.alertflag.%mfs28v.lastxla.:%mfs28v.lastxla.:G*mfs28v.nolink.'The view add-in could not be linked to.G*mfs28v.nolink.'The view add-in could not be linked to.= !mfs28v.noxla.The view add-in is not loaded.= !mfs28v.noxla.The view add-in is not loaded.& mfs28v.xla. VIEWS.XLA& mfs28v.xla. VIEWS.XL5mfs29_GetSheets_9 mfs29a.Pages.`Reports Add-In,mfs29a.Sheets.` mfs29v.iPage.- mfs30.PrintCleanup.;gs<mfs30v.ActivePage.[Report in 95.xls]Sheet2#mfs30v.fScenarios.mfs30v.fViews.!mfs30v.section.bmfs30v.vsparray.`test1*Sheet2test2*Sheet2" mgs00c.DEBUG:%mgs00c.VbaBug1.: %mgs00c.VbaBug2.:( mgs01.Globals.;~*mgs01c.buttonoffset.:(mgs01c.changeflag.:'mgs01c.enversion.:%mgs01c.environ.:&mgs01c.filesext.:'mgs01c.getoffset.:(mgs01c.holdoffset.:(mgs01c.initoffset.:! mgs01c.mac.:" mgs01c.mac7.:$mgs01c.msname.:$mgs01c.mspath.:&mgs01c.platform.:*mgs01c.platformflag.:*mgs01c.promptoffset.:$mgs01c.search.:! mgs01c.sep.:'mgs01c.setoffset.:,mgs01c.validateoffset.:%mgs01c.version.:! mgs01c.win.:( mgs02.Globals.;&mgs02.HelpTopic.:$mgs02c.copies.:" mgs02c.help.:*mgs02c.lastscenario.:&mgs02c.lastview.:)mgs02c.repeatmacro.:(mgs02c.repeatmenu.:$mgs02c.report.:# pages_logical:F# pages_logical:FP REPORT.DEFINE;>wDefines a named reportMACROFUN.HLP!3445P REPORT.DELETE;&;Deletes a named reportMACROFUN.HLP!3446_ (REPORT.GET;#Returns information about a named reportMACROFUN.HLP!3447N REPORT.PRINT;Prints a named reportMACROFUN.HLP!3448q 7REPORT.PRINT?;zEquivalent to the Print Report command on the File menuMACROFUN.HLP!3448! report_name:! report_name:Dsections_array`**Sheet1 Stub;0! SummaryText:.4t1.links`) tb01.SetWindow.;!% tb02.Stack.;  & tb03r.pages.; " tb03r.pages.: &tb03r.scenarios.:$ tb03r.top.; & tb03r.views.;" tb03r.views.:( tb04.Sections.;!$( tb04.Sections.;!#[tb04a.sections.`Sheet2, test1, (None)Sheet2, test2, (None);tb04a.sections.` [Current], for$ tb04r.top.;!$$ tb05r.top.;%'( tb99.Sections.; ""type_num:type_num:% ud00r.Help.;1% ud00r.Text.;1 , ud00r.UpdateRange.;1( ud00xm.button.;1% ud00xm.get.;1& ud00xm.hold.;1 & ud00xm.init.;1 ( ud00xm.prompt.;1% ud00xm.set.;1* ud00xm.validate.;1( ud01.AboutBox.;  + ud01.PrintReport.;  Aud01a.reports.` My Reporttestrept/ud01a.reports.`foo ud01c.Add.:%ud01c.edititem.: &ud01c.firsttime.:  ud01c.ini.: %ud01c.listitem.: ! ud01c.name.: ! ud01c.pick.: &ud01c.printitem.:'ud01c.removeitem.: - ud02.AddEditReport.;% : ud02a.pages.`Sheet1Sheet2"ud02a.PrevSheet.!ud02a.scenarios.*1ud02a.scenarios.`forJud02a.sections.`h Row3Hidden*Sheet1:ud02a.sections.`*Bestl ud02a.views.`8test2test1view of area3 (Sheet2)view of area1 (Sheet1) ud02a.views.*%ud02c.downitem.:&ud02c.FrameItem.: ud02c.ini.: ! ud02c.name.: %ud02c.pagepick.: " ud02c.pages.:% 'ud02c.removeitem.:*ud02c.scenariocheck.:! .ud02c.scenariocheckitem.:!)ud02c.scenariopick.:" -ud02c.scenariopickitem.:"(ud02c.sectionitem.:$(ud02c.sectionpick.:$ &ud02c.SheetItem.:" ud02c.title.: # ud02c.upitem.:&ud02c.viewcheck.: *ud02c.viewcheckitem.:%ud02c.viewpick.: )ud02c.viewpickitem.: ;ud02v.ActivePage.[Report in 95.xls]Sheet2% ud03.Print.;). # ud03c.copies.:.  ud03c.ini.:) % um00r.Cmds.; * um00r.CmdStatus.; % um00r.Help.; ' um00r.Macros.; " um01c.title.:, um01r.printreport.;views_scenarios_array`**Macro1**Sheet1***@views_scenarios_array`D*Best MENUSDATA STATEMENTITEMXYWHTEXT INIT/RESULTNAMEHOLDDEFAULT VALIDATION ERROR PROMPTGETSETBUTTONCOMMANDMACROKEYSTATUSHELPLISTSTABLESD(C) Copyright 1991, 1995 Microsoft Corporation. All rights reserved. ud00r.Help. ud00r.Text.ud01.PrintReport.Win ud00xm.hold. ud00xm.init.ud00xm.validate.ud00xm.prompt. ud00xm.get. ud00xm.set.ud00xm.button. um01.Print. um00r.Macros.um00r.CmdStatus. um00r.Help. ls01.UDDs.tb01.SetWindow.mco01.AutoOpen. ud01c.ini. um00r.Cmds.MacGeneva Auto_Openum01r.printreport.ud02.AddEditReport.Helv ud01c.name. ud03.Print.OS_ud01c.firsttime.> IF(IsShared(),mfs10.EnableItem.(ud01c.removeitem.,FALSE))Insert tb02.Stack.< IF(IsShared(),mfs10.EnableItem.(ud01c.edititem.,FALSE))used by:mfs12.QueryDialog7 IF(IsShared(),mfs10.EnableItem.(ud01c.Add.,FALSE))5holds dialog box reference (1st argument as *text*!!)hold flags (2nd argument)Dholds mfs12c.result. (result of DIALOG.BOX() to be used in RETURN()) ud01c.pick.ihdx Add Report ud02c.ini.mcx01.AutoClose. Auto_Close*do NOT add below* tb03.Lists.tb04.Sections.tb05.Sections.Views ScenariosPages Cont. Pages(None)Sheet1asdf Scenario 1Macro1Sheet2sSheet3Macro56Likely ud02c.name.mcp01.PrintReport.Stubud02c.pagepick.ud02c.viewcheck.ud02c.viewpick.ud02c.scenariocheck.ud02c.scenariopick.ud02c.sectionpick. ud02c.pages. ud03c.ini. ud03c.copies.mcp02.CustomRepeatDelete.mcp03.CustomRepeatPrint.ca.DoUpdateCode.mcc01.UpdateDialogs.mcc02.AddMenus.mcc03.DeleteMenus.mcc04.RecalcCommand.mgs01.Globals.mgs01c.msname.mgs01c.environ.mgs01c.platform.mgs01c.search.mgs01c.enversion.mgs01c.platformflag.mgs02.Globals. VIEWS.XLA SCENARIO.XLAmds01.AddReport.mds02.EditReport.mds03.RemoveReport.mds04.AddSection.add a row to the sections array*if no current section selected, add at end.else if no prev sections then add at end=startelse1make room for new section by shifting others down)and insert new section at selection point4create display table for listbox from data structuremds09.ChangeSheet.false keep dlg activemds05.RemoveSection.if only one section'if selection point isn't at end of list2collapse remaining sections from selection onwardsand shrink list by oneblank unused item+re-create display table from data structure and remember cont. pages setting/udpate selection, correct if 1st item was del'dReturn focus to sections listmds06.DefineReport.$rearrange for contiguous v_s_p arraymds06c.numsections.count num sections+create contiguous v_s_p array for recording6(AP) is non-issue 'cause tb04.sections never gets (AP)DEBUGmds07.UpSection.mds08.DownSection. mcs02.noop. mcs01.Safety.mfs02.QueryDialog.nametext of dlg to showflags (h,i,g,d,u,a) "h" = hold"i" => init ( dlg , hold )"g" => load ( dlg , hold ) IF "D" THEN mfs02c.top."u" => update ( dlg )mfs02c.result.show dlgpush result onto the stack if CANCEL,if "a" then ask for confirmation before exitelse just exitelseif VERB and NOT("x")SWITCH (mfs02c.result.)>case 1: if "v" try validate. if failed goto (TOP) else (EXIT)case 2: return 2case 3: do HELP goto (TOP)*do btnoffset(RESULT), goto (TOP) if failed ENDIF "D" mfs02c.exit. "s" => unload mfs02c.end.Pop stack frameEnsure dlg is dismissedReturn result code for this dlgmfs03.InitDialog.jump to initoffset in dlg tablemfs04.ValidateDialog.mfs05.LoadDialog.mfs06.UpdateDialog.mfs07.UnLoadDialog.mfs08.TriggerEnableItem.mfs09.TriggerItem.mfs10.EnableItem.mfs11.OpenAFile.mfs20.ReportGet. REPORT.GET)// IF(NOT(GET.DOCUMENT(7)))mfs20c.sections.mfs20c.columns.mfs20c.AbbrevActivePage. mfs20c.array.copy v_s into tb05*and copy p to make a contiguous v_s_p tb05bind #N/A to active page and return contiguous tb05 array// END.IF()mfs21.ReportDelete. REPORT.DELETEmfs22.ReportDefine. REPORT.DEFINEmfs22c.reportname. mfs22c.pages.rept name arg req'ddoc must be namedno group edit modemust be xls/xlm sheetmustn't have content protection not minimised IF >1 SECTIONmfs22c.sections.mfs22c.viewnas. non-NA viewsmfs22c.scenarionas.non-NA scenarios'if non-NA views exist, link to View MgrUNUSED$if non-NA views, get available views// IF(mfs22c.scenarionas.2,ERROR(FALSE)+SET.NAME("mfs22a.pages.",NA())+SET.NAME("mfs22a.pages.",REPTBAS.XLS!Module1.mfs29_GetSheets_())+ERROR(TRUE))$if pages spec'd, get available pagesmfs22c.ActivePage.mfs22c.AbbrevAP.FOR EACH SECTION mfs22c.view.mfs22c.scenario.if XL4 rept or page=NA() use active page (XL4 default)! try to activate specified page #VALUE if page doesn't exist&check if view available on spec'd page*check if scenario available on spec'd page NEXT SECTIONreactivate original pageinit section tabledump validated sections arraydump cont. pages setting$dump pages - use [current] if neededmfs22c.define.&save rpt data structure in target bookreturn success codeendif >1 SECTIONmfs23.ReportPrint?. REPORT.PRINT?no sh content protection no minimizedShow modal print report dlgmfs24.ReportPrint. REPORT.PRINT..or OLE in-placeno sheet content protectionmfs25.PrintReport.mfs25c.reportname.mfs25c.copies.if multiple sectionsmfs25c.sections.count the sectionsmfs25c.viewnas.count NA viewsmfs25c.scenarionas.count NA scenariosmfs25c.ActivePage.remember current page.mfs25c.fOldReport.!old report ==> no pages specifiedif we can link to VIEWS add-in+"...saving current view and/or scenario..."4old report or #NA ==> current page, else select page mfs25c.view.view for this sectionmfs25c.scenario.scenario for this section'mfs25a.views is list of available views/mfs25a.scenarios is list of available scenariossame for scenarios0Del any pre-existing _Current_ view or scenario.INOTE: Assuming that _Current_ is obscure so user won't care if we delete.Save _Current_ view.Save _Current_ scenario.zero curview and curscenario mfs25c.pages. Cont. pages?mfs25c.thepage.4old report or #NA ==> current page, else spec'd pagemfs25c.theview.mfs25c.thescenario.status: /actually show the pagemfs25c.ShowView.mfs25c.ShowScenario.actually show the scenario7on first iteration, set mfs25c.curpages. to startpage-1update status barTRY()6fake the page numbering so we get sequential numbering mfs25c.print. and PRINT!CATCH()%Error during print: nothing to printSo clean up...mfs25c.curview.mfs25c.curscenario.mfs25c.curpage.+advance pagenumber for sequential numbering mfs25c.End.mfs26.ReportToName.mfs27.NameToReport.mfs28.CheckXLA.xmfs30.PrintCleanup. original page$views being used (=viewnasldhd_Oepler:f[fg?}hh 5iV i ? @ AQ @ ;#\"NCRAl#\"NAl$ .@"@<@l@_@ p  ud01a.reports.~ @ B   #xAl`  J##}"##w"##~"##z"B$B7 5 C~ ?  #{Al  B7  B7  B7  B7  B7  B7 B7 2 C~ ?B7 2 C~  ? 2 ~ @ 2 C~  ?@P *C4 #W #XB!COXLMAIN8.HLP!1732  D~  "@  E  F? @)##B#BAl#CPAl?@ )##B#BAl#CUAl G@Y@$`x@$@$[@$ 7  !.%  cna #nBOK  FU @?BT ud02a.views.A BX ud02a.views."eBXBTU?BT ud02a.views.A BX ud02a.views."eBXBTC -##B #" "B7 H@!`x@!>@![@! 7   Cancel  F] @GBTud02a.scenarios.A BXud02a.scenarios."\BXBT]@GBTud02a.scenarios.A BXud02a.scenarios."\BXBTB7 I !I* #xB8@!`x@!K@![@! 7  &Help  FI @3 ud02a.pages.A BX ud02a.pages.#"BXI@3 ud02a.pages.A BX ud02a.pages.#"BXB7 J !K %L BTY@!`x@!@W@!X@! 7  &Add  F5 ud02v.ActivePage.L"BX5ud02v.ActivePage.L"BX# #"B7 M N  O !M "N #P $O %M &N 'O B7r@!`x@!k@![@! 7   Move &Up  FY @C##B##B##B##BY@C##B##B##B##B# #"B7 Q Q  F !"*# $V %&* 'V (Rr@!`x@!n@![@! 7   Move &Down  F   !N @caa&)#\#aM"NcaSalB!N@caa&)#\#aM"NcaSalB# #"B7  T  V !"*# $V %&* 'V (Vr@!`x@!p@![@! 7   De&lete  F   !N @caa&)#\#aM"NcaSalB!N@caa&)#\#aM"NcaSalB# #"B7  W  X !Q "Q# $R %Q &Q 'Y (R@!$@!$@ !! 7    &Report Name:  F   !N @caa&)#\#aM"NcaSalB!N @caa&)#\#aM"NcaSalB  Z  U!$%*&* 'Y@!@_@!$@!o@! 7<     [  F: @$#Altb04.Sections.A BX3#CAvAlC B$@C,Please enter a report name.@ s##tC|BAlud02a.sections.##"BXtb04.Sections.#c#AL"NBX   U$@!$@!B@!w@!D@ !x  roTo create a section, select a sheet. You may also choose a View and/or Scenario. Then, choose the Add button.  Fo @Y#Al##B##B#Al##B##Bo@ Y#Al##B##B#Al##B##B  U \$,@!$@!T@!~@!]@ 7X  Fv`C IBT##BdummyB=##BBnBTAA& B\C+41The report name contains an invalid character(s).!J <#_"Nca #R #bAl  U ]!@!2@!@W@ !! ! Section to Add "  F!ZL#_"N#ba #R#"bAl  U* #B!@!2@!@]@ !! !   &Sheet:  Fb L tb03r.pages.CAA !#\#AM"N"BXbL tb03r.pages.CAA !#\#AM"N"BX  U& AAA&B!@^@!@Z@!\@!q@! !   tb03r.pages.~  @  ^  FQ @;#&B #YB@Alud02a.PrevSheet.#AZBXQ@;#&B #YB@Alud02a.PrevSheet.#AZBX# #"B7  UP :@CBC4 #W #XB!CgBv@\@!6@!a@ !! 7    &View:   _  Ff P tb03r.views.#\CA#AMB"NBXfP tb03r.views.#\CA#AMB"NBX3 ###"B$B7  UD,lP*tq@.HTrlb !T0!!"!#!}h$!%!&!'!(!)! *!8rY+!s,!*uK-!w.!y/! {,0|1~ 35067:<}=>  # F# BAA  5@!@_@!a@!o@ ! 7   tb03r.views.~ @ ` F!   #Al! ! #Al UP!F! :@C2C4 #W #XB!CgBv!@\@!6@!d@ !!!! 78!   Sce&nario:!  ! a ! Fj! !Ttb03r.scenarios.#\CA#AMB"NBXj!!Ttb03r.scenarios.#\CA#AMB"NBX3!$###"B$B7 ! UA"+B B B B%A&A"5@!@_@!d@!o@"!" 7P"  tb03r.scenarios.~ " ? " b " F!" " #Al!"% #Al " UP#":@C2C4 #W #XB!CgBv#@!$@! j@ #!!# !t#  S&ections in this Report: # F/# #tb04a.sections.A BX###!q##&Qtb04a.sections.#_b`#_b` #_bBX, , # U $" BA$$\@!$@!l@!w@!Q@$ 7$  tb04a.sections.$ * $ c $ F2$ @$#A Al##B!$$ CaAA&$$C-(%Cannot add a report with no sections.2$@$#A Al##Bb$'L##"##B##B##BB$B7 $ UP%# :@C3C4 #W #XB!CgBv%*@#$@# r@ %##% %$%  Use &Continuous Page Numbers%  % d % F % % #Al/%(###BAl % U&$ GAA& & B7& &B7&&B7&&B7&&B7&&B7&)B7P'% :@C/C4 #W #XB!CgBv$(& B A (5 (~ (@P)*:@C0C4 #W #XB!CgBv@)t) *C4 #W #XB!CgXLMAIN8.HLP!1731) ) ) !.). ) coa #oBPrint~ ) @ ) e ) F1) ,##B#BAl*+A*?d@"@^@* *) OK * F*-C @C*C4 #W #XB!CgBvB$XC :C'C4 #W #XB!CgBv ""B7*+)@##YB+@d@@@^@+ .)  Cancel + Fh,* R@#BA:CDC4 #W #XB!CgBvB,8@d@K@^@, ,) &Help , F,/B7O-+ 9@CGCHB$##G#H"B-@"@2@^@- 0)  &Copies: - F1.@, @#GAl#HAl.@T@.@I@. . ) ~ . ? . f . F8. / "CA!A#AlB/- A/ / B7/ /B7//B7//B7//B7//B7/1B70. B711 B7 19 19 19 191 5B7 1 9 1 9 1 9 1 9 19 19 19 19 19 3g56 #B67k##IBARCE 'CI' C7C4 #W #XB!CgBvB7<B7 :h<= #B=>r##I#CBARCE 'CI' C;C4 #W #XB!CgBvB>BB78.)MTRk9##@T0BCD}hEFGIKL M8rYNsO*uKPwQyR {,S|T~ UV0WXYZ}[_   @iBC #iB!CD #qBD*E #yB EF #{Al/FGCCCUBځ(GK$B$CB$B7 Ij3KLmcc01a.ForceUpdate.BQFLM0CrA mcc01a.ForceUpdate.BXB.MNC9C8#rB%B%NO@CBzBO@P,@BWBTC6Bg Loc TableBg?PQ)@en00r.C8Update.BmABNQR8@  lt02c.notrunC8.ACD!CBBv#RS @ #BST@ B6TU@AWU@VA@B2 Reports XLMBg#jBmB5R12C2BmVW@Bx'WX@#9C8Al XY @BT YZ @BzZ[A[aB7 _k8n#%#$3,7J2)FCR'"!["+$$ aT0bcd}hefgjlm n8rYosq*uKswtyu {,v|w~ xy0z{|~}a*b #yB)b(@cCuCVC[BcdBTd*e #xBGe(@f1Cu#V#CwA #w"BfgBTglB7 jllmBT3mnCuCV#BBnoBTosB7 qms$@t t`uCV&ViewuvCd&Report Manager...+v0wmcp01.PrintReport.mcp01.PrintReport.wXxC[ F&ull Screen%xy#BytzC!# Print or define document reports@z{*C4 #W #XB!CgXLMAIN8.HLP!1731{{{!/{{|! __Commandi #u#vaSBX|B7 ~n4#- #K  7 +8H2)F[RT0}h 8rYs*uKwy {,|~ 0}  TQیQN o"  $B[REPORTS.XLA]Reports XLM pؼAWindows (32-bit) NT 4.00 q2,;C/BsOS/OS2BxWin r#6@ .C/BR sH@2C;AC/C;cAA!BF0C.A #.C/C;AAlB t ?&A;" C8Mac (#4C. B$" C8Win 3T:C4: \B\(\:C6BC< C:\Public\5t:C4* *.*B*.*) @#mB #hB )"@#nB #hB )$@#qB #hB )&@#oB #hB )(@#lB #hB )*@#pB #hB ),@#kB #hB B7 u ~ ?X\ v>f0SMN5ZJ &,&?=C-------T0}h 8rYs*uKwy {,|~ 0 wB7 xkE@UCxH#C4 #l #m"#A#?#FB#xAlB<?&#ud02.AddEditReport.ihdxB7!ud01a.reports.#"BX;%C|A#tBAA&B$B6@ @#|Al##zBL@6@##}B##wB##~BAB7 ykEUCxH#C4 #l #m"#A#?#FB#xAlB<&#ud02.AddEditReport.ghdxB7!ud01a.reports.#"BXF0#|#tBAA  BAlc@M##}C|AA&B##wC|AA&B##~C|AA&BB7 z'P#tC|Btest,|o@;?:P o@;Jg T0}h 8rYs*uKwy {,|~ 0}  TQیQN mWC(DC)C4 #W #XB!CgBvA& B7B.##BAA&B;%@ud01a.reports.#"BXJ4@#|#tBAA  BAlg@Q@##}C|AA&B##wC|AA&B##~C|AA&B'@#ICAl^H@#G'C7C6'''Bx'!mcp02.CustomRepeatDelete.AlgQ@#HCb "CA 2 C/Bs... #B"Al8"@C`A CA  B*@##ZB@AA+@#=C`("C")B@AAB7 {fPtb04.Sections.#cC_A#_ALB"NBX |" CAB }\F@#_#_AL"C#]C" #RBAl\F@#_#_AL"C#[C" #RBAlB,@#_#_AL"#YCBAl%#_AL A ~WA@#_"C#]C" #RBAlWA@#_"C#[C" #RBAl='@#_"#YCBAlA !YKA#_C#_ALC"N#_c#_aLcbNAl YC@#_C"C#]C" #RBAl YC@#_C"C#[C" #RBAl>p 0q2?Nk+bk<.!E! x4``F7[[A+kT0}h 8rYs*uKwy {,|~ 0}  ?)@#_C"#YCBAlA!qQtb04a.sections.#_b`X#_b`d#_bBX, , +#_"CAle@O#A Al##B##B##B##BB7 J4CAA&!CC  B7"B5ud02a.PrevSheet.#AZBXWA#YCBCS  ##YC"BBgU?BT ud02a.views.A BX ud02a.views."eBXBT]@GBTud02a.scenarios.A BXud02a.scenarios."\BXBT!N@caa&)#\#aM"NcaSalB!N@caa&)#\#aM"NcaSalBfP tb03r.views.#\CA#AMB"NBXjTtb03r.scenarios.#\CA#AMB"NBX CBg-@#Al#AlB7  &#aAL B !)A#_"NAl2@tb04.Sections.A BX3@tb04a.sections.A BX%@#A AlA 8C/i N9[Yaqqjn#1.8L67)T0}h   8rY s*uKwy {,|~ 0}  TQیQN ,@C#aAL B !YKA#_C#_ALC"N#_c#_aLcbNAl @AK5Atb04.Sections.#_#_AL"NBX !. A#_#_AL"NAl !uU@tb04a.sections.#_b`p#_b`|#_bBX, , /@#_"CAl 2@#CBAl  A @ o###_B B###_B B###_B B###_B B1  ##B#BAl  B7 ='#C2BNB>(A##C2"NBN8AC`A #C2BNA  B*@##ZB@AWAA#=C`("#C2BN")B@AA'#_B B/@#_"CAl!N@@##Bc_cR a  #_"B=D.A#_"N#d"NB2 D.A#_"N#d"NB2 "@ @#_AL !tfAmds06a.sectionarray.#dcbNcR a #dC"N"BX * @C6BB >x 0>!]_ADC ABR.![!+3qVHB T0!"#}h$%&'() *8rY-s/*uK0w1y2 {,3|4~ 560789:};<  =TQ>ی! |! @B REPORTS.XLSB!",@C6BgBTBBTCBg"$@A # #$%@mds06a.sectionarray.BkA`mds06a.sectionarray.BkA C_A CA C B BB*%&@##ZB&'@Av'(`@#=C_("C",mds06a.sectionarray.BkA,C)B()@A)*A*/B7 -&/0#aAL B'01@C B111!F1128A#_#_AL"N#_cbNAl222!G2239A#_C"N#_cbNAl333!F3348A#_C"N#_#_aLbNAl444!u445U@tb04a.sections.#_b`#_b`#_bBX, , +56@#CAl67@A78@B89@A9:A:;@B;<A<@=o###_B B###_B B###_B B###_B B1=>##B#BAl =>CB7<7F!.!z! *+iji/!"!"CAT0CDE}hFGHIJK L8rYMsN*uKOwPyQ {,R|U~ VX0Z[\]}^_   A&CD#aAL B,DE@C#aAL BEEE!BEEF4A#_#_AL"N#_cbNAlFFF!CFFG5A#_C"N#_cbNAlGGG!FGGH8A#_C"N#_#_aLbNAlHHH!uHHIU@tb04a.sections.#_b`#_b`#_bBX, , +IJ@#CAlJK@AKL@BLM@AMNANO@BOPAP@Qo###_B B###_B B###_B B###_B B1QR##B#BAl QRVB7 UVZB7 XZ[B![\ #Al\]B5]^# mcs02.noop.#B3^_C{  #z"B_gB78B*0efi/!"!"C  %97eT0ghi}hjklmno p8rYqsr*uKswtyu {,v|w~ xy0z{|}}~   e3gh#XC"BQ g3hj#XC"BQ h~ i'jk#CAl5klh#XCBB|AA& k^lmHi#XCBB|'##XCB"#"B l^mnHg#XCBB|'##XCB"#"B m9no#d#XCBB|AA&B n o]opG@u#XCBB|"##XCB""B o p2p?q@#XCB"A p3qr@#XC"CAl q&rs@CA&B r=st'@a#XCBB|AA&BptuZ@ C%C4 #W #XB!CgBv #A5#A5B tuv@A"vw @ #A5 vwx@AFxy0@C x#XCBB|AB$A xy}ACv#XCBB|AA&B##XCB"B #A5#A5"#A5"=6C7#XCB"BNBBd y z { |"}~ @#A5 }~@A ~^HA#XCB"CC,"NB#A5B 8 EE+GppK}RE8A!4!X4/T0}h 8rYs*uKwy {,|~ 0}@AA  YCs#XCBB|"##XCB""B  '#CAl A /#XC"B7  - mfs03a.which.BQ0mfs03v.holdflag.BQ3#C3"NB F0C#C2"NAlBB7 - mfs04a.which.BQ3#C>"NB8*"#C>"NB@" CAB$@#AlA3A#C:"NBhRA#CC:BNC4 #W #XB!CgBv;%A#"NCAlA #B76!+yG-A14EJ 17<&(7l?T0}h 8rYs*uKwy {,|~ 0 - mfs05a.which.BQ0mfs05v.holdflag.BQ3#C1"NB!N@c/#c2"N#bNalBB7 - mfs06a.which.BQ1#"NBB7 - mfs07a.which.BQ?BB 3#C="NB CB B7 /mfs08v.itemref.BQ/mfs08v.trigger.BQ.mfs08v.enable.BQ.147q 15 1!!7# 33T0}h 8rYs*uKwy {,|~ 0!YK#c bcd bcda'AlB7 /mfs09v.itemref.BQ/mfs09v.trigger.BQ!]O#c  bcd bcda'AlB7 /mfs10v.itemref.BQ.mfs10v.enable.BQ!#c bcd ?c d&c, d "" bcda'AlB7 0mfs11v.openpath.BQ0mfs11v.openfile.BQ,CBAA&B# @CBg$@#AlA%@#BT+@CCB  @BT2q| 33 32 440'()/T0}h 8rYs*uKwy {,|~ 0}  TQیQN  )@CAA&B$@#Al@A5@@CCC0bB@@CAK'C' C9C4 #W #XB!CgBvN'C' C&C4 #W #XB!CgBvB@AA #B7  'Ch#BQ'Ce#BQTB`~ @ ;%C{  #z" BB1CAB B%B%@ZA!B7" C A+@BAA&BC-@B B B B%BE/@ mfs20a.reportnames.wrn.*.bzBX!YD@ #baa # #b`"B7@A@A" C A)@CAA&B+@BAA&B'@ AABC-@ B B B B%B@D-(!9!#++!?5)&/GI|!!&-/+T0}h   8rY s *uK wy {,|~ 0}  TQیQN    J4@##Bwrn.*.bzB@AA&BV@@= ROWS(!##B)#B`YC@= COLUMNS(!##B)#B` $@@9AL $@@9AM ! @&B  Sheet2n@J= SET.VALUE(offset(tb04r.top.,1,0,mfs20c.sections.,),!##B)#Bb !1 #A#cC"NyAlL  6A#cC"N#dC"NB2 L  6A#cC"N#dC"NB2    !   qA#dC"Nc #dcbNab% ##dC"NbAl 5  A#dC"NB7  @A @ A@ A@A@A" C A)@CAA&B+@BAA&B'@ AABC-@ B B B B%B(@BA&BJ4@##Bwrn.*.bzB@AA&BcM@$= RETURN(INDEX(!##B,1,3))#B`/@9"B7@A@A@ A @ AD lNZ]66@b^^G!!!!!&-/+G,Ng3!!! T0!"#}h&'()*+ ,8rY-s.*uK/w0y1 {,2|3~ 4506789}:;  >TQ?ی !@A!"@A"#A!#( ZA!B7 & ''()Ce#BQ)+B` * ;+,%C{  #z" BB%,-CAA&B+-.@BAA&B'./@AABC/0-@ B B B B%B(01@ BA&BJ124@##Bwrn.*.bzB@AA&B,23@B A&B034@##BBnB745@A56@A67@ A78@ A89@A9:@A:;A!;@ ZA!B7 > ?<5!!%+!?)/+G,N04!!!!!!%@T0ABC}hDEFGHI J8rYKsL*uKMwNyO {,P|Q~ RS0TUVW}XY  ZTQ[ی\QN ] ^ _'@ACe#BQ"AB Ck@BQ'BCC\#BQCEB` D DSEEE!2EEG$mfs22a.sectionsarray.Ck!BX FF;GH%C{  #z" BB%HICAA&B H+IJ@BAA&B I'JK@AAB JCKL-@ B B B B%B K(LM@ BA&B L,MN@B A&B M+NO@#B B N O"O?P @#AL PP?PP!*PPQ@#bafs P QQ?QQ!*QQR@#bafs QzREVd@CC =#C4 #l #m"#A#?#F" "B$B R S S  S T T T U U U V!VW @LB[REPORTS.XLS]Reports XLM W!WX @&B  Reports XLM8XY"@mfs22v.section.CB X Y+Y*Z@#CB Z+Z*[@#CBB[\,@#AM #CBAB%B [#\] @CBg \]^@A ] ^_ @BT/_`@#CBBg _D& l+&+!U?7=9U:>=4ii***REJ==T5/$`T0abc}hdefghi j8rYksl*uKmwnyo {,p|q~ rs0tuvw}z{  |TQ}ی~QN   `a @BT9ab#@D_AZA!B7B abc@A^cdH@CAA&1C"eB@AZA!B7"B c^deH@CAA&1C"\B@AZA!B7"B def@A e#fg @CBg fDgh.Atb04.Sections.#cC"NBX ghhh!-hhiA#_"NcAl hIij3@#_"CA #BAl ijjj!VjjkHA#_"N#aM  ##"bAl j kl @BT llll!3llm%@##B#_aZB= l mn @BT#no @#B7 nop@A opq@Aqr@Ars@ Ast@ Atu@Auv@AvwA!w| ZA!B7 z {'|}Ce#BQ'}~CQ#BQ~B`*@D$K!pp/5V^[$r$5/!!!!!!%++!T0}h 8rYs*uKwy {,|~ 0}  TQیQN   *;%C{  #z" BB'BAA&B'@AABC-@B B B B%B(@ BA&B ,@ B A&B '@GAA&B.@#{CdBsAlC-@#ud01.PrintReport.idBB )@C|AA&BH2@#CACAABAl?)@# ud03.Print.ihdxBB+@#tC|B testrept'@#ICAl'@#CCAl]G@#G'C7C6'''Bx'!mcp03.CustomRepeatPrint.AlgQ@#HCc "CA 2 C/Bs... #B"AlA+@CaA CA CA   B*@##ZB@AP:@#= Ca("C",C)B@A1@###"B7@A  @B7@A@A  @B7@A@A  @B7Dl ?++G:>+2U-LC>++akE.!T!5!$!!$!!T0}h 8rYs*uKwy {,|~ 0}  TQ@A@ A@ A@ A@A@AA! ZA!B7  'Ce#BQ'CQ#BQ'Cf#BQB`;%C{  #z" BB%CAA&B+@BAA&B4@AAGAA&B$B C-@ B B B B%B(@ BA&B ,@B A&B J4@##Bwrn.*.bzB@AA&BH2@#CACAABAl)@CAA&B# @CB'@#CAl>(@# ud03.Print.idvBB:!!!!!!%+++!?)/FG:>NL-'+T0}h 8rYs*uKwy {,|~ 0}  TQیQN '@#CAl@A  @B7@A@A@A1@###"B7@A@A@ A@ A@A@AA! ZA!B7 # #BQ# #BQ   ~ ?C-mfs25a.sectionsarray.##"BX'#B B  "@ @#AL    !*@#barr    @!*@#barr   !( @LB[Report in 95.xls]Sheet2 7!@ mfs25a.Pages.#"BX &@#AM zEd@CC =#C4 #l #m"#A#?#F" "B$B >0+!$!!!5!!!!!!%''G9Bii`;FT0}h 8rYs*uKwy {,|~ 0}  TQیQN   %@C#Bz 8"@mfs25v.section.CB A+@mfs25v.thepage.#C"BX/@#CAB%B # @ CBg@A@ C#B@AgCC 'C' C:C4 #W #XB!CgBvZA!bzB$B7B# @ CBg@A +\@#CBtest2  +Fh@#CB Sheet2  +*@#CB r@\@CC EBT mfs25a.views.A BX mfs25a.views."eBXBTB zd@CC MBTmfs25a.scenarios.A BXmfs25a.scenarios."\BXBTB F@CAA&C#B@AC (C)#B@AgCM 'C' C:C4 #W #XB!CgBvZA!bzB$B7""B @CAA&C#B@AgCF 'C' C:C4 #W #XB!CgBvZA!bzB$B7"B y@c@CC L _Current_#B@AA&"BT _Current_BBT"B yc@CC L _Current_#B@AA&"BT _Current_B2BT"B @@CC BT _Current_BARC@C4 #W #XB!CgBv  #ERROR"BBTB 9#@DAZA!B7B@CC BT _Current_B3ARC5C4 #W #XB!CgBv  #ERROR"BBTB 9#@DAZA!B7B@A 1@@#A Al#A Al   !+@##B "8"@mfs25v.section.CB  #]xG@ ##CBAB% ##C"B Sheet2 $ %+@ #CBtest2 +F@ #CB Sheet2  &+*,o@ #CB@ C  'C', 'C/CA #R #B/CA #R #B'...Bz '# @ CBg (Dl7JEA'!'!WXK==/CKJIX=T0}h   8rY s *uK wy {,|~ 0}  TQیQN     @ BT ; ; )F@ CAA&CA6CBAC (C)B"VCC6CBAC (C)B" "" B xb@ CANbzCJ'C'CK'C'CLBvZA!B$B7B *~h@ CAA&KCA CB5-CC CB5 "" B +xb@ CANbzCG'C'CH'C'CIBvZA!B$B7B  @ BTcCM@ C@ 4#1BA1BBAlB , @ C  'C', 'C/CA #R #B/CA #R #B' C...Bz -   @ BT .E  /@ CCBB / 0)  @ CB 1   @ BT& @ CAB 2P:@ C1C4 #W #XB!CgBv%@ C"BzE*/@ #"##CC CC B/@ bzZA!B$B7@ A*@ C@ B 3%@ C"Bz 4E/@ #"##CC CC B*@ bzB$B7@ A 5 @ Ctest2 6*.o @ C 7'@@ C2B 8@A %@C"BzE*/@#"##CC CC B*@bzB$B7 @AD l$||$u2WI$8T)I3!<7I.!=1G/)I. T0!$&}h'*,-.1 38rY4s5*uK6w7y8 {,9|:~ ;<0=>? !A !9!!& ZA!B7 $:2&'mfs26v.reportname.BQD',.wrn.C AvdBs ._.Bx.B7 *;2,-mfs27a.definename.@BQ-.@B`...!7..3)c c a a._. bxB7 1<+34 mfs28v.xla.BQ-45 mfs28v.noxla.BQ.56mfs28v.nolink.BQ167mfs28v.alertflag.BQ/78mfs28v.lastxla.BQ89B79:B [Book1]Sheet10:;Cb]B@AB<;<&@CC7C0bB@AB6<> @CC0bB@AB ==>?@A?@q@ #B{B{BtC< #< B#B)BTC !auto_openBBTB2,36H6!Z/1253 54@:!@T0ABC}hDEFGHI J8rYKsL*uKMwNyO {,P|Q~ RS0TUVW}XY  ZTQ[ی\QN ] ^ _@A@AAB@A^BCH@##7#B)BTC !auto_openBBTBCD@ADEA3EFCb]B@AA&B,FG@CBC<$!C:\WORK\XL5\LIBRARY\REPORTS\TEMP\:GH$@C6bgBAA&B?HI)@CCC6bgB@AB7I?J!@ *CC6bgB@)JK@ CAA&B#KL @ C6Bg$LM@ BBDMN.@C6bgCBCCB$NO@#AlOP@ APQ@ A7Q*R!@ *CC6bgB@)RS@ CAA&B#ST @C6Bg$TU@BBDUV.@C6bgCBCCB'VW@#CAl$WX@#AlXY@AYZ@ AZ[@ A[\@A$\]@ #Al]^@Au^__@C KC:CC4 #W #XB!CgBv"B_`@ADl!!b!7X>C;-'(H(!!;-'(H+(!!!!(!y`T0abc}hdgijkl m8rYnso*uKpwqyr {,s|`aAaabK@C:CC4 #W #XB!CgBvBbcAcd CBgdi #B7 g>0ijmfs30v.vsparray.@BQ2jkmfs30v.ActivePage.BQ j?.klmfs30v.fViews.BQ k@2lmmfs30v.fScenarios.BQ lA7mn!mfs30v.section.#'ALBRno<@#'C&BAA&#'C&BbgB nBZopD@C%3BT _Current_B _Current_BBTB oCZpqD@C$3BT _Current_B5 _Current_B2BTB pDqrArs C#BgssB7&@e##4D@D;dll#>@  ! @  TmAE  dMbP?_*+%&A Page &P"P??gU}  } } }  } } U} U} } *}  } } } } } } *T!!T0!! ! ! !!! !  !  !8rY !s/ !*uK!!w$!y% {,'|~ 0 /}$ TQیN T  E F              G H I .~  @  ~  @ J K L &M$ N*++,*++, &O P Q R S T U V W X Y U Z [ \  ] &^ '_$-k@$$@$T@  . -@o@$@$V@. '` * +~ +$@ +a~ +@ ,b <c= =d~ = @ =e=?=,@ =f  >g 'h 'i$-k@$D@$T@  . -@o@$;@$V@. 'j - $~ $$@ $k~ $@ .b D  'l$-k@$`a@$T@  . -@o@$^@$V@. 'm - $~ $$@ $n~ $@ .b 'o p 'q$-k@$@P@$T@  . -@o@$I@$V@. 'r - $~ $$@ $s~ $@ .b 't u 'v $ -k@$V@$T@  . -@o@$R@$V@ . 'w / 0~ 0$@ 0x~ 0@ 1b 'y z '{ $ -k@$\@$T@  . -@o@$X@$V@ . 'I '| } '~ $ -"@$"@ $.  -"@$"@ $. ' '  ' $6 /"@0A@0i@1`@/"@0<@0l@1_@ ) )  ' $  '$    '$ .~  @  ~  @ &  '$ *++,*++, ' & '$-0v@$$@$Q@  . -`x@$@$[@. ' ' '$-0v@$D@$W@  . 2`x@!>@![@3 ' 'o  '$-t@$0s@$W@  . 2`x@!K@![@3 ' '  '$-t@$_@$V@  . 2`x@!@W@!X@3 ) '  '$-t@$k@$W@  . 2`x@!k@![@3 '  '$-t@$`o@$W@  . 2`x@!n@![@3  '|  '$-t@$pq@$W@  . 2`x@!p@![@3 & '  '$-"@$&@$[@  . 2$@!$@ !3 '2'  '$-@`@$"@$g@  . 2@_@!$@!o@3 )5 5  '$6-"@$E@$@u@.Q@2$@!B@!w@3D@'  '$6-"@$^@$`s@.R@2$@!T@!~@3]@ 5  '$22@!@W@  !3  22@!@W@ !3 5  '$22@!@]@!L@  3 22@!@]@ !3 5  '$2@Z@!\@!q@  3 2@Z@!\@!q@3 '  '$26@!a@!V@  3 26@!a@ !3 '  ' $ 2@_@!a@!o@  3 2@_@!a@!o@ 3D\lp H|44z\nj|~~!T0"#$% &'( )* +8rY,s-*uK.w$/y0 {,1|2~ 3405678}9: ;TQ<ی=N >?T@ !' ! !'!$!26@!d@!W@ ! 3! 26@!d@ !!3 "' " "'"$"2@_@!d@!o@ " 3" 2@_@!d@!o@"3 #5 # #'#$#-"@$i@$h@ # .# 2$@! j@ #!3 $' $ $'$$6$-"@$l@$`s@.V@2$@!l@!w@3Q@ %6 % %'%$%/"@0s@ % 01 % 8$@9 r@ %9: & &'&$ ' ' '''4 ( ((($ (.~ ( @ ( ~ ( @ )& )$$ ) )')$ ))*++,*++, *' *$$ * *'*$*-a@$$@$Y@ * .* -d@$"@$^@*. +' +$4 + +'+$+-a@$D@$Y@ + .+ -d@$@@$^@+. ,'o ,$$~ ,' @,$,-a@$P@$Y@ , ., -d@$K@$^@,. -' -$$ - -'^-$--"@$2@$P@ - .- -"@$2@$^@-..) . .'.$./Q@0.@0I@ . 1. /T@0.@0I@.1/'/$0'0$ 1 1'v1$ 19 1 9 1 9 1 9 1 9 1 9 19 19 2 2'2$ 3' 3$ 4' 4$ 5 5'Q5$ 6 6'6$ 7'D7$ 8'8$ 9'9$ :':$ ;';$ <'<$ = ='=$ >'>$ ?'?$ @'@$D l~~n|&4^j|&&&&AT0BCDEFGHIJ K8rYLsM*uKNwOyP {,'Q|R~*S A A'A$ B B'B$ C C'C$ D D' E E' F F' G G' H H( I I' J J' K K(F L L(F M~ M' @ N~ N'@ O O' P P) Q? Q@ Q RA RB S  S' *h&&&*>!@444  &A Page &P"PFdSta??de> P  &A Page &P"PFdSta??de> P (Private) Module=CustomRepeat Wrapper Document=ThisWorkbook/&H00000000 HelpFile="" Name="VBAProject" HelpContextID="0" CMG="1311E211F115F115F115F115" DPB="2624D706F90A011701175607D317521ED1E6452D986FB9" GC="393BC82DC92DC92D" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] Reports VBA (Private)=0, 0, 0, 0, C CustomRepeat Wrapper=22, 22, 553, 447, C ThisWorkbook=44, 44, 492, 382, __SRP_2 __SRP_3__SRP_4 __SRP_5e__SRP_6 __SRP_7@ThisWorkbook|n_VBA_PROJECTH CustomRepeat Wrapper*Reports VBA (Private),       !"#$%&'()*+xG}Kxc P (L6 LLL P2"*\Rffff*532715175*\R1*#20a*\R1*#ac*\R1*#20b*\R1*#b8*\R1*#20c*\R1*#c1*\R1*#b4H+`H+  hpX @d$ x`$ \$`"Z @$((X`l ̠$@d@T @fP @hpL @jH @lDO @n@ @p0 @r,O @t ME!"   B  08@HP  X'p'L1    0 @P h x   xp Local variablesZ@ZxZZZ Initialisation $!&. $!(.  !* !* *' needed because Dim requires a constant̤'" Main loop   ! "+ " '"    ! "+ " '"  Set return value 'fPHAttribute VB_Name = "ReportsA (Private)" Option Base 18D ModuleNFuncRmfs29_GetSheets _() Aariant ' Local vbles`Dim v4wJWorks[/rgXlss  mi Integer' Initialisag Set 1H= AsveBbpook.F_m Excel4 MacroSRey0.CountT +7m)' needed `becaurequires a const>i>mMain loopFor Each< w@=8 v(i)@w.Ai'DNext nwCm9' Ueturnlu ,vC@ End E x +Kx 10(N> "LLLL<4<8<<< P2"*\Rffff*432715175*\R1*#15d*\R0*#10*\R0*#c"*\Rffff*63271517a*\R1*#c1*\R1*#ac*\R1*#20b*\R1*#b8*\R1*#208*\R1*#a7*\R1*#20cca.ImsToLocal.$#0x`kX  i2 #8 `k i `:j`<h`>X D`k`  /iF iH iJ  Lh$ R,$+^`r+ :.H @x,PXPxh`0l P 46@d\ @fL @h< @j, @l 0`8l H@B@dT @fD @h4 @jX2 p0@l0 X@n @p @r X%x`x@Dl x/PTV08X@dd @fT @hP @j@ @l00 @nH @p` @rx @t @ @ @ xx`^z x:$@dt @fr @@hME =  ( H \` 6 R PP B   F B8% )    (B  (8@` 7x 4 +  P X` h ^ PB 8@<FH<FRRg( F RB( ,0@Px ** Do not localise **Zca.ImsToLocal.@ ImsToLocalU Uses a scratch local (non-IMS) macrosheet to translate punctuation in the supplied/ (assumed to be IMS-style) recording formula.K NOTE for XL95: This function was partially disabled because we switchedI the default VBA language. We nolonger need the conversions from US to local language.Dim vTmp As Variant 2$4? thisworkbook.Names.Add Name:=VBA_IMSTOLOCAL, RefersTo:=fmlaIMS< vTmp = thisworkbook.Names(VBA_IMSTOLOCAL).RefersToR1C1Local 2$= 2 2 $6'0a@ 2'0h0h(f  DoubleQuotes! ISSUE: Is this really needed?xZZ $@String :   :$"$ B >"$ B "$ B '>a@ >  :$ '>h : >'8a '8A propagate unrecognised arguments (eg: errors, or missing values)hf CustomRepeatWrapperW Replacement for XLM CUSTOM.REPEAT() function to fixup VBA representation of recordedJ formulas. Behaviour for repeat strings should be identical to the XLM. Zlt03c.VbaRecPrefix. Loc Table P%%N.LZlt03c.VbaRecSuffix. Loc Table P%%N.R̞ J$T J$VF L J$0$8 R J XB@Zg̞ H$T F$T H$V F$VF H F XB@\gfx?Function to detect whether or no the active workbook is shared.LWe disable Adding, Editing and Deleting Reports in XL95 when book is shared.̏ $!`'^fAttribute VB_Name = "CustomRepeat Wrapper" Option Exp licitH' ** Do not localise$ ConstA_IMSTOLOCAL As Sngca.ImsToJL6.`'  ' Uses a scratchb (non-V) macrosheet to translapunctuain th e supedW(assume"dbe &-style) re cordiQfo@rmula.NOTE XL95: This f3was partially disabl.becaurw?wi`?Hd efaul language. Welonger neQ^convers5:rom US]L PriZvFN(al fmla{dVariant)@Dim vT mpJd If N{(IsErrHor(D))DeHn  ']isworkbook.s.AddB A:=VB , Ref7To:=D =P().R1C1#,Left*, 1)=", - Righ Len; -@ElseGG]5End@RC mCDou@QuotesC{ISSUEIsDAed?vu ?Aa?im!vInte@Q, M`iGcD A .(Type=(v-C"D For! $1 To 9,v)CMid(v6Chr0$(34vv+ FGg -5K (h5 Nexta , M' prop$aguungnAd arg nts (eg: "eals, $missvalue~s$wGĸCH@lacement$M CUM.REPEAT()'fixupaM0presCof/ ŚDsBehaviourB rss sh ould id i!XLM P^ic &pON$T, cmdsRb)cf<RECORD_PREFIXR~SЯ=(isWESs("@ T"@("lt03c.VbaPre.."am SUFm___. +Suf+8_M(P) Or Is0Null: _ Axcb$[1$M|K+GPn(lZg+,un  "D ѐ?  [_YOn)  `0P9detect whe`3rAn active w psharendЅԉ xD, EditaEaPN0Dele or0H_an |qIsS"C7BooleaQVA 0MЏir a^  *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#c:\excel96\VBA332.dll#Visual Basic For Applications*\G{00020813-0000-0000-C000-000000000046}#1.2#0#c:\excel96\excel8.olb#Microsoft Excel 8.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\SCHOOL\stdole2.tlb#OLE Automation*\G{3D6E0824-7AED-11D0-9F7E-00A0C905429D}#2.0#0#c:\school\MSForms.TWD#Microsoft Forms 2.0 Object Library*\G{5775BEC6-2C2A-11D0-889F-00A0C90A90BF}#2.0#0#C:\TEMP\VBE\MSForms.EXD#Microsoft Forms 2.0 Object Library.E .`M   P2Kx*Reports VBA (Private) 532715175*D (CustomRepeat Wrapper 432715175*D,01ThisWorkbook 63271517a*DQy0P0cD4 . eD4 . gD4 . 0BC- Excel+ VBAWin16~Win32Mac VBAProjectstdole`MSFormsC Reports VBA (Private)a _Evaluate(mfs29_GetSheets_qvmwm WorksheetrgXlsMSheets rgXlmGi`ActiveWorkbook WorksheetsExcel4MacroSheetsɷCount0v CustomRepeat Wrapper5VBA_IMSTOLOCAL ImsToLocal%ffmlaIMSLIsErrorURight  DoubleQuotesvichichMinvv_TypeNameChrK~(CustomRepeatWrapperA fmlaIMSRepeatm cmdRepeat fmlaIMSRecordJ VBA_RECORD_PREFIX/Range  ThisWorkbook|VBA_RECORD_SUFFIXX IsMissingIsNull Application* RecordMacroOnRepeat(IsSharedhMultiUserEditingwaWorkbookk_t0b_t1c_t2d_t3e_t4f_t5g_t6h_t7i_t8j _B_var_LeftQ _B_var_Right9 _B_var_Midp _B_str_Chrm#_Defaultj_t9k_t10t_t11t`  -Q 6<iD4 . FhD4 . xX6Kxy#hD4 . iD4 . t4(SLSS6"N0{00020819-0000-0000-C000-000000000046} P2"*\Rffff*63271517a($H` $P $`h8@hh0MExAttribute VB_Name = "ThisWorkbook" Bas0{00020P819-0C$0046} |CreatablFalse ^PredeclaIdTru "@ExposeTemplateD0eriv$eCustomiz2rU @prU H1 Y 4  crU $`prU~}  1Y('PT"$ HT QP`T'PT"$ HT QP\T1L` 0lLH\ 0lHhpZl`dD@d H>@F0kZlhR50 kZpZ dDl\d,@d H>@F0kZlhR50 kZpZ d,lhM l`(H.lD,\`dh@TP0krU (`a(`y0` $`prU~}  iA q P q  1 i ) |l q%l\  \:L]/<5\\a)L\(,<"l  lo Ll `|(l\<Hl #T0/TjD4Uc07(4kjl  " F]/64 \4X" F4 " FX64 +X(4kjl  X64  jd02 Xl Dl |,lX T4 F:@ %P:T %d"$  d d P0h)dP50F:@%P:T %d"$  d d P0,)dP50l l yha l0 0 ,a T% %d"$ d d6 0 )l l l l > @Td"$ d P2d0lh,4 dP0 h4,r t"$ Ht  krpzt 4$ t\rU~}   fmlaIMSv fmlaIMSRepeat cmdRepeat fmlaIMSRecord  ]K)^rU~~~~~~~~~~~~~~~~~~L aD4 .   a )Ia )x a  IY VBAProjectReports VBA (Private)CustomRepeat Wrapper ThisWorkbookFc:\excel96\VBA332.dllVBA q (Fc:\excel96\excel8.olbExcel 9a80FC:\SCHOOL\stdole2.tlbstdole 1iHV4. c:\excel96\MSForms.TWDMSForms  AX.E .`M ƾuW*, C:\TEMP\VBE\MSForms.EXD Ah ImsToLocal DoubleQuotesCustomRepeatWrapperIsShared mfs29_GetSheets_FyFyFFF VBA332.DLL / i  = k O  String x   0iD4 . FhD4 . DFWorkbook @ lt03c.VbaRecPrefix. Loc TableRangeFF lt03c.VbaRecSuffix. P p 0 FV0* pHd VBAProject4@j = r  P2 J< rstdole>stdole ^%T*\G{00020430-C 0046}#2.0#0#C:\SCHOOL\[2.tlb#OLE Automation#VMSForms>!SFArms/r hB3D6E0824-7AED-11D0-9F7EBA0C90 5429DBc:\school\/.TWD#Microsoft E9 X Ob Library50j;5775BEC6 -2C2A;889F;A90BF~TEMP\VBE