///
/// File Name: /adventium.net/adventium.js
/// 
/// File Desc: definition and common JavaScript utility functions for
///
///            Adventium Integrated Marketing and Graphics Design
///           
///            (C) Copyright 2004 InfoMitt Company
///            Author: Philip Chuang  pmchuang@yahoo.com
///

/////////////////////////////////////
///                               ///
/// Constans and Type Definitions ///
/// ============================= ///
///                               ///
/////////////////////////////////////

// width of the regular page
page_width = 750;

// number of basic columns in each page-table.
home_cols = 3;
home_page = 'index.html';

// default text for window status line
pageStat = 'Adventium: The best integrated marketing and graphics design in New York.';

// cookie and chip names
COOKIE_MAIN    = 'adventium';
CHIP_VIEW_BY   = 'view_by';
CHIP_VIEW_PICT = 'view_pict';
ORG            = 'org';               // view next service record for the same organization
SVC_PARENT     = 'parent_service';    // view next service record having same parent service type

// parse company name and service type
// next 2 lines: top line used for looking at the files at home,
//               bottom line for file on server.  Need to comment/uncomment
//               before upload/after download
//home_str   = '200410/';
home_str   = 'ium.net/';
this_page  = document.location.href;
this_page = this_page.substring ( (this_page.indexOf ( home_str ) + home_str.length  ), this_page.length );

pageTitle = '';
cust_init = '';
work_init = '';
view_chip = '';
view_cust = '';
view_work = '';

//alert ( cust_init );
//alert ( work_init );

// The status line text for each page and mouseOver text
function winStatType ( page, desc, title )
{
    this.page  = page;
    this.desc  = desc;
    this.title = title;
}

winStats = 0;
winStat = new Array ( );
winStat[winStats++] = new winStatType ( home_page, pageStat,"Welcome" );
winStat[winStats++] = new winStatType ( 'about/index.html', 'Learn all about '+pageStat,"About" );
winStat[winStats++] = new winStatType ( 'about/service.html', 'List of the services adventium provides','Services' );
winStat[winStats++] = new winStatType ( 'about/company.html', 'List of the services we have provided to various companies','Experience' );
winStat[winStats++] = new winStatType ( 'about/award.html', 'List of awards and recognitions.','Awards &amp; Recognitions' );
winStat[winStats++] = new winStatType ( 'about/cert.html', 'List of our certifications.','Certifications' );
winStat[winStats++] = new winStatType ( 'work/index.html', 'Browse through our portfolio',"Work" );
winStat[winStats++] = new winStatType ( 'work/typ.html', 'See how we have met different needs of our clients',"by Expertise" );
winStat[winStats++] = new winStatType ( 'work/biz.html', 'We have vast experiences serving many major industries',"by Industry" );
winStat[winStats++] = new winStatType ( 'work/org.html', 'Check the list of organizations we have served',"by Company" );
winStat[winStats++] = new winStatType ( 'contact.html', 'Contact information for Adventium', 'Contact&nbsp;Us' );

// industries of clients
function industryType ( name, init, show )
{
   this.name = name;
   this.init = init;

   if ( show == (void 0) )
      this.show = 0;
   if ( show > 0 )      // if show not labaled or show < 1, program ignores all works for this client
      this.show = 1
   else
      this.show = 0;
}
industrys = 0;
industry = new Array ( );

industry[industrys++] = new industryType ( 'Automotive',                  'auto',1 );
industry[industrys++] = new industryType ( 'Children',                    'kids',1 );
industry[industrys++] = new industryType ( 'E-Commerce',                  'ecom',1 );
industry[industrys++] = new industryType ( 'Entertainment',               'show',1 );
industry[industrys++] = new industryType ( 'Fashion',                     'wear',1 );
industry[industrys++] = new industryType ( 'Financial&nbsp;Services',     'mony',1 );
industry[industrys++] = new industryType ( 'Food&nbsp&amp;&nbsp;Beverage','food',1 );
industry[industrys++] = new industryType ( 'Gas',                         'gas' ,1 );
industry[industrys++] = new industryType ( 'Government',                  'govt',1 );
industry[industrys++] = new industryType ( 'Health&nbsp;and&nbsp;Beauty', 'well',1 );
industry[industrys++] = new industryType ( 'Luxury&nbsp;Goods',           'luxu',1 );
industry[industrys++] = new industryType ( 'Manufacturing',               'make',1 );
industry[industrys++] = new industryType ( 'Media',                       'esho',1 );
industry[industrys++] = new industryType ( 'Non-Profit',                  'free',1 );
industry[industrys++] = new industryType ( 'Professional&nbsp;Services',  'bp2b',1 );
industry[industrys++] = new industryType ( 'Publishing',                  'ppub',1 );
industry[industrys++] = new industryType ( 'Real&nbsp;Estate',            'land',1 );
industry[industrys++] = new industryType ( 'Restaurants',                 'dine',1 );
industry[industrys++] = new industryType ( 'Retail',                      'shop',1 );
industry[industrys++] = new industryType ( 'Sports',                      'spor',1 );
industry[industrys++] = new industryType ( 'Technology',                  'tech',1 );
industry[industrys++] = new industryType ( 'Telecommunications',          'tele',1 );
industry[industrys++] = new industryType ( 'Tobacco',                     'smok',1 );
industry[industrys++] = new industryType ( 'Travel/Hospitality',          'trav',1 );

// array name of company names and initials
function companyType ( init, name, ind_init, show )
{
   this.init = init;
   this.name = name;
   if ( industry == (void 0))
      this.ind_init = ''
   else
      this.ind_init = ind_init;

   if ( show == (void 0))
      this.show = 0;
   if ( show > 0 )
      this.show = 1
   else
      this.show = 0;
}

