OPTION NOCENTER NOFMTERR OBS=5000000 LS=160 PAGESIZE=89; /* PROGRAM NAME: 05LTVGM2007.SAS UPDATED: 12/20/2010 */ /* THIS PROGRAM DECODES THE VIN FOR CHEVROLET, OLDSMOBILE, PONTIAC, BUICK */ /* CADILLAC, GMC AND SATURN PICKUP TRUCKS, VANS AND SUVs. MY 1985-2007 */ DATA GMTRK2(DROP=V); SET GMTRK1; IF 18 LE MAK2 LE 24; IF MAK2=20 AND (V1='J' OR V2='C') THEN GOTO TRACKER; IF MAK2=20 AND V1 NE 'J' AND V2 NE 'C' THEN GOTO LTCHEV; IF MAK2=23 THEN GOTO GMC; IF MAK2=21 THEN GOTO LTOLDS; IF MAK2=22 THEN GOTO LTPONT; IF MAK2=19 THEN GOTO LTCADI; IF MAK2=18 THEN GOTO LTBUICK; IF MAK2=24 THEN GOTO LTSATU; TRKTYP=9; CG=99999; MM2=99999; RETURN; LTBUICK: V5=TRANSLATE(V5,'ZSGB','2568'); 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 MY GE 2004 AND V5='S' AND V=13 AND V1='5' AND V2='G' AND V3='A' THEN DO; TRKTYP=3; MM2=18302; CG=18314; RETURN; END; /* RAINIER */ IF MY GE 2004 AND V5='T' AND V=13 AND V1='5' AND V2='G' AND V3='A' THEN DO; TRKTYP=3; MM2=18303; CG=18314; RETURN; END; /* RAINIER 4X4 */ IF MY GE 2002 AND V5='A' AND V=3 AND V1='3' AND V3='5' THEN DO; TRKTYP=3; MM2=18356; CG=18315; RETURN; END; /* RENDEZVOUS */ IF MY GE 2002 AND V5='B' AND V=3 AND V1='3' AND V3='5' THEN DO; TRKTYP=3; MM2=18357; CG=18315; RETURN; END; /* RENDEZVOUS AWD */ IF MY GE 2005 AND V5='V' AND V6='1' THEN DO; TRKTYP=5; MM2=18454; CG=18410; RETURN; END; /* TERAZA CARGO */ IF MY GE 2005 AND V5='V' AND V6 IN ('0','2','3') THEN DO; TRKTYP=5; MM2=18456; CG=18410; RETURN; END; /* TERAZA */ IF MY GE 2005 AND V5='X' AND V6 IN ('2','3') THEN DO; TRKTYP=5; MM2=18457; CG=18410; RETURN; END; /* TERAZA AWD */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTCADI: V5=TRANSLATE(V5,'ZSGB','2568'); 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 1999 LE MY LE 2000 AND V5='K' AND V IN (13,63) AND V3='Y' THEN DO; TRKTYP=4; MM2=19313; CG=18309; RETURN; END; IF 2002 LE MY LE 2006 AND V5='C' AND V=63 AND V3='Y' AND V1='1' THEN DO; TRKTYP=4; MM2=19312; CG=18310; RETURN; END; /* ESCALADE ends 2006 */ IF 2002 LE MY LE 2006 AND V5='K' AND V=63 AND V3='Y' AND V1='1' THEN DO; TRKTYP=4; MM2=19313; CG=18310; RETURN; END; /* ESCALADE AWD ends 2006 */ IF 2002 LE MY LE 2006 AND V5='K' AND V=66 AND V3='Y' AND V1='3' THEN DO; TRKTYP=4; MM2=19323; CG=18311; RETURN; END; /* ESCALADE ESV AWD ends 2006 */ IF 2002 LE MY LE 2003 AND V5='K' AND V=63 AND V3='Y' AND V1='3' THEN DO; TRKTYP=4; MM2=19343; CG=18311; RETURN; END; IF 2004 LE MY LE 2006 AND V5='K' AND V IN (62,63) AND V3='Y' AND V1='3' THEN DO; TRKTYP=4; MM2=19343; CG=18311; RETURN; END; /* ESCALADE EXT AWD ends 2006 */ IF MY GE 2004 AND V5='E' AND V=63 AND V3='Y' AND V1='1' THEN DO; TRKTYP=3; MM2=19020; CG=18319; RETURN; END; /* SRX */ IF MY GE 2007 AND V5='C' AND V IN (43,63) AND V3='Y' AND V1='1' THEN DO; TRKTYP=4; MM2=19312; CG=18324; RETURN; END; /* ESCALADE */ IF MY GE 2007 AND V5='K' AND V IN (43,63) AND V3='Y' AND V1='1' THEN DO; TRKTYP=4; MM2=19313; CG=18324; RETURN; END; /* ESCALADE AWD */ IF MY GE 2007 AND V5='K' AND V IN (46,66) AND V3='Y' THEN DO; TRKTYP=4; MM2=19323; CG=18325; RETURN; END; /* ESCALADE ESV AWD */ IF MY GE 2007 AND V5='K' AND V IN (42,43,62,63) AND V3='Y' AND V1='3' THEN DO; TRKTYP=4; MM2=19343; CG=18325; RETURN; END; /* ESCALADE EXT AWD */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTCHEV: V5=TRANSLATE(V5,'ZSGB','2568'); 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 1985 LE MY LE 1987 AND V5='S' AND V=14 AND V1='1' AND V3 IN ('B','C') AND (V4='B' OR V4='C') THEN DO; TRKTYP=1; MM2=20200; CG=18201; RETURN; END; IF 1985 LE MY LE 1987 AND V5='T' AND V=14 AND V1='1' AND V3 IN ('B','C') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=20201; CG=18201; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=14 AND V3 IN ('B','C') AND (V4='C' OR V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=20210; CG=18202; RETURN; END; IF 1987 LE MY LE 1988 AND V5='R' AND V=14 AND V3 IN ('B','C') AND (V4='C' OR V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=20210; CG=18202; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=14 AND V3 IN ('B','C') AND (V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=20211; CG=18202; RETURN; END; IF MY=1987 AND V5='V' AND V=14 AND V3 IN ('B','C') AND (V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=20211; CG=18202; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=24 AND V3 IN ('B','C') AND V4 IN ('E','F','G') THEN DO; TRKTYP=2; MM2=20220; CG=18203; RETURN; END; IF MY=1987 AND V5='R' AND V=24 AND V3 IN ('B','C') AND V4 IN ('E','F','G') THEN DO; TRKTYP=2; MM2=20220; CG=18203; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=24 AND V3 IN ('B','C') AND V4 IN ('E','F','G') THEN DO; TRKTYP=2; MM2=20221; CG=18203; RETURN; END; IF MY=1987 AND V5='V' AND V=24 AND V3 IN ('B','C') AND V4 IN ('E','F','G') THEN DO; TRKTYP=2; MM2=20221; CG=18203; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=34 AND V3 IN ('B','C') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=20230; CG=18203; RETURN; END; IF 1987 LE MY LE 1989 AND V5='R' AND V=34 AND V3 IN ('B','C') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=20230; CG=18203; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=34 AND V3 IN ('B','C') AND V4 IN ('H','J','K') THEN DO; TRKTYP=2; MM2=20231; CG=18203; RETURN; END; IF 1987 LE MY LE 1989 AND V5='V' AND V=34 AND V3 IN ('B','C') AND V4 IN ('H','J','K') THEN DO; TRKTYP=2; MM2=20231; CG=18203; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=23 AND V3 IN ('B','C') AND V4='G' THEN DO; TRKTYP=2; MM2=20224; CG=18204; RETURN; END; IF 1987 LE MY LE 1989 AND V5='R' AND V=23 AND V3 IN ('B','C') AND V4='G' THEN DO; TRKTYP=2; MM2=20224; CG=18204; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=33 AND V3 IN ('B','C') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=20234; CG=18204; RETURN; END; IF 1987 LE MY LE 1991 AND V5='R' AND V=33 AND V3 IN ('B','C') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=20234; CG=18204; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=33 AND V3 IN ('B','C') AND V4 IN ('H','J','K') THEN DO; TRKTYP=2; MM2=20235; CG=18204; RETURN; END; IF 1987 LE MY LE 1991 AND V5='V' AND V=33 AND V3 IN ('B','C') AND V4 IN ('H','J','K') THEN DO; TRKTYP=2; MM2=20235; CG=18204; RETURN; END; IF 1988 LE MY LE 1999 AND V5='S' AND V=14 AND V1='1' AND V3 IN ('B','C') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=20200; CG=18205; RETURN; END; IF 2000 LE MY LE 2002 AND V5='S' AND V IN (14,64) AND V1='1' AND V3 IN ('B','C') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=20200; CG=18205; RETURN; END; IF MY=2003 AND V5='S' AND V IN (14,64) AND V1='1' AND V11 NE 'B' AND V3 IN ('B','C') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=20200; CG=18205; RETURN; END; /* ADD CHEVROLET LONG-LIFE VEHICLE TO S-10 PICKUPS FOR 1988-1994 */ IF 1988 LE MY LE 1994 AND V5='S' AND V=10 AND V1='1' AND V3 IN ('B','C') AND V4 IN ('B','C') THEN DO; TRKTYP=1; MM2=20200; CG=18205; RETURN; END; IF 1988 LE MY LE 1999 AND V5='T' AND V=14 AND V1='1' AND V3 IN ('B','C') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=20201; CG=18205; RETURN; END; IF MY=2000 AND V5='T' AND V IN (14,64) AND V1='1' AND V3 IN ('B','C') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=20201; CG=18205; RETURN; END; IF 1988 LE MY LE 1999 AND V5='S' AND V=19 AND V1='1' AND V3 IN ('B','C') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=20202; CG=18206; RETURN; END; IF 2000 LE MY LE 2003 AND V5='S' AND V IN (19,69) AND V1='1' AND V3 IN ('B','C') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=20202; CG=18206; RETURN; END; IF 1988 LE MY LE 1999 AND V5='T' AND V=19 AND V1='1' AND V3 IN ('B','C') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=20203; CG=18206; RETURN; END; IF 2000 LE MY LE 2003 AND V5='T' AND V IN (19,69) AND V1='1' AND V3 IN ('B','C') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=20203; CG=18206; RETURN; END; IF 2001 LE MY LE 2003 AND V5='T' AND V IN (13,63) AND V1='1' AND V3 IN ('B','C') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=20205; CG=18206; RETURN; END; IF MY= 2004 AND V5='T' AND V IN (13,63) AND V8='X' AND V11='K' AND V1='1' AND V3 IN ('B','C') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=20205; CG=18206; RETURN; END; IF 1988 LE MY LE 1994 AND V5='C' AND V=14 AND V3 IN ('B','C') AND (V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=20210; CG=18207; RETURN; END; IF 1995 LE MY LE 1998 AND V5='C' AND V=14 AND V3 IN ('B','C') AND V4='E' THEN DO; TRKTYP=2; MM2=20210; CG=18207; RETURN; END; IF 1988 LE MY LE 1994 AND V5='K' AND V=14 AND V3 IN ('B','C') AND (V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=20211; CG=18207; RETURN; END; IF 1995 LE MY LE 1998 AND V5='K' AND V=14 AND V3 IN ('B','C') AND V4='E' THEN DO; TRKTYP=2; MM2=20211; CG=18207; RETURN; END; IF 1988 LE MY LE 1998 AND V5='C' AND V=24 AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=20220; CG=18208; RETURN; END; IF 1999 LE MY LE 2000 AND V5='C' AND V=24 AND V8 IN ('F','J','R') AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=20220; CG=18208; RETURN; END; IF 1988 LE MY LE 1998 AND V5='K' AND V=24 AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=20221; CG=18208; RETURN; END; IF 1999 LE MY LE 2000 AND V5='K' AND V=24 AND V8 IN ('F','J','R') AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=20221; CG=18208; RETURN; END; IF 1988 LE MY LE 2000 AND V5='C' AND V=34 AND V3 IN ('B','C') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=20230; CG=18208; RETURN; END; IF 1988 LE MY LE 2000 AND V5='K' AND V=34 AND V3 IN ('B','C') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=20231; CG=18208; RETURN; END; IF 1988 LE MY LE 1990 AND V5='C' AND V=19 AND V1='2' AND V3 IN ('B','C') AND V4 IN ('D','E','F') THEN DO; TRKTYP=2; MM2=20212; CG=18209; RETURN; END; IF 1988 LE MY LE 1990 AND V5='K' AND V=19 AND V1='2' AND V3 IN ('B','C') AND V4 IN ('E','F') THEN DO; TRKTYP=2; MM2=20213; CG=18209; RETURN; END; IF 1988 LE MY LE 1990 AND V5='C' AND V=29 AND V1='2' AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=20222; CG=18209; RETURN; END; IF 1988 LE MY LE 1990 AND V5='K' AND V=29 AND V1='2' AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=20223; CG=18209; RETURN; END; IF 1988 LE MY LE 2000 AND V5='C' AND V=39 AND (V1='2' OR MY GE 93) AND V3 IN ('B','C') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=20232; CG=18209; RETURN; END; IF 1988 LE MY LE 2000 AND V5='K' AND V=39 AND (V1='2' OR MY GE 93) AND V3 IN ('B','C') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=20233; CG=18209; RETURN; END; IF 1991 LE MY LE 1998 AND V5='C' AND V=19 AND (V1='2' OR MY GE 93) AND V3 IN ('B','C') AND V4 IN ('D','E','F') THEN DO; TRKTYP=2; MM2=20212; CG=18210; RETURN; END; IF MY=1999 AND V5='C' AND V=19 AND (V8='R' OR V8='M') AND V3 IN ('B','C') AND V4 IN ('D','E','F') AND V11='R' THEN DO; TRKTYP=2; MM2=20212; CG=18210; RETURN; END; IF 1991 LE MY LE 1998 AND V5='K' AND V=19 AND (V1='2' OR MY GE 93) AND V3 IN ('B','C') AND V4 IN ('E','F') THEN DO; TRKTYP=2; MM2=20213; CG=18210; RETURN; END; IF MY=1999 AND V5='K' AND V=19 AND (V8='R' OR V8='M') AND V3 IN ('B','C') AND V4 IN ('E','F') AND V11='R' THEN DO; TRKTYP=2; MM2=20213; CG=18210; RETURN; END; IF 1991 LE MY LE 1998 AND V5='C' AND V=29 AND (V1='2' OR MY GE 93) AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=20222; CG=18210; RETURN; END; IF 1999 LE MY LE 2000 AND V5='C' AND V=29 AND V8 IN ('F','J','R') AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=20222; CG=18210; RETURN; END; IF 1991 LE MY LE 1998 AND V5='K' AND V=29 AND (V1='2' OR MY GE 93) AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=20223; CG=18210; RETURN; END; IF 1999 LE MY LE 2000 AND V5='K' AND V=29 AND V8 IN ('F','J','R') AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=20223; CG=18210; RETURN; END; IF 1992 LE MY LE 2000 AND V5='C' AND V=33 AND V3 IN ('B','C') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=20234; CG=18211; RETURN; END; IF 1992 LE MY LE 2000 AND V5='K' AND V=33 AND V3 IN ('B','C') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=20235; CG=18211; RETURN; END; IF 1999 LE MY LE 2000 AND V5='C' AND V=23 AND V3 IN ('B','C') AND (V4='G' OR V4='H') THEN DO; TRKTYP=2; MM2=20224; CG=18212; RETURN; END; IF 1999 LE MY LE 2000 AND V5='K' AND V=23 AND V3 IN ('B','C') AND (V4='G' OR V4='H') THEN DO; TRKTYP=2; MM2=20225; CG=18212; RETURN; END; IF MY=1999 AND V5='C' AND V=14 AND V3 IN ('B','C') AND (V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=20210; CG=18213; RETURN; END; IF 2000 LE MY LE 2006 AND V5='C' AND V IN (14,64) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20210; CG=18213; RETURN; END; IF MY=2007 AND V5='C' AND V IN (14,64) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20210; CG=18213; RETURN; END; /* C1500 CLASSIC */ IF MY=1999 AND V5='K' AND V=14 AND V3 IN ('B','C') AND (V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=20211; CG=18213; RETURN; END; IF 2000 LE MY LE 2006 AND V5='K' AND V IN (14,64) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20211; CG=18213; RETURN; END; IF MY=2007 AND V5='K' AND V IN (14,64) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20211; CG=18213; RETURN; END; /* K1500 CLASSIC */ IF 1999 LE MY LE 2000 AND V5='C' AND V IN (24,74) AND V8 IN ('T','U') AND V3 IN ('B','C') AND V4 IN ('F','G','H') THEN DO; TRKTYP=2; MM2=20220; CG=18214; RETURN; END; IF 2001 LE MY LE 2006 AND V5='C' AND V IN (24,74) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20220; CG=18214; RETURN; END; IF MY=2007 AND V5='C' AND V IN (24,74) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20220; CG=18214; RETURN; END; /* C2500 CLASSIC */ IF 1999 LE MY LE 2000 AND V5='K' AND V IN (24,74) AND V8 IN ('T','U') AND V3 IN ('B','C') AND V4 IN ('F','G','H') THEN DO; TRKTYP=2; MM2=20221; CG=18214; RETURN; END; IF 2001 LE MY LE 2006 AND V5='K' AND V IN (24,74) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20221; CG=18214; RETURN; END; IF MY=2007 AND V5='K' AND V IN (24,74) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20221; CG=18214; RETURN; END; /* K2500 CLASSIC */ IF 2001 LE MY LE 2006 AND V5='C' AND V IN (34,84) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20230; CG=18214; RETURN; END; IF MY=2007 AND V5='C' AND V IN (34,84) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20230; CG=18214; RETURN; END; /* C3500 CLASSIC */ IF 2001 LE MY LE 2006 AND V5='K' AND V IN (34,84) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20231; CG=18214; RETURN; END; IF MY=2007 AND V5='K' AND V IN (34,84) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20231; CG=18214; RETURN; END; /* K3500 CLASSIC */ IF MY=1999 AND V5='C' AND V=19 AND V8 IN ('T','V','W') AND V3 IN ('B','C') AND V4 IN ('D','E','F') AND V11 NE 'R' THEN DO; TRKTYP=2; MM2=20212; CG=18215; RETURN; END; IF 2000 LE MY LE 2006 AND V5='C' AND V IN (19,69) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20212; CG=18215; RETURN; END; IF MY=2007 AND V5='C' AND V IN (19,69) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20212; CG=18215; RETURN; END; /* C1500 XCAB CLASSIC */ IF MY=1999 AND V5='K' AND V=19 AND V8 IN ('T','V','W') AND V3 IN ('B','C') AND V4 IN ('D','E','F') AND V11 NE 'R' THEN DO; TRKTYP=2; MM2=20213; CG=18215; RETURN; END; IF 2000 LE MY LE 2006 AND V5='K' AND V IN (19,69) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20213; CG=18215; RETURN; END; IF MY=2007 AND V5='K' AND V IN (19,69) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20213; CG=18215; RETURN; END; /* K1500 XCAB CLASSIC */ IF 1999 LE MY LE 2000 AND V5='C' AND V IN (29,79) AND V8 IN ('T','U') AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=20222; CG=18215; RETURN; END; IF 2001 LE MY LE 2006 AND V5='C' AND V IN (29,79) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20222; CG=18215; RETURN; END; IF MY=2007 AND V5='C' AND V IN (29,79) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20222; CG=18215; RETURN; END; /* C2500 XCAB CLASSIC */ IF 1999 LE MY LE 2000 AND V5='K' AND V IN (29,79) AND V8 IN ('T','U') AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=20223; CG=18215; RETURN; END; IF 2001 LE MY LE 2006 AND V5='K' AND V IN (29,79) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20223; CG=18215; RETURN; END; IF MY=2007 AND V5='K' AND V IN (29,79) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20223; CG=18215; RETURN; END; /* K2500 XCAB CLASSIC */ IF 2001 LE MY LE 2006 AND V5='C' AND V IN (39,89) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20232; CG=18216; RETURN; END; IF MY=2007 AND V5='C' AND V IN (39,89) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20232; CG=18216; RETURN; END; /* C3500 XCAB CLASSIC */ IF 2001 LE MY LE 2006 AND V5='K' AND V IN (39,89) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20233; CG=18216; RETURN; END; IF MY=2007 AND V5='K' AND V IN (39,89) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20233; CG=18216; RETURN; END; /* K3500 XCAB CLASSIC */ IF 2001 LE MY LE 2006 AND V5='C' AND V IN (23,73) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20224; CG=18217; RETURN; END; IF MY=2007 AND V5='C' AND V IN (23,73) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20224; CG=18217; RETURN; END; /* C2500 CREW CLASSIC */ IF 2001 LE MY LE 2006 AND V5='K' AND V IN (23,73) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20225; CG=18217; RETURN; END; IF MY=2007 AND V5='K' AND V IN (23,73) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20225; CG=18217; RETURN; END; /* K2500 CREW CLASSIC */ IF 2001 LE MY LE 2006 AND V5='C' AND V IN (33,83) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20234; CG=18218; RETURN; END; IF MY=2007 AND V5='C' AND V IN (33,83) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20234; CG=18218; RETURN; END; /* C3500 CREW CLASSIC */ IF 2001 LE MY LE 2006 AND V5='K' AND V IN (33,83) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20235; CG=18218; RETURN; END; IF MY=2007 AND V5='K' AND V IN (33,83) AND V3 IN ('B','C') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20235; CG=18218; RETURN; END; /* K3500 CREW CLASSIC */ IF 2001 LE MY LE 2003 AND V5='C' AND V IN (13,63) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20214; CG=18219; RETURN; END; IF 2004 LE MY LE 2007 AND V5='C' AND V IN (13,63) AND V3 IN ('B','C') AND V1='1' AND V4='G' THEN DO; TRKTYP=2; MM2=20214; CG=18219; RETURN; END; /* C1500 HD CREW ends 2007 */ IF 2001 LE MY LE 2003 AND V5='K' AND V IN (13,63) AND V3 IN ('B','C') THEN DO; TRKTYP=2; MM2=20215; CG=18219; RETURN; END; IF 2004 LE MY LE 2007 AND V5='K' AND V IN (13,63) AND V3 IN ('B','C') AND V1='1' AND V4 IN ('G','F') THEN DO; TRKTYP=2; MM2=20215; CG=18219; RETURN; END; /* K1500 HD CREW ends 2007 */ IF 2003 LE MY LE 2006 AND V5='S' AND V IN (14,64) AND V11='B' AND V4='E' THEN DO; TRKTYP=1; MM2=20038; CG=18220; RETURN; END; /* SSR */ IF MY GE 2004 AND V5='S' AND V IN (14,64) AND V3 IN ('B','C') AND V11 NE 'B' AND V4 IN ('C','D') THEN DO; TRKTYP=1; MM2=20200; CG=18221; RETURN; END; /* COLORADO */ IF MY GE 2004 AND V5='T' AND V IN (14,64) AND V3 IN ('B','C') THEN DO; TRKTYP=1; MM2=20201; CG=18221; RETURN; END; /* COLORADO 4X4 */ IF MY GE 2004 AND V5='S' AND V IN (19,69) AND V3 IN ('B','C') THEN DO; TRKTYP=1; MM2=20202; CG=18222; RETURN; END; /* COLORADO XCAB */ IF MY GE 2004 AND V5='T' AND V IN (19,69) AND V3 IN ('B','C') THEN DO; TRKTYP=1; MM2=20203; CG=18222; RETURN; END; /* COLORADO 4X4 XCAB */ IF MY GE 2004 AND V5='S' AND V IN (13,63) AND V3 IN ('B','C') THEN DO; TRKTYP=1; MM2=20204; CG=18222; RETURN; END; /* COLORADO CREW */ IF MY=2004 AND V5='T' AND V IN (13,63) AND V8='6' AND V11='8' AND V3 IN ('B','C') THEN DO; TRKTYP=1; MM2=20205; CG=18222; RETURN; END; IF MY GE 2005 AND V5='T' AND V IN (13,63) AND V3 IN ('B','C') THEN DO; TRKTYP=1; MM2=20205; CG=18222; RETURN; END; /* COLORADO 4X4 CREW */ IF 2004 LE MY LE 2006 AND V5='C' AND V IN (13,63) AND V3 IN ('B','C') AND V1='2' AND V4='E' THEN DO; TRKTYP=2; MM2=20214; CG=18223; RETURN; END; IF MY=2007 AND V5='C' AND V IN (13,63) AND V3 IN ('B','C') AND V1='2' AND V4='E' AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20214; CG=18223; RETURN; END; /* C1500 CREW CLASSIC */ IF 2004 LE MY LE 2006 AND V5='K' AND V IN (13,63) AND V3 IN ('B','C') AND V1='2' AND V4='E' THEN DO; TRKTYP=2; MM2=20215; CG=18223; RETURN; END; IF MY=2007 AND V5='K' AND V IN (13,63) AND V3 IN ('B','C') AND V1='2' AND V4='E' AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=20215; CG=18223; RETURN; END; /* K1500 CREW CLASSIC */ IF MY GE 2007 AND V5='C' AND V IN (14,64) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20210; CG=18226; RETURN; END; /* C1500 */ IF MY GE 2007 AND V5='K' AND V IN (14,64) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20211; CG=18226; RETURN; END; /* K1500 */ IF MY GE 2007 AND V5='C' AND V IN (24,74) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20220; CG=18227; RETURN; END; /* C2500 */ IF MY GE 2007 AND V5='K' AND V IN (24,74) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20221; CG=18227; RETURN; END; /* K2500 */ IF MY GE 2007 AND V5='C' AND V IN (34,84) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20230; CG=18227; RETURN; END; /* C3500 */ IF MY GE 2007 AND V5='K' AND V IN (34,84) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20231; CG=18227; RETURN; END; /* K3500 */ IF MY GE 2007 AND V5='C' AND V IN (19,69) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20212; CG=18228; RETURN; END; /* C1500 XCAB */ IF MY GE 2007 AND V5='K' AND V IN (19,69) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20213; CG=18228; RETURN; END; /* K1500 XCAB */ IF MY GE 2007 AND V5='C' AND V IN (29,79) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20222; CG=18229; RETURN; END; /* C2500 XCAB */ IF MY GE 2007 AND V5='K' AND V IN (29,79) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20223; CG=18229; RETURN; END; /* K2500 XCAB */ IF MY GE 2007 AND V5='C' AND V IN (39,89) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20232; CG=18230; RETURN; END; /* C3500 XCAB */ IF MY GE 2007 AND V5='K' AND V IN (39,89) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20233; CG=18230; RETURN; END; /* K3500 XCAB */ IF MY GE 2007 AND V5='C' AND V IN (13,63) AND V3 IN ('B','C') AND V1 IN ('2','3') AND V4='E' AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20214; CG=18231; RETURN; END; /* C1500 CREW */ IF MY GE 2007 AND V5='K' AND V IN (13,63) AND V3 IN ('B','C') AND V1 IN ('2','3') AND V4='E' AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20215; CG=18231; RETURN; END; /* K1500 CREW */ IF MY GE 2007 AND V5='C' AND V IN (23,73) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20224; CG=18232; RETURN; END; /* C2500 CREW */ IF MY GE 2007 AND V5='K' AND V IN (23,73) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20225; CG=18232; RETURN; END; /* K2500 CREW */ IF MY GE 2007 AND V5='C' AND V IN (33,83) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20234; CG=18233; RETURN; END; /* C3500 CREW */ IF MY GE 2007 AND V5='K' AND V IN (33,83) AND V3 IN ('B','C') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=20235; CG=18233; RETURN; END; /* K3500 CREW */ IF 1985 LE MY LE 1986 AND V5='S' AND V=18 AND V1='1' AND V3 IN ('8','B','C') AND V4='C' THEN DO; TRKTYP=3; MM2=20300; CG=18301; RETURN; END; IF 1987 LE MY LE 1999 AND V5='S' AND V=18 AND V1='1' AND V3 IN ('N','B','C') AND V4='C' THEN DO; TRKTYP=3; MM2=20300; CG=18301; RETURN; END; IF 2000 LE MY LE 2005 AND V5='S' AND V IN (18,68) AND V1='1' AND V3 IN ('N','B','C') THEN DO; TRKTYP=3; MM2=20300; CG=18301; RETURN; END; /* BLAZER 2DR ends 2005 */ IF 1985 LE MY LE 1986 AND V5='T' AND V=18 AND V1='1' AND V3 IN ('8','B','C') AND V4='C' THEN DO; TRKTYP=3; MM2=20301; CG=18301; RETURN; END; IF 1987 LE MY LE 1999 AND V5='T' AND V=18 AND V1='1' AND V3 IN ('N','B','C') AND V4='C' THEN DO; TRKTYP=3; MM2=20301; CG=18301; RETURN; END; IF 2000 LE MY LE 2005 AND V5='T' AND V IN (18,68) AND V1='1' AND V3 IN ('N','B','C') THEN DO; TRKTYP=3; MM2=20301; CG=18301; RETURN; END; /* BLAZER 2DR 4X4 ends 2005 */ IF 1985 LE MY LE 1986 AND V5='K' AND V=18 AND V1='1' AND V3 IN ('8','B','C') AND V4='E' THEN DO; TRKTYP=4; MM2=20311; CG=18302; RETURN; END; IF 1987 LE MY LE 1991 AND V5='V' AND V=18 AND V1='1' AND V3 IN ('N','B','C') AND V4='E' THEN DO; TRKTYP=4; MM2=20311; CG=18302; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=16 AND V1='1' AND V3 IN ('8','B','C') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=20322; CG=18303; RETURN; END; IF 1987 LE MY LE 1991 AND V5='R' AND V=16 AND V1='1' AND V3 IN ('N','B','C') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=20322; CG=18303; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=16 AND V1='1' AND V3 IN ('8','B','C') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=20323; CG=18303; RETURN; END; IF 1987 LE MY LE 1991 AND V5='V' AND V=16 AND V1='1' AND V3 IN ('N','B','C') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=20323; CG=18303; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=26 AND V1='1' AND V3 IN ('8','B','C') AND V4='G' THEN DO; TRKTYP=4; MM2=20326; CG=18304; RETURN; END; IF 1987 LE MY LE 1991 AND V5='R' AND V=26 AND V1='1' AND V3 IN ('N','B','C') AND V4='G' THEN DO; TRKTYP=4; MM2=20326; CG=18304; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=26 AND V1='1' AND V3 IN ('8','B','C') AND V4='G' THEN DO; TRKTYP=4; MM2=20327; CG=18304; RETURN; END; IF 1987 LE MY LE 1991 AND V5='V' AND V=26 AND V1='1' AND V3 IN ('N','B','C') AND V4='G' THEN DO; TRKTYP=4; MM2=20327; CG=18304; RETURN; END; IF 1991 LE MY LE 1999 AND V5='S' AND V=13 AND V1='1' AND V3 IN ('N','B','C') AND V4='C' THEN DO; TRKTYP=3; MM2=20302; CG=18305; RETURN; END; IF 2000 LE MY LE 2001 AND V5='S' AND V IN (13,63) AND V1='1' AND V3 IN ('N','B','C') THEN DO; TRKTYP=3; MM2=20302; CG=18305; RETURN; END; IF 2002 LE MY LE 2005 AND V5='S' AND V IN (13,63) AND V8 NE 'S' AND V8 NE '5' AND V1='1' AND V3 IN ('N','B','C') THEN DO; TRKTYP=3; MM2=20302; CG=18305; RETURN; END; /* BLAZER ends 2005 */ IF 1991 LE MY LE 1999 AND V5='T' AND V=13 AND V1='1' AND V3 IN ('N','B','C') AND V4='D' THEN DO; TRKTYP=3; MM2=20303; CG=18305; RETURN; END; IF 2000 LE MY LE 2001 AND V5='T' AND V IN (13,63) AND V1='1' AND V3 IN ('N','B','C') THEN DO; TRKTYP=3; MM2=20303; CG=18305; RETURN; END; IF 2002 LE MY LE 2005 AND V5='T' AND V IN (13,63) AND V8 NE 'S' AND V8 NE '5' AND V1='1' AND V3 IN ('N','B','C') THEN DO; TRKTYP=3; MM2=20303; CG=18305; RETURN; END; /* BLAZER 4X4 ends 2005 */ IF 1996 LE MY LE 1999 AND V5='C' AND V=18 AND V3 IN ('N','B','C') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=20310; CG=18306; RETURN; END; IF 1992 LE MY LE 1994 AND V5='K' AND V=18 AND V1='1' AND V3 IN ('N','B','C') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=20311; CG=18306; RETURN; END; IF 1995 LE MY LE 1999 AND V5='K' AND V=18 AND V3 IN ('N','B','C') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=20311; CG=18306; RETURN; END; IF 1992 LE MY LE 1994 AND V5='C' AND V=16 AND V1='1' AND V3 IN ('N','B','C') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=20322; CG=18307; RETURN; END; IF 1995 LE MY LE 1999 AND V5='C' AND V=16 AND V1 IN ('1','3') AND V3 IN ('N','B','C') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=20322; CG=18307; RETURN; END; IF 1992 LE MY LE 1994 AND V5='K' AND V=16 AND V1='1' AND V3 IN ('N','B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=4; MM2=20323; CG=18307; RETURN; END; IF 1995 LE MY LE 1999 AND V5='K' AND V=16 AND V1 IN ('1','3') AND V3 IN ('N','B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=4; MM2=20323; CG=18307; RETURN; END; IF 1992 LE MY LE 1994 AND V5='C' AND V=26 AND V1='1' AND V3 IN ('N','B','C') AND V4='G' THEN DO; TRKTYP=4; MM2=20326; CG=18308; RETURN; END; IF 1995 LE MY LE 1999 AND V5='C' AND V=26 AND V3 IN ('N','B','C') AND V4='G' THEN DO; TRKTYP=4; MM2=20326; CG=18308; RETURN; END; IF 1992 LE MY LE 1994 AND V5='K' AND V=26 AND V1='1' AND V3 IN ('N','B','C') AND V4='G' THEN DO; TRKTYP=4; MM2=20327; CG=18308; RETURN; END; IF 1995 LE MY LE 1999 AND V5='K' AND V=26 AND V3 IN ('N','B','C') AND V4='G' THEN DO; TRKTYP=4; MM2=20327; CG=18308; RETURN; END; IF 1995 LE MY LE 1999 AND V5='C' AND V=13 AND V1='1' AND V3='N' AND V4='E' THEN DO; TRKTYP=4; MM2=20312; CG=18309; RETURN; END; IF 1995 LE MY LE 1999 AND V5='K' AND V=13 AND V1='1' AND V3='N' AND V4='E' THEN DO; TRKTYP=4; MM2=20313; CG=18309; RETURN; END; IF 2000 LE MY LE 2006 AND V5='C' AND V IN (13,63) AND V3='N' AND V1='1' AND V4='E' THEN DO; TRKTYP=4; MM2=20312; CG=18310; RETURN; END; /* TAHOE ends 2006 */ IF 2000 LE MY LE 2006 AND V5='K' AND V IN (13,63) AND V3='N' AND V1='1' AND V4='E' THEN DO; TRKTYP=4; MM2=20313; CG=18310; RETURN; END; /* TAHOE 4X4 ends 2006 */ IF 2000 LE MY LE 2006 AND V5='C' AND V IN (16,66) AND V3 IN ('N','B','C') THEN DO; TRKTYP=4; MM2=20322; CG=18311; RETURN; END; /* C1500 SUBURBAN ends 2006 */ IF 2000 LE MY LE 2006 AND V5='K' AND V IN (16,66) AND V3 IN ('N','B','C') THEN DO; TRKTYP=4; MM2=20323; CG=18311; RETURN; END; /* K1500 SUBURBAN ends 2006 */ IF 2002 LE MY LE 2003 AND V5='C' AND V IN (13,63) AND V3='N' AND V1='3' THEN DO; TRKTYP=4; MM2=20342; CG=18311; RETURN; END; IF 2004 LE MY LE 2006 AND V5='C' AND V IN (12,13,62,63) AND V3='N' AND V1='3' THEN DO; TRKTYP=4; MM2=20342; CG=18311; RETURN; END; /* C1500 AVALANCHE ends 2006 */ IF 2002 LE MY LE 2003 AND V5='K' AND V IN (13,63) AND V3='N' AND V1='3' THEN DO; TRKTYP=4; MM2=20343; CG=18311; RETURN; END; IF 2004 LE MY LE 2006 AND V5='K' AND V IN (12,13,62,63) AND V3='N' AND V1='3' THEN DO; TRKTYP=4; MM2=20343; CG=18311; RETURN; END; /* K1500 AVALANCHE ends 2006 */ IF 2000 LE MY LE 2006 AND V5='C' AND V IN (26,76) AND V3 IN ('N','B','C') THEN DO; TRKTYP=4; MM2=20326; CG=18312; RETURN; END; /* C2500 SUBURBAN ends 2006 */ IF 2000 LE MY LE 2006 AND V5='K' AND V IN (26,76) AND V3 IN ('N','B','C') THEN DO; TRKTYP=4; MM2=20327; CG=18312; RETURN; END; /* K2500 SUBURBAN ends 2006 */ IF 2002 LE MY LE 2003 AND V5='C' AND V IN (23,73) AND V3='N' AND V1='3' THEN DO; TRKTYP=4; MM2=20346; CG=18312; RETURN; END; /* C2500 AVALANCHE ends 2003 */ IF 2002 LE MY LE 2003 AND V5='K' AND V IN (23,73) AND V3='N' AND V1='3' THEN DO; TRKTYP=4; MM2=20347; CG=18312; RETURN; END; IF 2004 LE MY LE 2006 AND V5='K' AND V IN (22,23,72,73) AND V3='N' AND V1='3' THEN DO; TRKTYP=4; MM2=20347; CG=18312; RETURN; END; /* K2500 AVALANCHE ends 2006 */ IF 2002 LE MY LE 2005 AND V5='S' AND V IN (13,63) AND V8='S' AND V3='N' THEN DO; TRKTYP=3; MM2=20302; CG=18314; RETURN; END; IF MY GE 2006 AND V5='S' AND V IN (13,63) AND V3='N' THEN DO; TRKTYP=3; MM2=20302; CG=18314; RETURN; END; /* TRAILBLAZER */ IF 2002 LE MY LE 2005 AND V5='T' AND V IN (13,63) AND V8='S' AND V3='N' THEN DO; TRKTYP=3; MM2=20303; CG=18314; RETURN; END; IF MY GE 2006 AND V5='T' AND V IN (13,63) AND V3='N' THEN DO; TRKTYP=3; MM2=20303; CG=18314; RETURN; END; /* TRAILBLAZER 4X4 */ IF 2002 LE MY LE 2006 AND V5='S' AND V IN (16,66) AND V3='N' THEN DO; TRKTYP=3; MM2=20306; CG=18316; RETURN; END; /* TRAILBLAZER EXT ends 2006 */ IF 2002 LE MY LE 2006 AND V5='T' AND V IN (16,66) AND V3='N' THEN DO; TRKTYP=3; MM2=20307; CG=18316; RETURN; END; /* TRAILBLAZER EXT 4X4 ends 2006*/ IF MY = 2006 AND V5='A' AND V IN (13,23) AND V1='3' AND V3='N' THEN DO; TRKTYP=3; MM2=20023; CG=18321; RETURN; END; /* HHR */ IF MY GE 2007 AND V5='A' AND V IN (13,23,33) AND V1='3' AND V3='N' THEN DO; TRKTYP=3; MM2=20023; CG=18321; RETURN; END; /* HHR */ IF MY GE 2007 AND V5='C' AND V IN (3,13,63) AND V3='N' /* NOTE: V=3 IS POLICE TAHOE */ AND V1='1' AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=20312; CG=18324; RETURN; END; /* TAHOE */ IF MY GE 2007 AND V5='K' AND V IN (3,13,63) AND V3='N' /* NOTE: V=3 IS POLICE TAHOE */ AND V1='1' AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=20313; CG=18324; RETURN; END; /* TAHOE 4X4 */ IF MY GE 2007 AND V5='C' AND V IN (16,66) AND V3 IN ('N','B','C') THEN DO; TRKTYP=4; MM2=20322; CG=18325; RETURN; END; /* C1500 SUBURBAN */ IF MY GE 2007 AND V5='K' AND V IN (16,66) AND V3 IN ('N','B','C') THEN DO; TRKTYP=4; MM2=20323; CG=18325; RETURN; END; /* K1500 SUBURBAN */ IF MY GE 2007 AND V5='C' AND V IN (12,13,62,63) AND V3='N' AND V1='3' THEN DO; TRKTYP=4; MM2=20342; CG=18325; RETURN; END; /* C1500 AVALANCHE */ IF MY GE 2007 AND V5='K' AND V IN (12,13,62,63) AND V3='N' AND V1='3' THEN DO; TRKTYP=4; MM2=20343; CG=18325; RETURN; END; /* K1500 AVALANCHE */ IF MY GE 2007 AND V5='C' AND V IN (26,76) AND V3 IN ('N','B','C') THEN DO; TRKTYP=4; MM2=20326; CG=18326; RETURN; END; /* C2500 SUBURBAN */ IF MY GE 2007 AND V5='K' AND V IN (26,76) AND V3 IN ('N','B','C') THEN DO; TRKTYP=4; MM2=20327; CG=18326; RETURN; END; /* K2500 SUBURBAN */ IF 1985 LE MY LE 1994 AND V5='M' AND V=15 AND V1='1' AND V3 IN ('B','C') AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=20400; CG=18401; RETURN; END; IF 1990 LE MY LE 1994 AND V5='L' AND V=15 AND V1='1' AND V3 IN ('B','C') AND V4='D' THEN DO; TRKTYP=5; MM2=20401; CG=18401; RETURN; END; IF 1985 LE MY LE 1986 AND V5='M' AND V=15 AND V1='1' AND V3='8' AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=20402; CG=18401; RETURN; END; IF 1987 LE MY LE 1994 AND V5='M' AND V=15 AND V1='1' AND V3='N' AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=20402; CG=18401; RETURN; END; IF 1990 LE MY LE 1994 AND V5='L' AND V=15 AND V1='1' AND V3='N' AND V4='D' THEN DO; TRKTYP=5; MM2=20403; CG=18401; RETURN; END; IF 1990 LE MY LE 1999 AND V5='M' AND V=19 AND V1='1' AND V3 IN ('B','C') AND V4='D' THEN DO; TRKTYP=5; MM2=20404; CG=18401; RETURN; END; IF 2000 LE MY LE 2005 AND V5='M' AND V IN (19,69) AND V1='1' AND /* all ASTROS end 2005 */ V3 IN ('B','C') THEN DO; TRKTYP=5; MM2=20404; CG=18401; RETURN; END; /* ASTRO EXTD CARGO */ IF 1990 LE MY LE 1999 AND V5='L' AND V=19 AND V1='1' AND V3 IN ('B','C') AND (V4='D' OR V4='E') THEN DO; TRKTYP=5; MM2=20405; CG=18401; RETURN; END; IF 2000 LE MY LE 2005 AND V5='L' AND V IN (19,69) AND V1='1' AND V3 IN ('B','C') THEN DO; TRKTYP=5; MM2=20405; CG=18401; RETURN; END; /* ASTRO 4X4 X CARGO */ IF 1990 LE MY LE 1999 AND V5='M' AND V=19 AND V1='1' AND V3='N' AND V4='D' THEN DO; TRKTYP=5; MM2=20406; CG=18401; RETURN; END; IF 2000 LE MY LE 2005 AND V5='M' AND V IN (19,69) AND V1='1' AND V3='N' THEN DO; TRKTYP=5; MM2=20406; CG=18401; RETURN; END; /* ASTRO EXTENDED */ IF 1990 LE MY LE 1999 AND V5='L' AND V=19 AND V1='1' AND V3='N' AND (V4='D' OR V4='E') THEN DO; TRKTYP=5; MM2=20407; CG=18401; RETURN; END; IF 2000 LE MY LE 2005 AND V5='L' AND V IN (19,69) AND V1='1' AND V3='N' THEN DO; TRKTYP=5; MM2=20407; CG=18401; RETURN; END; /* ASTRO EXTENDED 4X4 */ IF 1985 LE MY LE 1995 AND V5='G' AND V=15 AND V3 IN ('B','C') AND (V4='C' OR V4='D') THEN DO; TRKTYP=6; MM2=20410; CG=18402; RETURN; END; IF 1985 LE MY LE 1986 AND V5='G' AND V=15 AND V3='8' THEN DO; TRKTYP=6; MM2=20412; CG=18402; RETURN; END; IF 1987 LE MY LE 1993 AND V5='G' AND V=15 AND V3='N' THEN DO; TRKTYP=6; MM2=20412; CG=18402; RETURN; END; IF 1985 LE MY LE 1995 AND V5='G' AND V=25 AND V3 IN ('B','C') AND V4='E' THEN DO; TRKTYP=6; MM2=20420; CG=18402; RETURN; END; IF 1985 LE MY LE 1986 AND V5='G' AND V=25 AND V3='8' AND V4='E' THEN DO; TRKTYP=6; MM2=20422; CG=18403; RETURN; END; IF 1987 LE MY LE 1995 AND V5='G' AND V=25 AND V3='N' AND V4='E' THEN DO; TRKTYP=6; MM2=20422; CG=18403; RETURN; END; IF 1985 LE MY LE 1995 AND V5='G' AND V=35 AND V3 IN ('B','C') AND (V4='F' OR V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=20430; CG=18403; RETURN; END; IF 1985 LE MY LE 1986 AND V5='G' AND V=35 AND (V3='A' OR V3='8') AND (V4='F' OR V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=20432; CG=18403; RETURN; END; IF 1987 LE MY LE 1995 AND V5='G' AND V=35 AND (V3='A' OR V3='N') AND (V4='F' OR V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=20432; CG=18403; RETURN; END; IF 1985 LE MY LE 1995 AND V5='G' AND V=31 AND V3='B' AND V4 IN ('F','G','H','J','K') THEN DO; TRKTYP=6; MM2=20638; CG=18403; RETURN; END; IF 1990 LE MY LE 1995 AND V5='G' AND V=39 AND V3 IN ('B','C') AND (V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=20434; CG=18404; RETURN; END; IF 1990 LE MY LE 1995 AND V5='G' AND V=39 AND (V3='A' OR V3='N') AND (V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=20436; CG=18404; RETURN; END; IF 1992 LE MY LE 1996 AND V5='U' AND V=5 AND V1='1' AND V3 IN ('B','C') AND V4='D' THEN DO; TRKTYP=5; MM2=20440; CG=18405; RETURN; END; IF 1990 LE MY LE 1996 AND V5='U' AND V=6 AND V1='1' AND V3='N' AND V4 IN ('C','D') THEN DO; TRKTYP=5; MM2=20442; CG=18405; RETURN; END; IF 1996 LE MY LE 1999 AND V5='G' AND V=15 AND V3 IN ('B','C') AND V4 IN ('E','F') THEN DO; TRKTYP=6; MM2=20410; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (15,65) AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20410; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=15 AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20410; CG=18406; RETURN; END; /* G1500 VAN */ IF 2003 LE MY LE 2004 AND V5='H' AND V IN (15,65) AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20411; CG=18406; RETURN; END; IF MY GE 2005 AND V5='H' AND V=15 AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20411; CG=18406; RETURN; END; /* G1500 AWD VAN */ IF 1996 LE MY LE 1999 AND V5='G' AND V=15 AND V3='N' AND V4 IN ('E','F') THEN DO; TRKTYP=6; MM2=20412; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (15,65) AND V3='N' THEN DO; TRKTYP=6; MM2=20412; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=15 AND V3='N' THEN DO; TRKTYP=6; MM2=20412; CG=18406; RETURN; END; /* G1500 WAGON */ IF 2003 LE MY LE 2004 AND V5='H' AND V IN (15,65) AND V3='N' THEN DO; TRKTYP=6; MM2=20413; CG=18406; RETURN; END; IF MY GE 2005 AND V5='H' AND V=15 AND V3='N' THEN DO; TRKTYP=6; MM2=20413; CG=18406; RETURN; END; /* G1500 AWD WAGON */ IF 1996 LE MY LE 1999 AND V5='G' AND V=25 AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=6; MM2=20420; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (25,75) AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20420; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=25 AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20420; CG=18406; RETURN; END; /* G2500 VAN */ IF 2003 LE MY LE 2004 AND V5='H' AND V IN (25,75) AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20421; CG=18406; RETURN; END; IF MY GE 2005 AND V5='H' AND V=25 AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20421; CG=18406; RETURN; END; /* G2500 AWD VAN */ IF 1996 LE MY LE 1999 AND V5='G' AND V=25 AND V3 IN ('A','N') AND V4 IN ('F','G') THEN DO; TRKTYP=6; MM2=20422; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (25,75) AND V3 IN ('A','N') THEN DO; TRKTYP=6; MM2=20422; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=25 AND V3 IN ('A','N') THEN DO; TRKTYP=6; MM2=20422; CG=18406; RETURN; END; /* G2500 WAGON */ IF 1996 LE MY LE 1999 AND V5='G' AND V=35 AND V3 IN ('B','C') AND (V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=20430; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (35,85) AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20430; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=35 AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20430; CG=18406; RETURN; END; /* G3500 VAN */ IF 1996 LE MY LE 1999 AND V5='G' AND V=35 AND V3 IN ('A','N') AND (V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=20432; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (35,85) AND V3 IN ('A','N') THEN DO; TRKTYP=6; MM2=20432; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=35 AND V3 IN ('A','N') THEN DO; TRKTYP=6; MM2=20432; CG=18406; RETURN; END; /* G3500 WAGON */ IF 1996 LE MY LE 1999 AND V5='G' AND V=31 AND V3='B' AND V4 IN ('F','G','H','J','K') THEN DO; TRKTYP=6; MM2=20638; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (31,81) AND V3='B' THEN DO; TRKTYP=6; MM2=20638; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=31 AND V3='B' THEN DO; TRKTYP=6; MM2=20638; CG=18406; RETURN; END; /* CUTAWAY */ IF 1996 LE MY LE 1999 AND V5='G' AND V=29 AND V3 IN ('B','C') AND V4 IN ('F','G') THEN DO; TRKTYP=6; MM2=20424; CG=18407; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (29,79) AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20424; CG=18407; RETURN; END; IF MY GE 2005 AND V5='G' AND V=29 AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20424; CG=18407; RETURN; END; /* EXTENDED G2500 VAN */ IF 1996 LE MY LE 1999 AND V5='G' AND V=29 AND V3 IN ('A','N') AND V4 IN ('F','G') THEN DO; TRKTYP=6; MM2=20426; CG=18407; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (29,79) AND V3 IN ('A','N') THEN DO; TRKTYP=6; MM2=20426; CG=18407; RETURN; END; IF MY GE 2005 AND V5='G' AND V=29 AND V3 IN ('A','N') THEN DO; TRKTYP=6; MM2=20426; CG=18407; RETURN; END; /* EXT G2500 WAGON */ IF 1996 LE MY LE 1999 AND V5='G' AND V=39 AND V3 IN ('B','C') AND V4 IN ('G','H') THEN DO; TRKTYP=6; MM2=20434; CG=18407; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (39,89) AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20434; CG=18407; RETURN; END; IF MY GE 2005 AND V5='G' AND V=39 AND V3 IN ('B','C') THEN DO; TRKTYP=6; MM2=20434; CG=18407; RETURN; END; /* EXT G3500 VAN */ IF 1996 LE MY LE 1999 AND V5='G' AND V=39 AND V3 IN ('A','N') AND V4 IN ('G','H') THEN DO; TRKTYP=6; MM2=20436; CG=18407; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (39,89) AND V3 IN ('A','N') THEN DO; TRKTYP=6; MM2=20436; CG=18407; RETURN; END; IF MY GE 2005 AND V5='G' AND V=39 AND V3 IN ('A','N') THEN DO; TRKTYP=6; MM2=20436; CG=18407; RETURN; END; /* EXT G3500 WAGON */ IF 1997 LE MY LE 1999 AND V5='U' AND V IN (3,6) AND V1='1' AND V3='N' AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=20452; CG=18408; RETURN; END; IF 2000 LE MY LE 2004 AND V5='U' AND V IN (3,13,23) AND V1='1' AND V3='N' AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=20452; CG=18408; RETURN; END; /* VENTURE ends 2004 */ IF MY=2005 AND V5='V' AND V=13 AND V8='E' AND V1='1' AND V3='B' AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=20654; CG=18409; RETURN; END; /* VENTURE CARGO EXTENDED ends 2005 */ IF 1997 LE MY LE 1999 AND V5='X' AND V IN (3,6) AND V1='1' AND V3='N' AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=20456; CG=18409; RETURN; END; IF 2000 LE MY LE 2004 AND V5='X' AND V IN (3,13,23) AND V1='1' AND V3='N' AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=20456; CG=18409; RETURN; END; IF MY=2005 AND V5='V' AND V IN (3,23,33) AND V8='E' AND V1='1' AND V3='N' AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=20456; CG=18409; RETURN; END; /* VENTURE EXTENDED ends 2005 */ IF 2002 LE MY LE 2004 AND V5='V' AND V IN (3,13,23) AND V1='1' AND V3='N' THEN DO; TRKTYP=5; MM2=20457; CG=18409; RETURN; END; /* VENTURE EXT AWD ends 2004 */ IF MY=2005 AND V5='V' AND V6='1' AND V8='L' THEN DO; TRKTYP=5; MM2=20454; CG=18410; RETURN; END; IF MY GE 2006 AND V5='V' AND V6='1' THEN DO; TRKTYP=5; MM2=20454; CG=18410; RETURN; END; /* UPLANDER CARGO */ IF MY=2005 AND V5='V' AND V6 IN ('0','2','3') AND V8='L' AND V3='N' THEN DO; TRKTYP=5; MM2=20456; CG=18410; RETURN; END; IF MY GE 2006 AND V5='V' AND V6 IN ('0','2','3') AND V3='N' THEN DO; TRKTYP=5; MM2=20456; CG=18410; RETURN; END; /* UPLANDER 121.1 */ IF MY=2005 AND V5='X' AND V6 IN ('2','3') AND V8='L' AND V3='N' THEN DO; TRKTYP=5; MM2=20457; CG=18410; RETURN; END; IF MY = 2006 AND V5='X' AND V6 IN ('2','3') AND V3='N' THEN DO; TRKTYP=5; MM2=20457; CG=18410; RETURN; END; /* UPLANDER AWD ENDS 2006 */ IF MY GE 2006 AND V5='U' AND V6 IN ('0','2','3') AND V3='N' THEN DO; TRKTYP=5; MM2=20452; CG=18412; RETURN; END; /* UPLANDER 113.0 */ IF 1985 LE MY LE 1987 AND V5='W' AND V1='3' AND V3='C' THEN DO; TRKTYP=7; MM2=20007; CG=18701; RETURN; END; IF MY GE 1985 AND V5='P' AND V IN (32,37) AND V1='1' AND V3 IN ('B','C') AND V4 IN ('F','G','H','J','K','L') THEN DO; TRKTYP=8; MM2=20702; CG=18702; RETURN; END; /* FORWARD CONTROL */ TRKTYP=9; CG=99999; MM2=99999; RETURN; TRACKER: V5=TRANSLATE(V5,'ZSGB','2568'); 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 1991 LE MY LE 1998 AND V5='E' AND V=18 AND V1='2' AND V4='B' THEN DO; TRKTYP=3; MM2=20330; CG=53302; RETURN; END; IF MY=1989 AND V5='J' AND V=18 AND V1='J' AND V4='B' THEN DO; TRKTYP=3; MM2=20331; CG=53302; RETURN; END; IF 1990 LE MY LE 1998 AND V5='J' AND V=18 AND V1='2' AND V4='B' THEN DO; TRKTYP=3; MM2=20331; CG=53302; RETURN; END; IF 1996 LE MY LE 1998 AND V5='E' AND V=13 AND V1='2' AND V4= 'B' THEN DO; TRKTYP=3; MM2=20332; CG=53303; RETURN; END; IF 1996 LE MY LE 1998 AND V5='J' AND V=13 AND V1='2' AND V4= 'B' THEN DO; TRKTYP=3; MM2=20333; CG=53303; RETURN; END; IF 1999 LE MY LE 2000 AND V5='E' AND V=18 AND V1='2' AND V4='B' THEN DO; TRKTYP=3; MM2=20330; CG=53304; RETURN; END; IF 2001 LE MY LE 2003 AND V5='E' AND V IN (18,68) AND V1='2' THEN DO; TRKTYP=3; MM2=20330; CG=53304; RETURN; END; IF 1999 LE MY LE 2000 AND V5='J' AND V=18 AND V1='2' AND V4='B' THEN DO; TRKTYP=3; MM2=20331; CG=53304; RETURN; END; IF 2001 LE MY LE 2003 AND V5='J' AND V IN (18,68,78) AND V1='2' THEN DO; TRKTYP=3; MM2=20331; CG=53304; RETURN; END; IF 1999 LE MY LE 2000 AND V5='E' AND V=13 AND V1='2' AND V4='B' THEN DO; TRKTYP=3; MM2=20332; CG=53305; RETURN; END; IF 2001 LE MY LE 2004 AND V5='E' AND V IN (13,63) AND V1='2' THEN DO; TRKTYP=3; MM2=20332; CG=53305; RETURN; END; /* TRACKER 4DR ends 2004 */ IF 1999 LE MY LE 2000 AND V5='J' AND V=13 AND V1='2' AND V4='B' THEN DO; TRKTYP=3; MM2=20333; CG=53305; RETURN; END; IF MY=2001 AND V5='J' AND V IN (13,63,73) AND V1='2' THEN DO; TRKTYP=3; MM2=20333; CG=53305; RETURN; END; IF 2002 LE MY LE 2004 AND V5='J' AND V IN (13,23,63,73) AND V1='2' THEN DO; TRKTYP=3; MM2=20333; CG=53305; RETURN; END; /* TRACKER 4DR 4X4 ends 2004 */ IF MY GE 2005 AND V5='L' AND V IN (13,63) AND V1='2' THEN DO; TRKTYP=3; MM2=20336; CG=53307; RETURN; END; /* EQUINOX */ IF MY GE 2005 AND V5='L' AND V IN (23,73) AND V1='2' THEN DO; TRKTYP=3; MM2=20337; CG=53307; RETURN; END; /* EQUINOX AWD */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTOLDS: V5=TRANSLATE(V5,'ZSGB','2568'); /* OLDSMOBILE ENDS 2004 */ 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 1991 LE MY LE 1999 AND V5='T' AND V=13 AND V4='D' THEN DO; TRKTYP=3; MM2=21303; CG=18305; RETURN; END; IF 2000 LE MY LE 2001 AND V5='T' AND V IN (13,63) THEN DO; TRKTYP=3; MM2=21303; CG=18305; RETURN; END; IF 2002 LE MY LE 2004 AND V5='S' AND V IN (13,63) THEN DO; TRKTYP=3; MM2=21302; CG=18314; RETURN; END; /* BRAVADA ends 2004 */ IF 2002 LE MY LE 2004 AND V5='T' AND V IN (13,63) THEN DO; TRKTYP=3; MM2=21303; CG=18314; RETURN; END; /* BRAVADA 4X4 ends 2004 */ IF 1990 LE MY LE 1996 AND V5='U' AND V=6 AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=21452; CG=18405; RETURN; END; IF 1997 LE MY LE 1999 AND V5='U' AND V IN (3,6) AND V4 IN ('C','D') THEN DO; TRKTYP=5; MM2=21452; CG=18408; RETURN; END; IF 1997 LE MY LE 1999 AND V5='X' AND V IN (3,6) AND V4 IN ('C','D') THEN DO; TRKTYP=5; MM2=21456; CG=18409; RETURN; END; IF 2000 LE MY LE 2004 AND V5='X' AND V IN (3,13,23) AND V4 IN ('C','D') THEN DO; TRKTYP=5; MM2=21456; CG=18409; RETURN; END; /* SILHOUETTE ends 2004 */ IF 2002 LE MY LE 2004 AND V5='V' AND V IN (3,13,23) THEN DO; TRKTYP=5; MM2=21457; CG=18409; RETURN; END; /* SILHOUETTE AWD ends 2004 */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTPONT: V5=TRANSLATE(V5,'ZSGB','2568'); 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 2001 LE MY LE 2005 AND V5='A' AND V=3 AND V1='3' AND V3='7' THEN DO; TRKTYP=3; MM2=22352; CG=18313; RETURN; END; /* AZTEK ends 2005 */ IF 2001 LE MY LE 2005 AND V5='B' AND V=3 AND V1='3' AND V3='7' THEN DO; TRKTYP=3; MM2=22353; CG=18313; RETURN; END; /* AZTEK AWD ends 2005 */ IF MY GE 2006 AND V5='L' AND V=63 AND V1='2' AND V2='C' THEN DO; TRKTYP=3; MM2=22336; CG=53307; RETURN; END; /* TORRENT */ IF MY GE 2006 AND V5='L' AND V=73 AND V1='2' AND V2='C' THEN DO; TRKTYP=3; MM2=22337; CG=53307; RETURN; END; /* TORRENT AWD */ IF 1990 LE MY LE 1996 AND V5='U' AND V=6 AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=22442; CG=18405; RETURN; END; IF 1997 LE MY LE 1998 AND V5='U' AND V IN (3,6) AND V4 IN ('C','D') THEN DO; TRKTYP=5; MM2=22442; CG=18408; RETURN; END; IF MY=1999 AND V5='U' AND V IN (3,6) AND V4 IN ('C','D') THEN DO; TRKTYP=5; MM2=22452; CG=18408; RETURN; END; IF 2000 LE MY LE 2004 AND V5='U' AND V IN (3,13,23) AND V4 IN ('C','D') THEN DO; TRKTYP=5; MM2=22452; CG=18408; RETURN; END; /* MONTANA ends 2004 */ IF MY=2005 AND V5='V' AND V6='1' AND V8='E' THEN DO; TRKTYP=5; MM2=22454; CG=18409; RETURN; END; /* MONTANA EXT CARGO ends 2005 */ IF 1997 LE MY LE 1998 AND V5='X' AND V IN (3,6) AND V4 IN ('C','D') THEN DO; TRKTYP=5; MM2=22446; CG=18409; RETURN; END; IF MY=1999 AND V5='X' AND V IN (3,6) AND V4 IN ('C','D') THEN DO; TRKTYP=5; MM2=22456; CG=18409; RETURN; END; IF 2000 LE MY LE 2004 AND V5='X' AND V IN (3,13,23) AND V4 IN ('C','D') THEN DO; TRKTYP=5; MM2=22456; CG=18409; RETURN; END; IF MY=2005 AND V5='V' AND V6 IN ('0','2','3') AND V8='E' THEN DO; TRKTYP=5; MM2=22456; CG=18409; RETURN; END; /* MONTANA EXTENDED ends 2005 */ IF 2002 LE MY LE 2004 AND V5='V' AND V IN (3,13,23) THEN DO; TRKTYP=5; MM2=22457; CG=18409; RETURN; END; /* MONTANA EXT AWD ends 2004 */ IF MY=2005 AND V5='V' AND V6='1' AND V8='L' THEN DO; TRKTYP=5; MM2=22454; CG=18410; RETURN; END; IF MY GE 2006 AND V5='V' AND V6='1' THEN DO; TRKTYP=5; MM2=22454; CG=18410; RETURN; END; /* MONTANA SV6 CARGO probably never existed */ IF MY=2005 AND V5='V' AND V6 IN ('0','2','3') AND V8='L' THEN DO; TRKTYP=5; MM2=22456; CG=18410; RETURN; END; IF MY=2006 AND V5='V' AND V6 IN ('0','2','3') AND V3='M' THEN DO; TRKTYP=5; MM2=22456; CG=18410; RETURN; END; /* MONTANA SV6 ends 2006 */ IF MY=2005 AND V5='X' AND V6 IN ('2','3') AND V8='L' THEN DO; TRKTYP=5; MM2=22457; CG=18410; RETURN; END; IF MY=2006 AND V5='X' AND V6 IN ('2','3') THEN DO; TRKTYP=5; MM2=22457; CG=18410; RETURN; END; /* MONTANA SV6 AWD ends 2006*/ TRKTYP=9; CG=99999; MM2=99999; RETURN; GMC: V5=TRANSLATE(V5,'ZSGB','2568'); V=10*INPUT(V6,1.0)+INPUT(V7,1.0); IF 1985 LE MY LE 1987 AND V5='S' AND V=14 AND V1='1' AND V3 IN ('D','T') AND (V4='B' OR V4='C') THEN DO; TRKTYP=1; MM2=23200; CG=18201; RETURN; END; IF 1985 LE MY LE 1987 AND V5='T' AND V=14 AND V1='1' AND V3 IN ('D','T') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=23201; CG=18201; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=14 AND V3 IN ('D','T') AND (V4='C' OR V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=23210; CG=18202; RETURN; END; IF 1987 LE MY LE 1988 AND V5='R' AND V=14 AND V3 IN ('D','T') AND (V4='C' OR V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=23210; CG=18202; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=14 AND V3 IN ('D','T') AND (V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=23211; CG=18202; RETURN; END; IF 1987 LE MY LE 1988 AND V5='V' AND V=14 AND V3 IN ('D','T') AND (V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=23211; CG=18202; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=24 AND V3 IN ('D','T') AND V4 IN ('E','F','G') THEN DO; TRKTYP=2; MM2=23220; CG=18203; RETURN; END; IF MY=1987 AND V5='R' AND V=24 AND V3 IN ('D','T') AND V4 IN ('E','F','G') THEN DO; TRKTYP=2; MM2=23220; CG=18203; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=24 AND V3 IN ('D','T') AND V4 IN ('E','F','G') THEN DO; TRKTYP=2; MM2=23221; CG=18203; RETURN; END; IF MY=1987 AND V5='V' AND V=24 AND V3 IN ('D','T') AND V4 IN ('E','F','G') THEN DO; TRKTYP=2; MM2=23221; CG=18203; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=34 AND V3 IN ('D','T') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=23230; CG=18203; RETURN; END; IF 1987 LE MY LE 1989 AND V5='R' AND V=34 AND V3 IN ('D','T') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=23230; CG=18203; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=34 AND V3 IN ('D','T') AND V4 IN ('H','J','K') THEN DO; TRKTYP=2; MM2=23231; CG=18203; RETURN; END; IF 1987 LE MY LE 1989 AND V5='V' AND V=34 AND V3 IN ('D','T') AND V4 IN ('H','J','K') THEN DO; TRKTYP=2; MM2=23231; CG=18203; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=23 AND V3 IN ('D','T') AND V4='G' THEN DO; TRKTYP=2; MM2=23224; CG=18204; RETURN; END; IF 1987 LE MY LE 1989 AND V5='R' AND V=23 AND V3 IN ('D','T') AND V4='G' THEN DO; TRKTYP=2; MM2=23224; CG=18204; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=33 AND V3 IN ('D','T') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=23234; CG=18204; RETURN; END; IF 1987 LE MY LE 1991 AND V5='R' AND V=33 AND V3 IN ('D','T') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=23234; CG=18204; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=33 AND V3 IN ('D','T') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=23235; CG=18204; RETURN; END; IF 1987 LE MY LE 1991 AND V5='V' AND V=33 AND V3 IN ('D','T') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=23235; CG=18204; RETURN; END; IF 1988 LE MY LE 1999 AND V5='S' AND V=14 AND V1='1' AND V3 IN ('D','T') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=23200; CG=18205; RETURN; END; IF 2000 LE MY LE 2003 AND V5='S' AND V IN (14,64) AND V1='1' AND V3 IN ('D','T') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=23200; CG=18205; RETURN; END; IF 1988 LE MY LE 1999 AND V5='T' AND V=14 AND V1='1' AND V3 IN ('D','T') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=23201; CG=18205; RETURN; END; IF MY=2000 AND V5='T' AND V IN (14,64) AND V1='1' AND V3 IN ('D','T') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=23201; CG=18205; RETURN; END; IF 1988 LE MY LE 1999 AND V5='S' AND V=19 AND V1='1' AND V3 IN ('D','T') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=23202; CG=18206; RETURN; END; IF 2000 LE MY LE 2003 AND V5='S' AND V IN (19,69) AND V1='1' AND V3 IN ('D','T') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=23202; CG=18206; RETURN; END; IF 1988 LE MY LE 1999 AND V5='T' AND V=19 AND V1='1' AND V3 IN ('D','T') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=23203; CG=18206; RETURN; END; IF 2000 LE MY LE 2003 AND V5='T' AND V IN (19,69) AND V1='1' AND V3 IN ('D','T') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=23203; CG=18206; RETURN; END; IF 2001 LE MY LE 2003 AND V5='T' AND V IN (13,63) AND V1='1' AND V3 IN ('D','T') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=23205; CG=18206; RETURN; END; IF MY=2004 AND V5='T' AND V IN (13,63) AND V8='X' AND V11='K' AND V1='1' AND V3 IN ('D','T') AND V4 IN ('B','C','D') THEN DO; TRKTYP=1; MM2=23205; CG=18206; RETURN; END; IF 1988 LE MY LE 1998 AND V5='C' AND V=14 AND V3 IN ('D','T') AND (V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=23210; CG=18207; RETURN; END; IF 1988 LE MY LE 1998 AND V5='K' AND V=14 AND V3 IN ('D','T') AND (V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=23211; CG=18207; RETURN; END; IF 1988 LE MY LE 1998 AND V5='C' AND V=24 AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=23220; CG=18208; RETURN; END; IF 1999 LE MY LE 2000 AND V5='C' AND V=24 AND V8 IN ('F','J','R') AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=23220; CG=18208; RETURN; END; IF 1988 LE MY LE 1998 AND V5='K' AND V=24 AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=23221; CG=18208; RETURN; END; IF 1999 LE MY LE 2000 AND V5='K' AND V=24 AND V8 IN ('F','J','R') AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=23221; CG=18208; RETURN; END; IF 1988 LE MY LE 2000 AND V5='C' AND V=34 AND V3 IN ('D','T') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=23230; CG=18208; RETURN; END; IF 1988 LE MY LE 2000 AND V5='K' AND V=34 AND V3 IN ('D','T') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=23231; CG=18208; RETURN; END; IF 1988 LE MY LE 1990 AND V5='C' AND V=19 AND V1='2' AND V3 IN ('D','T') AND V4 IN ('D','E','F') THEN DO; TRKTYP=2; MM2=23212; CG=18209; RETURN; END; IF 1988 LE MY LE 1990 AND V5='K' AND V=19 AND V1='2' AND V3 IN ('D','T') AND V4 IN ('E','F') THEN DO; TRKTYP=2; MM2=23213; CG=18209; RETURN; END; IF 1988 LE MY LE 1990 AND V5='C' AND V=29 AND V1='2' AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=23222; CG=18209; RETURN; END; IF 1988 LE MY LE 1990 AND V5='K' AND V=29 AND V1='2' AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=23223; CG=18209; RETURN; END; IF 1988 LE MY LE 2000 AND V5='C' AND V=39 AND (V1='2' OR MY GE 93) AND V3 IN ('D','T') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=23232; CG=18209; RETURN; END; IF 1988 LE MY LE 2000 AND V5='K' AND V=39 AND (V1='2' OR MY GE 93) AND V3 IN ('D','T') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=23233; CG=18209; RETURN; END; IF 1991 LE MY LE 1998 AND V5='C' AND V=19 AND (V1='2' OR MY GE 93) AND V3 IN ('D','T') AND V4 IN ('D','E','F') THEN DO; TRKTYP=2; MM2=23212; CG=18210; RETURN; END; IF MY=1999 AND V5='C' AND V=19 AND (V8='R' OR V8='M') AND V3 IN ('D','T') AND V4 IN ('D','E','F') AND V11='R' THEN DO; TRKTYP=2; MM2=23212; CG=18210; RETURN; END; IF 1991 LE MY LE 1998 AND V5='K' AND V=19 AND (V1='2' OR MY GE 93) AND V3 IN ('D','T') AND V4 IN ('E','F') THEN DO; TRKTYP=2; MM2=23213; CG=18210; RETURN; END; IF MY=1999 AND V5='K' AND V=19 AND (V8='R' OR V8='M') AND V3 IN ('D','T') AND V4 IN ('E','F') AND V11='R' THEN DO; TRKTYP=2; MM2=23213; CG=18210; RETURN; END; IF 1991 LE MY LE 1998 AND V5='C' AND V=29 AND (V1='2' OR MY GE 93) AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=23222; CG=18210; RETURN; END; IF 1999 LE MY LE 2000 AND V5='C' AND V=29 AND V8 IN ('F','J','R') AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=23222; CG=18210; RETURN; END; IF 1991 LE MY LE 1998 AND V5='K' AND V=29 AND (V1='2' OR MY GE 93) AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=23223; CG=18210; RETURN; END; IF 1999 LE MY LE 2000 AND V5='K' AND V=29 AND V8 IN ('F','J','R') AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=23223; CG=18210; RETURN; END; IF 1992 LE MY LE 2000 AND V5='C' AND V=33 AND V3 IN ('D','T') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=23234; CG=18211; RETURN; END; IF 1992 LE MY LE 2000 AND V5='K' AND V=33 AND V3 IN ('D','T') AND V4 IN ('G','H','J','K') THEN DO; TRKTYP=2; MM2=23235; CG=18211; RETURN; END; IF 1999 LE MY LE 2000 AND V5='C' AND V=23 AND V3 IN ('D','T') AND (V4='G' OR V4='H') THEN DO; TRKTYP=2; MM2=23224; CG=18212; RETURN; END; IF 1999 LE MY LE 2000 AND V5='K' AND V=23 AND V3 IN ('D','T') AND (V4='G' OR V4='H') THEN DO; TRKTYP=2; MM2=23225; CG=18212; RETURN; END; IF MY=1999 AND V5='C' AND V=14 AND V3 IN ('D','T') AND (V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=23210; CG=18213; RETURN; END; IF 2000 LE MY LE 2006 AND V5='C' AND V IN (14,64) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23210; CG=18213; RETURN; END; IF MY=2007 AND V5='C' AND V IN (14,64) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23210; CG=18213; RETURN; END; /* C1500 CLASSIC */ IF MY=1999 AND V5='K' AND V=14 AND V3 IN ('D','T') AND (V4='D' OR V4='E') THEN DO; TRKTYP=2; MM2=23211; CG=18213; RETURN; END; IF 2000 LE MY LE 2006 AND V5='K' AND V IN (14,64) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23211; CG=18213; RETURN; END; IF MY=2007 AND V5='K' AND V IN (14,64) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23211; CG=18213; RETURN; END; /* K1500 CLASSIC */ IF 1999 LE MY LE 2000 AND V5='C' AND V IN (24,74) AND V8 IN ('T','U') AND V3 IN ('D','T') AND V4 IN ('F','G','H') THEN DO; TRKTYP=2; MM2=23220; CG=18214; RETURN; END; IF 2001 LE MY LE 2006 AND V5='C' AND V IN (24,74) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23220; CG=18214; RETURN; END; IF MY=2007 AND V5='C' AND V IN (24,74) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23220; CG=18214; RETURN; END; /* C2500 CLASSIC */ IF 1999 LE MY LE 2000 AND V5='K' AND V IN (24,74) AND V8 IN ('T','U') AND V3 IN ('D','T') AND V4 IN ('F','G','H') THEN DO; TRKTYP=2; MM2=23221; CG=18214; RETURN; END; IF 2001 LE MY LE 2006 AND V5='K' AND V IN (24,74) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23221; CG=18214; RETURN; END; IF MY=2007 AND V5='K' AND V IN (24,74) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23221; CG=18214; RETURN; END; /* K2500 CLASSIC */ IF 2001 LE MY LE 2006 AND V5='C' AND V IN (34,84) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23230; CG=18214; RETURN; END; IF MY=2007 AND V5='C' AND V IN (34,84) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23230; CG=18214; RETURN; END; /* C3500 CLASSIC */ IF 2001 LE MY LE 2006 AND V5='K' AND V IN (34,84) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23231; CG=18214; RETURN; END; IF MY=2007 AND V5='K' AND V IN (34,84) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23231; CG=18214; RETURN; END; /* K3500 CLASSIC */ IF MY=1999 AND V5='C' AND V=19 AND (V8 IN ('T','V','W')) AND V3 IN ('D','T') AND V4 IN ('D','E','F') AND V11 NE 'R' THEN DO; TRKTYP=2; MM2=23212; CG=18215; RETURN; END; IF 2000 LE MY LE 2006 AND V5='C' AND V IN (19,69) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23212; CG=18215; RETURN; END; IF MY=2007 AND V5='C' AND V IN (19,69) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23212; CG=18215; RETURN; END; /* C1500 XCAB CLASSIC */ IF MY=1999 AND V5='K' AND V=19 AND (V8 IN ('T','V','W')) AND V3 IN ('D','T') AND V4 IN ('D','E','F') AND V11 NE 'R' THEN DO; TRKTYP=2; MM2=23213; CG=18215; RETURN; END; IF 2000 LE MY LE 2006 AND V5='K' AND V=19 AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23213; CG=18215; RETURN; END; IF MY=2007 AND V5='K' AND V IN (19,69) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23213; CG=18215; RETURN; END; /* K1500 XCAB CLASSIC */ IF 1999 LE MY LE 2000 AND V5='C' AND V IN (29,79) AND V8 IN ('T','U') AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=23222; CG=18215; RETURN; END; IF 2001 LE MY LE 2006 AND V5='C' AND V IN (29,79) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23222; CG=18215; RETURN; END; IF MY=2007 AND V5='C' AND V IN (29,79) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23222; CG=18215; RETURN; END; /* C2500 XCAB CLASSIC */ IF 1999 LE MY LE 2000 AND V5='K' AND V IN (29,79) AND V8 IN ('T','U') AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=2; MM2=23223; CG=18215; RETURN; END; IF 2001 LE MY LE 2006 AND V5='K' AND V IN (29,79) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23223; CG=18215; RETURN; END; IF MY=2007 AND V5='K' AND V IN (29,79) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23223; CG=18215; RETURN; END; /* K2500 XCAB CLASSIC */ IF 2001 LE MY LE 2004 AND V5='K' AND V=69 AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23218; CG=18215; RETURN; END; /* C3/DENALI WAS X-CAB IN 2001-2004 */ IF 2001 LE MY LE 2006 AND V5='C' AND V IN (39,89) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23232; CG=18216; RETURN; END; IF MY=2007 AND V5='C' AND V IN (39,89) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23232; CG=18216; RETURN; END; /* C3500 XCAB CLASSIC */ IF 2001 LE MY LE 2006 AND V5='K' AND V IN (39,89) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23233; CG=18216; RETURN; END; IF MY=2007 AND V5='K' AND V IN (39,89) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23233; CG=18216; RETURN; END; /* K3500 XCAB CLASSIC */ IF 2001 LE MY LE 2006 AND V5='C' AND V IN (23,73) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23224; CG=18217; RETURN; END; IF MY=2007 AND V5='C' AND V IN (23,73) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23224; CG=18217; RETURN; END; /* C2500 CREW CLASSIC */ IF 2001 LE MY LE 2006 AND V5='K' AND V IN (23,73) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23225; CG=18217; RETURN; END; IF MY=2007 AND V5='K' AND V IN (23,73) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23225; CG=18217; RETURN; END; /* K2500 CREW CLASSIC */ IF 2001 LE MY LE 2006 AND V5='C' AND V IN (33,83) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23234; CG=18218; RETURN; END; IF MY=2007 AND V5='C' AND V IN (33,83) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23234; CG=18218; RETURN; END; /* C3500 CREW CLASSIC */ IF 2001 LE MY LE 2006 AND V5='K' AND V IN (33,83) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23235; CG=18218; RETURN; END; IF MY=2007 AND V5='K' AND V IN (33,83) AND V3 IN ('D','T') AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23235; CG=18218; RETURN; END; /* K3500 CREW CLASSIC */ IF 2001 LE MY LE 2003 AND V5='C' AND V IN (13,63) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23214; CG=18219; RETURN; END; IF MY GE 2004 AND V5='C' AND V IN (13,63) AND V3 IN ('D','T') AND V1='1' AND V4='G' THEN DO; TRKTYP=2; MM2=23214; CG=18219; RETURN; END; /* C1500 HD CREW ends 2007 */ IF 2001 LE MY LE 2003 AND V5='K' AND V IN (13,63) AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23215; CG=18219; RETURN; END; IF MY GE 2004 AND V5='K' AND V IN (13,63) AND V3 IN ('D','T') AND V1='1' AND V4='G' THEN DO; TRKTYP=2; MM2=23215; CG=18219; RETURN; END; /* K1500 HD CREW ends 2007 */ IF MY GE 2004 AND V5='S' AND V IN (14,64) AND V3 IN ('D','T') THEN DO; TRKTYP=1; MM2=23200; CG=18221; RETURN; END; /* CANYON */ IF MY GE 2004 AND V5='T' AND V IN (14,64) AND V3 IN ('D','T') THEN DO; TRKTYP=1; MM2=23201; CG=18221; RETURN; END; /* CANYON 4X4 */ IF MY GE 2004 AND V5='S' AND V IN (19,69) AND V3 IN ('D','T') THEN DO; TRKTYP=1; MM2=23202; CG=18222; RETURN; END; /* CANYON XCAB */ IF MY GE 2004 AND V5='T' AND V IN (19,69) AND V3 IN ('D','T') THEN DO; TRKTYP=1; MM2=23203; CG=18222; RETURN; END; /* CANYON 4X4 XCAB */ IF MY GE 2004 AND V5='S' AND V IN (13,63) AND V3 IN ('D','T') THEN DO; TRKTYP=1; MM2=23204; CG=18222; RETURN; END; /* CANYON CREW */ IF MY=2004 AND V5='T' AND V IN (13,63) AND V8='6' AND V11='8' AND V3 IN ('D','T') THEN DO; TRKTYP=1; MM2=23205; CG=18222; RETURN; END; IF MY GE 2005 AND V5='T' AND V IN (13,63) AND V3 IN ('D','T') THEN DO; TRKTYP=1; MM2=23205; CG=18222; RETURN; END; /* CANYON 4X4 CREW */ IF 2004 LE MY LE 2006 AND V5='C' AND V IN (13,63) AND V3 IN ('D','T') AND V1='2' AND V4='E' THEN DO; TRKTYP=2; MM2=23214; CG=18223; RETURN; END; IF MY=2007 AND V5='C' AND V IN (13,63) AND V3 IN ('D','T') AND V1='2' AND V4='E' AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23214; CG=18223; RETURN; END; /* C1500 CREW CLASSIC */ IF 2004 LE MY LE 2006 AND V5='K' AND V3 IN ('D','T') AND V1='2' AND V4='E' AND V=13 THEN DO; TRKTYP=2; MM2=23215; CG=18223; RETURN; END; IF MY=2007 AND V5='K' AND V=13 AND V3 IN ('D','T') AND V1='2' AND V4='E' AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23215; CG=18223; RETURN; END; /* K1500 CREW CLASSIC */ IF 2005 LE MY LE 2006 AND V5='K' AND V=63 AND V3 IN ('D','T') THEN DO; TRKTYP=2; MM2=23219; CG=18223; RETURN; END; IF MY=2007 AND V5='K' AND V=63 AND V3 IN ('D','T') AND V1='2' AND V4='E' AND (V12 IN ('1','2','3','4') OR (V12='9' AND V8 IN ('2','B','D','G','N','T','U','V','Z'))) THEN DO; TRKTYP=2; MM2=23219; CG=18223; RETURN; END; /* DENALI CREW CLASSIC */ IF MY GE 2007 AND V5='C' AND V IN (14,64) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23210; CG=18226; RETURN; END; /* C1500 */ IF MY GE 2007 AND V5='K' AND V IN (14,64) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23211; CG=18226; RETURN; END; /* K1500 */ IF MY GE 2007 AND V5='C' AND V IN (24,74) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23220; CG=18227; RETURN; END; /* C2500 */ IF MY GE 2007 AND V5='K' AND V IN (24,74) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23221; CG=18227; RETURN; END; /* K2500 */ IF MY GE 2007 AND V5='C' AND V IN (34,84) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23230; CG=18227; RETURN; END; /* C3500 */ IF MY GE 2007 AND V5='K' AND V IN (34,84) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23231; CG=18227; RETURN; END; /* K3500 */ IF MY GE 2007 AND V5='C' AND V IN (19,69) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23212; CG=18228; RETURN; END; /* C1500 XCAB */ IF MY GE 2007 AND V5='K' AND V IN (19,69) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23213; CG=18228; RETURN; END; /* K1500 XCAB */ IF MY GE 2007 AND V5='C' AND V IN (29,79) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23222; CG=18229; RETURN; END; /* C2500 XCAB */ IF MY GE 2007 AND V5='K' AND V IN (29,79) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23223; CG=18229; RETURN; END; /* K2500 XCAB */ IF MY GE 2007 AND V5='C' AND V IN (39,89) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23232; CG=18230; RETURN; END; /* C3500 XCAB */ IF MY GE 2007 AND V5='K' AND V IN (39,89) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23233; CG=18230; RETURN; END; /* K3500 XCAB */ IF MY GE 2007 AND V5='C' AND V IN (13,63) AND V3 IN ('D','T') AND V1 IN ('2','3') AND V4='E' AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23214; CG=18231; RETURN; END; /* C1500 CREW */ IF MY GE 2007 AND V5='K' AND V=13 AND V3 IN ('D','T') AND V1 IN ('2','3') AND V4='E' AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23215; CG=18231; RETURN; END; /* K1500 CREW */ IF MY GE 2007 AND V5='K' AND V=63 AND V3 IN ('D','T') AND V1 IN ('2','3') AND V4='E' AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23219; CG=18231; RETURN; END; /* DENALI CREW */ IF MY GE 2007 AND V5='C' AND V IN (23,73) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23224; CG=18232; RETURN; END; /* C2500 CREW */ IF MY GE 2007 AND V5='K' AND V IN (23,73) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23225; CG=18232; RETURN; END; /* K2500 CREW */ IF MY GE 2007 AND V5='C' AND V IN (33,83) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23234; CG=18233; RETURN; END; /* C3500 CREW */ IF MY GE 2007 AND V5='K' AND V IN (33,83) AND V3 IN ('D','T') AND (V12 IN ('5','6','7','8') OR (V12='9' AND V8 IN ('0','3','6','8','C','J','K','M','Y'))) THEN DO; TRKTYP=2; MM2=23235; CG=18233; RETURN; END; /* K3500 CREW */ IF 1985 LE MY LE 1986 AND V5='S' AND V=18 AND V1='1' AND V3 IN ('5','D','T') AND V4='C' THEN DO; TRKTYP=3; MM2=23300; CG=18301; RETURN; END; IF 1987 LE MY LE 1999 AND V5='S' AND V=18 AND V1='1' AND V3 IN ('K','D','T') AND V4='C' THEN DO; TRKTYP=3; MM2=23300; CG=18301; RETURN; END; IF 2000 LE MY LE 2001 AND V5='S' AND V IN (18,68) AND V1='1' AND V3 IN ('K','D','T') THEN DO; TRKTYP=3; MM2=23300; CG=18301; RETURN; END; IF 1985 LE MY LE 1986 AND V5='T' AND V=18 AND V1='1' AND V3 IN ('5','D','T') AND V4='C' THEN DO; TRKTYP=3; MM2=23301; CG=18301; RETURN; END; IF 1987 LE MY LE 1999 AND V5='T' AND V=18 AND V1='1' AND V3 IN ('K','D','T') AND V4='C' THEN DO; TRKTYP=3; MM2=23301; CG=18301; RETURN; END; IF 2000 LE MY LE 2001 AND V5='T' AND V IN (18,68) AND V1='1' AND V3 IN ('K','D','T') THEN DO; TRKTYP=3; MM2=23301; CG=18301; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=18 AND V1='1' AND V3 IN ('5','D','T') AND V4='E' THEN DO; TRKTYP=4; MM2=23311; CG=18302; RETURN; END; IF 1987 LE MY LE 1991 AND V5='V' AND V=18 AND V1='1' AND V3 IN ('K','D','T') AND V4='E' THEN DO; TRKTYP=4; MM2=23311; CG=18302; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=16 AND V1='1' AND V3 IN ('5','D','T') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23322; CG=18303; RETURN; END; IF 1987 LE MY LE 1991 AND V5='R' AND V=16 AND V1='1' AND V3 IN ('K','D','T') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23322; CG=18303; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=16 AND V1='1' AND V3 IN ('5','D','T') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23323; CG=18303; RETURN; END; IF 1987 LE MY LE 1991 AND V5='V' AND V=16 AND V1='1' AND V3 IN ('K','D','T') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23323; CG=18303; RETURN; END; IF 1985 LE MY LE 1986 AND V5='C' AND V=26 AND V1='1' AND V3 IN ('5','D','T') AND V4='G' THEN DO; TRKTYP=4; MM2=23326; CG=18304; RETURN; END; IF 1987 LE MY LE 1991 AND V5='R' AND V=26 AND V1='1' AND V3 IN ('K','D','T') AND V4='G' THEN DO; TRKTYP=4; MM2=23326; CG=18304; RETURN; END; IF 1985 LE MY LE 1986 AND V5='K' AND V=26 AND V1='1' AND V3 IN ('5','D','T') AND V4='G' THEN DO; TRKTYP=4; MM2=23327; CG=18304; RETURN; END; IF 1987 LE MY LE 1991 AND V5='V' AND V=26 AND V1='1' AND V3 IN ('K','D','T') AND V4='G' THEN DO; TRKTYP=4; MM2=23327; CG=18304; RETURN; END; IF 1991 LE MY LE 1999 AND V5='S' AND V=13 AND V1='1' AND V3 IN ('K','D','T') AND V4='C' THEN DO; TRKTYP=3; MM2=23302; CG=18305; RETURN; END; IF 2000 LE MY LE 2001 AND V5='S' AND V IN (13,63) AND V1='1' AND V3 IN ('K','D','T') THEN DO; TRKTYP=3; MM2=23302; CG=18305; RETURN; END; IF 1991 LE MY LE 1999 AND V5='T' AND V=13 AND V1='1' AND V3 IN ('K','D','T') AND V4='D' THEN DO; TRKTYP=3; MM2=23303; CG=18305; RETURN; END; IF 2000 LE MY LE 2001 AND V5='T' AND V IN (13,63) AND V1='1' AND V3 IN ('K','D','T') THEN DO; TRKTYP=3; MM2=23303; CG=18305; RETURN; END; IF 1996 LE MY LE 1997 AND V5='C' AND V=18 AND V3 IN ('K','D','T') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23310; CG=18306; RETURN; END; IF 1992 LE MY LE 1994 AND V5='K' AND V=18 AND V1='1' AND V3 IN ('K','D','T') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23311; CG=18306; RETURN; END; IF 1995 LE MY LE 1997 AND V5='K' AND V=18 AND V3 IN ('K','D','T') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23311; CG=18306; RETURN; END; IF 1992 LE MY LE 1994 AND V5='C' AND V=16 AND V1='1' AND V3 IN ('K','D','T') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23322; CG=18307; RETURN; END; IF 1995 LE MY LE 1999 AND V5='C' AND V=16 AND V1 IN ('1','3') AND V3 IN ('K','D','T') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23322; CG=18307; RETURN; END; IF 1992 LE MY LE 1994 AND V5='K' AND V=16 AND V1='1' AND V3 IN ('K','D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=4; MM2=23323; CG=18307; RETURN; END; IF 1995 LE MY LE 1999 AND V5='K' AND V=16 AND V1 IN ('1','3') AND V3 IN ('K','D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=4; MM2=23323; CG=18307; RETURN; END; IF 1992 LE MY LE 1994 AND V5='C' AND V=26 AND V1='1' AND V3 IN ('K','D','T') AND V4='G' THEN DO; TRKTYP=4; MM2=23326; CG=18308; RETURN; END; IF 1995 LE MY LE 1999 AND V5='C' AND V=26 AND V3 IN ('K','D','T') AND V4='G' THEN DO; TRKTYP=4; MM2=23326; CG=18308; RETURN; END; IF 1992 LE MY LE 1994 AND V5='K' AND V=26 AND V1='1' AND V3 IN ('K','D','T') AND V4='G' THEN DO; TRKTYP=4; MM2=23327; CG=18308; RETURN; END; IF 1995 LE MY LE 1999 AND V5='K' AND V=26 AND V3 IN ('K','D','T') AND V4='G' THEN DO; TRKTYP=4; MM2=23327; CG=18308; RETURN; END; IF 1990 LE MY LE 1999 AND V5='L' AND V=19 AND V1='1' AND V3='K' AND (V4='D' OR V4='E') THEN DO; TRKTYP=5; MM2=23407; CG=18401; RETURN; END; /* SAFARI 4X4: MOVED */ IF 1995 LE MY LE 1999 AND V5='C' AND V=13 AND V1='1' AND V3='K' AND V4='E' THEN DO; TRKTYP=4; MM2=23312; CG=18309; RETURN; END; IF 1995 LE MY LE 1998 AND V1='1' AND V3='K' AND V4='E' THEN DO; TRKTYP=4; MM2=23313; CG=18309; RETURN; END; IF MY=1999 AND V1='1' AND V3='K' AND V4='E' AND (V11 NE 'R' OR V12 NE '9') THEN DO; TRKTYP=4; MM2=23313; CG=18309; RETURN; END; IF MY=1999 AND V5='K' AND V IN (13,63) AND V1='1' AND V3='K' AND V4='E' AND V8='R' AND V11='R' AND V12='9' THEN DO; TRKTYP=4; MM2=23318; CG=18309; RETURN; END; IF MY=2000 AND V5='K' AND V IN (13,63) AND V1='1' AND V3='K' AND V4='E' AND V8='R' AND V11='R' THEN DO; TRKTYP=4; MM2=23318; CG=18309; RETURN; END; IF 2004 LE MY LE 2005 AND V5='S' AND V IN (12,62) AND V3='K' THEN DO; TRKTYP=3; MM2=23304; CG=18316; RETURN; END; /* ENVOY XUV ends 2005 */ IF 2004 LE MY LE 2005 AND V5='T' AND V IN (12,62) AND V3='K' THEN DO; TRKTYP=3; MM2=23305; CG=18316; RETURN; END; /* ENVOY XUV ends 4X4 2005 */ IF 2002 LE MY LE 2006 AND V5='S' AND V IN (16,66) AND V3='K' THEN DO; TRKTYP=3; MM2=23306; CG=18316; RETURN; END; /* ENVOY XL ends 2006 */ IF 2002 LE MY LE 2006 AND V5='T' AND V IN (16,66) AND V3='K' THEN DO; TRKTYP=3; MM2=23307; CG=18316; RETURN; END; /* ENVOY XL 4X4 ends 2006 */ IF 2000 LE MY LE 2006 AND V5='C' AND V=13 AND V1='1' AND V3 IN ('K','N') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23312; CG=18310; RETURN; END; /* YUKON ends 2006 */ IF MY=2000 AND V5='K' AND V1='1' AND V3='K' AND V8 NE 'R' AND V11='J' AND V4='E' THEN DO; TRKTYP=4; MM2=23313; CG=18310; RETURN; END; IF 2001 LE MY LE 2006 AND V1='1' AND V5='K' AND V=13 AND V3 IN ('K','N') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23313; CG=18310; RETURN; END; /* YUKON 4X4 ends 2006 */ IF 2001 LE MY LE 2006 AND V5='K' AND V=63 AND V1='1' AND V3 IN ('N','K') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23318; CG=18310; RETURN; END; /* DENALI ends 2006 */ IF 2000 LE MY LE 2006 AND V5='C' AND V=16 AND V3 IN ('K','D','T') THEN DO; TRKTYP=4; MM2=23322; CG=18311; RETURN; END; /* C1500 YUKON XL ends 2006 */ IF MY=2000 AND V5='K' AND V=16 AND V3 IN ('K','D','T') THEN DO; TRKTYP=4; MM2=23323; CG=18311; RETURN; END; IF 2001 LE MY LE 2006 AND V5='K' AND V=16 AND V3 IN ('K','D','T') THEN DO; TRKTYP=4; MM2=23323; CG=18311; RETURN; END; /* K1500 YUKON XL ends 2006 */ IF 2001 LE MY LE 2006 AND V5='K' AND V=66 AND V3 IN ('K','D','T') THEN DO; TRKTYP=4; MM2=23328; CG=18311; RETURN; END; /* DENALI XL ends 2006 */ IF 2000 LE MY LE 2006 AND V5='C' AND V IN (26,76) AND V3 IN ('K','D','T') THEN DO; TRKTYP=4; MM2=23326; CG=18312; RETURN; END; /* C2500 YUKON XL ends 2006 */ IF 2000 LE MY LE 2006 AND V5='K' AND V IN (26,76) AND V3 IN ('K','D','T') THEN DO; TRKTYP=4; MM2=23327; CG=18312; RETURN; END; /* K2500 YUKON XL ends 2006 */ IF MY GE 2002 AND V5='S' AND V IN (13,63) AND V3='K' THEN DO; TRKTYP=3; MM2=23302; CG=18314; RETURN; END; /* ENVOY */ IF MY GE 2002 AND V5='T' AND V IN (13,63) AND V3='K' THEN DO; TRKTYP=3; MM2=23303; CG=18314; RETURN; END; /* ENVOY 4X4 */ IF MY GE 2007 AND V5='R' AND V6 IN ('1','2','3') AND V3='K' THEN DO; TRKTYP=3; MM2=23008; CG=18323; RETURN; END; /* ACADIA */ IF MY GE 2007 AND V5='V' AND V6 IN ('1','2','3') AND V3='K' THEN DO; TRKTYP=3; MM2=23008; CG=18323; RETURN; END; /* ACADIA AWD */ IF MY GE 2007 AND V5='C' AND V=13 AND V1='1' AND V3 IN ('K','N') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23312; CG=18324; RETURN; END; /* YUKON */ IF MY GE 2007 AND V1='1' AND V5='K' AND V=13 AND V3 IN ('K','N') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23313; CG=18324; RETURN; END; /* YUKON 4X4 */ IF MY GE 2007 AND V5='K' AND V=63 AND V1='1' AND V3 IN ('N','K') AND V4 IN ('E','F') THEN DO; TRKTYP=4; MM2=23318; CG=18324; RETURN; END; /* DENALI */ IF MY GE 2007 AND V5='C' AND V=16 AND V3 IN ('K','D','T') THEN DO; TRKTYP=4; MM2=23322; CG=18325; RETURN; END; /* C1500 YUKON XL */ IF MY GE 2007 AND V5='K' AND V=16 AND V3 IN ('K','D','T') THEN DO; TRKTYP=4; MM2=23323; CG=18325; RETURN; END; /* K1500 YUKON XL */ IF MY GE 2007 AND V5='K' AND V=66 AND V3 IN ('K','D','T') THEN DO; TRKTYP=4; MM2=23328; CG=18325; RETURN; END; /* DENALI XL */ IF MY GE 2007 AND V5='C' AND V IN (26,76) AND V3 IN ('K','D','T') THEN DO; TRKTYP=4; MM2=23326; CG=18326; RETURN; END; /* C2500 YUKON XL */ IF MY GE 2007 AND V5='K' AND V IN (26,76) AND V3 IN ('K','D','T') THEN DO; TRKTYP=4; MM2=23327; CG=18326; RETURN; END; /* K2500 YUKON XL */ IF 1990 LE MY LE 1999 AND V5='M' AND V=19 AND V1='1' AND V3='K' AND V4='D' THEN DO; TRKTYP=5; MM2=23406; CG=18401; RETURN; END; IF 2000 LE MY LE 2005 AND V5='M' AND V IN (19,69) AND V1='1' AND V3='K' THEN DO; TRKTYP=5; MM2=23406; CG=18401; RETURN; END; /* SAFARI WAGON */ IF 2000 LE MY LE 2005 AND V5='L' AND V IN (19,69) AND V1='1' AND V3='K' THEN DO; TRKTYP=5; MM2=23407; CG=18401; RETURN; END; /* SAFARI 4X4 WAGON */ IF 1985 LE MY LE 1994 AND V5='M' AND V=15 AND V1='1' AND V3 IN ('D','T') AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=23400; CG=18401; RETURN; END; IF 1990 LE MY LE 1994 AND V5='L' AND V=15 AND V1='1' AND V3 IN ('D','T') AND V4='D' THEN DO; TRKTYP=5; MM2=23401; CG=18401; RETURN; END; IF 1985 LE MY LE 1986 AND V5='M' AND V=15 AND V1='1' AND V3='5' AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=23402; CG=18401; RETURN; END; IF 1987 LE MY LE 1994 AND V5='M' AND V=15 AND V1='1' AND V3='K' AND (V4='C' OR V4='D') THEN DO; TRKTYP=5; MM2=23402; CG=18401; RETURN; END; IF 1990 LE MY LE 1994 AND V5='L' AND V=15 AND V1='1' AND V3='K' AND V4='D' THEN DO; TRKTYP=5; MM2=23403; CG=18401; RETURN; END; IF 1990 LE MY LE 1999 AND V5='M' AND V=19 AND V1='1' AND V3 IN ('D','T') AND V4='D' THEN DO; TRKTYP=5; MM2=23404; CG=18401; RETURN; END; IF 2000 LE MY LE 2005 AND V5='M' AND V IN (19,69) AND V1='1' AND V3 IN ('D','T') THEN DO; TRKTYP=5; MM2=23404; CG=18401; RETURN; END; /* SAFARI EXT CARGO */ IF 1990 LE MY LE 1999 AND V5='L' AND V=19 AND V1='1' AND V3 IN ('D','T') AND (V4='D' OR V4='E') /* all SAFARIS end 2005 */ THEN DO; TRKTYP=5; MM2=23405; CG=18401; RETURN; END; IF 2000 LE MY LE 2005 AND V5='L' AND V IN (19,69) AND V1='1' AND V3 IN ('D','T') THEN DO; TRKTYP=5; MM2=23405; CG=18401; RETURN; END; /* SAFARI 4X4 EXT CARGO */ IF 1985 LE MY LE 1995 AND V5='G' AND V=15 AND V3 IN ('D','T') AND (V4='C' OR V4='D') THEN DO; TRKTYP=6; MM2=23410; CG=18402; RETURN; END; IF 1985 LE MY LE 1986 AND V5='G' AND V=15 AND V3='5' THEN DO; TRKTYP=6; MM2=23412; CG=18402; RETURN; END; IF 1987 LE MY LE 1993 AND V5='G' AND V=15 AND V3='K' THEN DO; TRKTYP=6; MM2=23412; CG=18402; RETURN; END; IF 1985 LE MY LE 1995 AND V5='G' AND V=25 AND V3 IN ('D','T') AND V4='E' THEN DO; TRKTYP=6; MM2=23420; CG=18402; RETURN; END; IF 1985 LE MY LE 1986 AND V5='G' AND V=25 AND V3='5' AND V4='E' THEN DO; TRKTYP=6; MM2=23422; CG=18403; RETURN; END; IF 1987 LE MY LE 1995 AND V5='G' AND V=25 AND V3='K' AND V4='E' THEN DO; TRKTYP=6; MM2=23422; CG=18403; RETURN; END; IF 1985 LE MY LE 1995 AND V5='G' AND V=35 AND V3 IN ('D','T') AND (V4='F' OR V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=23430; CG=18403; RETURN; END; IF 1985 LE MY LE 1986 AND V5='G' AND V=35 AND (V3='0' OR V3='J' OR V3='5') AND (V4='F' OR V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=23432; CG=18403; RETURN; END; IF 1987 LE MY LE 1995 AND V5='G' AND V=35 AND (V3='0' OR V3='J' OR V3='K') AND (V4='F' OR V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=23432; CG=18403; RETURN; END; IF 1985 LE MY LE 1995 AND V5='G' AND V=31 AND V3='D' AND V4 IN ('F','G','H','J','K') THEN DO; TRKTYP=6; MM2=23638; CG=18403; RETURN; END; IF 1990 LE MY LE 1995 AND V5='G' AND V=39 AND V3 IN ('D','T') AND (V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=23434; CG=18404; RETURN; END; IF 1990 LE MY LE 1995 AND V5='G' AND V=39 AND (V3='0' OR V3='J' OR V3='K') AND (V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=23436; CG=18404; RETURN; END; IF 1996 LE MY LE 1999 AND V5='G' AND V=15 AND V3 IN ('D','T') AND V4 IN ('E','F') THEN DO; TRKTYP=6; MM2=23410; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (15,65) AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23410; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=15 AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23410; CG=18406; RETURN; END; /* G1500 VAN */ IF 2003 LE MY LE 2004 AND V5='H' AND V IN (15,65) AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23411; CG=18406; RETURN; END; IF MY GE 2005 AND V5='H' AND V=15 AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23411; CG=18406; RETURN; END; /* G1500 AWD VAN */ IF 1996 LE MY LE 1999 AND V5='G' AND V=15 AND V3='K' AND V4 IN ('E','F') THEN DO; TRKTYP=6; MM2=23412; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (15,65) AND V3='K' THEN DO; TRKTYP=6; MM2=23412; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=15 AND V3='K' THEN DO; TRKTYP=6; MM2=23412; CG=18406; RETURN; END; /* G1500 WAGON */ IF 2003 LE MY LE 2004 AND V5='H' AND V IN (15,65) AND V3='K' THEN DO; TRKTYP=6; MM2=23413; CG=18406; RETURN; END; IF MY GE 2005 AND V5='H' AND V=15 AND V3='K' THEN DO; TRKTYP=6; MM2=23413; CG=18406; RETURN; END; /* G1500 AWD WAGON */ IF 1996 LE MY LE 1999 AND V5='G' AND V=25 AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=6; MM2=23420; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (25,75) AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23420; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=25 AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23420; CG=18406; RETURN; END; /* G2500 VAN */ IF 2003 LE MY LE 2004 AND V5='H' AND V IN (25,75) AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23421; CG=18406; RETURN; END; IF MY GE 2005 AND V5='H' AND V=25 AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23421; CG=18406; RETURN; END; /* G2500 AWD VAN */ IF 1996 LE MY LE 1999 AND V5='G' AND V=25 AND V3 IN ('J','K') AND V4 IN ('F','G') THEN DO; TRKTYP=6; MM2=23422; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (25,75) AND V3 IN ('J','K') THEN DO; TRKTYP=6; MM2=23422; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=25 AND V3 IN ('J','K') THEN DO; TRKTYP=6; MM2=23422; CG=18406; RETURN; END; /* G2500 WAGON */ IF 1996 LE MY LE 1999 AND V5='G' AND V=35 AND V3 IN ('D','T') AND (V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=23430; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (35,85) AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23430; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=35 AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23430; CG=18406; RETURN; END; /* G3500 VAN */ IF 1996 LE MY LE 1999 AND V5='G' AND V=35 AND V3 IN ('J','K') AND (V4='G' OR V4='H') THEN DO; TRKTYP=6; MM2=23432; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (35,85) AND V3 IN ('J','K') THEN DO; TRKTYP=6; MM2=23432; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=35 AND V3 IN ('J','K') THEN DO; TRKTYP=6; MM2=23432; CG=18406; RETURN; END; /* G3500 WAGON */ IF 1996 LE MY LE 1999 AND V5='G' AND V=31 AND V3='D' AND V4 IN ('F','G','H','J','K') THEN DO; TRKTYP=6; MM2=23638; CG=18406; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (31,81) AND V3='D' THEN DO; TRKTYP=6; MM2=23638; CG=18406; RETURN; END; IF MY GE 2005 AND V5='G' AND V=31 AND V3='D' THEN DO; TRKTYP=6; MM2=23638; CG=18406; RETURN; END; /* CUTAWAY */ IF 1996 LE MY LE 1999 AND V5='G' AND V=29 AND V3 IN ('D','T') AND V4 IN ('F','G') THEN DO; TRKTYP=6; MM2=23424; CG=18407; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (29,79) AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23424; CG=18407; RETURN; END; IF MY GE 2005 AND V5='G' AND V=29 AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23424; CG=18407; RETURN; END; /* EXTENDED G2500 VAN */ IF 1996 LE MY LE 1999 AND V5='G' AND V=29 AND V3 IN ('J','K') AND V4 IN ('F','G') THEN DO; TRKTYP=6; MM2=23426; CG=18407; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (29,79) AND V3 IN ('J','K') THEN DO; TRKTYP=6; MM2=23426; CG=18407; RETURN; END; IF MY GE 2005 AND V5='G' AND V=29 AND V3 IN ('J','K') THEN DO; TRKTYP=6; MM2=23426; CG=18407; RETURN; END; /* EXTENDED G2500 WAGON */ IF 1996 LE MY LE 1999 AND V5='G' AND V=39 AND V3 IN ('D','T') AND V4 IN ('G','H') THEN DO; TRKTYP=6; MM2=23434; CG=18407; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (39,89) AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23434; CG=18407; RETURN; END; IF MY GE 2005 AND V5='G' AND V=39 AND V3 IN ('D','T') THEN DO; TRKTYP=6; MM2=23434; CG=18407; RETURN; END; /* EXTENDED G3500 VAN */ IF 1996 LE MY LE 1999 AND V5='G' AND V=39 AND V3 IN ('J','K') AND V4 IN ('G','H') THEN DO; TRKTYP=6; MM2=23436; CG=18407; RETURN; END; IF 2000 LE MY LE 2004 AND V5='G' AND V IN (39,89) AND V3 IN ('J','K') THEN DO; TRKTYP=6; MM2=23436; CG=18407; RETURN; END; IF MY GE 2005 AND V5='G' AND V=39 AND V3 IN ('J','K') THEN DO; TRKTYP=6; MM2=23436; CG=18407; RETURN; END; /* EXTENDED G3500 WAGON */ IF 1985 LE MY LE 1987 AND V5='W' AND V1='3' AND V3='T' THEN DO; TRKTYP=7; MM2=23007; CG=18701; RETURN; END; IF MY GE 1985 AND V5='P' AND V IN (32,37) AND V1='1' AND V3 IN ('D','T') AND V4 IN ('F','G','H','J','K','L') THEN DO; TRKTYP=8; MM2=23702; CG=18702; RETURN; END; /* FORWARD CONTROL */ TRKTYP=9; CG=99999; MM2=99999; RETURN; LTSATU: V5=TRANSLATE(V5,'ZSGB','2568'); V6=TRANSLATE(V6,'2568','ZSGB'); IF MY GE 2002 AND V5='Z' AND V6 IN ('2','3','5') THEN DO; TRKTYP=3; MM2=24362; CG=18317; RETURN; END; /* VUE */ IF MY GE 2002 AND V5='Z' AND V6 IN ('4','6') THEN DO; TRKTYP=3; MM2=24363; CG=18317; RETURN; END; /* VUE AWD */ IF MY GE 2005 AND V5='V' AND V6='1' THEN DO; TRKTYP=5; MM2=24454; CG=18410; RETURN; END; /* RELAY CARGO */ IF 2005 LE MY LE 2006 AND V5='V' AND V6 IN ('0','2','3') THEN DO; TRKTYP=5; MM2=24456; CG=18410; RETURN; END; /* RELAY */ IF MY GE 2007 AND V5='V' AND V6 IN ('0','2','3','5') THEN DO; TRKTYP=5; MM2=24456; CG=18410; RETURN; END; /* RELAY */ IF 2005 LE MY LE 2006 AND V5='X' AND V6 IN ('2','3') THEN DO; TRKTYP=5; MM2=24457; CG=18410; RETURN; END; /* RELAY AWD ends 2006 */ IF MY GE 2007 AND V3='Z' AND V5 IN ('V','R') AND V6 IN ('1','2','3') AND V4='E' AND V8='7' AND V11='J' THEN DO; TRKTYP=3; MM2=24010; CG=18323; RETURN; END; /* OUTLOOK */ TRKTYP=9; CG=99999; MM2=99999; RETURN; RUN;