// *****************************************
// Funeral Scheduling version 3.0 
// Variable Assignments
// 
// Created for Rodriguez Funeral Home by 
//   Jay Grubb dba Grubb Computer Services (GCS)
//   April 2008 
// 
// File Created: 03-11-2010 04:38:02 PM
// 
// *****************************************

// **************** 
// Declare Arrays
// **************** 

aDateOrder = new Array() ;
aDeceased = new Array() ;
aService1 = new Array() ;
aService2 = new Array() ;
aService3 = new Array() ;
aService4 = new Array() ;

// **************** 
// Assign Global Variables
// **************** 

nMaxRec = 12 ;
stContactNumber = "<b>(276) 945-2154</b> or <b>(276) 326-1105</b>, or email us at <A href='mailto:info@RodriguezFuneral.com'>info@RodriguezFuneral.com</A>." ;
stContactName = "<b>(276) 945-2154</b> or <b>(276) 326-1105</b>, or email us at <A style='text-decoration:underline;' name='mailto'>info@RodriguezFuneral.com</A>." ;

// **************** 
// Funeral Record Variables
// **************** 
// Fields: CountOrder, Name, Date, Servicing Funeral Home, Misc, Date of Passing
fldName = 1 ;
fldDate = 2 ;
fldFuneralHome = 3 ; 
fldFuneralMisc = 4 ; 
fldPassing = 5 ; 

aDeceased[0] = new Array("28","Catron, &nbsp;Eddie A","Jan 20, 1950 - Mar 07, 2010","Serviced by Rodriguez Pocahontas Funeral Home, Pocahontas, VA., (276) 945-2154","","Mar 07, 2010") ;
aDeceased[1] = new Array("58","Harman, &nbsp;Juanita W.","Feb 04, 1922 - Jan 22, 2010","Serviced by Rodriguez Pocahontas Funeral Home, Pocahontas, VA., (276) 945-2154","","Jan 22, 2010") ;
aDeceased[2] = new Array("59","Harmon, &nbsp;Bertha D","Mar 21, 1928 - Feb 24, 2010","Serviced by Rodriguez Pocahontas Funeral Home, Pocahontas, VA., (276) 945-2154","","Feb 24, 2010") ;
aDeceased[3] = new Array("64","Helmandollar, &nbsp;Iona M","May 20, 1919 - Feb 21, 2010","Serviced by Rodriguez Pocahontas Funeral Home, Pocahontas, VA., (276) 945-2154","","Feb 21, 2010") ;
aDeceased[4] = new Array("76","Lambert, &nbsp;Frank W","Oct 14, 1921 - Jan 10, 2010","Serviced by Rodriguez Bluefield Funeral Home, Bluefield, VA., (276) 326-1105","","Jan 10, 2010") ;
aDeceased[5] = new Array("89","Marshall, &nbsp;Bernard","Mar 13, 1936 - Feb 20, 2010","Serviced by Rodriguez Pocahontas Funeral Home, Pocahontas, VA., (276) 945-2154","","Feb 20, 2010") ;
aDeceased[6] = new Array("90","Martin, &nbsp;Alice Patricia","Mar 26, 1941 - Jan 15, 2010","Serviced by Rodriguez Pocahontas Funeral Home, Pocahontas, VA., (276) 945-2154","","Jan 15, 2010") ;
aDeceased[7] = new Array("120","Reid, &nbsp;Thomas Alan","Mar 15, 1958 - Feb 01, 2010","Serviced by Rodriguez Pocahontas Funeral Home, Pocahontas, VA., (276) 945-2154","","Feb 01, 2010") ;
aDeceased[8] = new Array("123","Rowden, &nbsp;Altha Elizabeth","Aug 04, 1926 - Jan 24, 2010","Serviced by Rodriguez Pocahontas Funeral Home, Pocahontas, VA., (276) 945-2154","","Jan 24, 2010") ;
aDeceased[9] = new Array("141","Spence, &nbsp;Annie Rachel","Nov 02, 1927 - Jan 09, 2010","Serviced by Rodriguez Pocahontas Funeral Home, Pocahontas, VA., (276) 945-2154","","Jan 09, 2010") ;
aDeceased[10] = new Array("163","Williams, &nbsp;Stella Kenney","Mar 11, 1924 - Feb 11, 2010","Serviced by Rodriguez Pocahontas Funeral Home, Pocahontas, VA., (276) 945-2154","","Feb 11, 2010") ;
aDeceased[11] = new Array("168","Wright, &nbsp;Wanda Jean","Jul 09, 1949 - Jan 29, 2010","Serviced by Rodriguez Pocahontas Funeral Home, Pocahontas, VA., (276) 945-2154","","Jan 29, 2010") ;

