How Many ITR Were Sold In USA ?

[Haleiwa-Brando]

^^^That could make sense. Like in the letter from Acura which states 318 'were sold in the US' wouldn't take into account any Type-R's that were given/sold to professional race teams. This could explain why your count is past the 318 mark.

This ad is not displayed to registered or logged-in members. Register your free account today and become a member on Honda-Tech!

[andyt]

Latest standings:
1997 up to vin JH4DC231XVS025863, still count 320 Type Rs
1998 up to vin JH4DC2312WS005737, count 1002.

[nsxtasy]

Originally Posted by Haleiwa-Brando

^^^That could make sense. Like in the letter from Acura which states 318 'were sold in the US' wouldn't take into account any Type-R's that were given/sold to professional race teams. This could explain why your count is past the 318 mark.

There may be other slight discrepancies - such as cars used for press testing which were never sold to the general public, etc. As long as the numbers are close, that gives us a good idea of how many are out there. We're not going to argue ad infinitum about differences of a handful of cars... I hope...

[crr]

Originally Posted by Dave-ROR

LOL I'm sure I'm not the only developer that knows what "mod" is or that has had to calculate check digits

mod = modulo

as in, modular arithmatic

[migs]

This is truely one of 2006's best and most informative threads. Thanks to Ken and andyt for the hard work. That rocks!

This does not count JDM/CDM/UKDM R's....right?

[Haleiwa-Brando]

Originally Posted by nsxtasy

There may be other slight discrepancies - such as cars used for press testing which were never sold to the general public, etc. As long as the numbers are close, that gives us a good idea of how many are out there. We're not going to argue ad infinitum about differences of a handful of cars... I hope...

I don't want to argue over a few either. I am very satisfied with the numbers thus far.

Originally Posted by migs

This is truely one of 2006's best and most informative threads. Thanks to Ken and andyt for the hard work. That rocks!

This does not count JDM/CDM/UKDM R's....right?

Agreed. Though, how cool would it be to have a total number world wide? Broken down by country/year and a total that were sold for the whole run of the Type-R/Rx model? That would be so cooooool!

[LudeEFv2.4]

Great thred!!! Good work guys.

[andyt]

Originally Posted by migs

This does not count JDM/CDM/UKDM R's....right?

Correct, this is only counting vins listed in the US database.

[ActiveAero]

Originally Posted by andyt

Latest standings:
1997 up to vin JH4DC231XVS025863, still count 320 Type Rs
1998 up to vin JH4DC2312WS005737, count 1002.

Wow, looks like most of the 1998 R's were produced early in the cycle correct?

BTW could this program be run by anyone? Some of us could get started on 00 and 01.

[Dave-ROR]

Originally Posted by andyt

Ok, so the program died overnight at some point, but I've restarted it.
I'm up to 1997 vin JH4DC231VS012568.
Now for the interesting part....the given number for 1997 was 318.
I count 320 Champ White cars so far!
Just to double check I searched and counted based on several text strings, and all 320 are listed as "Type R". Hopefully the info in this database is accurate.
Here are the ranges by last 4 of vin.
2516-2519
2819-2832
2835-2849
2861-2925
2927-2966
2970-3029
3037-3056
3066-3127
4247-4286

The database should be accurate. No other Integra should share the same serial number.

[andyt]

EDIT:
Program has a bug! My bad, here is the corrected version.
----------

Let's see, to run the program you need:
some sort of unix system, probably Linux
a fairly recent perl
the libwww libraries and perl packages
the WWW:Mechanize library and its prerequisites
an ownerlink username and password

Also, you need a decent amount of RAM to run it for any length of time.
I tried to clean up the memory leaks as much as possible, but I dont think they are all mine
Well, here it is, if you want to run it...

#!/usr/bin/perl

use WWW::Mechanize;
use HTTP::Response;


my $username = 'PUT_USERNAME_HERE';
my $password = 'PUT_PASSWORD_HERE';
my $year = "2000"; # or 1998, 2000, 2001
my $sequence_start = 0;
my $sequence_end = 40000;

my $yearcode = "";
my $magic_number = 0;

if ($year eq "1997") {
$yearcode = "V";
$magic_number = 203;
} elsif ($year eq "1998") {
$yearcode = "W";
$magic_number = 212;
} elsif ($year eq "2000") {
$yearcode = "Y";
$magic_number = 230;
} elsif ($year eq "2001") {
$yearcode = "1";
$magic_number = 167;
}

my $mech = WWW::Mechanize->new();
my $response;
my $n = "";
my $first = "";
my $second = "";
my $third = "";
my $fourth = "";
my $fifth = "";
my $sixth = "";
my $remainder = 0;
my $vin = "";
my $url = "";
my $logname = $year . "integras.txt";

open LOG,">>$logname" or die "$!\n";

select LOG;
$|=1;