companys = 0;
company = new Array ( );
company[companys++] = new companyType ( 'adri','Adriana Trigiani',                             'ppub',1 );
company[companys++] = new companyType ( 'asmr','AdSmart',                                      'bp2b',0 );
company[companys++] = new companyType ( 'alev','Aleve',                                        'well',1 );
company[companys++] = new companyType ( 'aol', 'America&nbsp;Online',                          'esho',1 );
company[companys++] = new companyType ( 'aol', 'America&nbsp;Online',                          'tech',1 );
company[companys++] = new companyType ( 'amex','American&nbsp;Express',                        'mony',1 );
company[companys++] = new companyType ( 'aefa','American&nbsp;Express Financial Advisors',     'bp2b',1 );
company[companys++] = new companyType ( 'aefa','American&nbsp;Express Financial Advisors',     'mony',1 );
company[companys++] = new companyType ( 'amtk','Amtrak',                                       'trav',1 );
company[companys++] = new companyType ( 'gdds','Anne Geddes',                                  'ppub',1 );
company[companys++] = new companyType ( 'antq','Antiquarius',                                  'luxu',1 );
company[companys++] = new companyType ( 'aptc','Apartments.com',                               'ecom',0 );
company[companys++] = new companyType ( 'aptc','Apartments.com',                               'land',0 );
company[companys++] = new companyType ( 'arch','Arch Wireless',                                'tele',1 );
company[companys++] = new companyType ( 'azuw','As You Wish',                                  'wear',0 );
company[companys++] = new companyType ( 'att', 'AT&amp;T&nbsp;Wireless',                       'tele',1 );
company[companys++] = new companyType ( 'bnqt','Banquet',                                      'food',0 );
company[companys++] = new companyType ( 'batm','Bantam',                                       'ppub',1 );
company[companys++] = new companyType ( 'bnnb','Barnes &amp; Noble',                           'ppub',1 );
company[companys++] = new companyType ( 'bnnb','Barnes &amp; Noble',                           'shop',1 );
company[companys++] = new companyType ( 'bayr','Bayer',                                        'well',1 );
company[companys++] = new companyType ( 'blat','Bell Atlantic',                                'tele',0 );
company[companys++] = new companyType ( 'lvkf','Bill Levkoff',                                 'wear',0 );
company[companys++] = new companyType ( 'bkpl','Black Opal',                                   'well',1 );
company[companys++] = new companyType ( 'brds','Borden Snacks',                                'food',0 );
company[companys++] = new companyType ( 'bp',  'BP&nbsp;(British&nbsp;Petrolium)',             'gas' ,1 );
company[companys++] = new companyType ( 'brwz','Brandwise.com',                                'ecom',1 );
company[companys++] = new companyType ( 'budw','Budweiser',                                    'food',0 );
company[companys++] = new companyType ( 'ctoy','Cap&nbsp;Toys',                                'kids',1 );
company[companys++] = new companyType ( 'cars','Cars.com',                                     'ecom',1 );
company[companys++] = new companyType ( 'cast','Castrol',                                      'auto',1 );
company[companys++] = new companyType ( 'ctra','Centra',                                       'mony',1 );
company[companys++] = new companyType ( 'chih','Chi-Chi&#146;s&nbsp;Mexican&nbsp;Restaurants', 'dine',1 );
company[companys++] = new companyType ( 'citi','Citibank',                                     'mony',1 );
company[companys++] = new companyType ( 'clsc','CLS Capital',                                  'mony',1 );
company[companys++] = new companyType ( 'cgat','Colgate',                                      'well',1 );
company[companys++] = new companyType ( 'colh','Columbia&nbsp;House',                          'show',1 );
company[companys++] = new companyType ( 'comr','Comerica&nbsp;Bank',                           'mony',1 );
company[companys++] = new companyType ( 'crsl','Computer Reseller News',                       'esho',0 );
company[companys++] = new companyType ( 'crsl','Computer Reseller News',                       'ppub',0 );
//company[companys++] = new companyType ( 'copp','Coppertone',                                   'well',0 );
company[companys++] = new companyType ( 'cour','Courier&nbsp;Corporation',                     'make',1 );
company[companys++] = new companyType ( 'crnp','CRN Enterprise Partners',                      'esho',0 );
company[companys++] = new companyType ( 'crcl','Crown/Clarkson Potter',                        'ppub',1 );
company[companys++] = new companyType ( 'dcgc','Deer Creek Golf Club',                         'spor',0 );
company[companys++] = new companyType ( 'delp','Dell',                                         'ppub',0 );
company[companys++] = new companyType ( 'dtpb','Delta Trade Paperbacks',                       'ppub',1 );
company[companys++] = new companyType ( 'dndg','Don Diego',                                    'smok',0 );
company[companys++] = new companyType ( 'drkd','Dorling Kindersley',                           'ppub',1 );
company[companys++] = new companyType ( 'dket','DK Eyewitness Travel',                         'ppub',1 );
company[companys++] = new companyType ( 'dket','DK Eyewitness Travel',                         'trav',1 );
company[companys++] = new companyType ( 'dbdb','Doubleday',                                    'ppub',1 );
company[companys++] = new companyType ( 'dymo','Dymo',                                         'tech',0 );
company[companys++] = new companyType ( 'estl','Easter Seals',                                 'free',0 );
company[companys++] = new companyType ( 'ekrd','Eckerd Pharmacy',                              'shop',1 );
company[companys++] = new companyType ( 'ekrd','Eckerd Pharmacy',                              'well',1 );
company[companys++] = new companyType ( 'ess','Elevating Systems & Services',                  'bp2b',1 );
company[companys++] = new companyType ( 'ngag','Engage',                                       'bp2b',0 );
company[companys++] = new companyType ( 'emal','Email.com',                                    'ecom',1 );
company[companys++] = new companyType ( 'etrd','Etrade',                                       'ecom',1 );
company[companys++] = new companyType ( 'etrd','Etrade',                                       'mony',1 );
company[companys++] = new companyType ( 'fldm','Flanders Diamonds',                            'luxu',1 );
company[companys++] = new companyType ( 'floz','Flooz.com',                                    'ecom',1 );
company[companys++] = new companyType ( 'fldc','Flor de Copan',                                'smok',0 );
company[companys++] = new companyType ( 'ford','Ford',                                         'auto',1 );
//company[companys++] = new companyType ( 'ford','Ford',                                         'make',1 );
company[companys++] = new companyType ( 'ften','FTEN',                                         'bp2b',0 );
company[companys++] = new companyType ( 'ften','FTEN',                                         'tech',0 );
company[companys++] = new companyType ( 'gigo','Giggo.com',                                    'ecom',1 );
company[companys++] = new companyType ( 'gcol','GoCollect.com',                                'ecom',0 );
company[companys++] = new companyType ( 'gfwm','Golfing&nbsp;Women',                           'spor',1 );
company[companys++] = new companyType ( 'gsa','General Services Administration (GSA)',         'govt',1 );
company[companys++] = new companyType ( 'gsa','General Services Administration (GSA)',         'land',1 );
company[companys++] = new companyType ( 'hrpc','HarperCollins',                                'ppub',1 );
company[companys++] = new companyType ( 'hbo', 'HBO',                                          'show',1 );
company[companys++] = new companyType ( 'hbo', 'HBO',                                          'esho',1 );
company[companys++] = new companyType ( 'hcch','hcc&nbsp;Healthcare',                          'well',0 );
company[companys++] = new companyType ( 'hcch','hcc&nbsp;Healthcare',                          'tech',0 );
company[companys++] = new companyType ( 'heja','Health Jam',                                   'well',1 );
company[companys++] = new companyType ( 'heja','Health Jam',                                   'free',1 );
company[companys++] = new companyType ( 'hp',  'Hewlett-Packard',                              'tech',1 );
company[companys++] = new companyType ( 'hhnt','HomeHunter.com',                               'ecom',0 );
company[companys++] = new companyType ( 'hhnt','HomeHunter.com',                               'land',0 );
company[companys++] = new companyType ( 'hupn','H. Upmann',                                    'smok',0 );
company[companys++] = new companyType ( 'idt','IDT',                                           'tele',0 );
company[companys++] = new companyType ( 'itrd','Intertrade',                                   'ecom',1 );
company[companys++] = new companyType ( 'isgn','Insignia',                                     'land',0 );
company[companys++] = new companyType ( 'jnf', 'JNF',                                          'free',0 );
company[companys++] = new companyType ( 'jhys','Just Help Yourself! Diet Foods',               'food',0 );
company[companys++] = new companyType ( 'kdcs','Kid Cuisine',                                  'food',0 );
company[companys++] = new companyType ( 'lgrj','Leslie Greene Jewelry',                        'luxu',0 );
company[companys++] = new companyType ( 'lipt','Lipton',                                       'food',1 );
company[companys++] = new companyType ( 'lbco','Little, Brown and Company',                    'ppub',1 );
company[companys++] = new companyType ( 'jewl','London&nbsp;Jewelers',                         'luxu',0 );
company[companys++] = new companyType ( 'mail','Mail.com',                                     'ecom',1 );
company[companys++] = new companyType ( 'mbaj','MBA JumpStart',                                'bp2b',0 );
company[companys++] = new companyType ( 'msrc','Mailsource',                                   'ecom',1 );
company[companys++] = new companyType ( 'mcdl','McDonald&#146;s',                              'dine',0 );
company[companys++] = new companyType ( 'mci', 'MCI',                                          'tele',0 );
company[companys++] = new companyType ( 'meij','Meijer',                                       'wear',0 );
company[companys++] = new companyType ( 'meij','Meijer',                                       'shop',0 );
company[companys++] = new companyType ( 'mrly','Merrill&nbsp;Lynch',                           'mony',1 );
company[companys++] = new companyType ( 'mclb','Michelob',                                     'food',1 );
company[companys++] = new companyType ( 'mdog','Michigan Humane Society',                      'free',0 );
company[companys++] = new companyType ( 'mtcr','Montecristo',                                  'smok',0 );
company[companys++] = new companyType ( 'moos','Moosewood Restaurant',                         'ppub',1 );
company[companys++] = new companyType ( 'nacr','National&nbsp;Car&nbsp;Rental',                'trav',0 );
company[companys++] = new companyType ( 'nacr','National&nbsp;Car&nbsp;Rental',                'auto',0 );
company[companys++] = new companyType ( 'nshu','Naturalizer Shoes',                            'wear',0 );
company[companys++] = new companyType ( 'ned', 'Naval Engineering Data',                       'govt',1 );
company[companys++] = new companyType ( 'nicp','Naval Inventory Control Point',                'govt',1 );
company[companys++] = new companyType ( 'navc','Naval Sea Systems Command',                    'govt',1 );
company[companys++] = new companyType ( 'navy','U.S. Navy',                                    'govt',1 );
company[companys++] = new companyType ( 'nvci','Naval Sea Systems Command Intranet',           'govt',1 );
company[companys++] = new companyType ( 'nhpd','New York City Department of Housing Presrvation & Development','govt',1 );
company[companys++] = new companyType ( 'salt','Naval Streamlined Automated Logistics Transmission System Project','govt',1 );
company[companys++] = new companyType ( 'nvsp','Naval Supply Systems Command',                 'govt',1 );
company[companys++] = new companyType ( 'nmrk','Newmark',                                      'land',1 );
company[companys++] = new companyType ( 'nyxp','New&nbsp;York Exposition of Short Film and Videos', 'esho',1 );
company[companys++] = new companyType ( 'nyt', 'New&nbsp;York&nbsp;Times',                     'esho',1 );
company[companys++] = new companyType ( 'nikn','Nikon',                                        'tech',1 );
company[companys++] = new companyType ( 'naps','North&nbsp;American Precis&nbsp;Syndicate',    'esho',1 );
company[companys++] = new companyType ( 'odul','O&#146;Doole&#146;s',                          'food',1 );
company[companys++] = new companyType ( 'ofyx','Offyx',                                        'pb2b',1 );
company[companys++] = new companyType ( 'ondy','One-A-Day',                                    'well',0 );
company[companys++] = new companyType ( 'pbdd','Playboy by Don Diego',                         'smok',0 );
company[companys++] = new companyType ( 'pbok','Pocket&nbsp;Books',                            'ppub',1 );
company[companys++] = new companyType ( 'pwhc','PricewaterhouseCoopers',                       'bp2b',1 );
company[companys++] = new companyType ( 'pwhc','PricewaterhouseCoopers',                       'mony',1 );
company[companys++] = new companyType ( 'rdrf','Red Roof Inns',                                'trav',0 );
company[companys++] = new companyType ( 'ritz','Ritz&nbsp;Crackers',                           'food',1 );
company[companys++] = new companyType ( 'rock','Rock&nbsp;&amp;&nbsp;Roll<BR>Hall&nbsp;of&nbsp;Fame','trav',1 );
company[companys++] = new companyType ( 'rodl','Rodale',                                       'ppub',0 );
company[companys++] = new companyType ( 'rmyj','Romeo y Julieta',                              'smok',0 );
company[companys++] = new companyType ( 'rogu','Rough Guides',                                 'ppub',1 );
company[companys++] = new companyType ( 'rogu','Rough Guides',                                 'trav',1 );
company[companys++] = new companyType ( 'slpd','St.&nbsp;Louis Post-Dispatch',                 'esho',1 );
company[companys++] = new companyType ( 'stmp','St.&nbsp;Martin&#146;s&nbsp;Press',            'ppub',1 );
company[companys++] = new companyType ( 'sbro','Sbarro',                                       'dine',0 );
company[companys++] = new companyType ( 'shgd','Shea Gold',                                    'well',1 );
company[companys++] = new companyType ( 'sktl','Skittles',                                     'food',1 );
company[companys++] = new companyType ( 'smon','SmartMoney.com',                               'ecom',1 );
company[companys++] = new companyType ( 'smon','SmartMoney.com',                               'mony',1 );
company[companys++] = new companyType ( 'spjy','Sports&nbsp;Journeys',                         'spor',1 );
company[companys++] = new companyType ( 'spjy','Sports&nbsp;Journeys',                         'trav',1 );
company[companys++] = new companyType ( 'navy','Tennessee Army National Guard',                'govt',0 );
company[companys++] = new companyType ( 'twcb','Time-Warner Cable',                            'esho',1 );
company[companys++] = new companyType ( 'golf','Travel&nbsp;for&nbsp;Golf',                    'spor',1 );
company[companys++] = new companyType ( 'golf','Travel&nbsp;for&nbsp;Golf',                    'trav',1 );
company[companys++] = new companyType ( 'uway','United&nbsp;Way',                              'free',1 );
company[companys++] = new companyType ( 'usan','USA Network',                                  'show',0 );
company[companys++] = new companyType ( 'usan','USA Network',                                  'esho',0 );
company[companys++] = new companyType ( 'navy','U.S. Air Force',                               'govt',0 );
company[companys++] = new companyType ( 'navy','U.S.&nbsp;Navy',                               'govt',1 );
company[companys++] = new companyType ( 'vrzn','Verizon Wireless',                             'shop',1 );
company[companys++] = new companyType ( 'vrzn','Verizon Wireless',                             'tele',1 );
company[companys++] = new companyType ( 'vikb','Viking&nbsp;Books',                            'ppub',1 );
company[companys++] = new companyType ( 'vrnr','Vernors Ginger Ale',                           'food',0 );
company[companys++] = new companyType ( 'vlas','Vlasic Pickles',                               'food',0 );
company[companys++] = new companyType ( 'wmal','Web Mail',                                     'ecom',1 );
company[companys++] = new companyType ( 'wynd','Wyndham Hotels',                               'trav',0 );
company[companys++] = new companyType ( 'zrbr','Zebra',                                        'ppub',1 );

// array of types of sercies provided to clients
function serviceType ( name, init, show, outline, url, parent_init )
{
   this.name = name;
   this.init = init;
   if ( url == (void 0) )
      this.url = ''
   else
      this.url = url;

   if ( show == (void 0) )  //script does not display any undefined or < 1
      this.show = 0
   else
      this.show = show;
   if ( this.show < 1 )
      this.show = 0;      

   if ( outline == (void 0) ) //script does not include in outline links any undefined or < 1
      this.outline = 0
   else
      this.outline = outline;
   if ( this.outline < 1 )
      this.outline = 0;      

   if ( parent_init == (void 0) )
      this.parent_init = ''
   else
      this.parent_init = parent_init;
}