// Order by Date Index
aDateOrder = Array(0,2,3,5,10,7,11,8,1,6,4,9,0) ;

// **************** 
// Obituary Index 
// **************** 
// True if an obituary is available for this record 
aObituary = Array(1,1,1,1,1,1,1,1,1,1,1,1,0) ;

// **************** 
// Services Key Indexes
// **************** 

// FuneralID table primary key
aFuneralID = Array("catroneddiea030710","harmanjuanitaw012210","harmonberthah022410","helmandollionam022110","lambertfrankw011010","marshallbernard022010","martinalice011510","reidthomasa020110","rowdenalthae012510","spenceannier010910","williamsstellak021110","wrightwandaj012910") ;

// Date of last service
aDateOfService = Array("5/9/2010","3/27/2010","4/29/2010","4/26/2010","3/15/2010","4/24/2010","3/24/2010","4/5/2010","3/31/2010","3/17/2010","4/14/2010","4/4/2010") ;

// True if Array aService1 has a value for this funeralID
aIsService1 = Array(-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,0,0) ; 

// True if Array aService2 has a value for this funeralID
aIsService2 = Array(-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,0,0) ; 

// True if Array aService3 has a value for this funeralID
aIsService3 = Array(-1,-1,-1,-1,-1,-1,-1,-1,0,-1,-1,0,0,0) ; 

// True if Array aService4 has a value for this funeralID
aIsService4 = Array(0,0,0,0,0,0,0,0,0,0,0,0,0,0) ; 

// **************** 
// Services Arrays 
// **************** 
// Fields: CountOrder, ServiceArray, ServiceFld, ServiceName, ServiceDateTime, Location, Address, Misc
fldServiceName = 3 ;
fldServiceDateTime = 4 ;
fldLocation = 5 ;
fldAddress = 6 ;
fldServiceMisc = 7 ;

