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

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


<%
champsID=18
clubID=70

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,'Crooke','Charlotte','1','F','01/01/1990');
competitors[2]=new Array(0,'Deighton','Mia','1','F','02/01/1990');
competitors[3]=new Array(0,'Todd','Beth','1','F','03/01/1990');
competitors[4]=new Array(0,'Slinn','Jessica','1','F','04/01/1990');
competitors[5]=new Array(0,'Lindley','Laura','1','F','05/01/1990');
competitors[6]=new Array(0,'Hayes','Nyah','1','F','06/01/1990');
competitors[7]=new Array(0,'Lomotos','Abigail','1','F','07/01/1990');
competitors[8]=new Array(0,'Pears','Jessica','1','F','08/01/1990');
competitors[9]=new Array(0,'Collier','Lily Mae','1','F','09/01/1990');
competitors[10]=new Array(0,'Pearce-Burton','Eleanor','1','F','10/01/1990');
competitors[11]=new Array(0,'Newman','Isabella','1','F','11/01/1990');
competitors[12]=new Array(0,'Barron','Beth','1','F','12/01/1990');
competitors[13]=new Array(0,'Hallam','Abigail','1','F','13/01/1990');
competitors[14]=new Array(0,'Daniel','Ruby','1','F','14/01/1990');
competitors[15]=new Array(0,'Newman','Oliver','1','M','15/01/1990');
competitors[16]=new Array(0,'Mirakhori','Helia','1','F','16/01/1990');
competitors[17]=new Array(0,'Quimby','Matthew','1','M','17/01/1990');
competitors[18]=new Array(0,'Jones','Emily','1','F','18/01/1990');
competitors[19]=new Array(0,'Green','Georgina','1','F','19/01/1990');
competitors[20]=new Array(0,'Biscombe','Ethan','1','M','20/01/1990');
competitors[21]=new Array(0,'Benn','Finlay','1','M','21/01/1990');
competitors[22]=new Array(0,'McMaster','Nathan','1','M','22/01/1990');
competitors[23]=new Array(0,'Snaddon','Jessica','1','F','23/01/1990');
competitors[24]=new Array(0,'TBC','TBC','1','M','24/01/1990');
solos[1]=new Array(1,13,'JG',21.8);
solos[2]=new Array(1,23,'JG',36.74);
solos[3]=new Array(1,15,'JG',37.68);
solos[4]=new Array(1,14,'JG',46.01);
solos[5]=new Array(2,13,'JG',21.94);
solos[6]=new Array(2,23,'JG',36.84);
solos[7]=new Array(2,15,'JG',37.9);
solos[8]=new Array(2,14,'JG',46);
solos[9]=new Array(3,13,'JG',33);
solos[10]=new Array(3,23,'JG',43);
solos[11]=new Array(3,15,'JG',43);
solos[12]=new Array(3,14,'JG',48);
solos[13]=new Array(4,13,'JG',33);
solos[14]=new Array(4,23,'JG',43);
solos[15]=new Array(4,15,'JG',43);
solos[16]=new Array(4,14,'JG',48);
solos[17]=new Array(5,13,'JG',33);
solos[18]=new Array(5,23,'JG',43);
solos[19]=new Array(5,15,'JG',43);
solos[20]=new Array(5,14,'JG',48);
solos[21]=new Array(6,33,'RG11',21);
solos[22]=new Array(6,13,'RG11',32);
solos[23]=new Array(6,34,'RG11',22);
solos[24]=new Array(6,35,'RG11',16);
solos[25]=new Array(7,33,'RG11',21.01);
solos[26]=new Array(7,13,'RG11',32.01);
solos[27]=new Array(7,34,'RG11',22.01);
solos[28]=new Array(7,35,'RG11',16.01);
solos[29]=new Array(8,33,'RG11',23);
solos[30]=new Array(8,13,'RG11',34);
solos[31]=new Array(8,34,'RG11',24);
solos[32]=new Array(8,35,'RG11',18);
solos[33]=new Array(9,33,'RG11',23.01);
solos[34]=new Array(9,13,'RG11',34.01);
solos[35]=new Array(9,34,'RG11',24.01);
solos[36]=new Array(9,35,'RG11',18.01);
solos[37]=new Array(10,33,'RG11',23.02);
solos[38]=new Array(10,13,'RG11',34.02);
solos[39]=new Array(10,34,'RG11',24.02);
solos[40]=new Array(10,35,'RG11',18.02);
solos[41]=new Array(11,33,'RG11',25);
solos[42]=new Array(11,13,'RG11',36);
solos[43]=new Array(11,34,'RG11',26);
solos[44]=new Array(11,35,'RG11',22);
solos[45]=new Array(12,33,'RG9',25);
solos[46]=new Array(12,13,'RG9',36);
solos[47]=new Array(12,34,'RG9',26);
solos[48]=new Array(12,35,'RG9',22);
solos[49]=new Array(13,33,'RG9',28.03);
solos[50]=new Array(13,13,'RG9',48.03);
solos[51]=new Array(13,34,'RG9',28.03);
solos[52]=new Array(13,35,'RG9',20.03);
solos[53]=new Array(14,33,'RG9',25);
solos[54]=new Array(14,13,'RG9',36);
solos[55]=new Array(14,34,'RG9',26);
solos[56]=new Array(14,35,'RG9',22);
solos[57]=new Array(15,33,'RB11',30.03);
solos[58]=new Array(15,13,'RB11',48.03);
solos[59]=new Array(15,34,'RB11',33.03);
solos[60]=new Array(15,35,'RB11',25.03);
solos[61]=new Array(16,33,'RG11',23.02);
solos[62]=new Array(16,13,'RG11',34.02);
solos[63]=new Array(16,34,'RG11',24.02);
solos[64]=new Array(16,35,'RG11',18.02);
solos[65]=new Array(17,13,'M',20);
solos[66]=new Array(17,23,'M',31);
solos[67]=new Array(17,15,'M',30);
solos[68]=new Array(17,16,'M',35);
solos[69]=new Array(18,13,'F',20);
solos[70]=new Array(18,23,'F',31);
solos[71]=new Array(18,15,'F',30);
solos[72]=new Array(18,16,'F',35);
solos[73]=new Array(19,13,'SG',30);
solos[74]=new Array(19,23,'SG',40);
solos[75]=new Array(19,15,'SG',40);
solos[76]=new Array(19,16,'SG',45);
solos[77]=new Array(21,13,'JB',23.8);
solos[78]=new Array(21,23,'JB',36.74);
solos[79]=new Array(21,15,'JB',37.68);
solos[80]=new Array(21,14,'JB',46.01);
solos[81]=new Array(22,13,'JB',30);
solos[82]=new Array(22,23,'JB',40);
solos[83]=new Array(22,15,'JB',40);
solos[84]=new Array(22,14,'JB',45);
solos[85]=new Array(23,13,'JG',22.81);
solos[86]=new Array(23,23,'JG',37.75);
solos[87]=new Array(23,15,'JG',38.69);
solos[88]=new Array(23,14,'JG',47.02);
teams[1]=new Array('',24,24,24,24,37,'RB9',0);
teams[2]=new Array('',24,24,24,24,36,'RB9',0);
teams[3]=new Array('',24,24,24,24,37,'RB11',0);
teams[4]=new Array('',24,24,24,24,36,'RB11',0);
teams[5]=new Array('',24,24,24,24,19,'JG',0);
teams[6]=new Array('',24,24,24,24,20,'JG',0);
teams[7]=new Array('',24,24,24,24,18,'JG',0);
teams[8]=new Array('',24,24,24,24,19,'M',0);
teams[9]=new Array('',24,24,24,24,20,'M',0);
teams[10]=new Array('',24,24,24,24,18,'M',0);


%>

<!--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();
}

}%>