services = 0;
service = new Array ( );
service[services++] = new serviceType ( 'Advertising',                     'aad', 1,0,'ads/index.html');
service[services++] = new serviceType ( 'Advertising',                     'adpr',1,0,'ads/print.html',      'aad');
service[services++] = new serviceType ( 'Outdoor',                         'adod',1,0,'ads/outdoor.html',    'aad');
service[services++] = new serviceType ( 'Web',                             'webc',1,0,'web/banner.html',     'aad');
service[services++] = new serviceType ( 'Television',                      'adtv',1,0,'tv/index.html',       'aad');
service[services++] = new serviceType ( 'Radio',                           'adra',1,0,'ads/radio.html',      'aad');
service[services++] = new serviceType ( 'Consumer Advertising',            'cad', 1,1,'ads/index.html');
service[services++] = new serviceType ( 'Print',                           'cdpr',1,1,'ads/print.html',      'cad');
service[services++] = new serviceType ( 'Outdoor',                         'cdod',1,1,'ads/outdoor.html',    'cad');
service[services++] = new serviceType ( 'Web',                             'webc',1,1,'web/banner.html',     'cad');
service[services++] = new serviceType ( 'Television',                      'cdtv',1,1,'tv/index.html',       'cad');
service[services++] = new serviceType ( 'Radio',                           'cdra',1,1,'ads/radio.html',      'cad');
service[services++] = new serviceType ( 'Business-to-Business',            'b2ad',1,1,'ads/index.html');
service[services++] = new serviceType ( 'Print',                           'bdpr',1,1,'ads/print.html',      'b2ad');
service[services++] = new serviceType ( 'Web',                             'webb',1,1,'web/banner.html',     'b2ad');
service[services++] = new serviceType ( 'Television',                      'bdtv',1,1,'tv/index.html',       'b2ad');
//service[services++] = new serviceType ( 'Branding',                        'brnd',1,1);
service[services++] = new serviceType ( 'Design',                          'dsgn',1,1,'misc/index.html' );
//service[services++] = new serviceType ( 'Brochure',                        'leaf',0,1,'misc/brochure.html',  'dsgn');
service[services++] = new serviceType ( 'Collateral',                      'coll',1,1,'misc/collateral.html','dsgn');
//service[services++] = new serviceType ( 'Corporate&nbsp;Communications',   'corp',1,1,'misc/corporate.html', 'dsgn');
service[services++] = new serviceType ( 'Catalog',                         'catl',1,1,'misc/catalog.html',   'dsgn');
//service[services++] = new serviceType ( 'Point&nbsp;of&nbsp;Sale',         'posl',1,1,'misc/pos.html',       'dsgn');
service[services++] = new serviceType ( 'Direct Mail',                     'dirm',1,1,'misc/posdm/index.html');
service[services++] = new serviceType ( 'Identity',                        'logo',1,1);
service[services++] = new serviceType ( 'Promotions',                      'prmo',1,1 );
//service[services++] = new serviceType ( 'Sales&nbsp;Kit',                  'kits' );
service[services++] = new serviceType ( 'Television',                       'adtv',1,1,'tv/index.html');
service[services++] = new serviceType ( 'Web',                             'http',1,1,'web/index.html' );
service[services++] = new serviceType ( 'Web&nbsp;Site',                   'weba',1,1,'web/design.html',     'http');
service[services++] = new serviceType ( 'Web&nbsp;Banner',                 'webt',1,1,'web/banner.html',     'http');

// array of services provided to clients
function serviceRecordType ( co_init, svc_init, thumb_url, full_url, show_page, old_url, subtitle )
{
   this.co_init   = co_init;
   this.svc_init  = svc_init;
   if ( thumb_url == (void 0) )
      this.thumb_url  = ''    
   else
      this.thumb_url = thumb_url;

   if ( full_url == (void 0) )
      this.full_url  = ''    
   else
      this.full_url  = full_url;    

   if ( show_page == (void 0) )
      this.show_page = 0
   else
      this.show_page = show_page;

   if ( old_url == (void 0) )
      this.old_url  = ''    
   else
      this.old_url  = old_url;    

   if ( subtitle == (void 0) )
      this.subtitle  = ''    
   else
      this.subtitle  = subtitle;    
}

serviceRecords = 0;
serviceRecord = new Array ( );