// **************** 
// Service1 
// **************** 
aService1[0] = new Array("28","1","4","Graveside","Wed, Mar 10, 2010","Woodlawn Memorial Park","Bluewell, West Virginia<br/>","") ;
aService1[1] = new Array("58","1","3","Viewing","Mon, Jan 25, 2010 at 6:00 PM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService1[2] = new Array("59","1","3","Viewing","Sat, Feb 27, 2010 at 6:00 PM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService1[3] = new Array("64","1","3","Viewing","Wed, Feb 24, 2010 at 6:00 PM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService1[4] = new Array("76","1","4","Graveside","Thu, Jan 14, 2010","Maple Hill Cemetery","Bluefield, VA<br/>","") ;
aService1[5] = new Array("89","1","3","Viewing","Mon, Feb 22, 2010 at 7:00 PM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService1[6] = new Array("90","1","4","Graveside","Sat, Jan 23, 2010","Restlawn Memorial Gardens","Bluefield, WV<br/>","") ;
aService1[7] = new Array("120","1","3","Viewing","Wed, Feb 3, 2010 at 6:00 PM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService1[8] = new Array("123","1","4","Entombment","Sat, Jan 30, 2010","Grandview Mausoleum","Bluefield, Virginia<br/>","") ;
aService1[9] = new Array("141","1","4","Graveside","Sat, Jan 16, 2010","Grandview Cemetery","Bluefield, Virginia<br/>540-334-2222","") ;
aService1[10] = new Array("163","1","4","Graveside","Sat, Feb 13, 2010","Grandview Memory Gardens","Bluefield, Virginia<br/>","") ;
aService1[11] = new Array("168","1","4","Graveside","Wed, Feb 3, 2010","Grandview Mausoleum Chapel","Bluefield, Virginia<br/>","") ;

// **************** 
// Service2 
// **************** 
aService2[0] = new Array("28","2","3","Viewing","Wed, Mar 10, 2010 at 9:00 AM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService2[1] = new Array("58","2","4","Graveside","Tue, Jan 26, 2010 at 11:00 AM","Woodlawn Mausoleum","Bluewell, West Virginia<br/>","") ;
aService2[2] = new Array("59","2","4","Graveside","Sun, Feb 28, 2010","Grandview Memory Gardens","Bluefield, Virginia<br/>","") ;
aService2[3] = new Array("64","2","4","Graveside","Thu, Feb 25, 2010","Horsepen Cemetery","Horsepen, Virginia<br/>","") ;
aService2[4] = new Array("76","2","3","Viewing","Thu, Jan 14, 2010 at 12:00 PM","Rodriguez Funeral Home","210 S. College Ave<br/>Bluefield, VA<br/>(276) 326-1105","") ;
aService2[5] = new Array("89","2","4","Graveside","Tue, Feb 23, 2010","Roselawn Memorial Gardens","Bluefield Princeton Rd<br/>Bluefield, WV 24701<br/>(304) 324-8367","") ;
aService2[6] = new Array("90","2","3","Viewing","Sat, Jan 23, 2010 at 11:00 AM","Greater Mount Zion Pentecostal Holiness Church","Pulaski and Peck Street<br/>Bluefield, WV<br/>","") ;
aService2[7] = new Array("120","2","4","Graveside","Thu, Feb 4, 2010","Grandview Memory Gardens","Bluefield, Virginia<br/>","") ;
aService2[8] = new Array("123","2","1","Cryptside service","Sat, Jan 30, 2010 at 1:00 PM","Grandview Mausoleum","Bluefield, Virginia<br/>","") ;
aService2[9] = new Array("141","2","3","Viewing","Sat, Jan 16, 2010 at 12:00 PM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService2[10] = new Array("163","2","3","Viewing","Sat, Feb 13, 2010 at 11:00 AM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService2[11] = new Array("168","2","1","Funeral","Wed, Feb 3, 2010 at 1:00 PM","Grandview Mausoleum Chapel","Bluefield, Virginia<br/>","") ;

// **************** 
// Service3
// **************** 
aService3[0] = new Array("28","3","1","Funeral","Wed, Mar 10, 2010 at 10:00 AM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService3[1] = new Array("58","3","1","Funeral","Tue, Jan 26, 2010 at 11:00 AM","Woodlawn Mausoleum","Bluewell, West Virginia<br/>","") ;
aService3[2] = new Array("59","3","1","Funeral","Sun, Feb 28, 2010 at 1:00 PM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService3[3] = new Array("64","3","1","Funeral","Thu, Feb 25, 2010 at 11:00 AM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService3[4] = new Array("76","3","1","Funeral","Thu, Jan 14, 2010 at 2:00 PM","Rodriguez Funeral Home","210 S. College Ave<br/>Bluefield, VA<br/>(276) 326-1105","") ;
aService3[5] = new Array("89","3","1","Funeral","Tue, Feb 23, 2010 at 11:00 AM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService3[6] = new Array("90","3","1","Funeral","Sat, Jan 23, 2010 at 1:00 PM","Greater Mount Zion Pentecostal Holiness Church","Pulaski and Peck Street<br/>Bluefield, WV<br/>","") ;
aService3[7] = new Array("120","3","1","Funeral","Thu, Feb 4, 2010 at 2:00 PM","Pocahontas High School","Pocahontas, Virginia<br/>","") ;
aService3[8] = new Array("141","3","1","Funeral","Sat, Jan 16, 2010 at 1:00 PM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;
aService3[9] = new Array("163","3","1","Funeral","Sat, Feb 13, 2010 at 1:00 PM","Rodriguez Funeral Home","68 Water Street<br/>Pocahontas, Va<br/>(276) 945-2154","") ;

// **************** 
// Service4
// **************** 

//
// Funeral Scheduling Data. End. 
//