DROP FUNCTION CalculateIP;
GO
CREATE FUNCTION CalculateIP (
@varIp AS varchar(20)
) RETURNS bigint
BEGIN
Declare @IP varchar(20);
Declare @multi1 bigint;
Declare @multi2 bigint;
Declare @multi3 bigint;
Declare @value bigint;
SET @multi1 = 16777216;
SET @multi2 = 65536;
SET @multi3 = 256;
SELECT @IP = @varIp;
SELECT @value = (@multi1 * cast(substring(@IP, 1, charindex('.', @IP) - 1) as int));
SELECT @value = (@value + @multi2 * cast(substring(@IP, charindex('.', @IP) + 1, charindex('.', @IP, charindex('.', @IP) + 1) - charindex('.', @IP) - 1) as int));
SELECT @value = (@value + @multi3 * cast(reverse(substring(reverse(@IP), charindex('.', reverse(@IP)) + 1, charindex('.', reverse(@IP), charindex('.', reverse(@IP)) + 1) - charindex('.', reverse(@IP)) - 1)) as int));
SELECT @value = (@value + cast(reverse(substring(reverse(@IP), 1, charindex('.', reverse(@IP)) - 1)) as int));
RETURN @value;
END
GO
DROP PROC getCheckData;
GO
CREATE PROC getCheckData @IP varchar(20)
AS
DECLARE @startIp bigint;
DECLARE @endIp bigint;
DECLARE @locId bigint;
DECLARE @country varchar(20);
DECLARE @city varchar(20);
DECLARE @region varchar(125);
DECLARE @country_id int;
DECLARE @city_id int;
DECLARE @region_id int;
DECLARE @lat varchar(20);
DECLARE @long varchar(20);
DECLARE @checkpoint varchar(255);
DECLARE @checkpoint_id varchar(255);

CREATE TABLE #tempData (
startIpnum bigint,
endIpnum bigint,
locId bigint);
SELECT @startIp = startIpnum FROM GeoCountry WHERE dbo.CalculateIP(@IP) BETWEEN GeoCountry.startIpnum AND GeoCountry.endIpnum;
SELECT @endIp = endIpnum FROM GeoCountry WHERE dbo.CalculateIP(@IP) BETWEEN GeoCountry.startIpnum AND GeoCountry.endIpnum
INSERT INTO #tempData (startIpnum, endIpnum, locId) SELECT startIpnum, endIpnum, locId FROM GeoBlock WHERE startIpnum >= @startIp AND endIpnum <= @endIp;
SELECT @locid = GeoLocation.locId, @country = GeoLocation.country, @city = GeoLocation.city, @lat = GeoLocation.latitude, @long = GeoLocation.longitude,@region = (
SELECT GeoRegion.title FROM GeoRegion,GeoLocation,#tempData WHERE #tempData.locId = GeoLocation.locId AND dbo.CalculateIP(@IP) BETWEEN #tempData.startIpnum AND #tempData.endIpnum
AND (GeoLocation.region = GeoRegion.region AND GeoLocation.country = GeoRegion.country)
)
FROM #tempData, GeoLocation
WHERE #tempData.locId = GeoLocation.locId AND dbo.CalculateIP(@IP) BETWEEN #tempData.startIpnum AND #tempData.endIpnum
DROP TABLE #tempData;
SELECT @city = city, @city_id = id FROM FrontAds WHERE city = @city;
SELECT @region = region, @region_id = id FROM FrontAds WHERE region = @region;
SELECT @country = country, @country_id = id FROM FrontAds WHERE country = @country;

SELECT @checkpoint = CASE
WHEN @city != ‘NODATA’ AND @city_id != ” THEN @city_id
WHEN @region != ‘NODATA’ AND @region_id != ” THEN @region_id
WHEN @country != ‘NODATA’ AND @country_id != ” THEN @country_id
END
SELECT
CASE
WHEN type = ’1′ THEN ‘‘ + ‘‘ + ‘‘
WHEN type = ’2′ THEN ‘‘ + ‘‘ + ‘‘
WHEN type = ’3′ THEN ‘‘ + ‘‘ + ‘‘
WHEN type = ’4′ THEN ‘‘ + ‘‘ + ‘‘
END
FROM FrontAds WHERE id = @checkpoint;

GO

EXEC getCheckData ’212.105.99.136′;

I helgen var jag i norrland. Eller i härjedalen som jag fick det påpekat för mig. Men norrland still the same. Det va lite roligt. Förutom de satans 6 timmarnas restid enkel resa. Jag räknade ut på måndagen att jag hade spenderat lite drygt 22 timmar bakom ratten från torsdag till söndg. Inte undra på att jag har skavsår i röven.

Anledningen till norrlandsresan var ett bröllop mellan helena och micke, goda vänner te min sambo, och ja numer kanske även goda vänner till mig. Det var en trevlig tillställning även om prästen borde studera sin latin lite hårdare och kanske ge fan i nattvardsvinet.

Efterfesten var jue senare relativt galen med lite över 100 deltagare och öppenbar kan det bara sluta pÃ¥ norrlandsvis. Med allmänt kaos, norrländska “tuffa pojker” och karaoke. För att sedan vara en sÃ¥ bilintresserad landsdel kunde dom förvÃ¥nansvärt lite om sina hobby bilar. Även om det fanns nÃ¥gra fina där uppe med.

Nu har min order gått igenom hos Jegs och med min vanliga tur var då 3 produkter restnoterade istället. Men ja med lite tur kanske jag får grejerna innan årskiftet. Och då jevlar då ska de preppas låda så det heter duga.

Nästa, 40.000 skall införskaffas och handlas motordelar för. Sen jevlar e jag på banan med drivlinan!