serviceRecord[serviceRecords++] = new serviceRecordType ( 'colh','weba','web/images/chc.sq.jpg','web/colh-weba-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'colh','weba','web/images/chc.sq.jpg','web/colh-weba-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'colh','weba','web/images/chc.sq.jpg','web/colh-weba-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'adri', 'weba','web/images/Adri1.jpg','web/adri-weba-1.html',1,'http://www.adrianatrigiani.com' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'adri', 'weba','web/images/Adri2.jpg','web/adri-weba-2.html',1,'http://www.adrianatrigiani.com' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'adri', 'weba','web/images/Adri3.jpg','web/adri-weba-3.html',1,'http://www.adrianatrigiani.com' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'antq','weba','web/images/antiquarius.sq.gif','web/antq-weba-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'antq','weba','web/images/antiquarius.sq.gif','web/antq-weba-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'antq','weba','web/images/antiquarius.sq.gif','web/antq-weba-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'antq','weba','web/images/antiquarius.sq.gif','web/antq-weba-4.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'gfwm','weba','web/images/GolfingWomen.sq.gif','web/gfwm-weba-1.html',1,'http://www.golfingwomen.com' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'gfwm','weba','web/images/GolfingWomen.sq.gif','web/gfwm-weba-2.html',2,'http://www.golfingwomen.com' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'spjy','weba','web/images/SJ.sq.jpg','web/spjy-weba-1.html',1,'http://www.sportsjourneys.com' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'spjy','weba','web/images/SJ.sq.jpg','web/spjy-weba-2.html',1,'http://www.sportsjourneys.com' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'navy','weba','web/images/auctions.sq.jpg','web/navy-weba-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'navy','weba','web/images/auctions.sq.jpg','web/navy-weba-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'navy','weba','web/images/auctions.sq.jpg','web/navy-weba-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'navy','weba','web/images/auctions.sq.jpg','web/navy-weba-4.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'navy','weba','web/images/auctions.sq.jpg','web/navy-weba-5.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ned', 'weba','web/images/ned.sq.gif','web/ned-weba-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ned', 'weba','web/images/ned.sq.gif','web/ned-weba-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ned', 'weba','web/images/ned.sq.gif','web/ned-weba-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'salt','weba','web/images/salts.sq.jpg','web/salt-weba-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nvsp','weba','web/images/navsup.sq.jpg','web/nvsp-weba-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nvsp','weba','web/images/navsup.sq.jpg','web/nvsp-weba-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'navc','weba','web/images/seaport.sq.gif','web/navc-weba-1.html',1,'http://www.seaport.navy.mil' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'navc','weba','web/images/seaport.sq.gif','web/navc-weba-2.html',1,'http://www.seaport.navy.mil' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nvci','weba','web/images/seaport.sq.gif','web/nvci-weba-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nicp','weba','web/images/NAVICP.sq.jpg','web/nicp-weba-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nicp','weba','web/images/NAVICP.sq.jpg','web/nicp-weba-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'dket','cdpr','','ads/dket-cdpr-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'dket','cdpr','','ads/dket-cdpr-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'dket','cdpr','','ads/dket-cdpr-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'dket','cdpr','','ads/dket-cdpr-4.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'dket','cdpr','','ads/dket-cdpr-5.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'dket','cdpr','','ads/dket-cdpr-6.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'dket','cdpr','','ads/dket-cdpr-7.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'dket','cdpr','','ads/dket-cdpr-8.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'smon','cdpr','ads/images/smartmoney1.sq.jpg','ads/smon-cdpr-1.html',1,'ads/smartmoney.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'smon','cdpr','ads/images/smartmoney1.sq.jpg','ads/smon-cdpr-2.html',1,'ads/smartmoney.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'smon','cdpr','ads/images/smartmoney1.sq.jpg','ads/smon-cdpr-3.html',1,'ads/smartmoney.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'etrd','adpr','ads/images/etrade.sq.jpg','ads/etrd-adpr-1.html',1,'ads/etrade.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'rogu','cdpr','','ads/rogu-cdpr-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'rogu','cdpr','','ads/rogu-cdpr-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'rogu','cdpr','','ads/rogu-cdpr-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'rogu','cdpr','','ads/rogu-cdpr-4.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'rogu','cdpr','','ads/rogu-cdpr-5.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'rogu','cdpr','','ads/rogu-cdpr-6.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'rogu','cdpr','','ads/rogu-cdpr-7.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nyt', 'bdpr','NewWebImages/design/NYTimesMuseum.sq.gif','ads/nyt-bdpr-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'aol', 'cdpr','ads/images/AOL.sq.jpg','ads/aol-cdpr-1.html',1,'ads/aol.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'aol', 'cdpr','ads/images/AOL.sq.jpg','ads/aol-cdpr-2.html',1,'ads/aol.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'aol', 'cdpr','ads/images/AOL.sq.jpg','ads/aol-cdpr-3.html',1,'ads/aol.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'bnnb','cdpr','ads/images/bn.sq.jpg','ads/bnnb-cdpr-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'comr','cdpr','ads/images/comerica_mousetrap.sq.jpg','ads/comr-cdpr-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'comr','cdpr','ads/images/comerica_mousetrap.sq.jpg','ads/comr-cdpr-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'comr','cdpr','ads/images/comerica_mousetrap.sq.jpg','ads/comr-cdpr-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nikn','adpr','ads/images/nikon_fathersday.sq.jpg','ads/nikn-adpr-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nikn','bdpr','','ads/nikn-bdpr-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nikn','bdpr','','ads/nikn-bdpr-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nikn','bdpr','','ads/nikn-bdpr-4.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nikn','bdpr','','ads/nikn-bdpr-5.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'vrzn','bdpr','','ads/vrzn-bdpr-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'hrpc','cdpr','ads/images/harperlarson.sq.jpg','ads/hrpc-cdpr-1.html',1,'','There&#146;s A Hair In My Dirt' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'hrpc','cdpr','','ads/hrpc-cdpr-2.html',1,'','P.O.V. Living Large' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'hrpc','cdpr','','ads/hrpc-cdpr-3.html',1,'','The Good Housekeeping<BR>Illustrated Children&#146;s Cookbook' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'gdds','cdpr','ads/images/AnneGeddes.sq.jpg','ads/gdds-cdpr-1.html',1,'','Anne Geddes&#146; Book of Baby Names' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'dbdb','cdpr','','ads/dbdb-cdpr-1.html',1,'','The last avant-garde' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'lbco','cdpr','ads/images/LB_TootNPuddle.sq.jpg','ads/lbco-cdpr-1.html',1,'','Toot&nbsp;&amp;&nbsp;Puddle' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'batm','bdpr','','ads/batm-bdpr-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'batm','cdpr','','ads/batm-cdpr-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'crcl','cdpr','','ads/crcl-cdpr-1.html',1,'','Moosewood Restaurant Book of Desserts' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'dtpb','cdpr','','ads/dtpb-cdpr-1.html',1,'Solo Women Songwriters' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'mail','bdpr','ads/images/mail.sq.jpg','ads/mail-bdpr-1.html',1,'ads/mail.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'mail','bdpr','ads/images/mail.sq.jpg','ads/mail-bdpr-2.html',1,'ads/mail.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'mail','bdpr','ads/images/mail.sq.jpg','ads/mail-bdpr-3.html',1,'ads/mail.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'gsa','bdpr','ads/images/GSAad.jpg','ads/gsa-bdpr-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'hbo','cdpr','ads/images/HBO1_lg.jpg','ads/hbo-cdpr-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'hbo','cdpr','ads/images/HBO2_lg.jpg','ads/hbo-cdpr-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ritz','cdpr','ads/images/ritz.sq.jpg','ads/ritz-cdpr-1.html',1,'ads/rr.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ritz','cdpr','ads/images/ritz.sq.jpg','ads/ritz-cdpr-2.html',1,'ads/rr.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ritz','cdpr','ads/images/ritz.sq.jpg','ads/ritz-cdpr-3.html',1,'ads/rr.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'rock','cdpr','ads/images/rr.sq.jpg','ads/rock-cdpr-1.html',1,'ads/rr.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'bkpl','cdpr','ads/images/bo.sq.jpg','ads/bkpl-cdpr-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'amtk','cdpr','ads/images/Amtrak.jpg','ads/amtk-cdpr-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'copp','cdpr','ads/images/coppertone1.sq.jpg','ads/copp-adpr-1.html',0,'ads/coppertone.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'copp','cdpr','ads/images/coppertone1.sq.jpg','ads/copp-adpr-2.html',0,'ads/coppertone.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'copp','cdpr','ads/images/coppertone1.sq.jpg','ads/copp-adpr-3.html',0,'ads/coppertone.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'slpd','cdod','ads/images/pd1.sq.jpg','ads/slpd-cdod-1.html',1,'ads/postdispatch.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'slpd','cdod','ads/images/pd1.sq.jpg','ads/slpd-cdod-2.html',1,'ads/postdispatch.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'slpd','cdod','ads/images/pd1.sq.jpg','ads/slpd-cdod-3.html',1,'ads/postdispatch.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'mail','webc','banners/images/mail.island.sq.jpg','banners/mail-webc-1.html',1,'banners/mail.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'mail','webc','banners/images/mail.island.sq.jpg','banners/mail-webc-2.html',1,'banners/mail.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'mail','webc','banners/images/mail.island.sq.jpg','banners/mail-webc-3.html',1,'banners/mail.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'brwz','webc','banners/images/brandwise.washer.sq.jpg','banners/brwz-webc-1.html',1,'banners/brandwise.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'brwz','webc','banners/images/brandwise.washer.sq.jpg','banners/brwz-webc-2.html',1,'banners/brandwise.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'brwz','webt','banners/images/brandwise.washer.sq.jpg','banners/brwz-webt-3.html',1,'banners/brandwise.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'brwz','webb','banners/images/brandwise.washer.sq.jpg','banners/brwz-webb-4.html',1,'banners/brandwise.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'cars','webc','banners/images/cars.cherokee.sq.jpg','banners/cars-webc-1.html',1,'banners/cars.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'cars','webc','banners/images/cars.cherokee.sq.jpg','banners/cars-webc-2.html',1,'banners/cars.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'cars','webc','banners/images/cars.cherokee.sq.jpg','banners/cars-webc-3.html',1,'banners/cars.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'gigo','webc','banners/images/giggo.car.sq.jpg','banners/gigo-webc-1.html',1,'banners/giggo.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'gigo','webc','banners/images/giggo.car.sq.jpg','banners/gigo-webc-2.html',1,'banners/giggo.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'gigo','webc','banners/images/giggo.car.sq.jpg','banners/gigo-webc-3.html',1,'banners/giggo.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'mail','adtv','tv/images/mail.sq.jpg','tv/mail-adtv-1.html',1,'tv/mail.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ctoy','cdtv','tv/images/fetch.sq.jpg','tv/ctoy-cdtv-1.html',1,'tv/fetch.html','Fetch Armstrong' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ekrd','cdtv','tv/images/eckerd.sq.jpg','tv/ekrd-cdtv-1.html',1,'tv/eckerd.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'pbok','cdtv','tv/images/silent_cradle.sq.jpg','tv/pbok-cdtv-1.html',1,'tv/silent-cradle.html','Silent Cradle' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'pbok','cdtv','tv/images/butterfly.sg.jpg','tv/pbok-cdtv-2.html',2,'tv/butterfly.html','Butterfly' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'zrbr','cdtv','tv/images/perfect_timing.sq.jpg','tv/zrbr-cdtv-1.html',3,'tv/perfect_timing.html','Perfect Timing' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ford','cdtv','tv/images/ford.sq.jpg','tv/ford-cdtv-1.html',1,'tv/ford.html','Road to Superbowl' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ctoy','cdtv','tv/images/longbomb.sq.jpg','tv/ctoy-cdtv-2.html',1,'','Long Bomb Football Gun' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'vikb','cdtv','tv/images/mostwanted.sq.jpg','tv/vikb-cdtv-1.html',1,'tv/mostwanted.html','Most Wanted' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'bnqt','cdra','','radio/bnqt-cdra-1.html',1,'' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'cast','coll','design/images/castrol.sq.jpg','misc/cast-coll-1.html',1,'misc/Castrol.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'naps','coll','NewWebImages/design/NAPStravel.sq.gif','misc/naps-coll-2.html',1,'misc/TravelPRBrochure.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'naps','coll','NewWebImages/design/NAPSfinancial.sq.gif','misc/naps-coll-1.html',1,'misc/TravelPRBrochure.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'naps','coll','','misc/naps-coll-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'naps','coll','','misc/naps-coll-4.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'naps','coll','design/images/NAPSminority.sq.jpg','misc/naps-coll-5.html',1,'misc/TravelPRBrochure.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'cgat','coll','misc/images/colgate.sq.jpg','misc/cgat-coll-1.html',1,'misc/colgate.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'lipt','coll','','misc/lipt-coll-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'lipt','coll','misc/images/Lipton_SalesKit.jpg','misc/lipt-coll-2.html',1 );

serviceRecord[serviceRecords++] = new serviceRecordType ( 'amex','coll','design/images/AmexInsurance.sq.jpg','misc/amex-coll-1.html',1,'misc/AMEXInsuranceSeminar.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'amex','coll','dm/images/AMEX_Open_Tax.sq.jpg','misc/amex-coll-2.html',1,'misc/AMEXInsuranceSeminar.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nikn','coll','NewWebImages/design/nikon.sq.gif','misc/nikn-coll-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'pwhc','coll','misc/images/PWCview1.gif','misc/pwhc-coll-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'pwhc','coll','misc/images/PwCview2.gif','misc/pwhc-coll-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'pwhc','coll','misc/images/PwCLH11.gif','misc/pwhc-coll-3.html',1,'','College Recruitment' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'heja','coll','misc/images/HealthJam.jpg','misc/heja-coll-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'gfwm','coll','misc/images/GWbrochure.jpg','misc/gfwm-coll-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'salt','coll','misc/images/SaltsBrochure.jpg','misc/salt-coll-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'navy','coll','misc/images/LogToolBrochure.jpg','misc/navy-coll-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'bayr','coll','misc/images/bayer.jpg','misc/bayr-coll-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'alev','coll','misc/images/aleve.jpg','misc/alev-coll-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nhpd','coll','misc/images/HPDflyer1.jpg','misc/nhpd-coll-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nhpd','coll','misc/images/HPDflyer2.jpg','misc/nhpd-coll-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'alev','coll','misc/images/aleve.jpg','misc/alev-coll-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'amex','catl','NewWebImages/design/AMEXcatalog.sq.jpg','misc/amex-catl-1.html',1,'misc/AMEXcatalog.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'colh','catl','design/images/chc_catalog.sq.gif','misc/colh-catl-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'lbco','catl','design/images/LB_catalog.sq.jpg','misc/lbco-catl-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'crcl','catl','','misc/crcl-catl-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'drkd','catl','','misc/drkd-catl-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'etrd','dirm','NewWebImages/dm/edu_fund.sq.jpg','dm/etrd-dirm-1.html',1,'dm/edu_fund.html');
serviceRecord[serviceRecords++] = new serviceRecordType ( 'etrd','dirm','NewWebImages/dm/edu.dm.sq.jpg','dm/etrd-dirm-2.html',1,'dm/edu_fund.dm.html');
serviceRecord[serviceRecords++] = new serviceRecordType ( 'citi','dirm','NewWebImages/dm/Citi.sq.jpg','dm/citi-dirm-1.html',1,'misc/citi.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'citi','dirm','dm/images/CitiAddOn.jpg','dm/citi-dirm-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'citi','dirm','dm/images/CitiUpgrade.jpg','dm/citi-dirm-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'amex','dirm','NewWebImages/dm/AMEXCertificate.sq.jpg','dm/amex-dirm-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'amex','dirm','dm/images/AMEX_Open_Tax.sq.jpg','dm/amex-dirm-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'amex','dirm','dm/images/AMEXtrigger.jpg','dm/amex-dirm-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'mail','dirm','NewWebImages/dm/mail.dm.sq.jpg','dm/mail-dirm-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'floz','dirm','NewWebImages/dm/flooz.sq.jpg','dm/floz-dirm-1.html',1,'dm/flooz.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'att','dirm','dm/images/ATTWireless.jpg','dm/att-dirm-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'aol','dirm','dm/images/AOL_DM.jpg','dm/aol-dirm-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'cour','dirm','NewWebImages/dm/courier.sq.jpg','dm/cour-dirm-1.html',1,'dm/courier.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'arch','dirm','NewWebImages/dm/arch.sq.jpg','dm/arch-dirm-1.html',1,'dm/arch.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'mrly','dirm','dm/images/ML50sBoomer.jpg','dm/mrly-dirm-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'mrly','dirm','dm/images/ML40sBoomer.jpg','dm/mrly-dirm-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'mrly','dirm','dm/images/ML50s6x9.jpg','dm/mrly-dirm-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'mrly','dirm','dm/images/ML40s6x9.jpg','dm/mrly-dirm-4.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'vrzn','dirm','dm/images/VzWGIN1.jpg','dm/vrzn-dirm-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'vrzn','dirm','dm/images/VzWGIN2.jpg','dm/vrzn-dirm-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'vrzn','dirm','dm/images/VzWP2T.jpg','dm/vrzn-dirm-3.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'vrzn','dirm','dm/images/VzWb2b.jpg','dm/vrzn-dirm-4.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'gsa','dirm','dm/images/GSAdm.jpg','dm/gsa-dirm-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'hp','dirm','dm/images/HP_Consumer.jpg','dm/hp-dirm-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'hp','dirm','dm/images/HP_B2B.jpg','dm/hp-dirm-2.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nyxp','prmo','misc/images/NYEXPO.sq.jpg','misc/nyxp-prmo-1.html',1,'misc/NYEXPO.html' );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'chih','prmo','','misc/chih-prmo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'etrd','logo','identity/etrade.jpg','identity/etrd-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'wmal','logo','identity/webmail.sq.jpg','identity/wmal-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'navy','logo','identity/navsup.sq.jpg','identity/navy-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'nvsp','logo','identity/NAVSUPlogo.jpg','identity/nvsp-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ess','logo','identity/ESSlogo.jpg','identity/ess-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'itrd','logo','identity/intertrade.sq.jpg','identity/itrd-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'spjy','logo','identity/sportsjourneys.sq.jpg','identity/spjy-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'emal','logo','identity/email.sq.jpg','identity/emal-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'clsc','logo','identity/cls.sq.jpg','identity/clsc-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ctra','logo','identity/centra.sq.jpg','identity/ctra-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'ofyx','logo','identity/offyx.sq.jpg','identity/ofyx-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'salt','logo','identity/SaltLogos.gif','identity/salt-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'colh','logo','identity/chc_star.sq.jpg','identity/colh-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'msrc','logo','identity/mailsource.jpg','identity/msrc-logo-1.html',1 );
serviceRecord[serviceRecords++] = new serviceRecordType ( 'shgd','logo','identity/SheaGold.jpg','identity/shgd-logo-1.html',1 );



/////////////////
///           ///
/// Functions ///
/// ========= ///
///           ///
/////////////////

/////////////////////////
///                   ///
/// Basic Page Layout ///
///                   ///
/////////////////////////

function un_external_frame ( )
{

   if (parent.location.href != window.location.href )
      parent.location.href = window.location.href;
   window.name = 'home_window';

}

function head_to_body ( )
{
   document.write ( "<LINK Rel='SHORTCUT ICON' Href='http://adventium.net/images/adventium.ico'/>" );
   document.write ( "</HEAD>" );
   document.write ( "<BODY \n" );
// document.write ( "      BgColor='#99FF00'/>\n" );
   document.write ( "      BgColor='#FFFFFF'\n " );
   document.write ( "      onLoad='self.focus()'/>" );
}

function format_page ( cdh )
{
   if ( cdh == (void 0) )
      cdh = '';
   document.write ( "<TABLE Width='",page_width,"'\n" );
   document.write ( "       Align='Left'\n " );
   document.write ( "       BgColor='#FFFFFF'\n " );
   document.write ( "       Border='0'\n" );
   document.write ( "       CellSpacing='0'\n" ); 
   document.write ( "       CellPadding='0'\n" );
   document.write ( "       CellBorder='0'/>" );

   draw_banner ( cdh );
}

function draw_banner ( cdh )
{
   if ( cdh == (void 0) )
      cdh = '';

   document.write ( "<TR>\n" );
   document.write ( "   <TD \n" );
   document.write ( "       ColSpan='",home_cols,"' \n" );
   document.write ( "       >" ); 
   stat = "Return to home page for Adventium Integrated Marketing and Design";
   write_link_pict ( cdh, home_page, "images/banner.jpg", stat, '', 0, 0, 'left', 'top' );
}

