<%@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=23

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,'Hobbs','Michael','1','Mi','01/01/1950');
competitors[2]=new Array(0,'Kane','Andrew','1','Mi','01/01/1950');
competitors[3]=new Array(0,'Butler','David','1','Mi','01/01/1950');
competitors[4]=new Array(0,'Waiyaki','Oba','1','Mi','01/01/1950');
competitors[5]=new Array(0,'TBC','Dan','1','Mi','01/01/1950');
competitors[6]=new Array(0,'Reeve','Jacob','1','Mi','01/01/1950');
competitors[7]=new Array(0,'Schofield','Martin','1','Mi','01/01/1950');
competitors[8]=new Array(0,'Lawman','Sam','1','Mi','01/01/1950');
competitors[9]=new Array(0,'Reeve','Ellyn','1','Mi','01/01/1950');
competitors[10]=new Array(0,'Hand','Jade','1','Mi','01/01/1950');
competitors[11]=new Array(0,'Phillips','Frankie','1','Mi','01/01/1950');
competitors[12]=new Array(0,'Woollard','Joe','1','Mi','01/01/1950');
competitors[13]=new Array(0,'Munday','Ellie','1','Mi','01/01/1950');
competitors[14]=new Array(0,'TBC','TBC','1','Mi','01/01/1950');
competitors[15]=new Array(0,'TBC','TBC','1','Mi','01/01/1950');
solos[1]=new Array(1,21,'NT',86400);
solos[2]=new Array(1,4,'NT',86400);
solos[3]=new Array(2,21,'NT',86400);
solos[4]=new Array(2,1,'NT',86400);
solos[5]=new Array(2,2,'NT',86400);
solos[6]=new Array(2,4,'NT',86400);
solos[7]=new Array(3,1,'NT',86400);
solos[8]=new Array(3,2,'NT',86400);
solos[9]=new Array(3,4,'NT',86400);
solos[10]=new Array(4,21,'NT',86400);
solos[11]=new Array(4,1,'NT',86400);
solos[12]=new Array(4,2,'NT',86400);
solos[13]=new Array(4,4,'NT',86400);
solos[14]=new Array(5,2,'NT',86400);
solos[15]=new Array(5,4,'NT',86400);
solos[16]=new Array(6,2,'NT',86400);
solos[17]=new Array(7,4,'NT',86400);
solos[18]=new Array(8,21,'NT',86400);
solos[19]=new Array(8,1,'NT',86400);
solos[20]=new Array(8,2,'NT',86400);
solos[21]=new Array(8,4,'NT',86400);
solos[22]=new Array(9,4,'NT',86400);
solos[23]=new Array(10,1,'NT',86400);
solos[24]=new Array(11,21,'NT',86400);
solos[25]=new Array(11,1,'NT',86400);
solos[26]=new Array(11,2,'NT',86400);
solos[27]=new Array(11,4,'NT',86400);
solos[28]=new Array(12,2,'NT',86400);
solos[29]=new Array(12,4,'NT',86400);
solos[30]=new Array(13,21,'NT',86400);
solos[31]=new Array(13,1,'NT',86400);
solos[32]=new Array(13,2,'NT',86400);
solos[33]=new Array(13,4,'NT',86400);
solos[34]=new Array(14,21,'JM',7);
solos[35]=new Array(14,1,'JM',7);
solos[36]=new Array(14,2,'JM',7);
solos[37]=new Array(14,4,'JM',7);
solos[38]=new Array(14,30,'JM',7);
solos[39]=new Array(15,21,'Mi',4);
solos[40]=new Array(15,1,'Mi',4);
solos[41]=new Array(15,2,'Mi',4);
solos[42]=new Array(15,4,'Mi',4);
solos[43]=new Array(15,30,'Mi',4);
ropes[1]=new Array(1,1,21,'NT',86400);
ropes[2]=new Array(2,2,21,'NT',86400);
ropes[3]=new Array(4,4,21,'NT',86400);
ropes[4]=new Array(8,8,21,'NT',86400);
ropes[5]=new Array(11,11,21,'NT',86400);
ropes[6]=new Array(13,13,21,'NT',86400);
ropes[7]=new Array(14,14,21,'JM',7);
ropes[8]=new Array(15,15,21,'Mi',4);
teams[1]=new Array('',14,14,14,14,22,'JM',7);
teams[2]=new Array('',14,14,14,14,9,'JM',7);
teams[3]=new Array('',14,14,14,14,8,'JM',7);
teams[4]=new Array('',15,15,15,15,22,'Mi',4);
teams[5]=new Array('',15,15,15,15,9,'Mi',4);
teams[6]=new Array('',15,15,15,15,8,'Mi',4);


%>

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

}%>