<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<!--#include virtual="Connections/bulsca.asp" -->
<!--#include virtual="scriptlets/functions.asp" -->
<%Session.LCID = 2057;%>

<!--SECTION TO ADD ARRAY FRM ENTRY SPREADSHEETS-->


<%
champsID=15
clubID=56

var competitors= new Array();// array to hold all the competitorID
var solos= new Array();
var ropes=new Array();
var teams=new Array();


//to list arrays copied from Spreadsheet
competitors[1]=new Array(0,'Meeson','Alfie','1','Mi','01/01/1950');
competitors[2]=new Array(0,'Christopher','Anya','1','Mi','01/01/1950');
competitors[3]=new Array(0,'Chandler','Beth','1','Mi','01/01/1950');
competitors[4]=new Array(0,'Little','Beth','1','Mi','01/01/1950');
competitors[5]=new Array(0,'Chandler','Cadie','1','Mi','01/01/1950');
competitors[6]=new Array(0,'Gilroy','Callum','1','Mi','01/01/1950');
competitors[7]=new Array(0,'Weightman','Daniel','1','Mi','01/01/1950');
competitors[8]=new Array(0,'Dickerson Weedy','Ellie','1','Mi','01/01/1950');
competitors[9]=new Array(0,'Price','Emily','1','Mi','01/01/1950');
competitors[10]=new Array(0,'Wells','James','1','Mi','01/01/1950');
competitors[11]=new Array(0,'Meeson','Jesse','1','Mi','01/01/1950');
competitors[12]=new Array(0,'Little','Jessica','1','Mi','01/01/1950');
competitors[13]=new Array(0,'Huntley','Joseph','1','Mi','01/01/1950');
competitors[14]=new Array(0,'Gordon','Lauren','1','Mi','01/01/1950');
competitors[15]=new Array(0,'Taylor','Linda','1','Mi','01/01/1950');
competitors[16]=new Array(0,'MacNaught','Megan','1','Mi','01/01/1950');
competitors[17]=new Array(0,'Smith','Mitch','1','Mi','01/01/1950');
competitors[18]=new Array(0,'Carroll','Rachel','1','Mi','01/01/1950');
competitors[19]=new Array(0,'Douglas','Rebecca','1','Mi','01/01/1950');
competitors[20]=new Array(0,'McCourt','Rhiannon','1','Mi','01/01/1950');
competitors[21]=new Array(0,'Dixon','Ryan','1','Mi','01/01/1950');
competitors[22]=new Array(0,'Telford','Will','1','Mi','01/01/1950');
competitors[23]=new Array(0,'Arkley','Daniel','1','Mi','01/01/1950');
competitors[24]=new Array(0,'TBC','TBC','1','Mi','01/01/1990');
solos[1]=new Array(1,2,'NT',86400);
solos[2]=new Array(1,4,'NT',86400);
solos[3]=new Array(2,2,'NT',86400);
solos[4]=new Array(2,4,'NT',86400);
solos[5]=new Array(3,4,'NT',86400);
solos[6]=new Array(4,4,'NT',86400);
solos[7]=new Array(5,21,'NT',86400);
solos[8]=new Array(5,2,'NT',86400);
solos[9]=new Array(6,1,'NT',86400);
solos[10]=new Array(6,2,'NT',86400);
solos[11]=new Array(7,21,'NT',86400);
solos[12]=new Array(7,2,'NT',86400);
solos[13]=new Array(7,4,'NT',86400);
solos[14]=new Array(8,21,'NT',86400);
solos[15]=new Array(8,1,'NT',86400);
solos[16]=new Array(8,2,'NT',86400);
solos[17]=new Array(9,2,'NT',86400);
solos[18]=new Array(9,4,'NT',86400);
solos[19]=new Array(10,21,'NT',86400);
solos[20]=new Array(10,2,'NT',86400);
solos[21]=new Array(10,4,'NT',86400);
solos[22]=new Array(11,21,'NT',86400);
solos[23]=new Array(11,2,'NT',86400);
solos[24]=new Array(11,4,'NT',86400);
solos[25]=new Array(12,21,'NT',86400);
solos[26]=new Array(12,2,'NT',86400);
solos[27]=new Array(13,1,'NT',86400);
solos[28]=new Array(14,21,'NT',86400);
solos[29]=new Array(14,2,'NT',86400);
solos[30]=new Array(14,4,'NT',86400);
solos[31]=new Array(15,21,'NT',86400);
solos[32]=new Array(16,21,'NT',86400);
solos[33]=new Array(16,2,'NT',86400);
solos[34]=new Array(16,4,'NT',86400);
solos[35]=new Array(17,21,'NT',86400);
solos[36]=new Array(17,2,'NT',86400);
solos[37]=new Array(17,4,'NT',86400);
solos[38]=new Array(18,4,'NT',86400);
solos[39]=new Array(19,2,'NT',86400);
solos[40]=new Array(20,21,'NT',86400);
solos[41]=new Array(20,2,'NT',86400);
solos[42]=new Array(20,4,'NT',86400);
solos[43]=new Array(21,21,'NT',86400);
solos[44]=new Array(21,4,'NT',86400);
solos[45]=new Array(22,1,'NT',86400);
solos[46]=new Array(22,2,'NT',86400);
solos[47]=new Array(22,4,'NT',86400);
solos[48]=new Array(23,21,'NT',86400);
solos[49]=new Array(23,2,'NT',86400);
solos[50]=new Array(23,4,'NT',86400);
solos[51]=new Array(24,21,'JM',11.11);
solos[52]=new Array(24,1,'JM',11.11);
solos[53]=new Array(24,2,'JM',11.11);
solos[54]=new Array(24,4,'JM',11.11);
ropes[1]=new Array(5,5,21,'NT',86400);
ropes[2]=new Array(7,7,21,'NT',86400);
ropes[3]=new Array(8,8,21,'NT',86400);
ropes[4]=new Array(10,10,21,'NT',86400);
ropes[5]=new Array(11,11,21,'NT',86400);
ropes[6]=new Array(12,12,21,'NT',86400);
ropes[7]=new Array(14,14,21,'NT',86400);
ropes[8]=new Array(15,15,21,'NT',86400);
ropes[9]=new Array(16,16,21,'NT',86400);
ropes[10]=new Array(17,17,21,'NT',86400);
ropes[11]=new Array(20,20,21,'NT',86400);
ropes[12]=new Array(21,21,21,'NT',86400);
ropes[13]=new Array(23,23,21,'NT',86400);
ropes[14]=new Array(24,24,21,'JM',11.11);
teams[1]=new Array('',24,24,24,24,22,'JM',11);
teams[2]=new Array('',24,24,24,24,9,'JM',11);
teams[3]=new Array('',24,24,24,24,8,'JM',11);