function write_copyright ( cdh )
{
   if ( cdh == ( void 0 ) )
      cdh = "";

   //location of home of the "about" pages;
   pg_addr = 'about/index.html';

   winDesc = winStat[find_winStat(pg_addr)].desc;

   document.write ( "<TR>\n" );
   document.write ( "   <TD ColSpan='",home_cols,"'\n" );
   document.write ( "       Align='Center'\n" );
   document.write ( "       Class='copyright'/>\n" );
   document.write ( "      &copy; MMIV\n" );
 
   write_link ( cdh, pg_addr, 'Adventium Integrated Marketing and Design', winDesc );

   document.write ( ".<BR>\n" )
   document.write ( "      All Rights reserved.\n" );
   document.write ( "   </TD>\n" );
   document.write ( "</TR>\n" );

   return true;
}

function before_content ( cdh, pg_title )
{
   if ( pg_title == (void 0) )
      pg_title = pageTitle;

   if ( this_page.indexOf ( 'work/' ) >= 0 )
      pg_title = '';

   document.write ( "<TR VAlign='Top'/>" );
   menu_top_left ( cdh, pg_title );
   menu_top_right ( cdh );
   document.write ( "  <TD RowSpan='2' \n" );
   document.write ( "      Height='140'\n" );
   document.write ( "      Align='Left' \n" );
   document.write ( "      VAlign='Top'/>" );
   if ( cust_init == '' )
      document.write ( "      <H2/>",pg_title,"</H2>\n" );
}

function before_head_page ( cdh, pg_title )
{
   if ( pg_title == (void 0) )
      pg_title = pageTitle;

   document.write ( "<TR VAlign='Bottom'/>" );
   menu_top_left ( cdh, pg_title );
   menu_top_right ( cdh );
   document.write ( "  <TD Align='Left' \n" );
   document.write ( "      VAlign='Bottom'/>" );
   document.write ( "<IMG Border='0' Height='2' Width='400' Border='0' Src='",cdh,"images/spacer.jpg'/>\n" );
   if ( pg_title == 'Welcome' )
      document.write ( "      <H1 Align='Left' VAlign='Bottom'/>",pg_title,"</H1>\n" )
   else
      document.write ( "      <H2 Align='Left' VAlign='Bottom'/>",pg_title,"</H2>\n" );
   document.write ( "  </TD>\n" );
   document.write ( "</TR>\n" );
   document.write ( "<TR><TD Height='5' ColSpan='3'/><HR Color='#CCCCCC'/></TD></TR>\n" );

}

function after_content ( cdh )
{
   document.write ( "<IMG Height='1' Width='380' Src='",cdh,"images/spacer.jpg'/>\n" );
   document.write ( "   </TD>\n" );
   document.write ( "</TR>\n" );
   document.write ( "<TR VAlign='Top'/> \n" );
   document.write ( "   <TD>\n" );
   if (    ( this_page == 'about/company.html' )
        || ( this_page == 'work/biz.html' )
        || ( this_page == 'work/org.html' )
      )
      document.write ( "<IMG Height='900' Width='1' Align='Left' Src='",cdh,"images/spacer.jpg'/>\n" )
   else
      document.write ( "<IMG Height='450' Width='1' Align='Left' Src='",cdh,"images/spacer.jpg'/>\n" );
   document.write ( "   </TD>\n" );
}

function layout_sample ( pict_url, caption )
{
   SAMPLE_HIGH = 300;
   expand_me   = false;

   find_view_limit( );
   this_work_numb = find_serviceRecord_by_url ( this_page );

   document.write ( "<TABLE BgColor='#FFFFFF'\n " );
   document.write ( "       Border='0'\n" );
   document.write ( "       CellSpacing='0'\n" ); 
   document.write ( "       CellPadding='2'\n" );
   document.write ( "       CellBorder='0'/>\n" );
   document.write ( "<TR Align='Top'/>\n" );
   document.write ( "   <TD ColSpan='5' Align='Center'/>\n" );
   document.write ( "      <H2 Align='Center' Class='company'/>",company[find_company(cust_init)].name,"</H2>" );

   if (    ( this_work_numb > 0 )
        && ( serviceRecord[this_work_numb].subtitle.length )
      )
      document.write ( "<H3 Class='subtitle'/>",serviceRecord[this_work_numb].subtitle,"</H3>" );
   document.write ( "   </TD>\n" );
   document.write ( "</TR>\n" );
   document.write ( "<TR Align='Top'/>\n" );
   document.write ( "   <TD ColSpan='3' Align='Center'/>" );

   switch ( work_init )
   {
      case 'adtv' :
      case 'bdtv' :
      case 'cdra' :
      case 'cdtv' :
         document.write ( "<EMBED Width='240' Height='195' Src='",cdh,pict_url,"'/>" );
         break;           
      case 'adpr' : // expand
      case 'bdpr' :
      case 'cdpr' :
      case 'dsgn' :
      case 'leaf' :
      case 'coll' :
      case 'corp' :
      case 'catl' :
      case 'posl' :
      case 'dirm' :
      case 'prmo' :
         expand_me = true;
         delChip ( COOKIE_MAIN, CHIP_VIEW_PICT );
         setChip ( COOKIE_MAIN, CHIP_VIEW_PICT, pict_url );
         expn_str = 'Click for a magnified view of this '+service[find_service(work_init)].name.toLowerCase()+' for '+company[find_company(cust_init)].name+'.';
         write_link_pict ( cdh, 'magnify.html', pict_url, expn_str, view_chip, 0, SAMPLE_HIGH, 'Center', 'Top' );
         break;
      case 'weba' :
         delChip ( COOKIE_MAIN, CHIP_VIEW_PICT );
         setChip ( COOKIE_MAIN, CHIP_VIEW_PICT, pict_url );
         old_url  = serviceRecord[find_serviceRecord_by_url ( this_page)].old_url;
         if ( old_url.length )
         {
            link_str = 'Click here to see the site';
            write_link_pict ( cdh, old_url, pict_url, link_str, view_chip, 0, SAMPLE_HIGH, 'Center', 'Top' );
         }
         else
         {
            expand_me = true;
            expn_str = 'Click for a magnified view.';
            write_link_pict ( cdh, 'magnify.html', pict_url, expn_str, view_chip, 0, SAMPLE_HIGH, 'Center', 'Top' );
         }
         break;
      default :  // no expand
         if ( this_page.indexOf ( 'dpr' ) > 2 )
         {
            expand_me = true;
            delChip ( COOKIE_MAIN, CHIP_VIEW_PICT );
            setChip ( COOKIE_MAIN, CHIP_VIEW_PICT, pict_url );
            expn_str = 'Click for a magnified view of this job for '+company[find_company(cust_init)].name+'.';
            write_link_pict ( cdh, 'magnify.html', pict_url, expn_str, view_chip, 0, SAMPLE_HIGH, 'Center', 'Top' );
         }
         else
         {
            document.write ( "<IMG Borer='0'\n" );
            document.write ( "     Align='Center'\n" );
            document.write ( "     Src='",cdh,pict_url,"'\n" );
            document.write ( "     Alt='",pageStat,"'/n>" );
         }
         break;
   } //case

   document.write ( "   </TD>\n" );
   document.write ( "</TR>\n" );
   document.write ( "<TR Align='Top'/>\n" );
   document.write ( "   <TD Align='Left'/><P>\n" );

   work_numb = 1;

   for ( loop_serviceRecord = 0; loop_serviceRecord < serviceRecords; loop_serviceRecord++ )
   {
      if ( loop_serviceRecord == this_work_numb )
         document.write ( "&nbsp;<Strong Class='Interactive'/>",work_numb++,"</Strong>&nbsp;" )
      else
      {
         if ( loop_serviceRecord == check_serviceRecord ( cust_init, view_work, loop_serviceRecord ) )
         {
            desc = 'Click to see more examples'
                 + ' of ' + service[find_service(work_init)].name.toLowerCase( )
                 + ' for ' + company[find_company(cust_init)].name
                 + '.';

            write_link ( cdh, serviceRecord[loop_serviceRecord].full_url, work_numb++, desc, 'interactive', view_chip );
         } // same_company
        
      } // find records for same customer-work

   } // for-loop_service_record loop


   document.write ( "   </TD>\n" );
   document.write ( "   <TD Align='Center'>" );
   if ( expand_me )
      write_link_pict ( cdh, 'magnify.html', 'images/magnify_plus.jpg', expn_str, '', 0, 0, 'Center', 'Top' )
   else
   {
      if ( work_init == 'weba' )
      {
         document.write ( "<P>" );
         write_link ( cdh, old_url, old_url, link_str, 'interactive' );
      }
   }
   document.write ( "   </TD>\n" );

   // arrow points to next work of same type
   document.write ( "   <TD Align='Right'/><P>\n" );

   new_file_num = find_serviceRecord_prev ( view_cust, view_work, ( this_work_numb - 1 ) );

   if ( new_file_num  > 0 )
   {
      desc = 'Click to see previous example of';
      if ( view_work.length )
         desc += ' ' + service[find_service(view_work)].name.toLowerCase( ); 

      if (    ( view_work.length )
           && ( view_cust.length )  
         )
         desc += ' for';
      if ( view_cust.length )
         desc += ' ' + company[find_company(view_cust)].name;
      desc += '.';
      write_link ( cdh, serviceRecord[new_file_num].full_url, "&lt", desc, 'interactive', view_chip );
   }
// else
//    document.write ( "&nbsp;<Strong Class='Interactive'/>&lt;</Strong>&nbsp;" );

   new_file_num = find_serviceRecord ( view_cust, view_work, ( this_work_numb + 1 ) );
   if ( new_file_num > 0 )
   {
      document.write ( '&nbsp;' );

      desc = 'Click to see next example of';
      if ( view_work.length )
         desc += ' ' + service[find_service(view_work)].name.toLowerCase( ); 

      if (    ( view_work.length )
           && ( view_cust.length )  
         )
         desc += ' for';
      if ( view_cust.length )
         desc += ' ' + company[find_company(view_cust)].name;
      desc += '.';
      write_link ( cdh, serviceRecord[new_file_num].full_url, "&gt", desc, 'interactive', view_chip );
   }
// else
//    document.write ( "&nbsp;<Strong Class='Interactive'/>&gt;</Strong>&nbsp;" );

      document.write ( "<TR Align='Top' VAlign='Center'/>" );
      document.write ( "<TD ColSpan='3' Align='Center'/>\n" );
      if ( caption != (void 0) )
         document.write ( "<P>",caption );
      document.write ( "</TD>\n" );
      document.write ( "</TR>\n" );      
   document.write ( "   </TD>\n" );
   document.write ( "</TR>\n" );   
   document.write ( "</TABLE>\n" );

}

//////////////
///        ///
/// Menus  ///
///        ///
//////////////

function menu_file ( cdh, name_grep )
{
   if ( name_grep == (void 0) )
      name_grep == '';

   prep_menu_bottom ( );

   for ( win_stat_loop = 0; win_stat_loop < winStats; win_stat_loop++ )
   {
            
      if (    ( winStat[win_stat_loop].page.indexOf ( 'index' ) < 0 )
           && (    ( name_grep == '' )
                || ( winStat[win_stat_loop].page.indexOf ( name_grep ) >= 0  )
             )
         )
      {

         if ( this_page == winStat[win_stat_loop].page  )
            document.write ( "<H4 Class='vmenu2'/>",winStat[win_stat_loop].title,"</H4>" )     
         else
            write_link ( cdh, winStat[win_stat_loop].page, winStat[win_stat_loop].title, winStat[win_stat_loop].desc, 'vmenu2' )
      }
   }

   if ( this_page.indexOf ( 'work/' ) < 0 )
      document.write ( "   </TD>\n" );
}