for ($x=$sequence_start; $x <= $sequence_end; $x++) {
$n = sprintf("%06d", $x);
$first = (substr $n, 0, 1) * 7;
$second = (substr $n, 1, 1) * 6;
$third = (substr $n, 2, 1) * 5;
$fourth = (substr $n, 3, 1) * 4;
$fifth = (substr $n, 4, 1) * 3;
$sixth = (substr $n, 5, 1) * 2;
my $sum = $magic_number + ($first + $second + $third + $fourth + $fifth + $sixth);
$remainder = $sum % 11;
$sum = undef;
if ($remainder == 10) { $remainder = "X"; }
$vin = "JH4DC231" . $remainder . $yearcode . "S" . $n;
print LOG "$vin\n";


$url = 'http://www.ahm-ownerlink.com/login.asp';
$mech->get( $url );
$mech->submit_form(
form_name => 'loginForm',
fields => {
user => $username,
password => $password,
}
);
$url = 'http://www.ahm-ownerlink.com/prod_profile.asp?profile=force';
$mech->get( $url );
$mech->submit_form(
form_number => 1,
fields => { vin => "$vin", }
);
$response = $mech->response();
if ($response->is_success) {
my $output = $response->content;
my @lines = split /\n/, $output;
foreach $line (@lines) {
if ($line =~ /Integra/) {
print LOG "$line\n";
last;
}
}
$output = undef;
@lines = undef;
}

}



Modified by andyt at 8:18 AM 1/17/2006

[andyt]

And oh yeah,
97 im up to 29201, count 320
98 im up to 10051, count 1002
I'm going to 40,000 on each based on the link Ken provided.
For 2000/2001 a smaller number will suffice.

[D]

nice work andyt.

[Mugen Mike]

Originally Posted by jisu009

A possible explanation could be that they account for "body in white" cars that were sent over to RealTime??

Most of the Realtime DC2's were actually RS chassis.

[ActiveAero]

Originally Posted by andyt

Let's see, to run the program you need:
some sort of unix system, probably Linux
a fairly recent perl
the libwww libraries and perl packages
the WWW:Mechanize library and its prerequisites
an ownerlink username and password

Also, you need a decent amount of RAM to run it for any length of time.
I tried to clean up the memory leaks as much as possible, but I dont think they are all mine
Well, here it is, if you want to run it...

#!/usr/bin/perl

use WWW::Mechanize;
use HTTP::Response;


my $username = 'PUT_USERNAME_HERE';
my $password = 'PUT_PASSWORD_HERE';
my $year = "2000"; # or 1998, 2000, 2001
my $sequence_start = 0;
my $sequence_end = 40000;

my $yearcode = "";
my $magic_number = 0;

if ($year eq "1997") {
$yearcode = "V";
$magic_number = 203;
} elsif ($year eq "1998") {
$yearcode = "W";
$magic_number = 212;
} elsif ($year eq "2000") {
$yearcode = "Y";
$magic_number = 230;
} elsif ($year eq "2001") {
$yearcode = "1";
$magic_number = 167;
}

my $mech = WWW::Mechanize->new();
my $response;
my $n = "";
my $first = "";
my $second = "";
my $third = "";
my $fourth = "";
my $fifth = "";
my $sixth = "";
my $remainder = 0;
my $vin = "";
my $url = "";
my $logname = $year . "integras.txt";

open LOG,">>$logname" or die "$!\n";

select LOG;
$|=1;

for ($x=$sequence_start; $x <= $sequence_end; $x++) {
$n = sprintf("%06d", $x);
$first = (substr $n, 0, 1) * 7;
$second = (substr $n, 1, 1) * 6;
$third = (substr $n, 2, 1) * 5;
$fourth = (substr $n, 3, 1) * 4;
$fifth = (substr $n, 4, 1) * 3;
$sixth = (substr $n, 5, 1) * 2;
$magic_number += ($first + $second + $third + $fourth + $fifth + $sixth);
$remainder = $magic_number % 11;
if ($remainder == 10) { $remainder = "X"; }
$vin = "JH4DC231" . $remainder . $yearcode . "S" . $n;
print LOG "$vin\n";


$url = 'http://www.ahm-ownerlink.com/login.asp';
$mech->get( $url );
$mech->submit_form(
form_name => 'loginForm',
fields => {
user => $username,
password => $password,
}
);
$url = 'http://www.ahm-ownerlink.com/prod_profile.asp?profile=force';
$mech->get( $url );
$mech->submit_form(
form_number => 1,
fields => { vin => "$vin", }
);
$response = $mech->response();
if ($response->is_success) {
my $output = $response->content;
my @lines = split /\n/, $output;
foreach $line (@lines) {
if ($line =~ /Integra/) {
print LOG "$line\n";
last;
}
}
$output = undef;
@lines = undef;
}

}

Nevermind.

[nsxtasy]

Originally Posted by andyt

I'm going to 40,000 on each based on the link Ken provided.
For 2000/2001 a smaller number will suffice.

I just got an idea that will cut down on the number of VINs you would need to check to verify which ones are ITRs.

As I mentioned, I didn't really know, at the time that I first posted, whether they used one sequence (of last six digits) for all Integras, or had more than one sequence. I just realized that it's possible to find out how many different sequences were used for Integras. You see, there are exactly fifteen different formats for a VIN number for ANY Integra during the years when the ITR was sold:

JH4DC231cySnnnnnn ITR hatch
JH4DC239cySnnnnnn GS-R hatch with leather
JH4DC238cySnnnnnn GS-R hatch without leather
JH4DC446cySnnnnnn GS hatch automatic
JH4DC436cySnnnnnn GS hatch manual
JH4DC445cySnnnnnn LS hatch automatic
JH4DC435cySnnnnnn LS hatch manual
JH4DC444cySnnnnnn RS hatch automatic
JH4DC434cySnnnnnn RS hatch manual
JH4DB859cySnnnnnn GS-R sedan with leather
JH4DB858cySnnnnnn GS-R sedan without leather
JH4DB766cySnnnnnn GS sedan automatic
JH4DB756cySnnnnnn GS sedan manual
JH4DB765cySnnnnnn LS sedan automatic
JH4DB755cySnnnnnn LS sedan manual

I chose a very low value of nnnnnn and ran the check digit formula on it to see how many "hits" I got for a given year. The answer? Each year, there are four different sequences of VIN numbers for Integras

- three-door hatches with automatic transmissions
- three-door hatches with manual transmissions
- four-door sedans with automatic transmissions
- four-door sedans with manual transmissions

Therefore, instead of going all the way up to, say, 040000 in a year in which 40,000 Integras were sold, we only need to go up to the number of three-door hatches with manual transmissions that were sold.

I did some quick spot checking of VIN numbers (by trying out the six possible VIN numbers for manual three-doors at various values of nnnnnn) and found that the highest VIN number of three-door hatches with manual transmissions sold in each model year is as follows:

1997 - at least 013000 but less than 013500
1998 - at least 011500 but less than 012000
2000 - at least 008000 but less than 008500
2001 - at least 006500 but less than 007000

So there's no need to go any higher than the highest number here when checking for ITRs.

Sorry I didn't think of this earlier.

P.S. I only checked 1997 through 2001. It's possible that there were fewer than four sequences of Integra VIN numbers prior to the 1997 model year, before the ITR was sold. For example, NSXs had only one sequence of VIN numbers for the 1991-1996 model years; it was only beginning in 1997 that they created two sequences for NSXs, one for the automatics and the other for the manuals.



Modified by nsxtasy at 9:16 AM 1/17/2006

[andyt]

Then I guess we consider 97 finished with a final count of 320.
I will move on to 2000.
1998 is still running around the 11300 mark, I'll let it hit 12000 and then run 2001.
Still at 1002 for 1998.
Here are the 1998 ranges so far:
000002 - 000003
002024 - 002071
002091 - 002114
002178 - 002225
002310 - 002333
002358 - 002381
002383 - 002406
002411 - 002433
002494 - 002516
002518 - 002540
002608 - 002630
002674 - 002721
002746 - 002769
002801 - 002824
002861 - 002884
002912 - 002935
002972 - 002995
002998 - 003021
003051 - 003074
003106 - 003125
003185 - 003205
003230 - 003250
003283 - 003287
003343 - 003363
003395 - 003402
003425 - 003431
003450 - 003471
003503 - 003524
003556 - 003577
003606 - 003627
003683 - 003699
003735 - 003756
003822 - 003830
003849 - 003870
003906 - 003921
003976 - 003998
004018 - 004026
004067 - 004075
004105 - 004113
004158 - 004166
004215 - 004223
004272 - 004291
004326 - 004335
004349 - 004358
004386 - 004395
004450 - 004469
004523 - 004532
004549 - 004558
004584 - 004593
004614 - 004622
004639 - 004647
004681 - 004689
004726 - 004734
004777 - 004785
004817 - 004826

[Mires]

Man this is great. Its like the holy grail of the ITR for owners in the US. Its weird how they were'nt better documented. I guess they didnt care since it wasnt an American car.

[dsav4shawn]

Originally Posted by Mires

Man this is great. Its like the holy grail of the ITR for owners in the US. Its weird how they were'nt better documented. I guess they didnt care since it wasnt an American car.

I'm sure someone will make the link or update to the ITRCA website... BBASSO???


Good work guys...

-Shawn who's highly impressed with the skillz in this forum (community).

[jetydosa]

Great work, this is the most intelligence laden thread Ive seen on here in a long time

[Bradstard]

Originally Posted by Mires

Man this is great. Its like the holy grail of the ITR for owners in the US. Its weird how they were'nt better documented. I guess they didnt care since it wasnt an American car.

Acura has all of info, they know EXACTLY how many were produced but we have not been able to get this info.

[Mires]

Originally Posted by Bradstard

Acura has all of info, they know EXACTLY how many were produced but we have not been able to get this info.

Im confused. Havent there been numerous people who have contacted Acura and couldnt get a definitive answer cause Acura didnt have it on record? Of course besides the letter from Acura on the 97 and 98 numbers.

[Bradstard]

Originally Posted by Mires

Im confused. Havent there been numerous people who have contacted Acura and couldnt get a definitive answer cause Acura didnt have it on record? Of course besides the letter from Acura on the 97 and 98 numbers.

We're accessing this info from an Acura database...they have in the info...

[RTW DC2R]

super sweet

[Mires]

I understand what you were saying. I meant the numbers hadn't been researched/discovered yet.