%>

<!--adds TeamMembers to System-->
<%


  for (var i=1;i<competitors.length;i++){
	  var addCompetitor=Server.CreateObject('ADODB.Command');
  addCompetitor.ActiveConnection=BULSCA_CON_STRING;
	addCompetitor.CommandText ="INSERT INTO CHAMPS_Competitors(RLSS_NUMBER,First_Name,Last_Name,DOB,Club_ID,CHAMPS_ID,Type,last_amended,amended_by,time_added,added_by) VALUES ("+String(competitors[i][3])+",'"+SQLinjectionStop(String(competitors[i][2]))+"','"+SQLinjectionStop(String(competitors[i][1]))+"','"+String(competitors[i][5])+" 00:00',"+clubID+","+champsID+",'"+String(competitors[i][4])+"',Date(),'"+String(Session("Username"))+"',Date(),'"+String(Session("Username"))+"')" ;
	addCompetitor.Execute();
	addCompetitor.ActiveConnection.Close();
	
	
	//adds competitors on-line ID to the array
	
  var getID = Server.CreateObject("ADODB.Recordset");
	getID.ActiveConnection = BULSCA_CON_STRING;
	getID.Source = "SELECT `competitor_ID` FROM  CHAMPS_Competitors  WHERE `RLSS_NUMBER` = "+competitors[i][3]+" AND `CHAMPS_ID` ="+champsID+" AND `CLUB_ID` ="+clubID+" ORDER BY competitor_ID DESC";
	getID.CursorType = 0;
	getID.CursorLocation = 2;
	getID.LockType = 1;
	getID.Open();
	competitors[i][0]=getID.Fields.Item("competitor_ID").Value;
	getID.Close();
		
  }