function menu_work_type ( cdh, limit )
{
   if ( limit == (void 0) )
      limit = '';

   this_work_numb = find_serviceRecord_by_url ( this_page );

   if (    ( limit == 'all' )
        || ( limit == '' )
      )
      parent_limit = ''
   else
   {
      svc_type_rcrd = find_service ( limit );
      if ( service[svc_type_rcrd].parent_init.length == 0 )
         parent_limit = limit
      else
         parent_limit = service[svc_type_rcrd].parent_init;
   }

   if ( this_page.indexOf ( 'work/' ) < 0 )
      prep_menu_bottom ( );

   for ( loop_menu_work_type = 0; loop_menu_work_type < services; loop_menu_work_type++ )
   {
      if (    ( service[loop_menu_work_type].parent_init == '' ) 
           && ( service[loop_menu_work_type].outline )
         )
      {
         work_rcrd = find_serviceRecord ( '', service[loop_menu_work_type].init );
         if ( work_rcrd < 0 )
            document.write ( "<H4 Class='no_menu2'/>",service[loop_menu_work_type].name,"</H4>" )     
         else
         {
            if (    ( service[loop_menu_work_type].url  == this_page ) 
                 || ( service[loop_menu_work_type].init == work_init )
                 || ( service[loop_menu_work_type].init == limit )
               )
               document.write ( "<H4 Class='vmenu2'/>",service[loop_menu_work_type].name,"</H4>" )     
            else
            {
               winDesc = "Click here to see examples of our "+service[loop_menu_work_type].name.toLowerCase( )+".";               
               v_work_init = '-' + service[loop_menu_work_type].init;

               work_url = serviceRecord[work_rcrd].full_url;
               write_link ( cdh, work_url, service[loop_menu_work_type].name, winDesc, 'vmenu2', v_work_init );
            }

         }  // for any top-level service ( if service[loop_menu_work_type].parent_init == '' )

         // print applicable sub-category
         if (    ( parent_limit == service[loop_menu_work_type].init )
              || ( limit == 'all' )
            )
         {
            for ( loop_inner_menu_work_type = 0; loop_inner_menu_work_type < services; loop_inner_menu_work_type++ )
            {
               if (    ( service[loop_inner_menu_work_type].parent_init == service[loop_menu_work_type].init )
                    && ( service[loop_inner_menu_work_type].outline )
                    && ( limit.length > 0 )  // if no limit specified, print top level only
                  )
               {
                  work_rcrd = find_serviceRecord ( '', service[loop_inner_menu_work_type].init );
                  if (    ( service[loop_inner_menu_work_type].url  == this_page ) 
                       || ( service[loop_inner_menu_work_type].init == work_init )
                       || ( service[loop_inner_menu_work_type].init == limit )
                     )
                     document.write ( "<H4 Class='vmenu3'/>",service[loop_inner_menu_work_type].name,"</H4>" )     
                  else
                  {
                     winDesc = "Click here to see examples of our "+service[loop_inner_menu_work_type].name.toLowerCase( )+".";
                     v_work_init = '-' + service[loop_inner_menu_work_type].init;
                     work_rcrd = find_serviceRecord ( '', service[loop_inner_menu_work_type].init );
                     if ( work_rcrd < 0 )
                        document.write ( "<H4 Class='no_menu3'/>",service[loop_inner_menu_work_type].name,"</H4>" )
                     else
                     {
                        if (    ( work_init == service[loop_inner_menu_work_type].init )
                             || ( limit == service[loop_inner_menu_work_type].init )
                           )
                           document.write ( "<H4 Class='vmenu3'/>",service[loop_inner_menu_work_type].name,"</H4>" )
                        else
                        {
                           work_url = serviceRecord[work_rcrd].full_url;
                           write_link ( cdh, work_url, service[loop_inner_menu_work_type].name, winDesc, 'vmenu3', v_work_init );
                        }
                     }
                  } // print sub-category

               } // print only sub-category of pertinent parents
            } // if parent_limit == current
         } // loop of sub-category
      }  // print only parent of specific categories or parent categories for no limits
   }  // outer for-loop

   document.write ( "   </TD>\n" );
}

function menu_top_left ( cdh, pg_title )
{
   document.write ( "   <TD \n" );
   document.write ( "       Width='120'\n" );
   document.write ( "       Align='Right'\n" );
   document.write ( "       VAlign='Top'/>\n" );

   if ( this_page == home_page )
      document.write ( "<H4 Class='vmenu0r'/>Home</H4>" )
   else
      write_link ( cdh, home_page, 'Home', winStat[find_winStat(home_page)].desc, 'vmenu0r' )

   write_link ( cdh, 'work/index.html', 'Work', winStat[find_winStat('work/index.html')].desc, 'vmenu0r' );

   write_link ( cdh, 'about/index.html', 'About', winStat[find_winStat('about/index.html')].desc, 'vmenu0r' );

   if ( this_page == 'contact.html' )
      document.write ( "<H4 Class='vmenu0r'/>Contact</H4>" )
   else
      write_link ( cdh, 'contact.html', 'Contact', winStat[find_winStat('contact.html')].desc, 'vmenu0r' );

   document.write ( "   </TD>\n" );
}

function prep_menu_bottom ( )
{
   document.write ( "   <TD \n" );
   document.write ( "       Align='Left'\n" );
   document.write ( "       Align='Top'\n" );
   document.write ( "       Class='highlight'/>\n" );
}

