OPTION NOCENTER NOFMTERR OBS=5000000 LS=160 PAGESIZE=89; /* PROGRAM NAME: 06LTVImp2011.SAS UPDATED: 01/25/2013 */ /* THIS PROGRAM DECODES THE VIN FOR LTVs WITH */ /* NAMEPLATES OF OVERSEAS-BASED MANUFACTURERS, MY 1985-2011 */ DATA IMPTRK2(DROP=V); SET IMPTRK1; IF 30 LE MAK2 LE 63; IF MAK2=49 THEN GOTO LTTOYOTA; IF MAK2=35 THEN GOTO LTNISSAN; IF MAK2=30 THEN GOTO LTVW; IF MAK2=32 THEN GOTO LTAUDI; IF MAK2=33 THEN GOTO LTMINI; IF MAK2=34 THEN GOTO LTBMW; IF MAK2=37 THEN GOTO LTHONDA; IF MAK2=38 THEN GOTO LTISUZU; IF MAK2=41 THEN GOTO LTMAZDA; IF MAK2=42 THEN GOTO LTMERCED; IF MAK2=45 THEN GOTO LTPORS; IF MAK2=47 THEN GOTO LTSAAB; IF MAK2=48 THEN GOTO LTSUBARU; IF MAK2=51 THEN GOTO LTVOLVO; IF MAK2=52 THEN GOTO LTMITS; IF MAK2=53 THEN GOTO LTSUZUKI; IF MAK2=54 THEN GOTO LTACURA; IF MAK2=55 THEN GOTO LTHYUN; IF MAK2=58 THEN GOTO LTINFIN; IF MAK2=59 THEN GOTO LTLEXUS; IF MAK2=60 THEN GOTO ROCKY; IF MAK2=62 THEN GOTO LTLAND; IF MAK2=63 THEN GOTO LTKIA; TRKTYP=9; CG=99999; MM2=99999; RETURN; LTVW: V4=TRANSLATE(V4,'ZSGB','2568'); IF MY LE 2009 THEN V7=TRANSLATE(V7,'2568','ZSGB'); IF MY LE 2004 THEN V8=TRANSLATE(V8,'2568','ZSGB'); V78=V7||V8; IF MY GE 2009 AND V5='W' AND V1='2' AND V2='V' AND V3='8' THEN DO; TRKTYP=5; MM2=30406; CG=6415; RETURN; END; /* ROUTAN */ IF 2004 LE MY LE 2009 AND V78='7L' AND V1='W' AND V2='V' AND V3='G' THEN DO; TRKTYP=4; MM2=30313; CG=30301; RETURN; END; IF MY=2010 AND V78='A9' AND V1='W' AND V2='V' AND V3='G' THEN DO; TRKTYP=4; MM2=30313; CG=30301; RETURN; END; /* TOUAREG 112.4 redesigned 2011 */ IF MY=2009 AND V78='5N' AND V4 IN ('A','C') AND V1='W' AND V2='V' AND V3='G' THEN DO; TRKTYP=3; MM2=30302; CG=30302; RETURN; END; IF MY GE 2010 AND V78='AX' AND V4 IN ('A','C') AND V1='W' AND V2='V' AND V3='G' THEN DO; TRKTYP=3; MM2=30302; CG=30302; RETURN; END; /* TIGUAN */ IF MY=2009 AND V78='5N' AND V4='B' AND V1='W' AND V2='V' AND V3='G' THEN DO; TRKTYP=3; MM2=30303; CG=30302; RETURN; END; IF MY GE 2010 AND V78='AX' AND V4='B' AND V1='W' AND V2='V' AND V3='G' THEN DO; TRKTYP=3; MM2=30303; CG=30302; RETURN; END; /* TIGUAN AWD */ IF MY GE 2011 AND V78='BP' AND V1='W' AND V2='V' AND V3='G' THEN DO; TRKTYP=4; MM2=30313; CG=30303; RETURN; END; /* TOUAREG 113.9 2011 */ IF 1985 LE MY LE 1991 AND V4='Y' AND V78='25' THEN DO; TRKTYP=5; MM2=30401; CG=30401; RETURN; END; IF 1985 LE MY LE 1991 AND V4='Z' AND V78='25' THEN DO; TRKTYP=5; MM2=30402; CG=30401; RETURN; END; IF 1985 LE MY LE 1991 AND V4='X' AND V78='25' THEN DO; TRKTYP=5; MM2=30403; CG=30401; RETURN; END; IF 1990 LE MY LE 1991 AND V4='T' AND V78='25' THEN DO; TRKTYP=5; MM2=30404; CG=30401; RETURN; END; IF 1993 LE MY LE 1994 AND V3='2' AND V4 IN ('H','K','M') AND V78='70' THEN DO; TRKTYP=5; MM2=30412; CG=30402; RETURN; END; IF MY=1995 AND V3='2' AND V4 IN ('E','H','J','K','L','M','P') AND V78='70' THEN DO; TRKTYP=5; MM2=30412; CG=30402; RETURN; END; IF MY=1996 AND V3='2' AND V4 IN ('E','K','L','M','P') AND V78='70' THEN DO; TRKTYP=5; MM2=30412; CG=30402; RETURN; END; IF MY=1997 AND V3='2' AND V4 IN ('E','K','M') AND V78='70' THEN DO; TRKTYP=5; MM2=30412; CG=30402; RETURN; END; IF 1999 LE MY LE 2003 AND V3='2' AND V4 IN ('E','K','M','N') AND V78='70' THEN DO; TRKTYP=5; MM2=30412; CG=30402; RETURN; END; IF 1997 LE MY LE 2004 AND V3='3' AND V78='70' THEN DO; TRKTYP=5; MM2=30612; CG=30402; RETURN; END; TRKTYP=9; CG=99999; MM2=99999; RETURN; LTAUDI: V4=TRANSLATE(V4,'ZSGB','2568'); V78=V7||V8; IF 2001 LE MY LE 2005 AND V78='4B' AND V4='Y' THEN DO; TRKTYP=3; MM2=32047; CG=32301; RETURN; END; /* ALLROAD ends 2005 */ IF 2007 LE MY LE 2009 AND V78='4L' THEN DO; TRKTYP=3; MM2=32313; CG=32302; RETURN; END; IF MY GE 2010 AND V78='FE' THEN DO; TRKTYP=3; MM2=32313; CG=32302; RETURN; END; /* Q7 */ IF MY=2009 AND V78='8R' THEN DO; TRKTYP=3; MM2=32303; CG=32303; RETURN; END; IF MY GE 2010 AND V78='FP' THEN DO; TRKTYP=3; MM2=32303; CG=32303; RETURN; END; /* Q5 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTMINI: V4=TRANSLATE(V4,'ZSGB','2568'); V45=V4||V5; IF MY GE 2011 AND V45 IN ('ZB','ZC') THEN DO; TRKTYP=3; MM2=33035; CG=34305; RETURN; END; /* MINI-COOPER COUNTRYMAN CUV */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTBMW: V4=TRANSLATE(V4,'ZSGB','2568'); V45=V4||V5; IF 2000 LE MY LE 2006 AND V45 IN ('FA','FB') THEN DO; TRKTYP=4; MM2=34313; CG=34301; RETURN; END; /* X5 111.0 redesigned 2007 */ IF 2004 LE MY LE 2010 AND V4='P' AND V1='W' AND V2='B' AND V3='X' THEN DO; TRKTYP=3; MM2=34303; CG=34302; RETURN; END; /* X3 110.1 redesigned 2011 */ IF 2008 LE MY LE 2009 AND V45='FG' THEN DO; TRKTYP=4; MM2=34044; CG=34303; RETURN; END; IF MY GE 2010 AND V45 IN ('FG','FH','GZ') THEN DO; TRKTYP=4; MM2=34044; CG=34303; RETURN; END; /* X6 */ IF MY IN (2007,2008) AND V45='FE' THEN DO; TRKTYP=4; MM2=34313; CG=34303; RETURN; END; IF MY=2009 AND V45 IN ('FE','FF') THEN DO; TRKTYP=4; MM2=34313; CG=34303; RETURN; END; IF MY=2010 AND V45 IN ('FE','FF','GY') THEN DO; TRKTYP=4; MM2=34313; CG=34303; RETURN; END; IF MY GE 2011 AND V45 IN ('GY','ZV','ZW') THEN DO; TRKTYP=4; MM2=34313; CG=34303; RETURN; END; /* X5 115.5 */ IF MY GE 2011 AND V45='WX' THEN DO; TRKTYP=3; MM2=34303; CG=34304; RETURN; END; /* X3 110.5 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTNISSAN: V5=TRANSLATE(V5,'ZSGB','2568'); V8=TRANSLATE(V8,'ZSGB','2568'); V6=TRANSLATE(V6,'2568','ZSGB'); IF MY LE 2009 THEN DO; V7=TRANSLATE(V7,'2568','ZSGB'); V=10*INPUT(V6,1.0)+INPUT(V7,1.0); END; V57=V5||V6||V7; IF MY=1993 AND V5='N' AND V=14 AND V1='4' THEN DO; TRKTYP=5; MM2=35450; CG=12405; RETURN; END; IF 1993 LE MY LE 1998 AND V5='N' AND V=11 AND V1='4' THEN DO; TRKTYP=5; MM2=35452; CG=12405; RETURN; END; IF 1999 LE MY LE 2000 AND V5='N' AND V=11 AND V1='4' THEN DO; TRKTYP=5; MM2=35452; CG=12407; RETURN; END; IF 2001 LE MY LE 2002 AND V5='N' AND V IN (15,16,17) AND V1='4' THEN DO; TRKTYP=5; MM2=35452; CG=12407; RETURN; END; IF 1985 LE MY LE 1986 AND V5='D' AND V=1 AND V8='S' THEN DO; TRKTYP=1; MM2=35240; CG=35201; RETURN; END; IF 1985 LE MY LE 1986 AND V5='D' AND V=1 AND V8='Y' THEN DO; TRKTYP=1; MM2=35241; CG=35201; RETURN; END; IF 1985 LE MY LE 1986 AND V5='D' AND V=5 AND V8='H' THEN DO; TRKTYP=1; MM2=35540; CG=35201; RETURN; END; IF 1985 LE MY LE 1986 AND V5='D' AND V=6 AND V8='S' THEN DO; TRKTYP=1; MM2=35242; CG=35202; RETURN; END; IF 1985 LE MY LE 1986 AND V5='D' AND V=6 AND V8='Y' THEN DO; TRKTYP=1; MM2=35243; CG=35202; RETURN; END; IF 1985 LE MY LE 1986 AND V5='D' AND V=2 AND V8='S' THEN DO; TRKTYP=1; MM2=35246; CG=35202; RETURN; END; IF 1985 LE MY LE 1986 AND V5='D' AND V=2 AND V8='Y' THEN DO; TRKTYP=1; MM2=35247; CG=35202; RETURN; END; IF 1986 LE MY LE 1997 AND V5='D' AND V=11 AND (V8='S' OR V8='H') AND V3='6' THEN DO; TRKTYP=1; MM2=35240; CG=35203; RETURN; END; IF 1986 LE MY LE 1997 AND V5='D' AND V=11 AND V8='Y' AND V3='6' THEN DO; TRKTYP=1; MM2=35241; CG=35203; RETURN; END; IF 1986 LE MY LE 1989 AND V5='D' AND V=15 AND V8='H' AND V3='6' THEN DO; TRKTYP=1; MM2=35540; CG=35203; RETURN; END; IF 1986 LE MY LE 1997 AND V5='D' AND V=16 AND (V8='S' OR V8='H') AND V3='6' THEN DO; TRKTYP=1; MM2=35242; CG=35204; RETURN; END; IF (MY=1986 OR 1988 LE MY LE 1997) AND V5='D' AND V=16 AND V8='Y' AND V3='6' THEN DO; TRKTYP=1; MM2=35243; CG=35204; RETURN; END; IF MY=1987 AND V1='1' AND V5='D' AND V=16 AND V8='Y' AND V3='6' THEN DO; TRKTYP=1; MM2=35243; CG=35204; RETURN; END; IF 1986 LE MY LE 1995 AND V5='D' AND V=12 AND (V8='S' OR V8='H') AND V3='6' THEN DO; TRKTYP=1; MM2=35246; CG=35204; RETURN; END; IF 1986 LE MY LE 1988 AND V5='D' AND V=12 AND V8='Y' AND V3='6' THEN DO; TRKTYP=1; MM2=35247; CG=35204; RETURN; END; IF 1998 LE MY LE 2000 AND V5='D' AND V=21 AND V1='1' AND V8='S' THEN DO; TRKTYP=1; MM2=35200; CG=35205; RETURN; END; IF MY=2001 AND V5='D' AND V=21 AND V1='1' AND V8 IN ('S','X') THEN DO; TRKTYP=1; MM2=35200; CG=35205; RETURN; END; IF 1998 LE MY LE 1999 AND V5='D' AND V=21 AND V1='1' AND V8='Y' THEN DO; TRKTYP=1; MM2=35201; CG=35205; RETURN; END; IF 1998 LE MY LE 2000 AND V5='D' AND V=26 AND V1='1' AND V8 IN ('S','T') THEN DO; TRKTYP=1; MM2=35202; CG=35206; RETURN; END; IF 2001 LE MY LE 2004 AND V5='D' AND V=26 AND V1='1' AND V8 IN ('S','T','X') THEN DO; TRKTYP=1; MM2=35202; CG=35206; RETURN; END; IF 1998 LE MY LE 2004 AND V5='D' AND V=26 AND V1='1' AND V8='Y' THEN DO; TRKTYP=1; MM2=35203; CG=35206; RETURN; END; IF MY=2000 AND V5='D' AND V=27 AND V1='1' AND V8 IN ('S','T') THEN DO; TRKTYP=1; MM2=35204; CG=35206; RETURN; END; IF 2001 LE MY LE 2004 AND V5='D' AND V=27 AND V1='1' AND V8 IN ('S','T','X') THEN DO; TRKTYP=1; MM2=35204; CG=35206; RETURN; END; IF 2000 LE MY LE 2004 AND V5='D' AND V=27 AND V1='1' AND V8='Y' THEN DO; TRKTYP=1; MM2=35205; CG=35206; RETURN; END; IF 2002 LE MY LE 2004 AND V5='D' AND V=29 AND V1='1' AND V8 IN ('S','T','X') THEN DO; TRKTYP=1; MM2=35204; CG=35207; RETURN; END; IF 2002 LE MY LE 2004 AND V5='D' AND V=29 AND V1='1' AND V8='Y' THEN DO; TRKTYP=1; MM2=35205; CG=35207; RETURN; END; IF 2004 LE MY LE 2007 AND V5='A' AND V=6 AND V8='A' THEN DO; TRKTYP=2; MM2=35212; CG=35209; RETURN; END; IF 2008 LE MY LE 2009 AND V5='A' AND V=6 AND V8 IN ('A','D') THEN DO; TRKTYP=2; MM2=35212; CG=35209; RETURN; END; IF MY GE 2010 AND V57='A0C' AND V8 IN ('A','D','F','H') THEN DO; TRKTYP=2; MM2=35212; CG=35209; RETURN; END; /* TITAN KING CAB */ IF MY=2004 AND V5='A' AND V=6 AND V8='B' THEN DO; TRKTYP=2; MM2=35213; CG=35209; RETURN; END; IF 2005 LE MY LE 2009 AND V5='A' AND V=6 AND V8 IN ('B','C') THEN DO; TRKTYP=2; MM2=35213; CG=35209; RETURN; END; IF MY GE 2010 AND V57='A0C' AND V8 IN ('B','C','J') THEN DO; TRKTYP=2; MM2=35213; CG=35209; RETURN; END; /* TITAN KING CAB 4X4 */ IF 2004 LE MY LE 2007 AND V5='A' AND V=7 AND V8='A' THEN DO; TRKTYP=2; MM2=35214; CG=35209; RETURN; END; IF 2008 LE MY LE 2009 AND V5='A' AND V=7 AND V8 IN ('A','D') THEN DO; TRKTYP=2; MM2=35214; CG=35209; RETURN; END; IF MY GE 2010 AND V57='A0E' AND V8 IN ('A','D','F','H') THEN DO; TRKTYP=2; MM2=35214; CG=35209; RETURN; END; /* TITAN CREW CAB */ IF MY=2004 AND V5='A' AND V=7 AND V8='B' THEN DO; TRKTYP=2; MM2=35215; CG=35209; RETURN; END; IF 2005 LE MY LE 2009 AND V5='A' AND V=7 AND V8 IN ('B','C') THEN DO; TRKTYP=2; MM2=35215; CG=35209; RETURN; END; IF MY GE 2010 AND V57='A0E' AND V8 IN ('B','C','J') THEN DO; TRKTYP=2; MM2=35215; CG=35209; RETURN; END; /* TITAN CREW CAB 4X4 */ IF 2005 LE MY LE 2009 AND V5='D' AND V=6 AND V1='1' AND V8 IN ('T','U') THEN DO; TRKTYP=1; MM2=35202; CG=35210; RETURN; END; IF MY GE 2010 AND V57='D0C' AND V1='1' AND V8 IN ('R','T','U') THEN DO; TRKTYP=1; MM2=35202; CG=35210; RETURN; END; /* FRONTIER KING CAB */ IF 2005 LE MY LE 2009 AND V5='D' AND V=6 AND V1='1' AND V8='W' THEN DO; TRKTYP=1; MM2=35203; CG=35210; RETURN; END; IF MY GE 2010 AND V57='D0C' AND V1='1' AND V8 IN ('V','W') THEN DO; TRKTYP=1; MM2=35203; CG=35210; RETURN; END; /* FRONTIER KING CAB 4X4 */ IF 2005 LE MY LE 2009 AND V5='D' AND V=7 AND V1='1' AND V8 IN ('T','U') THEN DO; TRKTYP=1; MM2=35204; CG=35210; RETURN; END; IF MY GE 2010 AND V57='D0E' AND V1='1' AND V8 IN ('R','T','U') THEN DO; TRKTYP=1; MM2=35204; CG=35210; RETURN; END; /* FRONTIER CREW CAB */ IF 2005 LE MY LE 2009 AND V5='D' AND V=7 AND V1='1' AND V8='W' THEN DO; TRKTYP=1; MM2=35205; CG=35210; RETURN; END; IF MY GE 2010 AND V57='D0E' AND V1='1' AND V8 IN ('V','W') THEN DO; TRKTYP=1; MM2=35205; CG=35210; RETURN; END; /* FRONTIER CREW CAB 4X4 */ IF 2007 LE MY LE 2009 AND V5='D' AND V=9 AND V1='1' AND V8 IN ('T','U') THEN DO; TRKTYP=1; MM2=35204; CG=35211; RETURN; END; IF MY GE 2010 AND V57='D0F' AND V1='1' AND V8 IN ('R','T','U') THEN DO; TRKTYP=1; MM2=35204; CG=35211; RETURN; END; /* FRONTIER CREW CAB long bed */ IF 2007 LE MY LE 2009 AND V5='D' AND V=9 AND V1='1' AND V8='W' THEN DO; TRKTYP=1; MM2=35205; CG=35211; RETURN; END; IF MY GE 2010 AND V57='D0F' AND V1='1' AND V8 IN ('V','W') THEN DO; TRKTYP=1; MM2=35205; CG=35211; RETURN; END; /* FRONTIER CREW CAB 4X4 long bed */ IF 2008 LE MY LE 2009 AND V5='A' AND V=6 AND V8 IN ('E','G') THEN DO; TRKTYP=2; MM2=35212; CG=35213; RETURN; END; IF MY GE 2010 AND V57='A0D' AND V8 IN ('A','D','F','H') THEN DO; TRKTYP=2; MM2=35212; CG=35213; RETURN; END; /* TITAN LWB KING CAB */ IF 2008 LE MY LE 2009 AND V5='A' AND V=6 AND V8 IN ('F') THEN DO; TRKTYP=2; MM2=35213; CG=35213; RETURN; END; IF MY GE 2010 AND V57='A0D' AND V8 IN ('B','C','J') THEN DO; TRKTYP=2; MM2=35213; CG=35213; RETURN; END; /* TITAN LWB KING CAB 4X4 */ IF 2008 LE MY LE 2009 AND V5='A' AND V=7 AND V8 IN ('E','G') THEN DO; TRKTYP=2; MM2=35214; CG=35213; RETURN; END; IF MY GE 2010 AND V57='A0F' AND V8 IN ('A','D','F','H') THEN DO; TRKTYP=2; MM2=35214; CG=35213; RETURN; END; /* TITAN LWB CREW CAB */ IF 2008 LE MY LE 2009 AND V5='A' AND V=7 AND V8 IN ('F') THEN DO; TRKTYP=2; MM2=35215; CG=35213; RETURN; END; IF MY GE 2010 AND V57='A0F' AND V8 IN ('B','C','J') THEN DO; TRKTYP=2; MM2=35215; CG=35213; RETURN; END; /* TITAN LWB CREW CAB 4X4 */ IF MY=1989 AND V5='D' AND (V=14 OR V=16) AND V8='S' AND V3='8' THEN DO; TRKTYP=3; MM2=35300; CG=35301; RETURN; END; IF MY=1987 AND V5='D' AND (V=14 OR V=16) AND V8='Y' AND V3='8' THEN DO; TRKTYP=3; MM2=35301; CG=35301; RETURN; END; IF MY=1987 AND V5='D' AND V=14 AND V8='Y' AND V3='6' THEN DO; TRKTYP=3; MM2=35301; CG=35301; RETURN; END; IF 1988 LE MY LE 1990 AND V5='D' AND (V=14 OR V=16) AND V8='Y' AND V3='8' THEN DO; TRKTYP=3; MM2=35301; CG=35301; RETURN; END; IF 1990 LE MY LE 1995 AND V5='D' AND V=17 AND V8='S' AND V3='8' THEN DO; TRKTYP=3; MM2=35302; CG=35301; RETURN; END; IF 1990 LE MY LE 1995 AND V5='D' AND V=17 AND V8='Y' AND V3='8' THEN DO; TRKTYP=3; MM2=35303; CG=35301; RETURN; END; IF 1996 LE MY LE 1998 AND V5='R' AND V=5 AND V8='S' AND V3='8' THEN DO; TRKTYP=3; MM2=35302; CG=35302; RETURN; END; IF 1999 LE MY LE 2000 AND V5='R' AND V IN (5,7) AND V8='S' AND V3='8' THEN DO; TRKTYP=3; MM2=35302; CG=35302; RETURN; END; IF 2001 LE MY LE 2004 AND V5='R' AND V IN (7,9) AND V8 IN ('S','X') AND V3='8' THEN DO; TRKTYP=3; MM2=35302; CG=35302; RETURN; END; IF 1996 LE MY LE 1998 AND V5='R' AND V=5 AND V8='Y' AND V3='8' THEN DO; TRKTYP=3; MM2=35303; CG=35302; RETURN; END; IF 1999 LE MY LE 2000 AND V5='R' AND V IN (5,7) AND V8='Y' AND V3='8' THEN DO; TRKTYP=3; MM2=35303; CG=35302; RETURN; END; IF 2001 LE MY LE 2004 AND V5='R' AND V IN (7,9) AND V8='Y' AND V3='8' THEN DO; TRKTYP=3; MM2=35303; CG=35302; RETURN; END; IF 2000 LE MY LE 2004 AND V5='D' AND V=28 AND V8='T' AND V3='1' THEN DO; TRKTYP=3; MM2=35322; CG=35303; RETURN; END; IF 2000 LE MY LE 2004 AND V5='D' AND V=28 AND V8='Y' AND V3='1' THEN DO; TRKTYP=3; MM2=35323; CG=35303; RETURN; END; IF 2003 LE MY LE 2007 AND V5='Z' AND V6='0' AND V8 IN ('T','U','X') THEN DO; TRKTYP=3; MM2=35049; CG=35304; RETURN; END; IF 2003 LE MY LE 2007 AND V5='Z' AND V6='0' AND V8='W' THEN DO; TRKTYP=3; MM2=35049; CG=35304; RETURN; END; IF MY GE 2009 AND V5='Z' AND V6='1' AND V8 IN ('T','U') THEN DO; TRKTYP=3; MM2=35049; CG=35304; RETURN; END; /* MURANO */ IF MY GE 2009 AND V5='Z' AND V6='1' AND V8 IN ('V','W') THEN DO; TRKTYP=3; MM2=35049; CG=35304; RETURN; END; /* MURANO AWD */ IF 2004 LE MY LE 2007 AND V57='A08' AND V8='A' THEN DO; TRKTYP=4; MM2=35312; CG=35306; RETURN; END; IF 2008 LE MY LE 2009 AND V57='A08' AND V8 IN ('A','D') THEN DO; TRKTYP=4; MM2=35312; CG=35306; RETURN; END; IF MY GE 2010 AND V57='A0N' AND V8 IN ('A','D') THEN DO; TRKTYP=4; MM2=35312; CG=35306; RETURN; END; /* ARMADA */ IF MY=2004 AND V57='A08' AND V8='B' THEN DO; TRKTYP=4; MM2=35313; CG=35306; RETURN; END; IF 2005 LE MY LE 2009 AND V57='A08' AND V8 IN ('B','C') THEN DO; TRKTYP=4; MM2=35313; CG=35306; RETURN; END; IF MY GE 2010 AND V57='A0N' AND V8 IN ('B','C') THEN DO; TRKTYP=4; MM2=35313; CG=35306; RETURN; END; /* ARMADA 4X4 */ IF 2005 LE MY LE 2009 AND V57='N08' AND V8='U' AND V3='1' THEN DO; TRKTYP=3; MM2=35322; CG=35307; RETURN; END; IF MY GE 2010 AND V57='N0N' AND V8='U' AND V3='1' THEN DO; TRKTYP=3; MM2=35322; CG=35307; RETURN; END; /* XTERRA */ IF 2005 LE MY LE 2009 AND V57='N08' AND V8='W' AND V3='1' THEN DO; TRKTYP=3; MM2=35323; CG=35307; RETURN; END; IF MY GE 2010 AND V57='N0N' AND V8='W' AND V3='1' THEN DO; TRKTYP=3; MM2=35323; CG=35307; RETURN; END; /* XTERRA 4X4 */ IF 2005 LE MY LE 2009 AND V57='R18' AND V8 IN ('A','U') THEN DO; TRKTYP=3; MM2=35302; CG=35308; RETURN; END; IF MY GE 2010 AND V57='R1N' AND V8 IN ('N') THEN DO; TRKTYP=3; MM2=35302; CG=35308; RETURN; END; /* PATHFINDER */ IF 2005 LE MY LE 2009 AND V57='R18' AND V8 IN ('B','W') THEN DO; TRKTYP=3; MM2=35303; CG=35308; RETURN; END; IF MY GE 2010 AND V57='R1N' AND V8 IN ('B') THEN DO; TRKTYP=3; MM2=35303; CG=35308; RETURN; END; /* PATHFINDER 4X4 */ IF MY GE 2008 AND V5='S' AND V6='5' THEN DO; TRKTYP=3; MM2=35051; CG=35309; RETURN; END; /* ROGUE */ IF MY GE 2009 AND V5='Z' AND V6='2' THEN DO; TRKTYP=3; MM2=35052; CG=35312; RETURN; END; /* CUBE */ IF MY GE 2011 AND V57='F5M' AND V8='R' THEN DO; TRKTYP=3; MM2=35332; CG=35312; RETURN; END; /* JUKE */ IF MY GE 2011 AND V57='F5M' AND V8='V' THEN DO; TRKTYP=3; MM2=35333; CG=35312; RETURN; END; /* JUKE AWD */ IF 1987 LE MY LE 1990 AND V5='C' AND V=26 AND V8='S' AND V3='8' THEN DO; TRKTYP=5; MM2=35402; CG=35401; RETURN; END; IF 2004 LE MY LE 2009 AND V5='V' AND V6='2' AND V7='8' THEN DO; TRKTYP=5; MM2=35452; CG=35402; RETURN; END; /* QUEST 124.0 ends 2009 */ IF MY GE 2011 AND V5='E' AND V6='2' THEN DO; TRKTYP=5; MM2=35452; CG=35403; RETURN; END; /* QUEST 118.1 */ IF MY=1987 AND V5='D' AND V=16 AND V8='Y' AND V3='6' THEN DO; TRKTYP=9; MM2=35701; CG=35701; RETURN; END; TRKTYP=9; CG=99999; MM2=99999; RETURN; LTHONDA: V5=TRANSLATE(V5,'ZSGB','2568'); V4=TRANSLATE(V4,'ZSGB','2568'); V6=TRANSLATE(V6,'2568','ZSGB'); V46=V4||V5||V6; IF MY GE 2006 AND V46='YK1' AND ((V1='2' AND V2='H' AND V3='J') OR (V1='5' AND V2='F' AND V3='P')) THEN DO; TRKTYP=1; MM2=37205; CG=37201; RETURN; END; /* RIDGELINE */ IF 1998 LE MY LE 2001 AND V3='L' AND V46='RD2' THEN DO; TRKTYP=3; MM2=37302; CG=37301; RETURN; END; IF 1997 LE MY LE 2001 AND V3='L' AND V46='RD1' THEN DO; TRKTYP=3; MM2=37303; CG=37301; RETURN; END; IF 2006 LE MY LE 2008 AND V46='YF2' THEN DO; TRKTYP=3; MM2=37322; CG=37302; RETURN; END; /* PILOT 106.3 FWD ends 2008 */ IF 2003 LE MY LE 2008 AND V46='YF1' THEN DO; TRKTYP=3; MM2=37323; CG=37302; RETURN; END; /* PILOT 106.3 AWD ends 2008 */ IF 2002 LE MY LE 2006 AND V3 IN ('L','S') AND V46='RD6' THEN DO; TRKTYP=3; MM2=37302; CG=37303; RETURN; END; /* CR-V ends 2006 */ IF 2002 LE MY LE 2006 AND V3 IN ('L','S') AND V46='RD7' THEN DO; TRKTYP=3; MM2=37303; CG=37303; RETURN; END; /* CR-V AWD ends 2006 */ IF MY GE 2003 AND V46='YH1' THEN DO; TRKTYP=3; MM2=37332; CG=37304; RETURN; END; /* ELEMENT */ IF MY GE 2003 AND V46='YH2' THEN DO; TRKTYP=3; MM2=37333; CG=37304; RETURN; END; /* ELEMENT AWD */ IF MY GE 2007 AND V3 IN ('L','S','6','Z') AND V46='RE3' THEN DO; TRKTYP=3; MM2=37302; CG=37307; RETURN; END; /* CR-V */ IF MY GE 2007 AND V3 IN ('L','S','6','Z') AND V46='RE4' THEN DO; TRKTYP=3; MM2=37303; CG=37307; RETURN; END; /* CR-V AWD */ IF MY GE 2009 AND V46='YF3' THEN DO; TRKTYP=3; MM2=37322; CG=37308; RETURN; END; /* PILOT 109.2 FWD */ IF MY GE 2009 AND V46='YF4' THEN DO; TRKTYP=3; MM2=37323; CG=37308; RETURN; END; /* PILOT 109.2 AWD */ IF MY GE 2010 AND V46 IN ('TF1','TF2') THEN DO; TRKTYP=3; MM2=37032; CG=37309; RETURN; END; /* ACCORD CROSSTOUR */ IF 1999 LE MY LE 2001 AND (V3='M' OR V3='K') AND V46='RL1' THEN DO; TRKTYP=5; MM2=37402; CG=37401; RETURN; END; IF 2002 LE MY LE 2004 AND V3 IN ('K','N') AND V46='RL1' THEN DO; TRKTYP=5; MM2=37402; CG=37401; RETURN; END; IF 2005 LE MY LE 2010 AND V46 IN ('RL3','RL4') AND V1='5' AND V2='F' AND V3='N' THEN DO; TRKTYP=5; MM2=37402; CG=37401; RETURN; END; IF MY GE 2011 AND V46 IN ('RL5') AND V1='5' AND V2='F' AND V3='N' THEN DO; TRKTYP=5; MM2=37402; CG=37401; RETURN; END; /* ODYSSEY */ IF 1994 LE MY LE 1995 AND V3='6' AND V46='CG5' THEN DO; TRKTYP=3; MM2=37322; CG=38307; RETURN; END; IF 1995 LE MY LE 1997 AND V3='6' AND V46='CK5' THEN DO; TRKTYP=3; MM2=37322; CG=38307; RETURN; END; IF 1994 LE MY LE 1995 AND V3='6' AND V46='CY5' THEN DO; TRKTYP=3; MM2=37323; CG=38307; RETURN; END; IF 1995 LE MY LE 1997 AND V3='6' AND V46='CM5' THEN DO; TRKTYP=3; MM2=37323; CG=38307; RETURN; END; IF 1998 LE MY LE 2002 AND V3='6' AND V46='CK5' THEN DO; TRKTYP=3; MM2=37322; CG=38308; RETURN; END; IF 1998 LE MY LE 1999 AND V3='6' AND V46='CM5' THEN DO; TRKTYP=3; MM2=37323; CG=38308; RETURN; END; IF 2000 LE MY LE 2002 AND V3='6' AND V46='DM5' THEN DO; TRKTYP=3; MM2=37323; CG=38308; RETURN; END; IF 1995 LE MY LE 1997 AND V3='M' AND V46='RA1' THEN DO; TRKTYP=5; MM2=37402; CG=38401; RETURN; END; IF MY=1998 AND V3='M' AND V46='RA3' THEN DO; TRKTYP=5; MM2=37402; CG=38401; RETURN; END; TRKTYP=9; CG=99999; MM2=99999; RETURN; LTISUZU: V5=TRANSLATE(V5,'ZSGB','2568'); /* LAST YEAR 2008 */ V4=TRANSLATE(V4,'ZSGB','2568'); V6=TRANSLATE(V6,'2568','ZSGB'); V7=TRANSLATE(V7,'2568','ZSGB'); V=10*INPUT(V6,1.0)+INPUT(V7,1.0); IF 1996 LE MY LE 2000 AND (V5='S' OR V5='E') AND V3='G' AND V7='4' THEN DO; TRKTYP=1; MM2=38200; CG=18205; RETURN; END; IF 1998 LE MY LE 2002 AND (V5='J' OR V5='T') AND V3='G' AND V7='4' THEN DO; TRKTYP=1; MM2=38201; CG=18205; RETURN; END; IF 1997 LE MY LE 2000 AND V5='S' AND V3='G' AND V7='9' THEN DO; TRKTYP=1; MM2=38202; CG=18206; RETURN; END; IF 1998 LE MY LE 2000 AND (V5='J' OR V5='T') AND V3='G' AND V7='9' THEN DO; TRKTYP=1; MM2=38203; CG=18206; RETURN; END; IF 2006 LE MY LE 2008 AND V5='S' AND V6='1' AND V7='9' AND V3='G' THEN DO; TRKTYP=1; MM2=38202; CG=18222; RETURN; END; /* i-280/290 */ IF MY IN (2007,2008) AND V5='S' AND V6='1' AND V7='3' AND V3='G' THEN DO; TRKTYP=1; MM2=38204; CG=18222; RETURN; END; /* i-350/370 */ IF 2006 LE MY LE 2008 AND V5='T' AND V6='1' AND V7='3' AND V3='G' THEN DO; TRKTYP=1; MM2=38205; CG=18222; RETURN; END; /* i-350/370 4X4 */ IF 2004 LE MY LE 2008 AND V5='S' AND V=13 AND V1='4' AND V2='N' AND V3='U' THEN DO; TRKTYP=3; MM2=38302; CG=18314; RETURN; END; /* ASCENDER 5 */ IF 2004 LE MY LE 2008 AND V5='T' AND V=13 AND V1='4' AND V2='N' AND V3='U' THEN DO; TRKTYP=3; MM2=38303; CG=18314; RETURN; END; /* ASCENDER 5 4X4 */ IF 2003 LE MY LE 2006 AND V5='S' AND V=16 AND V1='4' AND V2='N' AND V3='U' THEN DO; TRKTYP=3; MM2=38306; CG=18316; RETURN; END; /* ASCENDER 7 ends 2006 */ IF 2003 LE MY LE 2006 AND V5='T' AND V=16 AND V1='4' AND V2='N' AND V3='U' THEN DO; TRKTYP=3; MM2=38307; CG=18316; RETURN; END; /* ASCENDER 7 4X4 ends 2006 */ IF 1985 LE MY LE 1987 AND V5='L' AND V=14 AND V3='A' AND V4='B' THEN DO; TRKTYP=1; MM2=38240; CG=38201; RETURN; END; IF 1985 LE MY LE 1987 AND V5='R' AND V=14 AND V3='A' AND V4='B' THEN DO; TRKTYP=1; MM2=38241; CG=38201; RETURN; END; IF 1985 LE MY LE 1987 AND V5='L' AND V=16 AND V3='A' AND V4='C' THEN DO; TRKTYP=1; MM2=38242; CG=38202; RETURN; END; IF 1986 LE MY LE 1987 AND V5='R' AND V=16 AND V3='A' AND V4='C' THEN DO; TRKTYP=1; MM2=38243; CG=38202; RETURN; END; IF 1985 LE MY LE 1987 AND V5='L' AND V=14 AND V3='A' AND V4='C' THEN DO; TRKTYP=1; MM2=38246; CG=38202; RETURN; END; IF 1985 LE MY LE 1987 AND V5='R' AND V=14 AND V3='A' AND V4='C' THEN DO; TRKTYP=1; MM2=38247; CG=38202; RETURN; END; IF 1988 LE MY LE 1995 AND V5='L' AND V=11 AND V3='A' AND V4='C' THEN DO; TRKTYP=1; MM2=38240; CG=38203; RETURN; END; IF 1990 LE MY LE 1995 AND V5='L' AND V=11 AND V1='4' AND V3='1' AND V4='C' THEN DO; TRKTYP=1; MM2=38240; CG=38203; RETURN; END; IF 1988 LE MY LE 1995 AND V5='R' AND V=11 AND V3='A' AND V4='C' THEN DO; TRKTYP=1; MM2=38241; CG=38203; RETURN; END; IF 1991 LE MY LE 1995 AND V5='R' AND V=11 AND V1='4' AND V3='1' AND V4='C' THEN DO; TRKTYP=1; MM2=38241; CG=38203; RETURN; END; IF 1988 LE MY LE 1994 AND V5='L' AND V=16 AND V3='A' AND V4='C' THEN DO; TRKTYP=1; MM2=38242; CG=38204; RETURN; END; IF 1992 LE MY LE 1994 AND V5='L' AND V=16 AND V1='4' AND V3='1' AND V4='C' THEN DO; TRKTYP=1; MM2=38242; CG=38204; RETURN; END; IF 1988 LE MY LE 1992 AND V5='R' AND V=16 AND V3='A' AND V4='C' THEN DO; TRKTYP=1; MM2=38243; CG=38204; RETURN; END; IF MY=1992 AND V5='R' AND V=16 AND V1='4' AND V3='1' AND V4='C' THEN DO; TRKTYP=1; MM2=38243; CG=38204; RETURN; END; IF 1988 LE MY LE 1995 AND V5='L' AND V=14 AND V3='A' AND V4='C' THEN DO; TRKTYP=1; MM2=38246; CG=38204; RETURN; END; IF 1992 LE MY LE 1995 AND V5='L' AND V=14 AND V1='4' AND V3='1' AND V4='C' THEN DO; TRKTYP=1; MM2=38246; CG=38204; RETURN; END; IF MY=1988 AND V5='R' AND V=14 AND V3='A' AND V4='C' THEN DO; TRKTYP=1; MM2=38247; CG=38204; RETURN; END; IF 1988 LE MY LE 1992 AND V5='L' AND V=34 AND V3='A' AND (V4='C' OR V4='D' OR V4='E') THEN DO; TRKTYP=1; MM2=38248; CG=38204; RETURN; END; IF MY=1992 AND V5='L' AND V=34 AND V1='4' AND V3='1' AND (V4='C' OR V4='D' OR V4='E') THEN DO; TRKTYP=1; MM2=38248; CG=38204; RETURN; END; IF 1985 LE MY LE 1988 AND V5='H' AND V=15 AND (V3='A' OR V3='5') AND V4='C' THEN DO; TRKTYP=3; MM2=38315; CG=38301; RETURN; END; IF 1985 LE MY LE 1988 AND V5='H' AND V=55 AND (V3='C' OR V3='5') AND V4='C' THEN DO; TRKTYP=3; MM2=38315; CG=38301; RETURN; END; IF 1987 LE MY LE 1988 AND V5='H' AND V=55 AND V1='L' AND V4='C' THEN DO; TRKTYP=3; MM2=38315; CG=38301; RETURN; END; IF 1986 LE MY LE 1988 AND V5='H' AND V=18 AND (V3='A' OR V3='5') AND V4='C' THEN DO; TRKTYP=3; MM2=38317; CG=38301; RETURN; END; IF 1986 LE MY LE 1991 AND V5='H' AND V=58 AND (V3='C' OR V3='5') AND V4='C' THEN DO; TRKTYP=3; MM2=38317; CG=38301; RETURN; END; IF 1986 LE MY LE 1991 AND V5='H' AND V=58 AND V1='L' AND V4='C' THEN DO; TRKTYP=3; MM2=38317; CG=38301; RETURN; END; IF 1989 LE MY LE 1991 AND V5='L' AND V=1 AND V3='A' AND (V4='B' OR V4='C') THEN DO; TRKTYP=3; MM2=38300; CG=38302; RETURN; END; IF 1992 LE MY LE 1994 AND V5='G' AND V=7 AND V3='C' AND (V4='B' OR V4='C') THEN DO; TRKTYP=3; MM2=38300; CG=38302; RETURN; END; IF 1989 LE MY LE 1991 AND V5='R' AND V=1 AND V3='A' AND (V4='B' OR V4='C') THEN DO; TRKTYP=3; MM2=38301; CG=38302; RETURN; END; IF 1992 LE MY LE 1994 AND V5='Y' AND V=7 AND V3='C' AND (V4='B' OR V4='C') THEN DO; TRKTYP=3; MM2=38301; CG=38302; RETURN; END; IF MY=1989 AND V5='H' AND V=57 AND V3='C' AND V4='C' THEN DO; TRKTYP=3; MM2=38315; CG=38303; RETURN; END; IF 1991 LE MY LE 1995 AND V5='G' AND V=58 AND V1='4' AND V3='2' AND V4='C' THEN DO; TRKTYP=3; MM2=38322; CG=38304; RETURN; END; IF 1995 LE MY LE 1997 AND V5='K' AND V=58 AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=38322; CG=38304; RETURN; END; IF 1991 LE MY LE 1995 AND V5='Y' AND V=58 AND V1='4' AND V3='2' AND V4='C' THEN DO; TRKTYP=3; MM2=38323; CG=38304; RETURN; END; IF 1995 LE MY LE 1997 AND V5='M' AND V=58 AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=38323; CG=38304; RETURN; END; IF 2000 LE MY LE 2002 AND V5='S' AND V=58 AND V3='C' AND V4='D' THEN DO; TRKTYP=3; MM2=38312; CG=38305; RETURN; END; IF 1992 LE MY LE 1995 AND V5='H' AND V=58 AND V3='C' AND V4='D' THEN DO; TRKTYP=3; MM2=38313; CG=38305; RETURN; END; IF 1995 LE MY LE 2002 AND V5='J' AND V=58 AND V3='C' AND V4='D' THEN DO; TRKTYP=3; MM2=38313; CG=38305; RETURN; END; IF 1993 LE MY LE 1995 AND V5='H' AND V=57 AND V3='C' AND V4='D' THEN DO; TRKTYP=3; MM2=38311; CG=38306; RETURN; END; IF 1998 LE MY LE 2004 AND V5='K' AND V=58 AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=38322; CG=38308; RETURN; END; /* RODEO ends 2004 */ IF 1998 LE MY LE 2004 AND V5='M' AND V=58 AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=38323; CG=38308; RETURN; END; /* RODEO 4X4 ends 2004 */ IF 2002 LE MY LE 2004 AND V5='E' AND V=58 AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=38326; CG=38308; RETURN; END; /* AXIOM ends 2004 */ IF 2002 LE MY LE 2004 AND V5='F' AND V=58 AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=38327; CG=38308; RETURN; END; /* AXIOM 4X4 ends 2004 */ IF 1999 LE MY LE 2002 AND V5='N' AND V=57 AND V3='C' THEN DO; TRKTYP=3; MM2=38331; CG=38309; RETURN; END; IF 1998 LE MY LE 2000 AND V5='K' AND V=57 AND V3='2' AND V4='C' THEN DO; TRKTYP=3; MM2=38300; CG=38310; RETURN; END; IF 2001 LE MY LE 2003 AND V5='K' AND V=57 AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=38300; CG=38310; RETURN; END; IF 1998 LE MY LE 2000 AND V5='M' AND V=57 AND V3='2' AND V4='C' THEN DO; TRKTYP=3; MM2=38301; CG=38310; RETURN; END; IF 2001 LE MY LE 2003 AND V5='M' AND V=57 AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=38301; CG=38310; RETURN; END; IF 1996 LE MY LE 1997 AND V4='R' AND V5='J' AND V6='1' AND V1='J' AND V3='2' THEN DO; TRKTYP=5; MM2=38402; CG=38401; RETURN; END; IF 1998 LE MY LE 1999 AND V4='R' AND V5='J' AND V6='2' AND V1='J' AND V3='2' THEN DO; TRKTYP=5; MM2=38402; CG=38401; RETURN; END; TRKTYP=9; CG=99999; MM2=99999; RETURN; LTMAZDA: V5=TRANSLATE(V5,'ZSGB','2568'); V4=TRANSLATE(V4,'ZSGB','2568'); V6=TRANSLATE(V6,'2568','ZSGB'); IF MY LE 2009 THEN DO; V7=TRANSLATE(V7,'2568','ZSGB'); V=10*INPUT(V6,1.0)+INPUT(V7,1.0); END; V8=TRANSLATE(V8,'258','ZSB'); V57=V5||V6||V7; IF 1994 LE MY LE 1997 AND V1='4' AND V3='4' AND V4='C' AND V5='R' AND V=12 THEN DO; TRKTYP=1; MM2=41200; CG=12208; RETURN; END; IF 1994 LE MY LE 1997 AND V1='4' AND V3='4' AND V4='C' AND V5='R' AND V=13 THEN DO; TRKTYP=1; MM2=41201; CG=12208; RETURN; END; IF 1994 LE MY LE 1997 AND V1='4' AND V3='4' AND V4='C' AND V5='R' AND V=16 THEN DO; TRKTYP=1; MM2=41202; CG=12209; RETURN; END; IF 1994 LE MY LE 1997 AND V1='4' AND V3='4' AND (V4 IN ('D','C')) AND V5='R' AND V=17 THEN DO; TRKTYP=1; MM2=41203; CG=12209; RETURN; END; IF 1998 LE MY LE 2009 AND V1='4' AND V3='4' AND V5='R' AND V=12 THEN DO; TRKTYP=1; MM2=41200; CG=12214; RETURN; END; /* B PICKUP ends 2009 */ IF 1998 LE MY LE 2009 AND V1='4' AND V3='4' AND V5='R' AND V=13 THEN DO; TRKTYP=1; MM2=41201; CG=12214; RETURN; END; /* B PICKUP 4X4 ends 2009 */ IF 1998 LE MY LE 2009 AND V1='4' AND V3='4' AND V5='R' AND V=16 THEN DO; TRKTYP=1; MM2=41202; CG=12215; RETURN; END; /* B CAB PLUS ends 2009 */ IF 1998 LE MY LE 2009 AND V1='4' AND V3='4' AND V5='R' AND V=17 THEN DO; TRKTYP=1; MM2=41203; CG=12215; RETURN; END; /* B CAB PLUS 4X4 ends 2009 */ IF 2002 LE MY LE 2009 AND V1='4' AND V3='4' AND V5='R' AND V=46 THEN DO; TRKTYP=1; MM2=41204; CG=12215; RETURN; END; /* B CREW ends 2009 */ IF 2002 LE MY LE 2009 AND V1='4' AND V3='4' AND V5='R' AND V=47 THEN DO; TRKTYP=1; MM2=41205; CG=12215; RETURN; END; /* B CREW 4X4 ends 2009 */ IF 1992 LE MY LE 1994 AND V1='4' AND V3='2' AND V4='C' AND V5='U' AND V=42 THEN DO; TRKTYP=3; MM2=41300; CG=12303; RETURN; END; IF 1991 LE MY LE 1994 AND V1='4' AND V3='2' AND V4='C' AND V5='U' AND V=44 THEN DO; TRKTYP=3; MM2=41301; CG=12303; RETURN; END; IF 2001 LE MY LE 2002 AND V5='U' AND V IN (7,9) AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=41342; CG=12309; RETURN; END; IF 2003 LE MY LE 2006 AND V5='Z' AND V IN (2,4,6) AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=41342; CG=12309; RETURN; END; IF 2008 LE MY LE 2009 AND V5='Z' AND V IN (2,6) AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=41342; CG=12309; RETURN; END; IF MY GE 2010 AND V57 IN ('Y0C','Y0G') AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=41342; CG=12309; RETURN; END; /* TRIBUTE */ IF 2001 LE MY LE 2002 AND V5='U' AND V IN (6,8) AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=41343; CG=12309; RETURN; END; IF 2003 LE MY LE 2006 AND V5='Z' AND V IN (92,94,96) AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=41343; CG=12309; RETURN; END; IF 2008 LE MY LE 2009 AND V5='Z' AND V IN (92,96) AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=41343; CG=12309; RETURN; END; IF MY GE 2010 AND V57 IN ('Y9C','Y9G') AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=41343; CG=12309; RETURN; END; /* TRIBUTE 4X4 */ IF 2008 LE MY LE 2009 AND V5='Z' AND V=49 AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=41346; CG=12309; RETURN; END; IF MY GE 2010 AND V57='Y4K' AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=41346; CG=12309; RETURN; END; /* TRIBUTE HYBRID */ IF 2008 LE MY LE 2009 AND V5='Z' AND V=59 AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=41347; CG=12309; RETURN; END; IF MY GE 2010 AND V57='Y5K' AND V1='4' AND V3='2' THEN DO; TRKTYP=3; MM2=41347; CG=12309; RETURN; END; /* TRIBUTE HYBRID 4X4 */ IF 1986 LE MY LE 1993 AND V3='2' AND V4='U' AND V5='F' AND V6='1' THEN DO; TRKTYP=1; MM2=41240; CG=41201; RETURN; END; IF 1987 LE MY LE 1993 AND V3='2' AND V4='U' AND V5='F' AND V6='4' THEN DO; TRKTYP=1; MM2=41241; CG=41201; RETURN; END; IF 1986 LE MY LE 1993 AND V3='2' AND V4='U' AND V5='F' AND V6='3' THEN DO; TRKTYP=1; MM2=41242; CG=41202; RETURN; END; IF 1987 LE MY LE 1993 AND V3='2' AND V4='U' AND V5='F' AND V6='6' THEN DO; TRKTYP=1; MM2=41243; CG=41202; RETURN; END; IF 1986 LE MY LE 1993 AND V3='2' AND V4='U' AND V5='F' AND V6='2' THEN DO; TRKTYP=1; MM2=41246; CG=41202; RETURN; END; IF 1987 LE MY LE 1993 AND V3='2' AND V4='U' AND V5='F' AND V6='5' THEN DO; TRKTYP=1; MM2=41247; CG=41202; RETURN; END; IF 1989 LE MY LE 1993 AND V3='2' AND V4='L' AND V5='V' AND V=62 AND V8='1' THEN DO; TRKTYP=5; MM2=41400; CG=41401; RETURN; END; IF 1989 LE MY LE 1998 AND V3='3' AND V4='L' AND V5='V' AND (V=52 AND V8 IN ('1','2')) THEN DO; TRKTYP=5; MM2=41402; CG=41401; RETURN; END; IF 1989 LE MY LE 1998 AND V3='3' AND V4='L' AND V5='V' AND V=52 AND V8='3' THEN DO; TRKTYP=5; MM2=41403; CG=41401; RETURN; END; IF 2000 LE MY LE 2006 AND V3='3' AND V4='L' AND V5='W' AND V=28 THEN DO; TRKTYP=5; MM2=41402; CG=41402; RETURN; END; /* MPV ends 2006 */ IF 2007 LE MY LE 2009 AND V3='3' AND V4='E' AND V57='R29' THEN DO; TRKTYP=3; MM2=41053; CG=41301; RETURN; END; IF MY GE 2010 AND V3='3' AND V4='E' AND V5='R' AND V6 IN ('2','4') THEN DO; TRKTYP=3; MM2=41053; CG=41301; RETURN; END; /* CX-7 */ IF 2007 LE MY LE 2009 AND V3='3' AND V4='T' AND V57 IN ('B28','B38') THEN DO; TRKTYP=4; MM2=41054; CG=41302; RETURN; END; IF MY GE 2010 AND V3='3' AND V4='T' AND V5='B' AND V6 IN ('2','3') THEN DO; TRKTYP=4; MM2=41054; CG=41302; RETURN; END; /* CX-9 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTMERCED: V5=TRANSLATE(V5,'ZSGB','2568'); V4=TRANSLATE(V4,'ZSGB','2568'); V6=TRANSLATE(V6,'2568','ZSGB'); IF MY LE 2009 THEN DO; V7=TRANSLATE(V7,'2568','ZSGB'); V=10*INPUT(V6,1.0)+INPUT(V7,1.0); END; V45=V4||V5; IF 1998 LE MY LE 2001 AND V45='AB' AND V IN (54,72) THEN DO; TRKTYP=4; MM2=42303; CG=42301; RETURN; END; IF MY=2002 AND V45='AB' AND V IN (54,72,75) THEN DO; TRKTYP=4; MM2=42303; CG=42301; RETURN; END; IF 2003 LE MY LE 2005 AND V45='AB' AND V IN (54,57,72,75) THEN DO; TRKTYP=4; MM2=42303; CG=42301; RETURN; END; IF 2000 LE MY LE 2002 AND V45='AB' AND V=74 THEN DO; TRKTYP=4; MM2=42307; CG=42301; RETURN; END; IF MY=2004 AND V45='AB' AND V=74 THEN DO; TRKTYP=4; MM2=42307; CG=42301; RETURN; END; IF 2002 LE MY LE 2009 AND V45='YR' THEN DO; TRKTYP=4; MM2=42313; CG=42302; RETURN; END; IF MY=2010 AND V45 IN ('YC','YR') THEN DO; TRKTYP=4; MM2=42313; CG=42302; RETURN; END; IF MY GE 2011 AND V45='YC' THEN DO; TRKTYP=4; MM2=42313; CG=42302; RETURN; END; /* G500 */ IF MY GE 2009 AND V45='BB' AND V6='5' THEN DO; TRKTYP=4; MM2=42302; CG=42303; RETURN; END; /* ML 350 RWD */ IF 2006 LE MY LE 2008 AND V45='BB' THEN DO; TRKTYP=4; MM2=42303; CG=42303; RETURN; END; IF MY GE 2009 AND V45='BB' AND V6 IN ('2','7','8','9') THEN DO; TRKTYP=4; MM2=42303; CG=42303; RETURN; END; /* ML 350/500 AWD */ IF MY GE 2006 AND V45='CB' THEN DO; TRKTYP=4; MM2=42323; CG=42304; RETURN; END; /* R 350/500 */ IF MY GE 2007 AND V45='BF' THEN DO; TRKTYP=4; MM2=42333; CG=42305; RETURN; END; /* GL */ IF MY GE 2010 AND V45='GG' AND V6='5' THEN DO; TRKTYP=3; MM2=42336; CG=42306; RETURN; END; /* GLK 350 RWD */ IF MY GE 2010 AND V45='GG' AND V6='8' THEN DO; TRKTYP=3; MM2=42337; CG=42306; RETURN; END; /* GLK 350 AWD */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTPORS: V78=V7||V8; IF 2004 LE MY LE 2006 AND V78='9P' AND V1='W' AND V2='P' AND V3='1' THEN DO; TRKTYP=4; MM2=45313; CG=30301; RETURN; END; IF 2008 LE MY LE 2009 AND V78='9P' AND V1='W' AND V2='P' AND V3='1' THEN DO; TRKTYP=4; MM2=45313; CG=30301; RETURN; END; IF MY=2010 AND V78='AP' AND V1='W' AND V2='P' AND V3='1' THEN DO; TRKTYP=4; MM2=45313; CG=30301; RETURN; END; /* CAYENNE 112.4 redesigned 2011 */ IF MY GE 2011 AND V78='A2' AND V1='W' AND V2='P' AND V3='1' THEN DO; TRKTYP=4; MM2=45313; CG=30303; RETURN; END; /* CAYENNE 113.9 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTSAAB: IF 2005 LE MY LE 2007 AND V5='T' AND V6='1' AND V7='3' AND V1='5' AND V2='S' AND V3='3' THEN DO; TRKTYP=3; MM2=47308; CG=18314; RETURN; END; IF 2008 LE MY LE 2009 AND V5='T' AND V6 IN ('1','2') AND V7='3' AND V1='5' AND V2='S' AND V3='3' THEN DO; TRKTYP=3; MM2=47308; CG=18314; RETURN; END; /* 9-7X AWD ends 2009 */ IF MY=2011 AND V5='N' AND V6 IN ('P','R','S','T','U') AND V1='3' AND V2='G' AND V3='0' THEN DO; TRKTYP=3; MM2=47038; CG=18327; RETURN; END; /* 9-4X sold only in 2011 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTSUBARU: V5=TRANSLATE(V5,'ZSGB','2568'); V4=TRANSLATE(V4,'ZSGB','2568'); IF 1998 LE MY LE 2002 AND V4='S' AND V5='F' THEN DO; TRKTYP=3; MM2=48303; CG=48301; RETURN; END; IF 2003 LE MY LE 2008 AND V4='S' AND V5 IN ('F','G') THEN DO; TRKTYP=3; MM2=48303; CG=48301; RETURN; END; /* FORESTER 99.4 redesigned 2009 */ IF 2005 LE MY LE 2009 AND V4='B' AND V5 IN ('L','P') AND V1='4' AND V3='4' THEN DO; TRKTYP=3; MM2=48045; CG=48302; RETURN; END; /* OUTBACK 105.1 redesigned 2010 */ IF MY GE 2010 AND V4='B' AND V5='R' AND V1='4' AND V3='4' THEN DO; TRKTYP=3; MM2=48045; CG=48303; RETURN; END; /* OUTBACK 107.9 */ IF MY GE 2006 AND V4='W' AND V5='X' THEN DO; TRKTYP=4; MM2=48313; CG=48303; RETURN; END; /* TRIBECA */ IF MY GE 2009 AND V4='S' AND V5='H' AND V1='J' AND V2='F' AND V3='2' THEN DO; TRKTYP=3; MM2=48303; CG=48304; RETURN; END; /* FORESTER 103.0 */ IF MY=1985 AND V3='2' AND V4='A' AND V5='T' THEN DO; TRKTYP=7; MM2=48043; CG=48701; RETURN; END; IF 1986 LE MY LE 1987 AND V3='3' AND V4='A' AND V5='U' THEN DO; TRKTYP=7; MM2=48043; CG=48701; RETURN; END; IF 2003 LE MY LE 2006 AND V4='B' AND V5='T' THEN DO; TRKTYP=7; MM2=48044; CG=48702; RETURN; END; /* BAJA ends 2006 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTTOYOTA: V5=TRANSLATE(V5,'ZSGB','2568'); V4=TRANSLATE(V4,'ZSGB','2568'); V6=TRANSLATE(V6,'2568','ZSGB'); IF MY LE 2009 THEN DO; V7=TRANSLATE(V7,'2568','ZSGB'); V=10*INPUT(V6,1.0)+INPUT(V7,1.0); END; ELSE V7=TRANSLATE(V7,'ZSGB','2568'); V8=TRANSLATE(V8,'OZSGB','02568'); V47=V4||V5||V6||V7; IF 1985 LE MY LE 1988 AND V5='N' AND V=50 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49240; CG=49201; RETURN; END; IF 1989 LE MY LE 1995 AND V5='N' AND V=81 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49240; CG=49201; RETURN; END; IF 1992 LE MY LE 1995 AND V5='N' AND V=81 AND V1='4' THEN DO; TRKTYP=1; MM2=49240; CG=49201; RETURN; END; IF MY=1985 AND V5='N' AND V=60 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49241; CG=49201; RETURN; END; IF 1986 LE MY LE 1988 AND V5='N' AND V=63 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49241; CG=49201; RETURN; END; IF 1989 LE MY LE 1995 AND V5='N' AND V=1 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49241; CG=49201; RETURN; END; IF 1992 LE MY LE 1995 AND V5='N' AND V=1 AND V1='4' THEN DO; TRKTYP=1; MM2=49241; CG=49201; RETURN; END; IF 1985 LE MY LE 1988 AND V5='N' AND V=56 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49242; CG=49202; RETURN; END; IF MY=1985 AND V5='N' AND V=59 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49242; CG=49202; RETURN; END; IF MY=1985 AND V5='N' AND V=66 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49243; CG=49202; RETURN; END; IF 1986 LE MY LE 1988 AND V5='N' AND V=67 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49243; CG=49202; RETURN; END; IF 1985 LE MY LE 1988 AND V5='N' AND V=55 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49246; CG=49202; RETURN; END; IF 1989 LE MY LE 1993 AND V5='N' AND V=82 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49246; CG=49202; RETURN; END; IF MY=1985 AND V5='N' AND V=65 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49247; CG=49202; RETURN; END; IF 1986 LE MY LE 1988 AND V5='N' AND V=64 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49247; CG=49202; RETURN; END; IF 1989 LE MY LE 1992 AND V5='N' AND V=2 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49247; CG=49202; RETURN; END; IF 1986 LE MY LE 1988 AND V5='N' AND V=75 AND V3='5' THEN DO; TRKTYP=1; MM2=49501; CG=49202; RETURN; END; IF 1986 LE MY LE 1988 AND V5='N' AND V=70 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49248; CG=49203; RETURN; END; IF 1989 LE MY LE 1995 AND V5='N' AND V=93 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49248; CG=49203; RETURN; END; IF 1993 LE MY LE 1995 AND V5='N' AND V=93 AND V1='4' AND V3='A' THEN DO; TRKTYP=1; MM2=49248; CG=49203; RETURN; END; IF 1989 LE MY LE 1995 AND V5='N' AND V=13 AND V3 IN ('4','5') THEN DO; TRKTYP=1; MM2=49249; CG=49203; RETURN; END; IF 1992 LE MY LE 1995 AND V5='N' AND V=13 AND V1='4' AND V3='A' THEN DO; TRKTYP=1; MM2=49249; CG=49203; RETURN; END; IF 1993 LE MY LE 1995 AND V5='D' AND V IN (10,11) AND V3='4' AND V8 NE 'B' THEN DO; TRKTYP=2; MM2=49250; CG=49204; RETURN; END; IF 1996 LE MY LE 1998 AND V8='D' AND V4='J' AND V3='4' THEN DO; TRKTYP=2; MM2=49250; CG=49204; RETURN; END; IF 1993 LE MY LE 1995 AND V5='D' AND (V=20 OR V=21) AND V3='4' THEN DO; TRKTYP=2; MM2=49251; CG=49204; RETURN; END; IF MY=1995 AND V5='D' AND V=12 AND V3='4' THEN DO; TRKTYP=2; MM2=49252; CG=49204; RETURN; END; IF 1996 LE MY LE 1998 AND V8='D' AND V4='T' AND V3='4' THEN DO; TRKTYP=2; MM2=49252; CG=49204; RETURN; END; IF MY=1995 AND V5='D' AND V=22 AND V3='4' THEN DO; TRKTYP=2; MM2=49253; CG=49204; RETURN; END; IF 1996 LE MY LE 1998 AND V8='D' AND V4='U' AND V3='4' THEN DO; TRKTYP=2; MM2=49253; CG=49204; RETURN; END; IF 1993 LE MY LE 1995 AND V5='D' AND (V=10 OR V=11) AND V3='4' AND V8='B' THEN DO; TRKTYP=2; MM2=49258; CG=49204; RETURN; END; IF MY=1996 AND V8='D' AND V4='L' AND V3='4' THEN DO; TRKTYP=2; MM2=49258; CG=49204; RETURN; END; IF MY=1995 AND V5='N' AND V=41 AND V3='A' THEN DO; TRKTYP=1; MM2=49200; CG=49205; RETURN; END; IF 1996 LE MY LE 2000 AND V8='N' AND V4='N' AND V3='A' THEN DO; TRKTYP=1; MM2=49200; CG=49205; RETURN; END; IF 2000 LE MY LE 2004 AND V8='N' AND V4='N' AND V3='E' THEN DO; TRKTYP=1; MM2=49200; CG=49205; RETURN; END; IF MY=1995 AND V5='N' AND V=61 AND V3='A' THEN DO; TRKTYP=1; MM2=49201; CG=49205; RETURN; END; IF 1996 LE MY LE 2000 AND V8='N' AND V4='P' AND V3='A' THEN DO; TRKTYP=1; MM2=49201; CG=49205; RETURN; END; IF 2000 LE MY LE 2004 AND V8='N' AND V4='P' AND V3='E' THEN DO; TRKTYP=1; MM2=49201; CG=49205; RETURN; END; IF MY=1995 AND V5='N' AND V=53 AND V3='A' THEN DO; TRKTYP=1; MM2=49202; CG=49206; RETURN; END; IF 1996 LE MY LE 2000 AND V8='N' AND V4 IN ('S','V') AND V3='A' THEN DO; TRKTYP=1; MM2=49202; CG=49206; RETURN; END; IF 2000 LE MY LE 2004 AND V8='N' AND V4 IN ('S','V') AND V3='E' THEN DO; TRKTYP=1; MM2=49202; CG=49206; RETURN; END; IF MY=1995 AND V5='N' AND V=73 AND V3='A' THEN DO; TRKTYP=1; MM2=49203; CG=49206; RETURN; END; IF 1996 LE MY LE 2000 AND V8='N' AND V4='W' AND V3='A' THEN DO; TRKTYP=1; MM2=49203; CG=49206; RETURN; END; IF 2000 LE MY LE 2004 AND V8='N' AND V4='W' AND V3='E' THEN DO; TRKTYP=1; MM2=49203; CG=49206; RETURN; END; IF 2001 LE MY LE 2004 AND V8='N' AND V4='G' AND V3='E' THEN DO; TRKTYP=1; MM2=49204; CG=49206; RETURN; END; IF 2001 LE MY LE 2004 AND V8='N' AND V4='H' AND V3='E' THEN DO; TRKTYP=1; MM2=49205; CG=49206; RETURN; END; IF 2000 LE MY LE 2004 AND V8='1' AND V5 IN ('N','T') AND V4='J' AND V3='B' THEN DO; TRKTYP=2; MM2=49210; CG=49207; RETURN; END; IF 2005 LE MY LE 2006 AND V8='1' AND V5 IN ('N','T','U') AND V4='J' AND V3='B' THEN DO; TRKTYP=2; MM2=49210; CG=49207; RETURN; END; /* TUNDRA ends 2006 */ IF 2000 LE MY LE 2004 AND V8='1' AND V5 IN ('N','T') AND V4='K' AND V3='B' THEN DO; TRKTYP=2; MM2=49211; CG=49207; RETURN; END; IF 2005 LE MY LE 2006 AND V8='1' AND V5 IN ('N','T','U') AND V4='K' AND V3='B' THEN DO; TRKTYP=2; MM2=49211; CG=49207; RETURN; END; /* TUNDRA 4X4 ends 2006 */ IF 2000 LE MY LE 2002 AND V8='1' AND V5 IN ('N','T') AND V4='R' AND V3='B' THEN DO; TRKTYP=2; MM2=49212; CG=49207; RETURN; END; IF 2003 LE MY LE 2004 AND V8='1' AND V5 IN ('N','T') AND V4 IN ('R','S') AND V3='B' THEN DO; TRKTYP=2; MM2=49212; CG=49207; RETURN; END; IF 2005 LE MY LE 2006 AND V8='1' AND V5 IN ('N','T','U') AND V4 IN ('R','S') AND V3='B' THEN DO; TRKTYP=2; MM2=49212; CG=49207; RETURN; END; /* TUNDRA ACCESS CAB ends 2006 */ IF 2000 LE MY LE 2002 AND V8='1' AND V5 IN ('N','T') AND V4='B' AND V3='B' THEN DO; TRKTYP=2; MM2=49213; CG=49207; RETURN; END; IF 2003 LE MY LE 2004 AND V8='1' AND V5 IN ('N','T') AND V4 IN ('B','C') AND V3='B' THEN DO; TRKTYP=2; MM2=49213; CG=49207; RETURN; END; IF 2005 LE MY LE 2006 AND V8='1' AND V5 IN ('N','T','U') AND V4 IN ('B','C') AND V3='B' THEN DO; TRKTYP=2; MM2=49213; CG=49207; RETURN; END; /* TUNDRA ACCESS CAB 4X4 ends 2006 */ IF 2004 LE MY LE 2006 AND V8='1' AND V4='E' AND V6 IN ('3','4') THEN DO; TRKTYP=2; MM2=49214; CG=49208; RETURN; END; /* TUNDRA DOUBLE CAB ends 2006 */ IF 2004 LE MY LE 2006 AND V8='1' AND V4='D' AND V6 IN ('3','4') THEN DO; TRKTYP=2; MM2=49215; CG=49208; RETURN; END; /* TUNDRA DOUBLE CAB 4X4 ends 2006 */ IF 2005 LE MY LE 2009 AND V8='N' AND V4='N' AND V7='2' THEN DO; TRKTYP=1; MM2=49200; CG=49209; RETURN; END; IF MY GE 2010 AND V8='N' AND V4='N' AND V7='C' THEN DO; TRKTYP=1; MM2=49200; CG=49209; RETURN; END; /* TACOMA */ IF 2005 LE MY LE 2009 AND V8='N' AND V4='P' AND V7='2' THEN DO; TRKTYP=1; MM2=49201; CG=49209; RETURN; END; IF MY GE 2010 AND V8='N' AND V4='P' AND V7='E' THEN DO; TRKTYP=1; MM2=49201; CG=49209; RETURN; END; /* TACOMA 4X4 */ IF 2005 LE MY LE 2009 AND V8='N' AND V4='T' AND V7='2' THEN DO; TRKTYP=1; MM2=49202; CG=49210; RETURN; END; IF MY GE 2010 AND V8='N' AND V4='T' AND V7 IN ('C','G') THEN DO; TRKTYP=1; MM2=49202; CG=49210; RETURN; END; /* TACOMA XCAB */ IF 2005 LE MY LE 2009 AND V8='N' AND V4='U' AND V7='2' THEN DO; TRKTYP=1; MM2=49203; CG=49210; RETURN; END; IF MY GE 2010 AND V8='N' AND V4='U' AND V7='E' THEN DO; TRKTYP=1; MM2=49203; CG=49210; RETURN; END; /* TACOMA XCAB 4X4 */ IF 2005 LE MY LE 2009 AND V8='N' AND V4='J' AND V7='2' THEN DO; TRKTYP=1; MM2=49204; CG=49210; RETURN; END; IF MY GE 2010 AND V8='N' AND V4='J' AND V7='G' THEN DO; TRKTYP=1; MM2=49204; CG=49210; RETURN; END; /* TACOMA DBL CAB */ IF 2005 LE MY LE 2009 AND V8='N' AND V4='L' AND V7='2' THEN DO; TRKTYP=1; MM2=49205; CG=49210; RETURN; END; IF MY GE 2010 AND V8='N' AND V4='L' AND V7='E' THEN DO; TRKTYP=1; MM2=49205; CG=49210; RETURN; END; /* TACOMA DBL CAB 4X4 */ IF 2005 LE MY LE 2009 AND V8='N' AND V4='K' AND V7='2' THEN DO; TRKTYP=1; MM2=49204; CG=49211; RETURN; END; IF MY GE 2010 AND V8='N' AND V4='K' AND V7='H' THEN DO; TRKTYP=1; MM2=49204; CG=49211; RETURN; END; /* TACOMA DBL CAB SLWB */ IF 2005 LE MY LE 2009 AND V8='N' AND V4='M' AND V7='2' THEN DO; TRKTYP=1; MM2=49205; CG=49211; RETURN; END; IF MY GE 2010 AND V8='N' AND V4='M' AND V7='F' THEN DO; TRKTYP=1; MM2=49205; CG=49211; RETURN; END; /* TACOMA DBL CAB SLWB 4X4 */ IF MY GE 2007 AND V8='1' AND V5 IN ('N','T','U') AND V4='J' AND V3 IN ('B','E','F') THEN DO; TRKTYP=2; MM2=49210; CG=49213; RETURN; END; /* TUNDRA 126.8 */ IF MY GE 2007 AND V8='1' AND V5 IN ('N','T','U') AND V4='K' AND V3 IN ('B','E','F') THEN DO; TRKTYP=2; MM2=49211; CG=49213; RETURN; END; /* TUNDRA 4X4 126.8 */ IF MY GE 2007 AND V8='1' AND V5 IN ('N','T','U') AND V4='L' AND V3 IN ('B','E','F') THEN DO; TRKTYP=2; MM2=49210; CG=49214; RETURN; END; /* TUNDRA LONG BED 145.7 */ IF MY GE 2007 AND V8='1' AND V5 IN ('N','T','U') AND V4='M' AND V3 IN ('B','E','F') THEN DO; TRKTYP=2; MM2=49211; CG=49214; RETURN; END; /* TUNDRA 4X4 LONG BED 145.7 */ IF 2007 LE MY LE 2009 AND V8='1' AND V5 IN ('T','V') AND V4 ='E' AND V3 IN ('B','E','F') THEN DO; TRKTYP=2; MM2=49212; CG=49214; RETURN; END; IF MY GE 2010 AND V8='1' AND V4 IN ('E','F') AND V3 IN ('B','E','F') THEN DO; TRKTYP=2; MM2=49212; CG=49214; RETURN; END; /* TUNDRA CREW MAX CAB 145.7 */ IF 2007 LE MY LE 2009 AND V8='1' AND V5 IN ('T','V') AND V4 ='D' AND V3 IN ('B','E','F') THEN DO; TRKTYP=2; MM2=49213; CG=49214; RETURN; END; IF MY GE 2010 AND V8='1' AND V4 IN ('D','H') AND V3 IN ('B','E','F') THEN DO; TRKTYP=2; MM2=49213; CG=49214; RETURN; END; /* TUNDRA CREW MAX CAB 4X4 145.7 */ IF 2007 LE MY LE 2009 AND V8='1' AND V47 IN ('RU54','RT54','RT58','RV58') THEN DO; TRKTYP=2; MM2=49214; CG=49214; RETURN; END; IF MY GE 2010 AND V8='1' AND V4 IN ('R','S') THEN DO; TRKTYP=2; MM2=49214; CG=49214; RETURN; END; /* TUNDRA DOUBLE CAB 145.7 */ IF 2007 LE MY LE 2009 AND V8='1' AND V4='B' AND V6 ='5' THEN DO; TRKTYP=2; MM2=49215; CG=49214; RETURN; END; IF MY GE 2010 AND V8='1' AND V4 IN ('B','U') THEN DO; TRKTYP=2; MM2=49215; CG=49214; RETURN; END; /* TUNDRA DOUBLE CAB 4X4 145.7 */ IF 2007 LE MY LE 2009 AND V8='1' AND V3 IN ('B','E','F') AND V47 IN ('RV54','ST54','SV54') THEN DO; TRKTYP=2; MM2=49214; CG=49215; RETURN; END; IF MY GE 2010 AND V8='1' AND V4='T' AND V3 IN ('B','E','F') THEN DO; TRKTYP=2; MM2=49214; CG=49215; RETURN; END; /* TUNDRA DOUBLE CAB LONG BED 164.6 */ IF MY GE 2007 AND V8='1' AND V4='C' AND V3 IN ('B','E','F') THEN DO; TRKTYP=2; MM2=49215; CG=49215; RETURN; END; /* TUNDRA DOUBLE CAB 4X4 LONG BED 164.6 */ IF 1985 LE MY LE 1989 AND V5='N' AND V6='6' AND V3='3' THEN DO; TRKTYP=3; MM2=49301; CG=49301; RETURN; END; IF MY=1985 AND V5='N' AND V=61 AND V3='4' THEN DO; TRKTYP=3; MM2=49301; CG=49301; RETURN; END; IF 1986 LE MY LE 1989 AND V5='N' AND V=62 AND V3='4' THEN DO; TRKTYP=3; MM2=49301; CG=49301; RETURN; END; IF 1990 LE MY LE 1992 AND V5='N' AND V6='3' AND V3='3' AND V8='J' THEN DO; TRKTYP=3; MM2=49301; CG=49301; RETURN; END; IF 1990 LE MY LE 1995 AND V5='N' AND V6='2' AND V3='3' AND V8='V' THEN DO; TRKTYP=3; MM2=49302; CG=49301; RETURN; END; IF 1990 LE MY LE 1992 AND V5='N' AND V6='3' AND V3='3' AND V8='W' THEN DO; TRKTYP=3; MM2=49303; CG=49301; RETURN; END; IF 1993 LE MY LE 1995 AND V5='N' AND V6='3' AND V3='3' THEN DO; TRKTYP=3; MM2=49303; CG=49301; RETURN; END; IF 1985 LE MY LE 1987 AND V5='J' AND V=60 AND V3='3' THEN DO; TRKTYP=4; MM2=49313; CG=49302; RETURN; END; IF 1986 LE MY LE 1987 AND V5='J' AND V=60 AND V3='4' THEN DO; TRKTYP=4; MM2=49313; CG=49302; RETURN; END; IF 1988 LE MY LE 1990 AND V5='J' AND V=62 AND V3='3' THEN DO; TRKTYP=4; MM2=49313; CG=49302; RETURN; END; IF 1991 LE MY LE 1992 AND V5='J' AND V=80 AND V3='3' THEN DO; TRKTYP=4; MM2=49313; CG=49303; RETURN; END; IF 1993 LE MY LE 1995 AND V5='J' AND V=81 AND V3='3' THEN DO; TRKTYP=4; MM2=49313; CG=49303; RETURN; END; IF 1996 LE MY LE 1997 AND V8='J' AND V6='8' AND V4='H' AND V3='3' THEN DO; TRKTYP=4; MM2=49313; CG=49303; RETURN; END; IF 1996 LE MY LE 2002 AND V8='R' AND V6='8' AND V4='G' AND V3='3' THEN DO; TRKTYP=3; MM2=49302; CG=49304; RETURN; END; IF 1996 LE MY LE 2002 AND V8='R' AND V6='8' AND V4='H' AND V3='3' THEN DO; TRKTYP=3; MM2=49303; CG=49304; RETURN; END; IF 1996 LE MY LE 1999 AND V8='V' AND V6='1' AND V4='X' AND V3='3' THEN DO; TRKTYP=3; MM2=49320; CG=49305; RETURN; END; IF 1996 LE MY LE 1999 AND V8='V' AND V6='1' AND V4='Y' AND V3='3' THEN DO; TRKTYP=3; MM2=49321; CG=49305; RETURN; END; IF 1996 LE MY LE 2000 AND V8='V' AND V6='1' AND V4='G' AND V3='3' THEN DO; TRKTYP=3; MM2=49322; CG=49306; RETURN; END; IF 1996 LE MY LE 2000 AND V8='V' AND V6='1' AND V4='H' AND V3='3' THEN DO; TRKTYP=3; MM2=49323; CG=49306; RETURN; END; IF 1998 LE MY LE 2000 AND V8='J' AND V6='0' AND V4='H' AND V3='3' THEN DO; TRKTYP=4; MM2=49313; CG=49307; RETURN; END; IF 2001 LE MY LE 2009 AND V8='J' AND V6='0' AND V4='H' AND V3 IN ('E','M') THEN DO; TRKTYP=4; MM2=49313; CG=49307; RETURN; END; IF MY GE 2010 AND V8='J' AND V6='7' AND V4='H' AND V3 IN ('E','M') THEN DO; TRKTYP=4; MM2=49313; CG=49307; RETURN; END; /* LAND CRUISER */ IF 2001 LE MY LE 2005 AND V8='V' AND V6='2' AND V4='G' AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49322; CG=49309; RETURN; END; IF 2001 LE MY LE 2005 AND V8='V' AND V6='2' AND V4='H' AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49323; CG=49309; RETURN; END; IF 2001 LE MY LE 2003 AND V8='A' AND V6='2' AND V4='G' AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49342; CG=49310; RETURN; END; IF 2004 LE MY LE 2005 AND V8='A' AND V6='2' AND V4 IN ('D','G') AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49342; CG=49310; RETURN; END; IF MY IN (2006,2007) AND V8='A' AND V6='2' AND V4 IN ('D','G') AND V5 IN ('D','P') AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49342; CG=49310; RETURN; END; /* HIGHLANDER 106.9 ends 2007 */ IF 2001 LE MY LE 2003 AND V8='A' AND V6='2' AND V4='H' AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49343; CG=49310; RETURN; END; IF 2004 LE MY LE 2005 AND V8='A' AND V6='2' AND V4 IN ('E','H') AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49343; CG=49310; RETURN; END; IF MY IN (2006,2007) AND V8='A' AND V6='2' AND V4 IN ('E','H') AND V5 IN ('D','P') AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49343; CG=49310; RETURN; END; /* HIGHLANDER AWD 106.9 ends 2007 */ IF MY = 2006 AND V8='A' AND V6='2' AND V4='D' AND V5='W' AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49346; CG=49310; RETURN; END; IF MY=2007 AND V8='A' AND V6='2' AND V4 IN ('D','G') AND V5='W' AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49346; CG=49310; RETURN; END; /* HIGHLANDER HYBRID 106.9 ends 2007 */ IF MY = 2006 AND V8='A' AND V6='2' AND V4='E' AND V5='W' AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49347; CG=49310; RETURN; END; IF MY=2007 AND V8='A' AND V6='2' AND V4 IN ('E','H') AND V5='W' AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49347; CG=49310; RETURN; END; /* HIGHLANDER HYBRID AWD 106.9 ends 2007 */ IF MY GE 2001 AND V8='A' AND V6='3' AND V4='Z' AND V1='5' AND V3='D' THEN DO; TRKTYP=4; MM2=49352; CG=49311; RETURN; END; /* SEQUOIA 118.1 ends 2007 */ IF MY GE 2001 AND V8='A' AND V6='4' AND V4='B' AND V1='5' AND V3='D' THEN DO; TRKTYP=4; MM2=49353; CG=49311; RETURN; END; /* SEQUOIA 118.1 4X4 ends 2007 */ IF 2003 LE MY LE 2009 AND V8='R' AND V6='1' AND V4='Z' THEN DO; TRKTYP=3; MM2=49302; CG=49312; RETURN; END; IF MY GE 2010 AND V8='R' AND V6='5' AND V4='Z' THEN DO; TRKTYP=3; MM2=49302; CG=49312; RETURN; END; /* 4RUNNER */ IF 2003 LE MY LE 2009 AND V8='R' AND V6='1' AND V4='B' THEN DO; TRKTYP=3; MM2=49303; CG=49312; RETURN; END; IF MY GE 2010 AND V8='R' AND V6='5' AND V4='B' THEN DO; TRKTYP=3; MM2=49303; CG=49312; RETURN; END; /* 4RUNNER 4X4 */ IF 2006 LE MY LE 2008 AND V8='V' AND V6='3' AND V4='Z' AND V1='J' AND V3='M' THEN DO; TRKTYP=3; MM2=49322; CG=49313; RETURN; END; IF MY=2009 AND V8='V' AND V6='3' AND V4='Z' AND V1 IN ('2','J') AND V3 IN ('3','M') THEN DO; TRKTYP=3; MM2=49322; CG=49313; RETURN; END; IF MY GE 2010 AND V8='V' AND V6='4' AND V4 IN ('K','W','X','Y','Z') THEN DO; TRKTYP=3; MM2=49322; CG=49313; RETURN; END; /* RAV4 */ IF 2006 LE MY LE 2008 AND V8='V' AND V6='3' AND V4='B' AND V1='J' AND V3='M' THEN DO; TRKTYP=3; MM2=49323; CG=49313; RETURN; END; IF MY=2009 AND V8='V' AND V6='3' AND V4='B' AND V1 IN ('2','J') AND V3 IN ('3','M') THEN DO; TRKTYP=3; MM2=49323; CG=49313; RETURN; END; IF MY GE 2010 AND V8='V' AND V6='4' AND V4 IN ('B','D','E','J','R') THEN DO; TRKTYP=3; MM2=49323; CG=49313; RETURN; END; /* RAV4 AWD */ IF 2007 LE MY LE 2009 AND V8='F' AND V6='1' AND V4='Z' THEN DO; TRKTYP=3; MM2=49362; CG=49314; RETURN; END; IF MY GE 2010 AND V8='F' AND V6='4' AND V4='Z' THEN DO; TRKTYP=3; MM2=49362; CG=49314; RETURN; END; /* FJ CRUISER */ IF 2007 LE MY LE 2009 AND V8='F' AND V6='1' AND V4='B' THEN DO; TRKTYP=3; MM2=49363; CG=49314; RETURN; END; IF MY GE 2010 AND V8='F' AND V6='4' AND V4='B' THEN DO; TRKTYP=3; MM2=49363; CG=49314; RETURN; END; /* FJ CRUISER AWD */ IF MY=2009 AND V8='A' AND V6='1' AND V1='4' AND V2='T' AND V3='3' THEN DO; TRKTYP=3; MM2=49053; CG=49315; RETURN; END; IF MY GE 2010 AND V8='B' AND V6='3' AND V4 IN ('B','Z') THEN DO; TRKTYP=3; MM2=49053; CG=49315; RETURN; END; /* VENZA */ IF 2008 LE MY LE 2009 AND V8='A' AND V6='4' AND V4='D' AND V5='S' AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49342; CG=49315; RETURN; END; IF MY=2010 AND V8='H' AND V6='3' AND V4 IN ('K','X','Y','Z') THEN DO; TRKTYP=3; MM2=49342; CG=49315; RETURN; END; IF MY GE 2011 AND V8='H' AND V6='3' AND V4 IN ('Y','Z') THEN DO; TRKTYP=3; MM2=49342; CG=49315; RETURN; END; /* HIGHLANDER 109.8 */ IF 2008 LE MY LE 2009 AND V8='A' AND V6='4' AND V4='E' AND V5='S' AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49343; CG=49315; RETURN; END; IF MY=2010 AND V8='H' AND V6='3' AND V4 IN ('B','D','E','J') AND V5 IN ('A','K') THEN DO; TRKTYP=3; MM2=49343; CG=49315; RETURN; END; IF MY GE 2011 AND V8='H' AND V6='3' AND V4 IN ('B','D') AND V5 IN ('A','K') THEN DO; TRKTYP=3; MM2=49343; CG=49315; RETURN; END; /* HIGHLANDER 109.8 AWD */ IF 2008 LE MY LE 2009 AND V8='A' AND V6='4' AND V4='E' AND V5='W' AND V1='J' AND V3='E' THEN DO; TRKTYP=3; MM2=49347; CG=49315; RETURN; END; IF MY=2010 AND V8='H' AND V6='3' AND V4 IN ('B','D','J') AND V5 IN ('W') THEN DO; TRKTYP=3; MM2=49347; CG=49315; RETURN; END; IF MY GE 2011 AND V8='H' AND V6='3' AND V4 IN ('B','D') AND V5 IN ('C') THEN DO; TRKTYP=3; MM2=49347; CG=49315; RETURN; END; /* HIGHLANDER HYBRID 109.8 AWD */ IF 2008 LE MY LE 2009 AND V8='A' AND V6='6' AND V4='Z' AND V1='5' AND V3='D' THEN DO; TRKTYP=4; MM2=49352; CG=49316; RETURN; END; IF MY GE 2010 AND V8='1' AND V6='5' AND V4 IN ('K','Y','Z') AND V1='5' THEN DO; TRKTYP=4; MM2=49352; CG=49316; RETURN; END; /* SEQUOIA 122.0 */ IF 2008 LE MY LE 2009 AND V8='A' AND V6='6' AND V4='B' AND V1='5' AND V3='D' THEN DO; TRKTYP=4; MM2=49353; CG=49316; RETURN; END; IF MY GE 2010 AND V8='1' AND V6='5' AND V4 IN ('B','D','J') AND V1='5' THEN DO; TRKTYP=4; MM2=49353; CG=49316; RETURN; END; /* SEQUOIA 122.0 4X4 */ IF 1985 LE MY LE 1989 AND V5='R' AND (27 LE V LE 29) AND V3='4' THEN DO; TRKTYP=5; MM2=49410; CG=49401; RETURN; END; IF 1987 LE MY LE 1989 AND V5='R' AND V=34 AND V3='4' THEN DO; TRKTYP=5; MM2=49411; CG=49401; RETURN; END; IF 1985 LE MY LE 1989 AND V5='R' AND V6='2' AND V3='3' THEN DO; TRKTYP=5; MM2=49412; CG=49401; RETURN; END; IF 1987 LE MY LE 1989 AND V5='R' AND V6='3' AND V3='3' THEN DO; TRKTYP=5; MM2=49413; CG=49401; RETURN; END; IF 1991 LE MY LE 1995 AND V5='C' AND 11 LE V LE 14 AND V3='3' THEN DO; TRKTYP=5; MM2=49422; CG=49402; RETURN; END; IF 1996 LE MY LE 1997 AND V8='M' AND V6='1' AND V4='G' AND V3='3' THEN DO; TRKTYP=5; MM2=49422; CG=49402; RETURN; END; IF 1991 LE MY LE 1995 AND V5='C' AND 21 LE V LE 24 AND V3='3' THEN DO; TRKTYP=5; MM2=49423; CG=49402; RETURN; END; IF 1996 LE MY LE 1997 AND V8='M' AND V6='2' AND V4='H' AND V3='3' THEN DO; TRKTYP=5; MM2=49423; CG=49402; RETURN; END; IF 1998 LE MY LE 2000 AND V8='C' AND V6='1' AND V4 IN ('G','Z') AND V3='3' THEN DO; TRKTYP=5; MM2=49402; CG=49403; RETURN; END; IF 2001 LE MY LE 2003 AND V8='C' AND V6='1' AND V4='Z' AND V1='4' AND V3='3' THEN DO; TRKTYP=5; MM2=49402; CG=49403; RETURN; END; IF 2004 LE MY LE 2006 AND V8='C' AND V6='2' AND V4='M' THEN DO; TRKTYP=5; MM2=49400; CG=49404; RETURN; END; /* SIENNA CARGO ends 2006 */ IF 2004 LE MY LE 2009 AND V8='C' AND V6='2' AND V4='Z' THEN DO; TRKTYP=5; MM2=49402; CG=49404; RETURN; END; IF MY=2010 AND V8='C' AND V6='4' AND V4 IN ('K','Y','Z') THEN DO; TRKTYP=5; MM2=49402; CG=49404; RETURN; END; IF MY GE 2011 AND V8='C' AND V6='3' AND V4 IN ('K','X','Y','Z') THEN DO; TRKTYP=5; MM2=49402; CG=49404; RETURN; END; /* SIENNA */ IF 2004 LE MY LE 2009 AND V8='C' AND V6='2' AND V4='B' THEN DO; TRKTYP=5; MM2=49403; CG=49404; RETURN; END; IF MY=2010 AND V8='C' AND V6='4' AND V4 IN ('B','D','J') THEN DO; TRKTYP=5; MM2=49403; CG=49404; RETURN; END; IF MY GE 2011 AND V8='C' AND V6='3' AND V4 IN ('B','D','J') THEN DO; TRKTYP=5; MM2=49403; CG=49404; RETURN; END; /* SIENNA AWD */ IF 1989 LE MY LE 1993 AND V5='N' AND V=94 AND V3='5' THEN DO; TRKTYP=2; MM2=49501; CG=49501; RETURN; END; TRKTYP=9; CG=99999; MM2=99999; RETURN; LTVOLVO: IF MY LE 2009 THEN V5=TRANSLATE(V5,'ZSGB','2568'); IF 2001 LE MY LE 2007 AND V4='S' AND V5='Z' THEN DO; TRKTYP=3; MM2=51043; CG=51301; RETURN; END; /* XC70 108.8 AWD redesigned 2008 */ /* NOTE: IN 2010 VOLVO RECONFIGURED THE VIN, MOVING V45 INFO TO V78 */ IF 2003 LE MY LE 2009 AND V4='C' AND V5 IN ('N','Y') THEN DO; TRKTYP=4; MM2=51312; CG=51302; RETURN; END; IF MY GE 2010 AND V7='C' AND V8 IN ('F','Y') THEN DO; TRKTYP=4; MM2=51312; CG=51302; RETURN; END; /* XC90 */ IF 2003 LE MY LE 2009 AND V4='C' AND V5 IN ('M','Z') THEN DO; TRKTYP=4; MM2=51313; CG=51302; RETURN; END; IF MY GE 2010 AND V7='C' AND V8 IN ('T','Z') THEN DO; TRKTYP=4; MM2=51313; CG=51302; RETURN; END; /* XC90 AWD */ IF 2008 LE MY LE 2009 AND V4='B' AND V5='Z' THEN DO; TRKTYP=3; MM2=51043; CG=51303; RETURN; END; IF MY GE 2010 AND V7='B' AND V8='Z' THEN DO; TRKTYP=3; MM2=51043; CG=51303; RETURN; END; /* XC70 110.8 AWD */ IF MY GE 2010 AND V7='D' THEN DO; TRKTYP=3; MM2=51047; CG=51304; RETURN; END; /* XC60 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTMITS: V5=TRANSLATE(V5,'ZSGB','2568'); V7=TRANSLATE(V7,'2568','ZSGB'); V4=TRANSLATE(V4,'ZSGB','2568'); V6=TRANSLATE(V6,'2568','ZSGB'); IF MY GE 2006 AND V5='C' AND V7='2' AND V1='1' AND V2='Z' AND V3 IN ('5','7') THEN DO; TRKTYP=1; MM2=52202; CG=6215; RETURN; END; /* RAIDER EXTENDED CAB */ IF MY=2006 AND V5='T' AND V7='2' AND V1='1' AND V2='Z' AND V3 IN ('5','7') THEN DO; TRKTYP=1; MM2=52203; CG=6215; RETURN; END; /* RAIDER EXTENDED CAB 4X4 */ IF MY GE 2006 AND V5='C' AND V7='8' AND V1='1' AND V2='Z' AND V3 IN ('5','7') THEN DO; TRKTYP=1; MM2=52204; CG=6215; RETURN; END; /* RAIDER DOUBLE CAB */ IF MY GE 2006 AND V5='T' AND V7='8' AND V1='1' AND V2='Z' AND V3 IN ('5','7') THEN DO; TRKTYP=1; MM2=52205; CG=6215; RETURN; END; /* RAIDER DOUBLE CAB 4X4 */ IF 1985 LE MY LE 1986 AND V5='P' AND V7='4' AND V3='7' THEN DO; TRKTYP=1; MM2=52240; CG=52201; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V7='4' AND V3='7' THEN DO; TRKTYP=1; MM2=52241; CG=52201; RETURN; END; IF 1987 LE MY LE 1992 AND V5='L' AND V7='4' AND V3='7' THEN DO; TRKTYP=1; MM2=52240; CG=52202; RETURN; END; IF 1993 LE MY LE 1996 AND V5='S' AND V7='1' AND V3='7' THEN DO; TRKTYP=1; MM2=52240; CG=52202; RETURN; END; IF 1987 LE MY LE 1992 AND V5='M' AND V7='4' AND V3='7' THEN DO; TRKTYP=1; MM2=52241; CG=52202; RETURN; END; IF 1993 LE MY LE 1994 AND V5='T' AND V7='1' AND V3='7' THEN DO; TRKTYP=1; MM2=52241; CG=52202; RETURN; END; IF 1987 LE MY LE 1992 AND V5='L' AND V7='5' AND V3='7' THEN DO; TRKTYP=1; MM2=52242; CG=52203; RETURN; END; IF 1993 LE MY LE 1994 AND V5='S' AND V7='3' AND V3='7' THEN DO; TRKTYP=1; MM2=52242; CG=52203; RETURN; END; IF 1987 LE MY LE 1989 AND V5='M' AND V7='5' AND V3='7' THEN DO; TRKTYP=1; MM2=52243; CG=52203; RETURN; END; IF 1987 LE MY LE 1992 AND V5='L' AND V7='9' AND V3='7' THEN DO; TRKTYP=1; MM2=52246; CG=52203; RETURN; END; IF MY=1993 AND V5='S' AND V7='2' AND V3='7' THEN DO; TRKTYP=1; MM2=52246; CG=52203; RETURN; END; IF 1987 LE MY LE 1989 AND V5='M' AND V7='9' AND V3='7' THEN DO; TRKTYP=1; MM2=52247; CG=52203; RETURN; END; IF 1985 LE MY LE 1990 AND V5='J' AND (V7='2' OR V7='3') THEN DO; TRKTYP=3; MM2=52331; CG=52301; RETURN; END; IF 1989 LE MY LE 1991 AND V5='J' AND V7='1' AND V3='4' THEN DO; TRKTYP=3; MM2=52333; CG=52302; RETURN; END; IF MY=1992 AND V5='K' AND V7='1' AND V3='4' THEN DO; TRKTYP=3; MM2=52333; CG=52303; RETURN; END; IF 1993 LE MY LE 2000 AND V5='R' AND V7='1' AND V3='4' THEN DO; TRKTYP=3; MM2=52333; CG=52303; RETURN; END; IF 1997 LE MY LE 2004 AND V5='S' AND V7='1' AND V3='4' THEN DO; TRKTYP=3; MM2=52336; CG=52303; RETURN; END; /* MONTERO SPORT ends 2004 */ IF 1997 LE MY LE 2004 AND V5='T' AND V7='1' AND V3='4' THEN DO; TRKTYP=3; MM2=52337; CG=52303; RETURN; END; /* MONTERO SPORT 4X4 ends 2004 */ IF 2001 LE MY LE 2006 AND V5='W' AND V7='1' AND V3='4' THEN DO; TRKTYP=3; MM2=52333; CG=52304; RETURN; END; /* MONTERO 4X4 ends 2006 */ IF 2003 LE MY LE 2004 AND V5='X' AND V6 IN ('3','4') THEN DO; TRKTYP=3; MM2=52047; CG=52305; RETURN; END; IF 2005 LE MY LE 2006 AND V5='X' AND V6 IN ('3','4','8') THEN DO; TRKTYP=3; MM2=52047; CG=52305; RETURN; END; /* OUTLANDER 103.3 ends 2006 */ IF 2003 LE MY LE 2004 AND V5='Z' AND V6 IN ('3','4') THEN DO; TRKTYP=3; MM2=52047; CG=52305; RETURN; END; IF 2005 LE MY LE 2006 AND V5='Z' AND V6 IN ('3','4','8') THEN DO; TRKTYP=3; MM2=52047; CG=52305; RETURN; END; /* OUTLANDER 103.3 AWD ends 2006 */ IF 2004 LE MY LE 2008 AND V5='M' AND V6 IN ('2','3','4') AND V1='4' AND V2='A' AND V3='4' THEN DO; TRKTYP=3; MM2=52312; CG=52306; RETURN; END; /* ENDEAVOR 108.7 ends 2008 */ IF 2004 LE MY LE 2008 AND V5='N' AND V6 IN ('2','3','4') AND V1='4' AND V2='A' AND V3='4' THEN DO; TRKTYP=3; MM2=52313; CG=52306; RETURN; END; /* ENDEAVOR AWD 108.7 ends 2008 */ IF 2007 LE MY LE 2009 AND V4 IN ('L','M') AND V5='S' AND V6 IN ('2','3','4') THEN DO; TRKTYP=3; MM2=52047; CG=52307; RETURN; END; IF 2007 LE MY LE 2009 AND V4 IN ('L','M') AND V5='T' AND V6 IN ('2','3','4') THEN DO; TRKTYP=3; MM2=52047; CG=52307; RETURN; END; IF MY=2010 AND V5 IN ('S','T') AND V6 IN ('2','3','4') THEN DO; TRKTYP=3; MM2=52047; CG=52307; RETURN; END; IF MY GE 2011 AND V5 IN ('P','R','S','T') AND V6 IN ('2','3','4') THEN DO; TRKTYP=3; MM2=52047; CG=52307; RETURN; END; /* OUTLANDER 105.1 */ IF MY GE 2010 AND V5='M' AND V6 IN ('2','3','4') AND V1='4' AND V2='A' AND V3='4' THEN DO; TRKTYP=3; MM2=52312; CG=52308; RETURN; END; /* ENDEAVOR 108.3 */ IF MY GE 2010 AND V5='N' AND V6 IN ('2','3','4') AND V1='4' AND V2='A' AND V3='4' THEN DO; TRKTYP=3; MM2=52313; CG=52308; RETURN; END; /* ENDEAVOR AWD 108.3 */ IF 1987 LE MY LE 1990 AND V5='N' AND V7='3' AND V3='7' THEN DO; TRKTYP=5; MM2=52400; CG=52401; RETURN; END; IF 1987 LE MY LE 1990 AND V5='N' AND (V7='1' OR V7='4') AND V3='4' THEN DO; TRKTYP=5; MM2=52402; CG=52401; RETURN; END; TRKTYP=9; CG=99999; MM2=99999; RETURN; LTSUZUKI: V5=TRANSLATE(V5,'ZSGB','2568'); V4=TRANSLATE(V4,'ZSGB','2568'); V6=TRANSLATE(V6,'2568','ZSGB'); IF MY LE 2009 THEN DO; V7=TRANSLATE(V7,'2568','ZSGB'); V=10*INPUT(V6,1.0)+INPUT(V7,1.0); END; V57=V5||V6||V7; IF MY=2009 AND V5='D' AND V=6 AND V8 IN ('T','U') AND V1='5' AND V2='Z' AND V3='6' THEN DO; TRKTYP=1; MM2=53202; CG=35210; RETURN; END; IF MY GE 2010 AND V57='D0C' AND V8 IN ('R','T','U') AND V1='5' AND V2='Z' AND V3='6' THEN DO; TRKTYP=1; MM2=53202; CG=35210; RETURN; END; /* EQUATOR X-CAB */ IF MY=2009 AND V5='D' AND V=6 AND V8='W' AND V1='5' AND V2='Z' AND V3='6' THEN DO; TRKTYP=1; MM2=53203; CG=35210; RETURN; END; IF MY GE 2010 AND V57='D0C' AND V8 IN ('V','W') AND V1='5' AND V2='Z' AND V3='6' THEN DO; TRKTYP=1; MM2=53203; CG=35210; RETURN; END; /* EQUATOR X-CAB 4X4 */ IF MY=2009 AND V5='D' AND V=7 AND V8 IN ('T','U') AND V1='5' AND V2='Z' AND V3='6' THEN DO; TRKTYP=1; MM2=53204; CG=35210; RETURN; END; IF MY GE 2010 AND V57='D0E' AND V8 IN ('R','T','U') AND V1='5' AND V2='Z' AND V3='6' THEN DO; TRKTYP=1; MM2=53204; CG=35210; RETURN; END; /* EQUATOR CREW CAB */ IF MY=2009 AND V5='D' AND V=7 AND V8='W' AND V1='5' AND V2='Z' AND V3='6' THEN DO; TRKTYP=1; MM2=53205; CG=35210; RETURN; END; IF MY GE 2010 AND V57='D0E' AND V8 IN ('V','W') AND V1='5' AND V2='Z' AND V3='6' THEN DO; TRKTYP=1; MM2=53205; CG=35210; RETURN; END; /* EQUATOR CREW CAB 4X4 */ IF MY=2009 AND V5='D' AND V=9 AND V8 IN ('T','U') AND V1='5' AND V2='Z' AND V3='6' THEN DO; TRKTYP=1; MM2=53204; CG=35211; RETURN; END; IF MY GE 2010 AND V57='D0F' AND V8 IN ('R','T','U') AND V1='5' AND V2='Z' AND V3='6' THEN DO; TRKTYP=1; MM2=53204; CG=35211; RETURN; END; /* EQUATOR CREW CAB long bed */ IF MY=2009 AND V5='D' AND V=9 AND V8='W' AND V1='5' AND V2='Z' AND V3='6' THEN DO; TRKTYP=1; MM2=53205; CG=35211; RETURN; END; IF MY GE 2010 AND V57='D0F' AND V8 IN ('V','W') AND V1='5' AND V2='Z' AND V3='6' THEN DO; TRKTYP=1; MM2=53205; CG=35211; RETURN; END; /* EQUATOR CREW CAB 4X4 long bed */ IF 1991 LE MY LE 1993 AND V4='J' AND V5='D' THEN DO; TRKTYP=3; MM2=53300; CG=53301; RETURN; END; IF 1985 LE MY LE 1995 AND V4='J' AND (V5='A' OR V5='C') THEN DO; TRKTYP=3; MM2=53301; CG=53301; RETURN; END; IF 1990 LE MY LE 1998 AND V4='T' AND V5='C' THEN DO; TRKTYP=3; MM2=53310; CG=53302; RETURN; END; IF 1989 LE MY LE 1998 AND V4='T' AND V5='A' THEN DO; TRKTYP=3; MM2=53311; CG=53302; RETURN; END; IF 1996 LE MY LE 1998 AND V4='L' AND V5='A' THEN DO; TRKTYP=3; MM2=53320; CG=53302; RETURN; END; IF 1996 LE MY LE 1998 AND V4='L' AND V5='B' THEN DO; TRKTYP=3; MM2=53321; CG=53302; RETURN; END; IF 1992 LE MY LE 1998 AND V4='T' AND V5='E' THEN DO; TRKTYP=3; MM2=53312; CG=53303; RETURN; END; IF 1991 LE MY LE 1998 AND V4='T' AND V5='D' THEN DO; TRKTYP=3; MM2=53313; CG=53303; RETURN; END; IF 1999 LE MY LE 2002 AND V3='3' AND V4='T' AND V5='C' AND (V=3 OR V=52) AND V8='C' THEN DO; TRKTYP=3; MM2=53330; CG=53304; RETURN; END; IF MY=2003 AND V3='3' AND V4='T' AND V5='C' AND V=52 AND V8='C' THEN DO; TRKTYP=3; MM2=53330; CG=53304; RETURN; END; /* VITARA 2DR ends 2003 */ IF 1999 LE MY LE 2002 AND V3='3' AND V4='T' AND V5='A' AND (V=3 OR V=52) AND V8='C' THEN DO; TRKTYP=3; MM2=53331; CG=53304; RETURN; END; IF MY=2003 AND V3='3' AND V4='T' AND V5='A' AND V=52 AND V8='C' THEN DO; TRKTYP=3; MM2=53331; CG=53304; RETURN; END; /* VITARA 2DR 4X4 ends 2004 */ IF 1999 LE MY LE 2003 AND V3='3' AND V4='T' AND V5='E' AND V=52 AND V8='V' THEN DO; TRKTYP=3; MM2=53332; CG=53305; RETURN; END; IF 1999 LE MY LE 2003 AND V3='3' AND V4='T' AND V5='D' AND V=52 AND V8='V' THEN DO; TRKTYP=3; MM2=53333; CG=53305; RETURN; END; IF 1999 LE MY LE 2003 AND V3='3' AND V4='T' AND V5='E' AND V=62 THEN DO; TRKTYP=3; MM2=53336; CG=53305; RETURN; END; IF 1999 LE MY LE 2003 AND V3='3' AND V4='T' AND V5='D' AND V=62 THEN DO; TRKTYP=3; MM2=53337; CG=53305; RETURN; END; IF MY=2004 AND V3='3' AND V4='T' AND V5='E' AND V11='6' THEN DO; TRKTYP=3; MM2=53332; CG=53305; RETURN; END; /* VITARA 4DR ends 2004 */ IF MY=2004 AND V3='3' AND V4='T' AND V5='D' AND V11='6' THEN DO; TRKTYP=3; MM2=53333; CG=53305; RETURN; END; /* VITARA 4DR 4X4 ends 2004 */ IF MY=2004 AND V3='3' AND V4='T' AND V5='E' AND V11='4' THEN DO; TRKTYP=3; MM2=53336; CG=53305; RETURN; END; IF MY=2005 AND V3='3' AND V4='T' AND V5='E' THEN DO; TRKTYP=3; MM2=53336; CG=53305; RETURN; END; IF MY=2004 AND V3='3' AND V4='T' AND V5='D' AND V11='4' THEN DO; TRKTYP=3; MM2=53337; CG=53305; RETURN; END; IF MY=2005 AND V3='3' AND V4='T' AND V5='D' THEN DO; TRKTYP=3; MM2=53337; CG=53305; RETURN; END; IF 2001 LE MY LE 2006 AND V4='T' AND V5='Y' AND V=92 THEN DO; TRKTYP=3; MM2=53338; CG=53306; RETURN; END; /* XL-7 110.2 redesigned 2007 */ IF 2001 LE MY LE 2006 AND V4='T' AND V5='X' AND V=92 THEN DO; TRKTYP=3; MM2=53339; CG=53306; RETURN; END; /* XL-7 4X4 110.2 redesigned 2007 */ IF MY GE 2007 AND V4='D' AND V5='B' AND V7='1' THEN DO; TRKTYP=3; MM2=53338; CG=53307; RETURN; END; /* XL-7 112.5 ends 2009 */ IF MY GE 2007 AND V4='D' AND V5='A' AND V7='1' THEN DO; TRKTYP=3; MM2=53339; CG=53307; RETURN; END; /* XL-7 4X4 112.5 ends 2009 */ IF MY GE 2006 AND V4='T' AND V5='E' THEN DO; TRKTYP=3; MM2=53336; CG=53308; RETURN; END; /* GRAND VITARA */ IF MY GE 2006 AND V4='T' AND V5='D' THEN DO; TRKTYP=3; MM2=53337; CG=53308; RETURN; END; /* GRAND VITARA 4X4 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTACURA: V5=TRANSLATE(V5,'ZSGB','2568'); V4=TRANSLATE(V4,'ZSGB','2568'); V6=TRANSLATE(V6,'2568','ZSGB'); V46=V4||V5||V6; IF 1996 LE MY LE 1999 AND V46='DJ5' THEN DO; TRKTYP=3; MM2=54313; CG=38305; RETURN; END; IF 2001 LE MY LE 2006 AND V46='YD1' THEN DO; TRKTYP=3; MM2=54323; CG=37302; RETURN; END; /* MDX AWD ends 2006 */ IF MY GE 2007 AND V46='YD2' THEN DO; TRKTYP=3; MM2=54323; CG=37305; RETURN; END; /* MDX AWD */ IF MY GE 2010 AND V46='YB1' THEN DO; TRKTYP=3; MM2=54040; CG=37305; RETURN; END; /* ZDX (FWD) */ IF MY GE 2010 AND V46='TB2' THEN DO; TRKTYP=3; MM2=54302; CG=37306; RETURN; END; /* RDX FWD */ IF MY GE 2007 AND V46='TB1' THEN DO; TRKTYP=3; MM2=54303; CG=37306; RETURN; END; /* RDX AWD */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTHYUN: V4=TRANSLATE(V4,'ZSGB','2568'); IF MY LE 2009 THEN V6=TRANSLATE(V6,'2568','ZSGB'); IF 2002 LE MY LE 2006 AND V4='S' AND V6 IN ('1','8') THEN DO; TRKTYP=3; MM2=55302; CG=55301; RETURN; END; /* SANTA FE ends 2006 */ IF 2002 LE MY LE 2006 AND V4='S' AND V6='7' THEN DO; TRKTYP=3; MM2=55303; CG=55301; RETURN; END; /* SANTA FE AWD ends 2006 */ IF MY = 2001 AND V4='S' AND V6 IN ('1','7','8') THEN DO; TRKTYP=3; MM2=55309; CG=55301; RETURN; END; /* 2001 SANTA FE UNKNOWN DRIVE */ IF 2005 LE MY LE 2009 AND V4='J' AND V6 IN ('1','8') THEN DO; TRKTYP=3; MM2=55322; CG=55302; RETURN; END; /* TUCSON 103.5 redesigned 2010 */ IF 2005 LE MY LE 2009 AND V4='J' AND V6='7' THEN DO; TRKTYP=3; MM2=55323; CG=55302; RETURN; END; /* TUCSON AWD 103.5 redesigned 2010 */ IF 2007 LE MY LE 2009 AND V4='N' AND V6 IN ('1','8') THEN DO; TRKTYP=3; MM2=55332; CG=55303; RETURN; END; IF MY GE 2010 AND V4='N' AND V6='4' THEN DO; TRKTYP=3; MM2=55332; CG=55303; RETURN; END; /* VERACRUZ */ IF 2007 LE MY LE 2009 AND V4='N' AND V6='7' THEN DO; TRKTYP=3; MM2=55333; CG=55303; RETURN; END; IF MY GE 2010 AND V4='N' AND V6='D' THEN DO; TRKTYP=3; MM2=55333; CG=55303; RETURN; END; /* VERACRUZ AWD */ IF 2007 LE MY LE 2009 AND V4='S' AND V6 IN ('1','8') THEN DO; TRKTYP=3; MM2=55302; CG=55304; RETURN; END; IF MY=2010 AND V4='S' AND V6 IN ('3','4') THEN DO; TRKTYP=3; MM2=55302; CG=55304; RETURN; END; IF MY GE 2011 AND V4='Z' AND V6 IN ('3','4') THEN DO; TRKTYP=3; MM2=55302; CG=55304; RETURN; END; /* SANTA FE */ IF 2007 LE MY LE 2009 AND V4='S' AND V6='7' THEN DO; TRKTYP=3; MM2=55303; CG=55304; RETURN; END; IF MY=2010 AND V4='S' AND V6='D' THEN DO; TRKTYP=3; MM2=55303; CG=55304; RETURN; END; IF MY GE 2011 AND V4='Z' AND V6='D' THEN DO; TRKTYP=3; MM2=55303; CG=55304; RETURN; END; /* SANTA FE AWD */ IF MY GE 2010 AND V4='J' AND V6='3' THEN DO; TRKTYP=3; MM2=55322; CG=55305; RETURN; END; /* TUCSON 103.9 */ IF MY GE 2010 AND V4='J' AND V6='C' THEN DO; TRKTYP=3; MM2=55323; CG=55305; RETURN; END; /* TUCSON AWD 103.9 */ IF 2007 LE MY LE 2009 AND V4='M' AND V5='C' AND V1='K' AND V2='N' AND V3='D' THEN DO; TRKTYP=3; MM2=55402; CG=63402; RETURN; END; /* ENTOURAGE ends 2009 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTINFIN: V5=TRANSLATE(V5,'ZSGB','2568'); V4=TRANSLATE(V4,'ZSGB','2568'); V8=TRANSLATE(V8,'ZSGB','2568'); V57=V5||V6||V7; IF 2001 LE MY LE 2003 AND V3='R' AND V4='D' AND V5='R' AND V8='X' THEN DO; TRKTYP=3; MM2=58302; CG=35302; RETURN; END; IF 1997 LE MY LE 2000 AND V3='R' AND V4='A' AND V5='R' THEN DO; TRKTYP=3; MM2=58303; CG=35302; RETURN; END; IF 2001 LE MY LE 2003 AND V3='R' AND V4='D' AND V5='R' AND V8='Y' THEN DO; TRKTYP=3; MM2=58303; CG=35302; RETURN; END; IF 2003 LE MY LE 2008 AND V5='S' AND V6='0' AND V8 IN ('T','U','X') THEN DO; TRKTYP=3; MM2=58039; CG=35305; RETURN; END; /* FX35 112.2 ends 2008 */ IF 2003 LE MY LE 2008 AND V5='S' AND V6='0' AND V8='W' THEN DO; TRKTYP=3; MM2=58039; CG=35305; RETURN; END; /* FX35/FX45 AWD 112.2 ends 2008 */ IF 2004 LE MY LE 2007 AND V57='A08' AND V8='A' AND V1='5' AND V2='N' AND V3='3' THEN DO; TRKTYP=4; MM2=58312; CG=35306; RETURN; END; IF 2008 LE MY LE 2009 AND V57='A08' AND V8='D' AND V1='5' AND V2='N' AND V3='3' THEN DO; TRKTYP=4; MM2=58312; CG=35306; RETURN; END; IF MY=2010 AND V57='A0N' AND V8 IN ('B','D','F') AND V1='5' AND V2='N' AND V3='3' THEN DO; TRKTYP=4; MM2=58312; CG=35306; RETURN; END; /* QX56 redesigned 2011 */ IF 2004 LE MY LE 2009 AND V57='A08' AND V8='C' AND V1='5' AND V2='N' AND V3='3' THEN DO; TRKTYP=4; MM2=58313; CG=35306; RETURN; END; IF MY=2010 AND V57='A0N' AND V8 IN ('A','C','E') AND V1='5' AND V2='N' AND V3='3' THEN DO; TRKTYP=4; MM2=58313; CG=35306; RETURN; END; /* QX56 4X4 redesigned 2011 */ IF MY GE 2008 AND V5='J' AND V6='0' THEN DO; TRKTYP=3; MM2=58040; CG=35310; RETURN; END; /* EX35 */ IF MY GE 2009 AND V5='S' AND V6='1' THEN DO; TRKTYP=3; MM2=58039; CG=35311; RETURN; END; /* FX35 113.6 */ IF MY GE 2011 AND V57='Z2N' AND V8 IN ('B','D','F') AND V1='J' AND V2='N' AND V3='8' THEN DO; TRKTYP=4; MM2=58312; CG=35313; RETURN; END; /* QX56 121.1 */ IF MY GE 2011 AND V57='Z2N' AND V8 IN ('A','C','E') AND V1='J' AND V2='N' AND V3='8' THEN DO; TRKTYP=4; MM2=58313; CG=35313; RETURN; END; /* QX56 4X4 121.1 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTLEXUS: V5=TRANSLATE(V5,'ZSGB','2568'); V4=TRANSLATE(V4,'ZSGB','2568'); V6=TRANSLATE(V6,'2568','ZSGB'); IF 1996 LE MY LE 1997 AND V4='H' AND V5='J' AND V6='8' THEN DO; TRKTYP=4; MM2=59313; CG=49303; RETURN; END; IF 1998 LE MY LE 2007 AND V8='W' AND V4='H' AND V5='T' AND V6='0' THEN DO; TRKTYP=4; MM2=59313; CG=49307; RETURN; END; IF 2008 LE MY LE 2009 AND V8='W' AND V4='H' AND V5='Y' AND V6='0' THEN DO; TRKTYP=4; MM2=59313; CG=49307; RETURN; END; IF MY GE 2010 AND V8='X' AND V4='H' AND V5='Y' AND V6='7' THEN DO; TRKTYP=4; MM2=59313; CG=49307; RETURN; END; /* LX570 */ IF 1999 LE MY LE 2003 AND V8='U' AND V6='1' AND V4='G' AND V5='F' THEN DO; TRKTYP=3; MM2=59332; CG=49308; RETURN; END; IF 1999 LE MY LE 2003 AND V8='U' AND V6='1' AND V4='H' AND V5='F' THEN DO; TRKTYP=3; MM2=59333; CG=49308; RETURN; END; IF 2004 LE MY LE 2009 AND V8='U' AND V6='3' AND V4='G' THEN DO; TRKTYP=3; MM2=59342; CG=49310; RETURN; END; /* RX330/350 106.9 redesigned 2010 */ IF 2004 LE MY LE 2009 AND V8='U' AND V6='3' AND V4='H' THEN DO; TRKTYP=3; MM2=59343; CG=49310; RETURN; END; /* RX330/350 AWD 106.9 redesigned 2010 */ IF 2003 LE MY LE 2009 AND V8='X' AND V6='2' AND V4='B' THEN DO; TRKTYP=3; MM2=59303; CG=49312; RETURN; END; IF MY=2010 AND V8='X' AND V6='7' AND V4='B' THEN DO; TRKTYP=3; MM2=59303; CG=49312; RETURN; END; IF MY GE 2011 AND V8='X' AND V6='7' AND V4 IN ('B','J') THEN DO; TRKTYP=3; MM2=59303; CG=49312; RETURN; END; /* GX470 4X4 */ IF MY GE 2010 AND V8='A' AND V6='1' AND V4='Z' THEN DO; TRKTYP=3; MM2=59342; CG=49317; RETURN; END; /* RX330/350 107.9 */ IF MY GE 2010 AND V8='A' AND V6='1' AND V4='B' THEN DO; TRKTYP=3; MM2=59343; CG=49317; RETURN; END; /* RX330/350 AWD 107.9 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; ROCKY: IF V5='F' AND V6='3' THEN DO; TRKTYP=3; MM2=60301; CG=60301; RETURN; END; TRKTYP=9; CG=99999; MM2=99999; RETURN; LTLAND: V5=TRANSLATE(V5,'ZSGB','2568'); V4=TRANSLATE(V4,'ZSGB','2568'); IF 1993 LE MY LE 1995 AND V4='H' AND (V5='C' OR V5='F') THEN DO; TRKTYP=4; MM2=62313; CG=62301; RETURN; END; IF 1995 LE MY LE 1998 AND V4='P' AND (V5='V' OR V5='E') THEN DO; TRKTYP=4; MM2=62313; CG=62301; RETURN; END; IF 1999 LE MY LE 2002 AND V4='P' THEN DO; TRKTYP=4; MM2=62313; CG=62301; RETURN; END; IF 1994 LE MY LE 1999 AND V4='J' AND (V5='Y' OR V5='N') THEN DO; TRKTYP=3; MM2=62303; CG=62302; RETURN; END; IF 1993 LE MY LE 1995 AND V4='D' AND V5='H' THEN DO; TRKTYP=4; MM2=62321; CG=62303; RETURN; END; IF 1994 LE MY LE 1995 AND V4='D' AND V5='V' THEN DO; TRKTYP=4; MM2=62328; CG=62303; RETURN; END; IF 1987 LE MY LE 1995 AND V4='H' AND (V5='V' OR V5='E') THEN DO; TRKTYP=3; MM2=62333; CG=62304; RETURN; END; IF MY=1997 AND V4='D' AND V5='V' THEN DO; TRKTYP=3; MM2=62325; CG=62305; RETURN; END; IF 1999 LE MY LE 2004 AND V4='T' THEN DO; TRKTYP=3; MM2=62307; CG=62306; RETURN; END; /* DISCOVERY II ends 2004 */ IF 2003 LE MY LE 2005 AND V4='N' AND V6='1' THEN DO; TRKTYP=3; MM2=62341; CG=62307; RETURN; END; /* FREELANDER 3DR ends 2005 */ IF 2002 LE MY LE 2005 AND V4='N' AND V6='2' THEN DO; TRKTYP=3; MM2=62343; CG=62307; RETURN; END; /* FREELANDER 5DR ends 2005 */ IF MY GE 2003 AND V4='M' THEN DO; TRKTYP=4; MM2=62313; CG=62308; RETURN; END; /* RANGE ROVER */ IF MY GE 2005 AND V4='A' THEN DO; TRKTYP=4; MM2=62353; CG=62309; RETURN; END; /* LR3/LR4 */ IF MY GE 2006 AND V4='S' THEN DO; TRKTYP=4; MM2=62317; CG=62310; RETURN; END; /* RANGE ROVER SPORT */ IF MY GE 2008 AND V4='F' THEN DO; TRKTYP=4; MM2=62357; CG=62311; RETURN; END; /* LR2 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTKIA: V5=TRANSLATE(V5,'ZSGB','2568'); V4=TRANSLATE(V4,'ZSGB','2568'); IF MY LE 2009 THEN V=10*INPUT(V6,1.0)+INPUT(V7,1.0); IF 2005 LE MY LE 2009 AND V4='J' AND V5='F' THEN DO; TRKTYP=3; MM2=63302; CG=55302; RETURN; END; IF MY=2010 AND V4='K' AND V6='3' THEN DO; TRKTYP=3; MM2=63302; CG=55302; RETURN; END; /* SPORTAGE 103.5 redesigned 2011 */ IF 2005 LE MY LE 2009 AND V4='J' AND V5='E' THEN DO; TRKTYP=3; MM2=63303; CG=55302; RETURN; END; IF MY=2010 AND V4='K' AND V6='C' THEN DO; TRKTYP=3; MM2=63303; CG=55302; RETURN; END; /* SPORTAGE 4X4 103.5 redesigned 2011 */ IF MY GE 2011 AND V4='K' AND V6 IN ('3','4') THEN DO; TRKTYP=3; MM2=63312; CG=55304; RETURN; END; /* SORENTO 106.3 */ IF MY GE 2011 AND V4='K' AND V6 IN ('C','D') THEN DO; TRKTYP=3; MM2=63313; CG=55304; RETURN; END; /* SORENTO AWD 106.3 */ IF MY GE 2011 AND V4='P' AND V6='3' THEN DO; TRKTYP=3; MM2=63302; CG=55305; RETURN; END; /* SPORTAGE 103.9 */ IF MY GE 2011 AND V4='P' AND V6='C' THEN DO; TRKTYP=3; MM2=63303; CG=55305; RETURN; END; /* SPORTAGE 4X4 103.9 */ IF 1995 LE MY LE 1998 AND V4='J' AND V5='B' THEN DO; TRKTYP=3; MM2=63302; CG=63301; RETURN; END; IF 1999 LE MY LE 2002 AND V4='J' AND V5='B' AND V=72 THEN DO; TRKTYP=3; MM2=63302; CG=63301; RETURN; END; IF 1995 LE MY LE 1998 AND V4='J' AND V5='A' THEN DO; TRKTYP=3; MM2=63303; CG=63301; RETURN; END; IF 1999 LE MY LE 2002 AND V4='J' AND V5='A' AND V=72 THEN DO; TRKTYP=3; MM2=63303; CG=63301; RETURN; END; IF 1999 LE MY LE 2002 AND V4='J' AND V5='B' AND V=62 THEN DO; TRKTYP=3; MM2=63300; CG=63302; RETURN; END; IF 1999 LE MY LE 2002 AND V4='J' AND V5='A' AND V=62 THEN DO; TRKTYP=3; MM2=63301; CG=63302; RETURN; END; IF 2003 LE MY LE 2009 AND V4='J' AND V5='D' THEN DO; TRKTYP=3; MM2=63312; CG=63303; RETURN; END; /* SORENTO 106.7 ends 2009 and then redesigned 2011 */ IF 2003 LE MY LE 2009 AND V4='J' AND V5='C' THEN DO; TRKTYP=3; MM2=63313; CG=63303; RETURN; END; /* SORENTO 4X4 106.7 ends 2009 and then redesigned 2011 */ IF MY=2009 AND V4='J' AND V5='J' THEN DO; TRKTYP=4; MM2=63316; CG=63304; RETURN; END; /* BORREGO sold 2009 only */ IF MY=2009 AND V4='J' AND V5='H' THEN DO; TRKTYP=4; MM2=63317; CG=63304; RETURN; END; /* BORREGO 4X4 sold 2009 only */ IF 2002 LE MY LE 2005 AND V4='U' THEN DO; TRKTYP=5; MM2=63402; CG=63401; RETURN; END; IF 2006 LE MY LE 2009 AND V4='M' AND V5='B' AND V6='2' AND V7='3' THEN DO; TRKTYP=5; MM2=63402; CG=63402; RETURN; END; IF MY GE 2011 AND V4='M' AND V6='4' THEN DO; TRKTYP=5; MM2=63402; CG=63402; RETURN; END; /* SEDONA LWB 118.9 */ IF 2007 LE MY LE 2009 AND V4='M' AND V5='B' AND V6='1' AND V7='3' THEN DO; TRKTYP=5; MM2=63402; CG=63403; RETURN; END; /* SEDONA SWB 113.8 ends 2009 as a unique VIN */ IF MY=2010 AND V4='M' AND V6='4' THEN DO; TRKTYP=5; MM2=63402; CG=63404; RETURN; END; /* SEDONA SWB 113.8 OR LWB 118.9: identical VINs, 2010 only */ TRKTYP=9; CG=99999; MM2=99999; RETURN; RUN;