%>
Complete


<!--adds Solo Races to System-->
<%
for (var i=1;i<solos.length;i++){

// for the new team must create the master record first before puttign the swim tow time in
  var addEntry=Server.CreateObject('ADODB.Command');
  addEntry.ActiveConnection=BULSCA_CON_STRING;
  addEntry .CommandText ="INSERT INTO CHAMPS_SPEED_ENTRIES  (`EVENT_ID`,`SEX`, `CHAMPS_ID`, `Club_ID`,`time_added`,`added_by` ) VALUES  ("+solos[i][1]+",'"+solos[i][2]+"',"+String(champsID)+","+String(clubID)+",Date(),'"+String(Session("Username"))+"')";
  addEntry.Execute();
  addEntry.ActiveConnection.Close();
  var getID = Server.CreateObject("ADODB.Recordset");
	getID.ActiveConnection = BULSCA_CON_STRING;
	getID.Source = "SELECT `ENTRY_ID` FROM  CHAMPS_SPEED_ENTRIES  WHERE `EVENT_ID` = "+solos[i][1]+" AND `CHAMPS_ID` ="+champsID+" AND `CLUB_ID` ="+clubID+" ORDER BY ENTRY_ID DESC";
	getID.CursorType = 0;
	getID.CursorLocation = 2;
	getID.LockType = 1;
	getID.Open();
	entryID=getID.Fields.Item("ENTRY_ID").Value;
	getID.Close();

var teamDetails = Server.CreateObject('ADODB.Command');
  teamDetails .ActiveConnection = BULSCA_CON_STRING;
  var entryTime=solos[i][3]
  teamDetails .CommandText ="insert into CHAMPS_ENTRIES_DETAILS_1(`ENTRY_ID`,`Type`, `Competitor_ID_1`, `ENTRY_TIME`, `time_added`,`added_by`) values ("+entryID+",'S',"+competitors[solos[i][0]][0]+","+entryTime+",Date(),'"+String(Session("Username"))+"')" ;
  teamDetails .Execute();
  teamDetails .ActiveConnection.Close(); 
  }
  

  %>
  
  
<!--adds Rope Races to System-->
<%for (var i=1;i<ropes.length;i++){

var addEntry=Server.CreateObject('ADODB.Command');
  addEntry.ActiveConnection=BULSCA_CON_STRING;
  addEntry .CommandText ="INSERT INTO CHAMPS_SPEED_ENTRIES  (`EVENT_ID`,`SEX`, `CHAMPS_ID`, `Club_ID`,`time_added`,`added_by` ) VALUES  ("+ropes[i][2]+",'"+ropes[i][3]+"',"+String(champsID)+","+String(clubID)+",Date(),'"+String(Session("Username"))+"')";
  addEntry.Execute();
  addEntry.ActiveConnection.Close();
  var getID = Server.CreateObject("ADODB.Recordset");
	getID.ActiveConnection = BULSCA_CON_STRING;
	getID.Source = "SELECT `ENTRY_ID` FROM  CHAMPS_SPEED_ENTRIES  WHERE `EVENT_ID` = "+ropes[i][2]+" AND `CHAMPS_ID` ="+champsID+" AND `CLUB_ID` ="+clubID+" ORDER BY ENTRY_ID DESC";
	getID.CursorType = 0;
	getID.CursorLocation = 2;
	getID.LockType = 1;
	getID.Open();
	entryID=getID.Fields.Item("ENTRY_ID").Value;
	getID.Close();

var teamDetails = Server.CreateObject('ADODB.Command');
  teamDetails .ActiveConnection = BULSCA_CON_STRING;
  var entryTime=ropes[i][4]
  teamDetails .CommandText ="insert into CHAMPS_ENTRIES_DETAILS_2(`ENTRY_ID`,`Type`, `Competitor_ID_1`, `Competitor_ID_2`, `ENTRY_TIME`, `time_added`,`added_by`) values ("+entryID+",'S',"+competitors[ropes[i][0]][0]+","+competitors[ropes[i][1]][0]+","+entryTime+",Date(),'"+String(Session("Username"))+"')" ;
  teamDetails .Execute();
  teamDetails .ActiveConnection.Close();
}
%>