function menu_top_right ( cdh )
{
   // define table_type;
   find_view_limit( );
   table_type = '';

   if ( work_init.indexOf ( 'tv' ) == 2 )
      table_type = 'adtv'
   else
   {
      if ( work_init.indexOf ( 'ad' ) == 0 )      
         table_type = view_work
      else
         table_type = work_init;

      if (    ( table_type.length )
           && ( service[find_service(table_type)].parent_init != '' )
         )
         table_type = service[find_service(table_type)].parent_init;

      if ( work_init == 'weba' )
      {
         if ( view_work == 'http' )
            table_type = view_work
         else
            table_type = 'weba';
      }

      if (    ( work_init == 'webb' )
           || ( work_init == 'webc' ) 
         )
      {
         if (    ( view_work == 'http' )
              || ( view_work == 'webt' )
            )
            table_type = view_work
         else
            table_type = work_init;
      }

      if (    ( view_work == 'bdpr' )
           || ( view_work == 'cdpr' ) 
         )
         table_type = view_work;

      if (    ( work_init == 'bdpr' )
           || ( work_init == 'cdpr' ) 
         )
         table_type = work_init;

      if (    ( work_init == 'adpr' )
           || ( view_work == 'adpr' ) 
         )
         table_type = 'cdpr';
   }

   // Preparing table
   document.write ( "   <TD \n" );
   document.write ( "       Width='140'\n" );
   document.write ( "       Align='Left'\n" );
   document.write ( "       VAlign='Top'\n" );
   document.write ( "       Class='highlight'/>\n" );

   thumb_rows = 3;
   thumb_cols = 3;

   thumb_high = 28;
   thumb_wide = thumb_high;

   // build a table for thmbnails
   document.write ( "<TABLE Border='0'\n" );
   document.write ( "       CellSpacing='3'\n" ); 
   document.write ( "       CellPadding='0'\n" );
   document.write ( "       CellBorder='0'/>\n" );
   for ( loop_menu_top_right = 0; loop_menu_top_right < thumb_cols; loop_menu_top_right++ )
   {
      document.write ( "<TR Align='Top'/>\n" );
      for ( loop_inner_menu_top_right = 0; loop_inner_menu_top_right < thumb_cols; loop_inner_menu_top_right++ )
      {
         small_icon = loop_menu_top_right * thumb_cols + loop_inner_menu_top_right;
         this_icon  = -1;

         switch ( table_type )
         {
            case ( 'adtv' ) :
               switch ( small_icon )
               {
                  case ( 0 ) :
                     this_icon  = find_serviceRecord_by_url ( 'tv/mail-adtv-1.html' );
                     break;           
                  case ( 1 ) :
                     this_icon  = find_serviceRecord_by_url ( 'tv/ctoy-cdtv-1.html' );
                     break;           
                  case ( 2 ) :
                     this_icon  = find_serviceRecord_by_url ( 'tv/ekrd-cdtv-1.html' );
                     break;           
                  case ( 3 ) :
                     this_icon  = find_serviceRecord_by_url ( 'tv/pbok-cdtv-1.html' );
                     break;           
                  case ( 4 ) :
                     this_icon  = find_serviceRecord_by_url ( 'tv/pbok-cdtv-2.html' );
                     break;           
                  case ( 5 ) :
                     this_icon  = find_serviceRecord_by_url ( 'tv/zrbr-cdtv-1.html' );
                     break;           
                  case ( 6 ) :
                     this_icon  = find_serviceRecord_by_url ( 'tv/ford-cdtv-1.html' );
                     break;           
                  case ( 7 ) :
                     this_icon  = find_serviceRecord_by_url ( 'tv/ctoy-cdtv-2.html' );
                     break;           
                  case ( 8 ) :
                     this_icon  = find_serviceRecord_by_url ( 'tv/vikb-cdtv-1.html' );
                     break;           
               }
               break ;
            case ( 'dirm' ) :
               switch ( small_icon )
               {
                  case ( 0 ) :
                     this_icon  = find_serviceRecord_by_url ( 'dm/etrd-dirm-1.html' );
                     break;           
                  case ( 1 ) :
                     this_icon  = find_serviceRecord_by_url ( 'dm/etrd-dirm-2.html' );
                     break;           
                  case ( 2 ) :
                     this_icon  = find_serviceRecord_by_url ( 'dm/amex-dirm-1.html' );
                     break;           
                  case ( 3 ) :
                     this_icon  = find_serviceRecord_by_url ( 'dm/mail-dirm-1.html' );
                     break;           
                  case ( 4 ) :
                     this_icon  = find_serviceRecord_by_url ( 'dm/citi-dirm-1.html' );
                     break;           
                  case ( 5 ) :
                     this_icon  = find_serviceRecord_by_url ( 'dm/cour-dirm-1.html' );
                     break;           
                  case ( 6 ) :
                     this_icon  = find_serviceRecord_by_url ( 'dm/arch-dirm-1.html' );
                     break;           
                  case ( 7 ) :
                     this_icon  = find_serviceRecord_by_url ( 'dm/floz-dirm-1.html' );
                     break;           
                  case ( 8 ) :
                     this_icon  = find_serviceRecord_by_url ( 'dm/amex-dirm-2.html' );
                     break;           
               }
               break ;
            case ( 'http' ) :
            case ( 'weba' ) :
            case ( 'webt' ) :
               switch ( small_icon )
               {
                  case ( 0 ) :
                     this_icon  = find_serviceRecord_by_url ( 'web/navy-weba-1.html' );
                     break;           
                  case ( 1 ) :
                     this_icon  = find_serviceRecord_by_url ( 'web/spjy-weba-1.html' );
                     break;           
                  case ( 2 ) :
                     this_icon  = find_serviceRecord_by_url ( 'web/gfwm-weba-1.html' );
                     break;           
                  case ( 3 ) :
                     this_icon  = find_serviceRecord_by_url ( 'web/ned-weba-1.html' );
                     break;           
                  case ( 4 ) :
                     this_icon  = find_serviceRecord_by_url ( 'web/antq-weba-1.html' );
                     break;           
                  case ( 5 ) :
                     this_icon  = find_serviceRecord_by_url ( 'web/colh-weba-1.html' );
                     break;           
                  case ( 6 ) :
                     this_icon  = find_serviceRecord_by_url ( 'web/navc-weba-1.html' );
                     break;           
                  case ( 7 ) :
                     this_icon  = find_serviceRecord_by_url ( 'web/nvsp-weba-1.html' );
                     break;           
                  case ( 8 ) :
                     this_icon  = find_serviceRecord_by_url ( 'web/salt-weba-1.html' );
                     break;           
               }
               break ;
            case ( 'logo' ) :
               switch ( small_icon )
               {
                  case ( 0 ) :
                     this_icon  = find_serviceRecord_by_url ( 'identity/wmal-logo-1.html' );
                     break;           
                  case ( 1 ) :
                     this_icon  = find_serviceRecord_by_url ( 'identity/itrd-logo-1.html' );
                     break;           
                  case ( 2 ) :
                     this_icon  = find_serviceRecord_by_url ( 'identity/navy-logo-1.html' );
                     break;           
                  case ( 3 ) :
                     this_icon  = find_serviceRecord_by_url ( 'identity/clsc-logo-1.html' );
                     break;           
                  case ( 4 ) :
                     this_icon  = find_serviceRecord_by_url ( 'identity/colh-logo-1.html' );
                     break;           
                  case ( 5 ) :
                     this_icon  = find_serviceRecord_by_url ( 'identity/emal-logo-1.html' );
                     break;           
                  case ( 6 ) :
                     this_icon  = find_serviceRecord_by_url ( 'identity/ofyx-logo-1.html' );
                     break;           
                  case ( 7 ) :
                     this_icon  = find_serviceRecord_by_url ( 'identity/spjy-logo-1.html' );
                     break;           
                  case ( 8 ) :
                     this_icon  = find_serviceRecord_by_url ( 'identity/ctra-logo-1.html' );
                     break;           
               }
               break ;
            case ( 'prmo' ) :
            case ( 'dsgn' ) :
               switch ( small_icon )
               {
                  case ( 0 ) :
                     this_icon  = find_serviceRecord ( 'cgat','coll' );
                     break;           
                  case ( 1 ) :
                     this_icon  = find_serviceRecord ( 'cast','coll' );
                     break;           
                  case ( 2 ) :
                     this_icon  = find_serviceRecord_by_url ( 'misc/naps-coll-2.html' );
                     break;           
                  case ( 3 ) :
                     this_icon  = find_serviceRecord_by_url ( 'misc/amex-coll-1.html' );
                     break;           
                  case ( 4 ) :
                     this_icon  = find_serviceRecord_by_url ( 'misc/lbco-catl-1.html' );
                     break;           
                  case ( 5 ) :
                     this_icon  = find_serviceRecord ( 'amex','catl' );
                     break;           
                  case ( 6 ) :
                     this_icon  = find_serviceRecord ( 'colh','catl' );
                     break;           
                  case ( 7 ) :
                     this_icon  = find_serviceRecord ( 'nyxp','prmo' );
                     break;           
                  case ( 8 ) :
                     this_icon  = find_serviceRecord_by_url ( 'misc/naps-coll-5.html' );
                     break;           
               }
               break ;
            case ( 'adpr' ) :
            case ( 'cdpr' ) :
               switch ( small_icon )
               {
 
 		case ( 0 ) :
                     this_icon  = find_serviceRecord ( 'smon','cdpr' );
                     break;           
		case ( 1 ) :
                     this_icon  = find_serviceRecord ('nikn','cdpr');
                     break;           
                  case ( 2 ) :
                     this_icon  = find_serviceRecord ( 'comr','cdpr' );
                     break;           
                  case ( 3 ) :
                     this_icon  = find_serviceRecord_by_url ( 'ads/bnnb-cdpr-1.html' );
                     break;           
                  case ( 4 ) :
                     this_icon  = find_serviceRecord ( 'ritz','cdpr' );
                     break;           
                  case ( 5 ) :
                     this_icon  = find_serviceRecord ( 'rock','cdpr' );
                     break;           
 		case ( 6 ) :
                     this_icon  = find_serviceRecord_by_url ( 'ads/hrpc-cdpr-1.html' );
                     break;           case ( 7 ) :
                     this_icon  = find_serviceRecord ( 'etrd','cdpr' );
                     break;           
                  case ( 8 ) :
                     this_icon  = find_serviceRecord ( 'aol', 'adpr' );
                     break;           
               }
               break ;
            case ( 'cad' ) :
            default : // table_type
               switch ( small_icon )
               {
                  case ( 0 ) :
                     this_icon  = find_serviceRecord ( 'slpd','cdod' );
                     break;           
                  case ( 1 ) :
                     this_icon  = find_serviceRecord ( 'mail','cdtv' );
                     break;           
                  case ( 2 ) :
                     this_icon  = find_serviceRecord ( 'ctoy','cdtv' );
                     break;           
                  case ( 3 ) :
                     this_icon  = find_serviceRecord_by_url ( 'ads/mail-bdpr-2.html' );
                     break;           
                  case ( 4 ) :
                     this_icon  = find_serviceRecord ( 'ritz','cdpr' );
                     break;           
                  case ( 5 ) :
                     this_icon  = find_serviceRecord ( 'rock','cdpr' );
                     break;           
                  case ( 6 ) :
                     this_icon  = find_serviceRecord ( 'smon','cdpr' );
                     break;           
                  case ( 7 ) :
                     this_icon  = find_serviceRecord ( 'etrd','cdpr' );
                     break;           
                  case ( 8 ) :
                     this_icon  = find_serviceRecord ( 'aol', 'adpr' );
                     break;           
               }
               break ;
         }
         document.write ( "<TD/>\n" );

         if ( this_icon >= 0 )
         {
            icon_org  = company[find_company(serviceRecord[this_icon].co_init)].name;
            icon_opus = service[find_service(serviceRecord[this_icon].svc_init)].name;
            if ( serviceRecord[this_icon].svc_init.indexOf ( 'ad' ) == 0 )
               icon_opus = icon_opus + " advertisement";
            stat = "Click to see our "+icon_opus.toLowerCase( )+" for "+icon_org+".";

//version 1 also saved company name clicked
//          if ( table_type.length )
//             link_chip = serviceRecord[this_icon].co_init+'-'+table_type
//          else
//             link_chip = serviceRecord[this_icon].co_init+'-'+serviceRecord[this_icon].svc_init;
//          if ( table_type.length )
//             link_chip = '-'+table_type
//          else
//             link_chip = '-'+serviceRecord[this_icon].svc_init;

            link_chip = serviceRecord[this_icon].co_init + '-';
            if (    ( view_work == 'bdpr' )
                 || ( view_work == 'cdpr' )
                 || ( view_work == 'webb' )
                 || ( view_work == 'webc' )
               )
               link_chip = link_chip + view_work
            else
               link_chip = link_chip + serviceRecord[this_icon].svc_init;

            write_link_pict ( cdh, serviceRecord[this_icon].full_url, serviceRecord[this_icon].thumb_url, stat, link_chip, thumb_wide );
         }
         else

//          document.write ( "<IMG Border='0' Height='",thumb_high,"' Width='",thumb_wide,"' Src='",cdh,"misc/images/NAPStravel.sq.gif' Alt='",( loop_inner_menu_top_right * thumb_rows + loop_menu_top_right + 1 ),"'/>\n" );         
            document.write ( "<IMG Border='0' Height='",thumb_high,"' Width='",thumb_wide,"' Src='",cdh,"images/spacer.jpg'/>\n" );         
         document.write ( "</TD>\n" );
      }

      document.write ( "</TR>\n" );
   }
   document.write ( "</TABLE>\n" );

   document.write ( "   </TD>\n" );
}

//////////////////
///            ///
/// Functions  ///
///            ///
//////////////////

function find_company ( search_init )
{
   for ( loop_company = 0; loop_company < companys; loop_company++ )
   {
      if ( search_init == company[loop_company].init )
        return loop_company;
   }

   return -1;
}

function find_industry ( search_init )
{
   for ( loop_industry = 0; loop_industry < industrys; loop_industry++ )
   {
      if ( search_init == industry[loop_industry].init )
        return loop_industry;
   }

   return -1;
}

function find_service ( search_init )
{
   for ( loop__find_service = 0; loop__find_service < services; loop__find_service++ )
   {
      if ( search_init == service[loop__find_service].init )
        return loop__find_service;
   }

   return -1;
}

function find_service_by_url ( search_url )
{
   for ( loop_service_url = 0; loop_service_url < services; loop_service_url++ )
   {
      if ( search_url == service[loop_service].url )
        return loop_service;
   }

   return -1;
}

function find_serviceRecord ( cust_init, work_init, start_find )
{
   if ( cust_init == (void 0) )
      cust_init = '';

   if ( work_init == (void 0) )
      work_init = '';

   if ( start_find == (void 0) )
      start_find = 0;

   for ( loop_find_sr = start_find; loop_find_sr < serviceRecords; loop_find_sr++ )
   {
      if ( loop_find_sr == check_serviceRecord ( cust_init, work_init, loop_find_sr ) ) 
         return loop_find_sr;
   }

   return -1;
}

function find_serviceRecord_prev ( cust_init, work_init, start_find )
{
   if ( cust_init == (void 0) )
      cust_init = '';

   if ( work_init == (void 0) )
      work_init = '';

   if ( start_find == (void 0) )
      start_find = (serviceRecords - 1);

   for ( loop_find_sr = start_find; loop_find_sr >= 0; loop_find_sr-- )
   {
      if ( loop_find_sr == check_serviceRecord ( cust_init, work_init, loop_find_sr ) ) 
         return loop_find_sr;
   }

   return -1;
}

function check_serviceRecord ( check_cust_init, check_work_init, chk_rcrd )
{
   if (    (    ( check_cust_init == '' )
             || ( check_cust_init == serviceRecord[chk_rcrd].co_init )
           )
        && (    ( check_work_init == '' )                 
             || ( check_work_init == serviceRecord[chk_rcrd].svc_init )    
             || ( check_work_init == service[find_service(serviceRecord[chk_rcrd].svc_init)].parent_init )
             || (    ( check_work_init == 'adpr' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'bdpr' )
                )
             || (    ( check_work_init == 'adpr' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'cdpr' )
                )
             || (    ( check_work_init == 'adtv' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'bdtv' )
                )
             || (    ( check_work_init == 'adtv' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'cdtv' ) 
                )
             || (    ( check_work_init == 'b2ad' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'adpr' )
                )
             || (    ( check_work_init == 'b2ad' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'adtv' )
                )
             || (    ( check_work_init == 'b2ad' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'webt' )
                )
             || (    ( check_work_init == 'bdpr' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'adpr' )
                )
             || (    ( check_work_init == 'bdtv' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'adtv' )
                )
             || (    ( check_work_init == 'cad' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'adpr' )
                )
             || (    ( check_work_init == 'cad' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'webt' )
                )
             || (    ( check_work_init == 'cad' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'adtv' )
                )
             || (    ( check_work_init == 'cdpr' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'adpr' )
                )
             || (    ( check_work_init == 'cdtv' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'adtv' )
                )
             || (    ( check_work_init == 'coll' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'leaf' )
                )
             || (    ( check_work_init == 'http' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'weba' )
                )
             || (    ( check_work_init == 'http' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'webb' )
                )
             || (    ( check_work_init == 'http' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'webc' )
                )
             || (    ( check_work_init == 'http' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'webt' )
                )
             || (    ( check_work_init == 'webb' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'webt' )
                )
             || (    ( check_work_init == 'webc' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'webt' )
                )
             || (    ( check_work_init == 'webt' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'webb' )
                )
             || (    ( check_work_init == 'webt' )
                  && ( serviceRecord[chk_rcrd].svc_init == 'webc' )
                )
           )
      )
   {
      if (    ( serviceRecord[chk_rcrd].show_page > 0 )
           && ( serviceRecord[chk_rcrd].full_url.length > 0 )
         )
         return chk_rcrd;
   }

   return -1;
}

function find_serviceRecord_by_url ( search_url )
{
   for ( loop_serviceRecord_url = 0; loop_serviceRecord_url < serviceRecords; loop_serviceRecord_url++ )
   {
alertStr = loop_serviceRecord_url + ':' + search_url + '][' + serviceRecord[loop_serviceRecord_url].full_url +']';
//alert ( alertStr );
      if ( search_url == serviceRecord[loop_serviceRecord_url].full_url )
         return loop_serviceRecord_url;
   }

   return -1;
}

