home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / vb_code1 / landau / firminfo.bas < prev    next >
BASIC Source File  |  1991-12-18  |  30KB  |  493 lines
  1.  
  2. Sub SetApplicationsText ()
  3.      Dim Text As String, crlf As String
  4.      crlf = Chr$(13) + Chr$(10)
  5.  
  6.      Applications(0) = ApplicationsText
  7.  
  8.      Text = Text + crlf + crlf
  9.      Text = Text + "Real Time Financial Swap Trading/Hedging System"
  10.      Text = Text + crlf + crlf
  11.      Text = "System automates the pricing, marking to market, and hedging of a portfolio of financial "
  12.      Text = Text + "swaps.  In addition, there is a live link to market data via a network server. And finally, "
  13.      Text = Text + "daily profit and loss information is uploaded to the mainframe for comparison to the back "
  14.      Text = Text + "office system. "
  15.      Text = Text + crlf + crlf
  16.      Text = Text + "This application utilizes a number of advanced Excel features such as access to external "
  17.      Text = Text + "databases through  macro driven SQL statements passed to Q+E via DDE calls.  It also "
  18.      Text = Text + "incorporates a set of  DLL routines written in 'C' accessible via macro linkage."
  19.      Text = Text + crlf + crlf
  20.      Text = Text + "The system is deployed globally. Users reside in New York, London, and Tokyo."
  21.      Applications(1) = Text
  22.  
  23.      Text = Text + "Client Presentation System"
  24.      
  25.      Text = "Developed for an investment management firm in Boston as a marketing tool, this system "
  26.      Text = Text + "enables the principals of the firm to communicate their approach to money management "
  27.      Text = Text + "by interactively developing a number of scenario based horizon analyses at the client's "
  28.      Text = Text + "location. The application was developed using Excel and runs on a 16 mhz 386SX "
  29.      Text = Text + "portable computer. The client is able to:"
  30.      
  31.      Text = Text + crlf + crlf + "  *  establish his or her view of future interest and foreign exchange rates;"
  32.      Text = Text + crlf + crlf + "  *  develop a model portfolio of multi-currency fixed income securities;"
  33.      Text = Text + crlf + crlf + "  *  pick a currency allocation (i.e. how the clients portfolio should be distributed by currency), and"
  34.      Text = Text + crlf + crlf + "  *  select a horizon period."
  35.      Text = Text + crlf + crlf
  36.      Text = Text + "These choices are then used to forecast the value of the portfolio at the horizon and break "
  37.      Text = Text + "the results down between returns earned from bonds vs. currency speculation. Using a "
  38.      Text = Text + "library of DLLs, the system is able to produce horizon results in a matter of seconds. The "
  39.      Text = Text + "client can then easily modify the financial scenario and portfolio, rerun the analysis, and "
  40.      Text = Text + "compare the results of one run to another. This application  relies heavily on the use of "
  41.      Text = Text + "charts which depict client vs market views, and horizon analysis results."
  42.      Applications(2) = Text
  43.  
  44.      Text = Text + "Liability Management System"
  45.       
  46.      Text = "Developed as a marketing tool for a major New York investment banking firm, the "
  47.      Text = Text + "system is used to evaluate portfolios of debt obligation. Different types of debt "
  48.      Text = Text + "instruments are modeled to measure a common set of results and test alternative "
  49.      Text = Text + "strategies. Using this system, the investment banking firm has been able to show clients "
  50.      Text = Text + "how they can restructure debt service in order to lower costs and improve overall "
  51.      Text = Text + "corporate profitability. The firm uses the application in its New York, London, and "
  52.      Text = Text + "Tokyo offices. "
  53.      Applications(3) = Text
  54.  
  55.      Text = Text + "Asset Based Swap System"
  56.      
  57.      Text = "A state of the art system which prices and values a number of complex synthetic "
  58.      Text = Text + "securities. The application handles various financial structures which are derived by "
  59.      Text = Text + "coupling an asset (e.g. a corporate bond) with a swap. By doing this, synthetic floating "
  60.      Text = Text + "rate or fixed rate instruments can be created and marketed to the investment community. "
  61.      Text = Text + crlf + crlf
  62.      Text = Text + "The system relies heavy on 'C' written subroutines called from Excel macros. In "
  63.      Text = Text + "addition, several calculators have been incorporated into the system. These  allow the "
  64.      Text = Text + "trader to quickly determine the trade-offs which exist between the costs of individual "
  65.      Text = Text + "structure components and the final price for the package. This unique and powerful "
  66.      Text = Text + "feature enables the client to respond quickly to market movements in order to lock in "
  67.      Text = Text + "profit on prospective deals."
  68.      Applications(4) = Text
  69.  
  70.      Text = Text + "Financial Allocation System"
  71.      
  72.      Text = "Developed for one of the Regional Bell Operating Companies (RBOC), this system "
  73.      Text = Text + "compares corporate financial results under varying common cost assumptions. As a result "
  74.      Text = Text + "of FCC regulations, all RBOCs are required to allocate expenses which are common to "
  75.      Text = Text + "their regulated and non-regulated companies in a prescribed way. Unfortunately, these "
  76.      Text = Text + "allocation rules are not always consistent with true economic costs. This Excel system "
  77.      Text = Text + "enables the client to change allocation assumptions quickly and measure the results for "
  78.      Text = Text + "the regulated, unregulated and total corporate financials. The system is used by the "
  79.      Text = Text + "marketing organization in order to determine the financial impact of providing "
  80.      Text = Text + "unregulated services. Financial statements are constructed reflecting varying views and "
  81.      Text = Text + "scenarios."
  82.      Applications(5) = Text
  83.  
  84.      Text = Text + "Profit and Loss Analysis System"
  85.      
  86.      Text = "This system was developed in order to compare the back office and trading desk views of "
  87.      Text = Text + "financial interest rate and currency swap profit and loss. It retrieves and reconciles data "
  88.      Text = Text + "from a mainframe back office system and a PC-based trading system. Spot data for two "
  89.      Text = Text + "points in time (e.g. daily, weekly, monthly, etc.) from each system is linked together and "
  90.      Text = Text + "compared for each transaction. The transactions can then be organized in any order. "
  91.      Text = Text + "Transactions with large back office/trading desk discrepancies are viewed using a ZOOM "
  92.      Text = Text + "feature, where all of the relevant data associated with a suspicious trade can be "
  93.      Text = Text + "instantaneously transferred to an analysis model. From there, a determination of probable "
  94.      Text = Text + "errors is made, with resulting corrections implemented. The system has increased the "
  95.      Text = Text + "client's ability to control the trading operation."
  96.      Applications(6) = Text
  97.  
  98.      Text = Text + "LDC Debt Trading and Analysis System"
  99.      
  100.      Text = "One of the first of its kind, this system keeps track LDC debt trading activity and interest "
  101.      Text = Text + "information, and generates daily profit/ loss reports. In addition to monitoring trading "
  102.      Text = Text + "activity, the system maintains a database of information for securities, daily marks, "
  103.      Text = Text + "accrued interest, financing data, payments/receipts, and counterparty/ contact listings. "
  104.      Text = Text + "Written in Excel and using DDE to communicate with Q+E, the system updates various "
  105.      Text = Text + "database files in such a manner that the data can be combined, segmented and analyzed in "
  106.      Text = Text + "a number of ways without sacrificing the integrity of the original data.  After daily "
  107.      Text = Text + "profit/loss statements are produced, the system generates detailed interest accounting "
  108.      Text = Text + "reports which are uploaded to the mainframe accounting system."
  109.      Applications(7) = Text
  110.  
  111.      Text = Text + "P&L SWAP Reconciliation System"
  112.      
  113.      Text = "Excel-based system used to reconcile all weekly profit/loss discrepancies between a PC-"
  114.      Text = Text + "based trading inventory system and a mainframe accounting system. The system accepts "
  115.      Text = Text + "a wide variety of mainframe data which is compared to the trading system on a "
  116.      Text = Text + "transaction-by-transaction basis. The system allows for the 'point and click' creation of a "
  117.      Text = Text + "wide variety of data views which expedites the process of reconciling and closing the "
  118.      Text = Text + "financial books for each accounting period."
  119.      Applications(8) = Text
  120.  
  121.      Text = Text + "LDC Graphical Analysis System"
  122.      
  123.      Text = "Designed for an Emerging Markets Trading group of a major investment banking firm, "
  124.      Text = Text + "the system uses Excel and Q&E to track and graph daily market information for LDC "
  125.      Text = Text + "debt instruments. Traders use the system to review trends and abnormalities in LDC "
  126.      Text = Text + "market behavior over time. The system features an intuitive user interface which allows "
  127.      Text = Text + "for the creation of  multi-security graphs and a variety of views from a minimal number "
  128.      Text = Text + "of mouse clicks. Graphs based on price, coupon, yield, and a variety of other relavent "
  129.      Text = Text + "variables are easily produced."
  130.      Applications(9) = Text
  131. End Sub
  132.  
  133. Sub SetBiographiesText ()
  134.      Dim Text As String, crlf As String
  135.      crlf = Chr$(13) + Chr$(10)
  136.      
  137.      Biographies(0) = BiographiesText
  138.  
  139.      Rem Michael Landau
  140.  
  141.      Text = "Michael has been designing, developing, and implementing computer based "
  142.      Text = Text + "solutions for more than 20 years. During that time he has developed systems "
  143.      Text = Text + "at all levels of the corporate data processing architecture using a variety of "
  144.      Text = Text + "tools. His systems are used daily by numerous Fortune 500 companies for "
  145.      Text = Text + "solving complex business problems. Michael was a pioneer in the Personal "
  146.      Text = Text + "Computing industry, having begun a software business in 1979 utilizing this "
  147.      Text = Text + "technology to improve corporate results through increased revenue "
  148.      Text = Text + "production and/or decreased operational expenses."
  149.      Text = Text + crlf + crlf
  150.      Text = Text + "Recent systems developed include:"
  151.      
  152.      Text = Text + crlf + crlf + "  *  Swap Trading System"
  153.      Text = Text + crlf + crlf + "  *  Swap Hedging System"
  154.      Text = Text + crlf + crlf + "  *  Swap Pricing System"
  155.      Text = Text + crlf + crlf + "  *  Synthetic Securities Tracking and P/L System"
  156.      Text = Text + crlf + crlf + "  *  Synthetic Floater Advanced Calculator"
  157.      Text = Text + crlf + crlf + "  *  Client Portfolio Presentation System"
  158.      Text = Text + crlf + crlf + "  *  Financial Allocation System"
  159.      Text = Text + crlf + crlf + "  *  Business Planning and Analysis System"
  160.      Text = Text + crlf + crlf
  161.      Text = Text + "Prior to forming Landau & Associates, Michael was Director of Strategic "
  162.      Text = Text + "Planning at AT&T's Computer System Division. During this time he had "
  163.      Text = Text + "responsibility for the development of the financial services, education, and "
  164.      Text = Text + "international markets. In addition he was Senior Vice President and Chief "
  165.      Text = Text + "Operating Officer of The Ventus Group, a Washington, D.C. based "
  166.      Text = Text + "consulting firm specializing in Soviet technology based joint ventures."
  167.      Text = Text + crlf + crlf
  168.      Text = Text + "Mr. Landau has extensive experience in all aspects of computing at the PC, "
  169.      Text = Text + "workstation, and mainframe levels in the corporate data processing "
  170.      Text = Text + "architecture. In recognition of his expertise, Microsoft has designated him a "
  171.      Text = Text + "Consulting Relations Partner."
  172.      Text = Text + crlf + crlf
  173.      Text = Text + "Michael holds a Bachelor of Science degree in Economics and a Masters of "
  174.      Text = Text + "Science degree in Quantitative Analysis from New York University."
  175.      Biographies(1) = Text
  176.  
  177.      Rem Suzie Akers
  178.  
  179.      Text = "Suzzie Akers Biography"
  180.      Biographies(2) = Text
  181.  
  182.      
  183.      Rem Brad Crysel
  184.      
  185.      Text = "Brad has developed numerous PC/Windows based applications for "
  186.      Text = Text + "leading corporate clients. His applications solve complex business "
  187.      Text = Text + "problems using state of the art computing tools and are specifically "
  188.      Text = Text + "designed to be easy to use. "
  189.      Text = Text + crlf + crlf
  190.      Text = Text + "Systems developed include:"
  191.      
  192.      Text = Text + crlf + crlf + "  *  Swaps Trading System"
  193.      Text = Text + crlf + crlf + "  *  Comptroller Profit/Loss Comparison System"
  194.      Text = Text + crlf + crlf + "  *  LDC Trading System"
  195.      Text = Text + crlf + crlf + "  *  Interest Tracking System"
  196.      Text = Text + crlf + crlf + "  *  Cash Management System"
  197.      Text = Text + crlf + crlf + "  *  Stockholder Tax & Accounting System"
  198.      Text = Text + crlf + crlf
  199.      Text = Text + "Each of these systems are Windows based, following industry "
  200.      Text = Text + "standards for user interface and therefore integrate seamlessly with the "
  201.      Text = Text + "clients' existing environment."
  202.      Text = Text + crlf + crlf
  203.      Text = Text + "Prior to joining Landau & Associates Brad worked at Morgan Stanley "
  204.      Text = Text + "& Co. in the Fixed Income Division. Brad held positions of increasing "
  205.      Text = Text + "responsibility in the Swaps Trading Group. During this time Brad "
  206.      Text = Text + "developed expertise in a number of financial products traded in "
  207.      Text = Text + "international markets. These include Interest Rate and Currency "
  208.      Text = Text + "Swaps, Forward FX contracts, Libor based Eurodollar futures "
  209.      Text = Text + "contracts, trading confirmation and documentation procedures. Brad "
  210.      Text = Text + "has a unique blend of knowledge of front and back office "
  211.      Text = Text + "trading/system requirements."
  212.      Text = Text + crlf + crlf
  213.      Text = Text + "Brad attended Auburn University, Regent's College in London, and "
  214.      Text = Text + "graduated from the University of Virginia with a Bachelor of Arts. "
  215.      Biographies(3) = Text
  216.  
  217.      Rem Stephen Jasko
  218.      
  219.      Text = "Stephen has been developing PC/Windows and Workstation based business "
  220.      Text = Text + "applications since 1984. His applications solve complex business problems "
  221.      Text = Text + "covering a wide range of disciplines. Stephen's applications utilize state of "
  222.      Text = Text + "the art computing tools and features intuitive graphical user interfaces. "
  223.      Text = Text + crlf + crlf
  224.      Text = Text + "Systems developed include:"
  225.      
  226.      Text = Text + crlf + crlf + "  *  Comptroller Profit/Loss Reconciliation System"
  227.      Text = Text + crlf + crlf + "  *  LDC Analysis System"
  228.      Text = Text + crlf + crlf + "  *  Swap Hedge Analysis System"
  229.      Text = Text + crlf + crlf + "  *  Private Line Bill Reconciliation System"
  230.      Text = Text + crlf + crlf + "  *  Market Data Inventory Control System"
  231.      Text = Text + crlf + crlf + "  *  Telecom Complaint Tracking System"
  232.      Text = Text + crlf + crlf + "  *  Corporate Budget Consolidation"
  233.      Text = Text + crlf + crlf
  234.      Text = Text + "These systems were developed using industry standard software "
  235.      Text = Text + "development tools and methodologies. In addition, they were designed to "
  236.      Text = Text + "seemlessly and easily access data which resides in various levels of the "
  237.      Text = Text + "corporate data processing architecture."
  238.      Text = Text + crlf + crlf
  239.      Text = Text + "Prior to joining Landau & Associates Stephen worked at Merrill Lynch, Dun "
  240.      Text = Text + "& Bradstreet, and AT&T. During this time he developed a wide range of "
  241.      Text = Text + "experiences in telecom finance management, financial budgeting and "
  242.      Text = Text + "forecasting, order processing, automated bill reconciliation, econometric "
  243.      Text = Text + "modeling, statistical evaluation of billing data, direct mail marketing, and "
  244.      Text = Text + "other financially oriented business functions."
  245.      Text = Text + crlf + crlf
  246.      Text = Text + "Mr. Jasko has extensive experience in all aspects of computing at the PC, "
  247.      Text = Text + "workstation, and mainframe levels in the corporate data processing "
  248.      Text = Text + "architecture."
  249.      Text = Text + crlf + crlf
  250.      Text = Text + "Stephen earned a Bachelor of Science degree in Computer Science at "
  251.      Text = Text + "Montclair State and a Masters of Business Administration in Finance from "
  252.      Text = Text + "Rutgers University."
  253.      Biographies(4) = Text
  254.  
  255.      Rem Jean Hagmann
  256.  
  257.      Text = "Jean Hagmann Biography"
  258.      Biographies(5) = Text
  259.  
  260. End Sub
  261.  
  262. Sub SetOverviewText ()
  263.      Dim Text As String, crlf As String
  264.      crlf = Chr$(13) + Chr$(10)
  265.  
  266.      Overview(0) = OverviewText
  267.  
  268.      Text = "Landau & Associates, formed in 1987, is dedicated to the philosophy that the "
  269.      Text = Text + "effective use of today's technology leads to significant improvements in business "
  270.      Text = Text + "results. We design, develop and implement systems that lead to enhanced "
  271.      Text = Text + "revenues and reduced expenses. "
  272.      Text = Text + crlf + crlf
  273.      Text = Text + "The emergence of the Personal Computing market has led to an explosion of "
  274.      Text = Text + "sophisticated software applications that transform inexpensive desktop computing "
  275.      Text = Text + "into a wide variety of business tools. Today, the average business has a host of "
  276.      Text = Text + "desktop computers that have more number crunching power than most Mainframe "
  277.      Text = Text + "Computers had several decades ago. Unfortunately, users exploit only a fraction of "
  278.      Text = Text + "this power."
  279.      Text = Text + crlf + crlf
  280.      Text = Text + "Landau & Associates understand the importance of providing a full range of "
  281.      Text = Text + "services to its clients:"
  282.      
  283.      Text = Text + crlf + crlf + "  *  Technology Assessment"
  284.      Text = Text + crlf + crlf + "  *  System Specifications"
  285.      Text = Text + crlf + crlf + "  *  Software Design"
  286.      Text = Text + crlf + crlf + "  *  Software Development"
  287.      Text = Text + crlf + crlf + "  *  System Documentation"
  288.      Text = Text + crlf + crlf + "  *  Operational Conversion"
  289.      Text = Text + crlf + crlf + "  *  System Integration and Implementation"
  290.      Text = Text + crlf + crlf + "  *  Training"
  291.      Text = Text + crlf + crlf + "  *  Ongoing Support"
  292.      Text = Text + crlf + crlf
  293.      Text = Text + "We have developed desktop computing systems which address business needs "
  294.      Text = Text + "ranging from  Fixed Income Trading to Inventory Control. Our team has a proven "
  295.      Text = Text + "record of solving all types of business and organizational problems by integrating "
  296.      Text = Text + "today's advanced hardware and software technologies."
  297.      Text = Text + crlf + crlf
  298.      Text = Text + "Our data processing experience includes expertise in PCs, Workstations, "
  299.      Text = Text + "Mainframes, and Networks. The firm's software expertise includes, but is not "
  300.      Text = Text + "limited to, Microsoft Windows, UNIX, C, C++, APL, SyBase, FORTRAN, "
  301.      Text = Text + "VBasic, Excel, Word for Windows, DBase IV, Clipper, MS-DOS, etc."
  302.      Text = Text + crlf + crlf
  303.      Text = Text + "Landau & Associates has been designated a Microsoft Consulting Relations "
  304.      Text = Text + "Partner."
  305.      Overview(1) = Text
  306. End Sub
  307.  
  308. Sub SetServicesText ()
  309.      Dim Text As String, crlf As String
  310.      crlf = Chr$(13) + Chr$(10)
  311.  
  312.      Services(0) = ServicesText
  313.  
  314.      Text = Text + "Technology Assessment"
  315.      
  316.      Text = "A full review of your operations from the perspective of technology use. We will:"
  317.      
  318.      Text = Text + crlf + crlf + "  *  evaluate your current hardware and software computing environment;"
  319.      Text = Text + crlf + crlf + "  *  identify major business activities that lend themselves to automation;"
  320.      Text = Text + crlf + crlf + "  *  assess the degree to which your current technology base is effectively utilized, and"
  321.      Text = Text + crlf + crlf + "  *  make recommendations concerning better use of existing technology and opportunities for using or employing additional hardware and/or software to improve business results."
  322.      Services(1) = Text
  323.  
  324.      Text = Text + "System Specifications"
  325.  
  326.      Text = "Time spent efficiently gathering and refining system requirements increases the "
  327.      Text = Text + "likelihood of a successful development program. We have extensive experience in "
  328.      Text = Text + "this area and will draw upon it to:"
  329.      
  330.      Text = Text + crlf + crlf + "  *  analyze and specify the various tasks which the system will automate;"
  331.      Text = Text + crlf + crlf + "  *  describe the user interfaces and their associated data items, and"
  332.      Text = Text + crlf + crlf + "  *  describe the outputs of the system;"
  333.      Text = Text + crlf + crlf + "  *  define  the performance requirements of the system;"
  334.      Text = Text + crlf + crlf + "  *  identify how the system will behave under a varying set of conditions;"
  335.      Text = Text + crlf + crlf + "  *  arrive at the detailed hardware, software, and networking requirements of the system."
  336.      Services(2) = Text
  337.  
  338.      Text = Text + "Software Design"
  339.      
  340.      Text = "Given the System Specifications, a plan will be developed to implement your "
  341.      Text = Text + "requirements. This service covers the following:"
  342.      
  343.      Text = Text + crlf + crlf + "  *  selection of an appropriate hardware platform;"
  344.      Text = Text + crlf + crlf + "  *  selection of appropriate development software;"
  345.      Text = Text + crlf + crlf + "  *  a blueprint of interactions between various components of the system;"
  346.      Text = Text + crlf + crlf + "  *  identification and description of specific data items and procedures, and"
  347.      Text = Text + crlf + crlf + "  *  specific description and flow of each task to be automated."
  348.      Services(3) = Text
  349.  
  350.      Text = Text + "Software Development"
  351.      
  352.      Text = "This service can range from modifying existing software to the creation of custom "
  353.      Text = Text + "software using industry standard development tools. Specifically, Landau & "
  354.      Text = Text + "Associates offers the following services:"
  355.      
  356.      Text = Text + crlf + crlf + "  *  development of software templates;"
  357.      Text = Text + crlf + crlf + "  *  development of command macros to customize existing software packages;"
  358.      Text = Text + crlf + crlf + "  *  linkage of existing software packages to accomplish a stated task;"
  359.      Text = Text + crlf + crlf + "  *  development of custom software where existing software packages are not available, or are impractical to use."
  360.      Services(4) = Text
  361.  
  362.      Text = Text + "System Documentation"
  363.      
  364.      Text = "At Landau & Associates, we believe in providing three levels of documentation so "
  365.      Text = Text + "that the system will be easy to use and maintain. They are:"
  366.      
  367.      Text = Text + crlf + crlf + "  *  system documentation;"
  368.      Text = Text + crlf + crlf + "  *  hard-copy documentation for the client, and"
  369.      Text = Text + crlf + crlf + "  *  on-line documentation."
  370.      Services(5) = Text
  371.  
  372.      Text = Text + "Operational Conversion"
  373.      
  374.      Text = "The conversion to a new way of doing business is frequently overlooked. Not "
  375.      Text = Text + "paying attention to this phase of systems development can often lead to additional "
  376.      Text = Text + "cost or even an inability to use the system. We offer the following services:"
  377.      
  378.      Text = Text + crlf + crlf + "  *  procedural modifications;"
  379.      Text = Text + crlf + crlf + "  *  record conversion;"
  380.      Text = Text + crlf + crlf + "  *  batch validation;"
  381.      Text = Text + crlf + crlf + "  *  parallel run comparison, and"
  382.      Text = Text + crlf + crlf + "  *  condition testing and system modification."
  383.      Services(6) = Text
  384.  
  385.      Text = Text + "System Integration and Implementation"
  386.      
  387.      Text = "Once the components of the system have been testing and verified as working "
  388.      Text = Text + "correctly, they must be integrated into your existing computing environment. This "
  389.      Text = Text + "will require one or more of the following:"
  390.      
  391.      Text = Text + crlf + crlf + "  *  hardware links to other computing platforms such as servers and mainframes;"
  392.      Text = Text + crlf + crlf + "  *  software links to external databases, information sources, and analytics; "
  393.      Text = Text + crlf + crlf + "  *  modifications of operational procedures and staffing, and      "
  394.      Text = Text + crlf + crlf + "  *  testing and modification of the system as required."
  395.      Services(7) = Text
  396.  
  397.      Text = Text + "Training"
  398.      
  399.      Text = "Landau & Associates offers a wide range of training services. They include:"
  400.      
  401.      Text = Text + crlf + crlf + "  *  training on the use of custom developed applications;"
  402.      Text = Text + crlf + crlf + "  *  training on the use of commercial software packages;"
  403.      Text = Text + crlf + crlf + "  *  custom training based on specific user requirements, and"
  404.      Text = Text + crlf + crlf + "  *  training developers to customize commercial packages."
  405.      Text = Text + crlf + crlf
  406.      Text = Text + "See the Training Catalog for a listing of currently available courses."
  407.      Services(8) = Text
  408.  
  409.      Text = Text + "Ongoing Support"
  410.      
  411.      Text = "We do not consider our job done once the project development and training has "
  412.      Text = Text + "concluded. Landau & Associates stands ready to assist you in the continuing job "
  413.      Text = Text + "of making your technology investment pay off. We fully support each system and "
  414.      Text = Text + "help you further identify opportunities for improving business results. Specifically, "
  415.      Text = Text + "we provide the following services:"
  416.      
  417.      Text = Text + crlf + crlf + "  *  hot-line arrangements;"
  418.      Text = Text + crlf + crlf + "  *  periodic training visits, and"
  419.      Text = Text + crlf + crlf + "  *  upgraded for hardware and/or software."
  420.      Text = Text + crlf + crlf
  421.      Text = Text + "In addition, we publish the Landau & Associates Newsletter quarterly that keeps "
  422.      Text = Text + "you abreast of what is happening in the world of computing and its impact on your "
  423.      Text = Text + "business."
  424.      Services(9) = Text
  425. End Sub
  426.  
  427. Sub SetTrainingText ()
  428.      Dim Text As String, crlf As String
  429.      crlf = Chr$(13) + Chr$(10)
  430.  
  431.      Training(0) = TrainingText
  432.  
  433.      Text = Text + "Introduction to Microsoft Excel"
  434.      
  435.      Text = "An Introduction to the use of Microsoft Excel. This course "
  436.      Text = Text + "is designed to help the new user become comfortable "
  437.      Text = Text + "using Excel by providing in class assignments which "
  438.      Text = Text + "illustrate the basic skills required for the use of "
  439.      Text = Text + "spreadsheets in the business environment."
  440.      Training(1) = Text
  441.      
  442.      Text = Text + "Excel Basics for Lotus 1-2-3 Users"
  443.      
  444.      Text = "This course goes beyond the simple conversion of Lotus 1-"
  445.      Text = Text + "2-3 commands to Excel. Class assignments in a laboratory "
  446.      Text = Text + "setting are used to illustrate methods which maximize the "
  447.      Text = Text + "capabilities of Excel which do not exit in Lotus. Users are "
  448.      Text = Text + "introduced to techniques which will help them increase "
  449.      Text = Text + "their productivity."
  450.      Training(2) = Text
  451.      
  452.      Text = Text + "Productive Financial Modeling in Excel"
  453.      
  454.      Text = "Class assignments in a laboratory setting are used to "
  455.      Text = Text + "illustrate Excel financial modeling capabilities which can "
  456.      Text = Text + "drastically increase productivity in the workplace. This "
  457.      Text = Text + "course covers topics specific to financial modeling such as "
  458.      Text = Text + "goal seeking, solver functions, charting, financial functions, "
  459.      Text = Text + "database usage, consolidation, and an overview of "
  460.      Text = Text + "Excel/Word for Windows integration."
  461.      Training(3) = Text
  462.      
  463.      Text = Text + "Automating Tasks in Excel"
  464.      
  465.      Text = "The course goes beyond the 'macro record' feature to "
  466.      Text = Text + "teach users how to maximize the benefits of the Excel "
  467.      Text = Text + "macro language. Topics include writing command macros "
  468.      Text = Text + "to automate repetive tasks, function macros which add "
  469.      Text = Text + "user defined functions to Excel, creating add-in "
  470.      Text = Text + "worksheets, and the creation of template worksheets. "
  471.      Text = Text + "Class assignments in a laboratory setting are used to "
  472.      Text = Text + "illustrate Excel's ability to automate a variety of tasks. "
  473.      Training(4) = Text
  474.      
  475.      Text = Text + "Excel Macros for Lotus 1-2-3 Users"
  476.      
  477.      Text = "Class assignments in a laboratory setting take the users "
  478.      Text = Text + "beyond the built in translation feature found in Excel and "
  479.      Text = Text + "highlight the fundamental differences which exist between "
  480.      Text = Text + "the two macro languages."
  481.      Training(5) = Text
  482.      
  483.      Text = Text + "Applications Development in Excel"
  484.      
  485.      Text = "Excel provides a robust macro environment which can "
  486.      Text = Text + "allow for the cost efficient development of application "
  487.      Text = Text + "prototypes and complete applications. Class assignments "
  488.      Text = Text + "in a laboratory setting illustrate proven techniques which "
  489.      Text = Text + "can be used to create a wide variety of applications."
  490.      Training(6) = Text
  491. End Sub
  492.  
  493.