<!--adds Team Races to System-->
<%for (var i=1;i<teams.length;i++){


  var addEntry=Server.CreateObject('ADODB.Command');
  addEntry.ActiveConnection=BULSCA_CON_STRING;
  addEntry .CommandText ="INSERT INTO CHAMPS_SPEED_ENTRIES  (`EVENT_ID`,`SEX`, `CHAMPS_ID`, `Club_ID`,`time_added`,`added_by` ) VALUES  ("+teams[i][5]+",'"+String(teams[i][6])+"',"+String(champsID)+","+String(clubID)+",Date(),'"+String(Session("Username"))+"')";
  addEntry.Execute();
  addEntry.ActiveConnection.Close();
  var getID = Server.CreateObject("ADODB.Recordset");
	getID.ActiveConnection = BULSCA_CON_STRING;
	getID.Source = "SELECT `ENTRY_ID` FROM  CHAMPS_SPEED_ENTRIES  WHERE `EVENT_ID` = "+teams[i][5]+" AND `CHAMPS_ID` ="+champsID+" AND `CLUB_ID` ="+clubID+" ORDER BY ENTRY_ID DESC";
	getID.CursorType = 0;
	getID.CursorLocation = 2;
	getID.LockType = 1;
	getID.Open();
	entryID=getID.Fields.Item("ENTRY_ID").Value;
	getID.Close();

var teamDetails = Server.CreateObject('ADODB.Command');
  teamDetails .ActiveConnection = BULSCA_CON_STRING;
  var entryTime=teams[i][7]
  teamDetails .CommandText ="insert into CHAMPS_ENTRIES_DETAILS_4(`ENTRY_ID`,`Type`, `Competitor_ID_1`, `Competitor_ID_2`, `Competitor_ID_3`, `Competitor_ID_4`, `ENTRY_TIME`, `time_added`,`added_by`) values ("+entryID+",'S',"+competitors[teams[i][1]][0]+","+competitors[teams[i][2]][0]+","+competitors[teams[i][3]][0]+","+competitors[teams[i][4]][0]+","+entryTime+",Date(),'"+String(Session("Username"))+"')" ;
  teamDetails .Execute();
  teamDetails .ActiveConnection.Close();

if(teams[i][0]!=0){
//code to submitt team name if one providded to optimise space as not saving it when not required.

var teamName = Server.CreateObject('ADODB.Command');
  teamName .ActiveConnection = BULSCA_CON_STRING;
  teamName .CommandText ="INSERT INTO CHAMPS_TEAMNAMES ( Entry_ID_4, Description ) SELECT CHAMPS_ENTRIES_DETAILS_4.ENTRIES_DETAILS_4_ID,' "+teams[i][0]+"' AS Expr1 FROM CHAMPS_ENTRIES_DETAILS_4 WHERE (((CHAMPS_ENTRIES_DETAILS_4.ENTRIES_DETAILS_4_ID)=(SELECT Max(CHAMPS_ENTRIES_DETAILS_4.ENTRIES_DETAILS_4_ID) AS MaxOfENTRIES_DETAILS_4_ID FROM  CHAMPS_ENTRIES_DETAILS_4 GROUP BY CHAMPS_ENTRIES_DETAILS_4.ENTRY_ID HAVING (((CHAMPS_ENTRIES_DETAILS_4.ENTRY_ID)="+entryID+")))));";
  teamName .Execute();
  teamName .ActiveConnection.Close();
}

}%>