function find_view_limit ( )
{
   view_chip = getChip ( COOKIE_MAIN, CHIP_VIEW_BY );
   view_cust = '';
   view_work = '';

   if ( view_chip != (void 0) )
   {
      view_div  = view_chip.indexOf ( '-' );
      view_cust = view_chip.substring ( 0, view_div );
      view_work = view_chip.substring ( (view_div + 1 ), view_chip.length );
   }
   else
   {
      page_no = find_serviceRecord_by_url (this_page);
      if ( page_no >= 0 )
         view_work = serviceRecord[page_no].svc_init;
   }
}

function find_winStat ( search_page )
{
   for ( loop_find_winstat = 0; loop_find_winstat < winStats; loop_find_winstat++ )
   {
      if ( search_page == winStat[loop_find_winstat].page )
        return loop_find_winstat;
   }

   return -1;
}

function set_limit_banner ( view_work )
{
   switch ( view_work )
   {
      case ( 'cdpr' ) :
         return ( 'webc' );
      case ( 'b2ad' ) :
         return ( 'webb' );
      case ( 'http' ) :
      case ( '' ) :
         return ( 'webt' );
      default :
         return ( view_work );
   }
}

function set_limit_print ( view_work )
{
   switch ( view_work )
   {
      case ( 'cad' ) :
         return ( 'cdpr' );
      case ( 'b2ad' ) :
         return ( 'bdpr' );
      case ( 'aad' ) :
      case ( 'adpr' ) :
      case ( '' ) :
         return ( work_init );
      default :
         return ( view_work );
   }
}

function set_limit_tv ( view_work )
{
   switch ( view_work )
   {
      case ( 'cad' ) :
         return ( 'cdtv' );
      case ( 'b2ad' ) :
         return ( 'bdtv' );
      case ( 'aad' ) :
      case ( 'adtv' ) :
      case ( '' ) :
         return ( 'adtv' );
      default :
         return ( view_work );
   }
}

function strip_line_break ( in_string )
{
    out_string = in_string;

    str_break = '<BR>';
    break_pos = out_string.indexOf ( str_break );
    while ( break_pos >= 0 )
    {
       out_string = out_string.substring ( 0, break_pos )
                  + ' '
                  + out_string.substring ( ( break_pos + str_break.length ), out_string.length );
       break_pos = out_string.indexOf ( str_break );
    }

    return out_string;
}

function strip_no_break ( in_string )
{
    out_string = in_string;

    no_break = '&nbsp;';
    break_pos = out_string.indexOf ( no_break );
    while ( break_pos >= 0 )
    {
       out_string = out_string.substring ( 0, break_pos )
                  + ' '
                  + out_string.substring ( ( break_pos + no_break.length ), out_string.length );
       break_pos = out_string.indexOf ( no_break );
    }

    return out_string;
}
   
function write_link ( cdh, link, anchor, stat, text_class, link_class)
{
   stat = strip_line_break(strip_no_break(stat));
   mouseOverStr = 'window.status="'+stat+'"; return true;';
   if ( link_class == (void 0) )
      link_class = '';

   if ( link_class.length )
      clickStr = "delChip( "+'"'+COOKIE_MAIN+'", "'+CHIP_VIEW_BY+'"'+" ); setChip( "
               + '"'+COOKIE_MAIN+'", "'+CHIP_VIEW_BY+'", "'+link_class+'"'+" );"
// else
//    clickStr = "delChip( "+'"'+COOKIE_MAIN+'", "'+CHIP_VIEW_BY+'"'+" );";

   document.write ( "      <A Href='" );
   if ( link.indexOf ( 'http' ) < 0 )
      document.write ( cdh );
   document.write ( link,"'\n" );
   if ( link.indexOf ( 'http' ) == 0 )
      document.write ( "         Target='demo'\n" );
   if ( link_class.length )   
      document.write ( "         onClick='",clickStr,"'\n" );
   document.write ( "         onMouseOver='",mouseOverStr,"'\n" );
   document.write ( "         onMouseOut='window.status=pageStat;return true;'\n" );
   document.write ( "         Class='",text_class,"'/>",anchor,"</A>" );
}

function write_link_pict ( cdh, link, pict_url, stat, link_class, img_wide, img_high, h_align, v_align )
{
   stat = strip_line_break(strip_no_break(stat));
   mouseOverStr = 'window.status="'+stat+'"; return true;';
   if ( link_class == (void 0) )
      link_class == '';
   
//document.write ( 'LC[',link_class,']' );
// if ( link_class.length )
//    clickStr = "delChip( "+'"'+COOKIE_MAIN+'", "'+CHIP_VIEW_BY+'"'+" ); setChip( "
//             + '"'+COOKIE_MAIN+'", "'+CHIP_VIEW_BY+'", "'+link_class+'"'+ " );"
   if ( link_class.length )
      clickStr = "setChip( "
               + '"'+COOKIE_MAIN+'", "'+CHIP_VIEW_BY+'", "'+link_class+'"'+ " );"


//if ( clickStr != (void 0))
//document.write ( "<H5>",clickStr,"</H5>" );   
   document.write ( "      <A Href='" );
   if ( link.indexOf ( 'http' ) < 0 )
      document.write ( cdh );
   document.write ( link,"'\n" );
   if ( link.indexOf ( 'http' ) == 0 )
      document.write ( "         Target='demo'\n" );
   if ( link_class.length )    
      document.write ( "         onClick='",clickStr,"'\n" );
   document.write ( "         onMouseOver='",mouseOverStr,"'\n" );
   document.write ( "         onMouseOut='window.status=pageStat;return true;'/><IMG\n" );
   if (    ( img_wide != (void 0) )
        && ( img_wide != 0 )
      )
      document.write ( "         Width='",img_wide,"'\n" );
   if (    ( img_high != (void 0) )
        && ( img_high != 0 )
      )
      document.write ( "         Height='",img_high,"'\n" );
   if (    ( h_align != (void 0) )
        && ( h_align != '' )
      )
      document.write ( "         Align='",h_align,"'\n" );
   if (    ( v_align != (void 0) )
        && ( v_align != '' )
      )
      document.write ( "         VAlign='",v_align,"'\n" );
   document.write ( "         Border='0'\n" );
   document.write ( "         Alt='",stat,"'\n" );
   document.write ( "         Src='",cdh,pict_url,"'/></A>\n" );
}

///////////////////////////////////////////
///                                     ///
///              Cookie Cutter          ///
///              =============          ///
///                                     ///
/// Utilities for processing cookies    ///
/// and stuffing multiple variables     ///
/// and values for cookies into "chips" ///
///                                     ///
///////////////////////////////////////////

//
// Functions
//

function getCookie ( cookie_req )
{

   var cookie_name = cookie_req + "=";
   var cookie_get  = document.cookie;

   if ( cookie_get.length > 0 )
   {
      cookie_begin = cookie_get.indexOf(cookie_name);
      if ( cookie_begin != -1 )
      {
         cookie_begin += cookie_name.length;
         cookie_end   =  cookie_get.indexOf (";", cookie_begin );
         if ( cookie_end == -1 ) 
            cookie_end = cookie_get.length;

         return unescape ( cookie_get.substring ( cookie_begin, cookie_end ) );
      }
   }

   return null;
}

function setCookie ( cookie_name, cookie_value )
{
   // calculate time
   // default to refresh cookie for a year
   var stale = new Date ( );
       stale.setFullYear ( stale.getFullYear( ) + 1 );

   junk = cookie_value.indexOf ( '||' );
   while ( junk >= 0 )
   {
      cookie_value = cookie_value.substring ( 0, junk ) + cookie_value.substring ( (junk+1), cookie_value.length );
      junk = cookie_value.indexOf ( '||' );
   }

   document.cookie = cookie_name + "=" + escape(cookie_value) 
                   + "; path=/"
                   + "; expires="
                   + stale.toGMTString( );
}

function delCookie ( cookie_name )
{
   var expired = new Date ( );
       expired.setFullYear ( 1970 );

   document.cookie = cookie_name 
                   + "=; expires=" 
                   + expired.toGMTString( ) 
                   + "; path=/";
}

function getChip ( cookie_name, chip_name )
{
   var document_cookie = getCookie ( cookie_name );
   var chip = chip_name + '=';

   if ( document_cookie != null )
   {
      var chip_start = document_cookie.indexOf(chip);

      if ( chip_start >= 0 )
      {
         chip_start = document_cookie.indexOf ( '=', chip_start ) + 1;
         var chip_end = document_cookie.indexOf ('|', chip_start );
                                                                
         if ( chip_end < 0 )
            chip_end = document_cookie.length;
            
         return document_cookie.substring(chip_start, chip_end);
      }
   }
   return null;
}

function setChip ( cookie_name, chip_name, chip_value  )
{
   delChip ( cookie_name, chip_name );
   var document_cookie = getCookie ( cookie_name );

   if ( document_cookie == (void 0) )
      // brand new cookie
      document_cookie = '|' + chip_name + '=' + chip_value + '|'
   else
   {
      var chip_start = document_cookie.indexOf ( chip_name );
      var chip = chip_name + '=';

      if ( chip_start < 0 )
         // cookie without the current chip
         document_cookie += '|' + chip_name + '=' + chip_value + '|'
      else
      {
         var chip_end = document_cookie.indexOf ( '|', chip_start );
         if ( chip_end < 0 )
            chip_end = document_cookie.length;
         docuemnt_cookie = document_cookie.substring(0,chip_start) 
                         + chip 
                         + chip_value 
                         + '|' 
                         + document_cookie.substring(chip_end + 1, document_cookie.length );        
      }
        
   }
   setCookie ( cookie_name, document_cookie );
}

function delChip ( cookie_name, chip_name )
{
   var document_cookie = getCookie ( cookie_name );   
   if ( document_cookie == (void 0) )
      return false;
   
   var chip_start = document_cookie.indexOf ( chip_name );
   if ( chip_start < 0 )
      return false;

   var chip_end = document_cookie.indexOf ( '|', chip_start );
   var cookie_new = document_cookie.substring(0,chip_start)
                  + document_cookie.substring(chip_end+1,document_cookie.length);

   setCookie( cookie_name, cookie_new );
      return true;
}
/////////////////////////
/// End Cookie Cutter ///
/////////////////////////


///
/// finding page info
///

if ( this_page.indexOf ( '#' ) >= 0 )
   this_page = this_page.substring ( 0, this_page.indexOf ( '#' ) );
pageStat_counter = find_winStat ( this_page );

if ( pageStat_counter >= 0 )
{
   pageStat = winStat[pageStat_counter].desc;
   pageTitle = winStat[pageStat_counter].title;
}
else
{
   if (    ( this_page.indexOf ( '-new' ) < 0 )
        && ( this_page.indexOf ( '-') > 0 )
        && ( this_page.indexOf ( 'work' != 0 ) )
        && ( this_page.indexOf ( 'company/' != 0 ) )
      )
   {
      this_rcrd = find_serviceRecord_by_url ( this_page );    
      work_init = serviceRecord[this_rcrd].svc_init;
      cust_init = serviceRecord[this_rcrd].co_init;

      pageStat_counter = find_service ( work_init );
      if ( pageStat_counter == -1 )
         pageTitle = 'Unregistered Service for'
      else
         pageTitle = service[pageStat_counter].name + ' for';

 
      pageStat_counter = find_company ( cust_init );
      if ( pageStat_counter == -1 )
         pageTitle += ' Unregistered company'
      else
         pageTitle += ' ' + company[pageStat_counter].name;

      pageStat = 'Adventium Integrated Marketing: '+pageTitle+'.'   
   }
}
pageStat=strip_line_break( strip_no_break( pageStat ) );
window.status=pageStat;
