SubMain()
ThisDoc.Document.ComponentDefinition.RepresentationsManager.LevelOfDetailRepresentations.Item("Custom").Activate()
iLogicForm.Show("New Order Form")
S_AuxLight()
'Rear Post Light Options
IfAuxLight1AndSide_Style="Posted Straight"OrSide_Style="Smooth Straight"And
C_IsActive("Alum Side 22x48CS S:1")AndC_IsActive("Alum Side 22x48RS S:1")Then
C_IsActive("17 Rear Post CS:1", True)
C_IsActive("17 Rear Post RS:1", True)
Feature.IsActive("17 Rear Post CS:1", "AuxLight1CS")= False
Feature.IsActive("17 Rear Post RS:1", "AuxLight1RS")= True
C_IsActive("TRUCK-LITE-MDL-60-GSKT CS:1", True)
C_IsActive("LED Truck Lite CS Upper:1", True)
C_IsActive("TRUCK-LITE-MDL-60-GSKT RS:1", True)
C_IsActive("LED Truck Lite RS Upper:1", True)
ElseIfNotAuxLight1Then
Feature.IsActive("17 Rear Post CS:1", "AuxLight1CS")= False
Feature.IsActive("17 Rear Post RS:1", "AuxLight1RS")= False
C_IsActive("TRUCK-LITE-MDL-60-GSKT CS:1", False)
C_IsActive("LED Truck Lite CS Upper:1", False)
C_IsActive("TRUCK-LITE-MDL-60-GSKT RS:1", False)
C_IsActive("LED Truck Lite RS Upper:1", False)
EndIf
IfAuxLight2AndSide_Style="Posted Straight"OrSide_Style="Smooth Straight"And
C_IsActive("Alum Side 22x48CS S:1")AndC_IsActive("Alum Side 22x48RS S:1")Then
C_IsActive("17 Rear Post CS:1", True)
C_IsActive("17 Rear Post RS:1", True)
Feature.IsActive("17 Rear Post CS:1", "AuxLight1CS")= True
Feature.IsActive("17 Rear Post CS:1", "AuxLight2CS")= True
Feature.IsActive("17 Rear Post RS:1", "AuxLight1RS")= True
Feature.IsActive("17 Rear Post RS:1", "AuxLight2RS")= True
C_IsActive("TRUCK-LITE-MDL-60-GSKT CS:1", True)
C_IsActive("LED Truck Lite CS Upper:1", True)
C_IsActive("TRUCK-LITE-MDL-60-GSKT CS:2", True)
C_IsActive("LED Truck Lite CS Lower:1", True)
C_IsActive("TRUCK-LITE-MDL-60-GSKT RS:1", True)
C_IsActive("LED Truck Lite RS Upper:1", True)
C_IsActive("TRUCK-LITE-MDL-60-GSKT RS:2", True)
C_IsActive("LED Truck Lite RS Lower:1", True)
ElseIfNotAuxLight2Then
S_AuxLight2_A("17")
EndIf
'Straight Side High Lift Gate Options for Lights
IfAuxLight1AndSide_Style="Posted Straight HL"OrSide_Style="Smooth Straight HL"And
C_IsActive("Alum Side 22x48CS HL:1")AndC_IsActive("Alum Side 22x48RS HL:1")Then
C_IsActive("11.5 HL Gate Rear Post CS:1", True)
C_IsActive("11.5 HL Gate Rear Post RS:1", True)
Feature.IsActive("11.5 HL Gate Rear Post CS:1", "AuxLight1CS")= True
Feature.IsActive("11.5 HL Gate Rear Post RS:1", "AuxLight1RS")= True
C_IsActive("TRUCK-LITE-MDL-60-GSKT CS:1", True)
C_IsActive("LED Truck Lite CS Upper:1", True)
C_IsActive("TRUCK-LITE-MDL-60-GSKT RS:1", True)
C_IsActive("LED Truck Lite RS Upper:1", True)
ElseIfNotAuxLight1Then
Feature.IsActive("11.5 HL Gate Rear Post CS:1", "AuxLight1CS")= False
Feature.IsActive("11.5 HL Gate Rear Post RS:1", "AuxLight1RS")= False
C_IsActive("TRUCK-LITE-MDL-60-GSKT CS:1", False)
C_IsActive("LED Truck Lite CS Upper:1", False)
C_IsActive("TRUCK-LITE-MDL-60-GSKT RS:1", False)
C_IsActive("LED Truck Lite RS Upper:1", False)
EndIf
IfAuxLight2AndSide_Style=("Posted Straight HL")OrSide_Style=("Smooth Straight HL")And
C_IsActive("Alum Side 22x48CS HL:1")AndC_IsActive("Alum Side 22x48RS HL:1")Then
C_IsActive("11.5 HL Gate Rear Post CS:1", True)
C_IsActive("11.5 HL Gate Rear Post RS:1", True)
Feature.IsActive("11.5 HL Gate Rear Post CS:1", "AuxLight1CS")= True
Feature.IsActive("11.5 HL Gate Rear Post CS:1", "AuxLight2CS")= True
Feature.IsActive("11.5 HL Gate Rear Post RS:1", "AuxLight1RS")= True
Feature.IsActive("11.5 HL Gate Rear Post RS:1", "AuxLight2RS")= True
C_IsActive("TRUCK-LITE-MDL-60-GSKT CS:1", True)
C_IsActive("LED Truck Lite CS Upper:1", True)
C_IsActive("TRUCK-LITE-MDL-60-GSKT CS:2", True)
C_IsActive("LED Truck Lite CS Lower:1", True)
C_IsActive("TRUCK-LITE-MDL-60-GSKT RS:1", True)
C_IsActive("LED Truck Lite RS Upper:1", True)
C_IsActive("TRUCK-LITE-MDL-60-GSKT RS:2", True)
C_IsActive("LED Truck Lite RS Lower:1", True)
ElseIfNotAuxLight2Then
S_AuxLight2_A("11.5 HL Gate")
EndIf
'Tapered Side High Lift Gate Options for Lights
IfAuxLight1AndSide_Style=("Posted Tapered HL")OrSide_Style=("Smooth Tapered HL")And
C_IsActive("Alum Side 22x48CS Tapered HL:1")AndC_IsActive("Alum Side 22x48RS Tapered HL:1")Then
C_IsActive("17T Rear Post CS:1", True)
C_IsActive("17T Rear Post RS:1", True)
Feature.IsActive("17T Rear Post CS:1", "AuxLight1CS")= True
Feature.IsActive("17T Rear Post RS:1", "AuxLight1RS")= True
C_IsActive("TRUCK-LITE-MDL-60-GSKT CS:1", True)
C_IsActive("LED Truck Lite CS Upper:1", True)
C_IsActive("TRUCK-LITE-MDL-60-GSKT RS:1", True)
C_IsActive("LED Truck Lite RS Upper:1", True)
ElseIfNotAuxLight1Then
Feature.IsActive("17T Rear Post CS:1", "AuxLight1CS")= False
Feature.IsActive("17T Rear Post RS:1", "AuxLight1RS")= False
C_IsActive("TRUCK-LITE-MDL-60-GSKT CS:1", False)
C_IsActive("LED Truck Lite CS Upper:1", False)
C_IsActive("TRUCK-LITE-MDL-60-GSKT RS:1", False)
C_IsActive("LED Truck Lite RS Upper:1", False)
EndIf
IfAuxLight2AndSide_Style=("Posted Tapered HL")OrSide_Style=("Smooth Tapered HL")And
C_IsActive("Alum Side 22x48CS Tapered HL:1")AndC_IsActive("Alum Side 22x48RS Tapered HL:1")Then
C_IsActive("17T Rear Post CS:1", True)
C_IsActive("17T Rear Post RS:1", True)
Feature.IsActive("17T Rear Post CS:1", "AuxLight1CS")= True
Feature.IsActive("17T Rear Post CS:1", "AuxLight2CS")= True
Feature.IsActive("17T Rear Post RS:1", "AuxLight1RS")= True
Feature.IsActive("17T Rear Post RS:1", "AuxLight2RS")= True
C_IsActive("TRUCK-LITE-MDL-60-GSKT CS:1", True)
C_IsActive("LED Truck Lite CS Upper:1", True)
C_IsActive("TRUCK-LITE-MDL-60-GSKT CS:2", True)
C_IsActive("LED Truck Lite CS Lower:1", True)
C_IsActive("TRUCK-LITE-MDL-60-GSKT RS:1", True)
C_IsActive("LED Truck Lite RS Upper:1", True)
C_IsActive("TRUCK-LITE-MDL-60-GSKT RS:2", True)
C_IsActive("LED Truck Lite RS Lower:1", True)
ElseIfNotAuxLight2Then
DimEAsBoolean=AuxLight1
S_AuxLight2_A("17T")
EndIf
'Double Knuckle Chute Option
IfC_IsActive("Tail Gate Assy:1")Then
DimEAsBoolean=Tailgate_Chute
C_IsActive("DBL K Chute Assy:1", E)
Feature.IsActive("Tail Gate Sheet:1", "Chute")=E
C_IsActive("548993-58:3", NotE)
C_IsActive("548993-58:4", NotE)
EndIf
IfC_IsActive("TAIL-GATE-ASSY:1")Then
DimEAsBoolean=Tailgate_Chute
C_IsActive("DBL K Chute Assy Posted:1", E)
C_IsActive("CA-501657 21:2", NotE)
C_IsActive("Box Brace 21:3", NotE)
Feature.IsActive("TAIL-GATE-SHT:1", "Chute")=E
EndIf
'Cleaner Plate Options
Parameter("AD Floor Complete-CP:1", "Inside_Cleaner_Plate_Option")=Cleaner_Plate
SelectCaseCleaner_Plate
Case"None", "18 in W/Holes"
C_IsActive("9 Cleaner Plate No Holes:1", False)
C_IsActive("9 Cleaner Plate No Holes:2", False)
C_IsActive("9 Cleaner Plate Holes:1", False)
C_IsActive("9 Cleaner Plate Holes:2", False)
C_IsActive("18 Cleaner Plate:1", False)
C_IsActive("18 Cleaner Plate:2", False)
Case"9 in Standard"
C_IsActive("9 Cleaner Plate No Holes:1", True)
C_IsActive("9 Cleaner Plate No Holes:2", True)
C_IsActive("9 Cleaner Plate Holes:1", False)
C_IsActive("9 Cleaner Plate Holes:2", False)
C_IsActive("18 Cleaner Plate:1", False)
C_IsActive("18 Cleaner Plate:2", False)
Case"9 in W/Holes"
C_IsActive("9 Cleaner Plate No Holes:1", False)
C_IsActive("9 Cleaner Plate No Holes:2", False)
C_IsActive("9 Cleaner Plate Holes:1", True)
C_IsActive("9 Cleaner Plate Holes:2", True)
C_IsActive("18 Cleaner Plate:1", False)
C_IsActive("18 Cleaner Plate:2", False)
EndSelect
'Top Rail Angle Option for Trailer Body
IfTG_Style="Standard Tailgate"Then
DimEAsBoolean=Top_Rail_Angle
IfEThenParameter("TR Angle:1", "A_Length")="TR_rs_length - 6.250"
C_IsActive("TR Angle TG:1", E)
C_IsActive("TR Angle TG:1", E)
C_IsActive("TR Angle:1", E)
C_IsActive("TR Angle:2", E)
EndIf
IfTG_Style="Barndoor RS"Then
DimEAsBoolean=Top_Rail_Angle
IfEThenParameter("TR Angle:1", "A_Length")="TR_rs_length"
C_IsActive("TR Angle TG:1", E)
C_IsActive("TR Angle TG:1", E)
C_IsActive("TR Angle:1", E)
C_IsActive("TR Angle:2", E)
EndIf
IfTG_Style=("Barndoor CS")Then
DimEAsBoolean=Top_Rail_Angle
IfEThenParameter("TR Angle:1", "A_Length")="TR_rs_length"
C_IsActive("TR Angle TG:1", E)
C_IsActive("TR Angle TG:1", E)
C_IsActive("TR Angle:1", E)
C_IsActive("TR Angle:2", E)
EndIf
IfTop_Rail_AngleAndTG_Style="Standard Tailgate"AndSide_Style="Posted Tapered"OrSide_Style="Smooth Tapered"Then
Parameter("TR Angle:1", "A_Length")=("TR_rs_length - 6.250")
C_IsActive("TR Angle TG:1", True)
C_IsActive("TR Angle TG:1", True)
C_IsActive("TR Angle:1", False)
C_IsActive("TR Angle:2", False)
'C_IsActive("TR Angle TS:1", True)
ElseIfNotTop_Rail_AngleThen
C_IsActive("TR Angle TG:1", False)
C_IsActive("TR Angle TG:1", False)
C_IsActive("TR Angle:1", False)
C_IsActive("TR Angle:2", False)
'C_IsActive("TR Angle TS:1", False)
EndIf
'Rear Bearing Option for Floor
IfRear_Bearing_Option="Double Bearing"Then
Parameter("AD Floor Complete-CP:1", "Bearing")="Double"
ElseIfRear_Bearing_Option="Single Bearing"Then
Parameter("AD Floor Complete-CP:1", "Bearing")="Single"
EndIf
'Tailgate Lock Style for floor
S_TG_Lock()
'Tailgate Lock Style for tailgate
IfC_IsActive("Tail Gate Assy:1")Then
Parameter("Tail Gate Assy:1", "Tailgate_Style")=TG_Style
C_IsActive("Bottom Tailgate Lock:1", False)
C_IsActive("Bottom Tailgate Lock:2", False)
C_IsActive("SUMMIT-1:1", False)
C_IsActive("SUMMIT-1:2", False)
EndIf
IfC_IsActive("TAIL GATE ASSY:1")Then
Parameter("TAIL GATE ASSY:1", "Tailgate_Style")=TG_Style
C_IsActive("Bottom Tailgate Lock:1", False)
C_IsActive("Bottom Tailgate Lock:2", False)
C_IsActive("SUMMIT-1:1", False)
C_IsActive("SUMMIT-1:2", False)
EndIf
'Bottom Lock Option
C_IsActive("Bottom Tailgate Lock:1", Bottom_Locks)
C_IsActive("Bottom Tailgate Lock:2", Bottom_Locks)
C_IsActive("SUMMIT-2:1", Bottom_Locks)
C_IsActive("SUMMIT-2:2", Bottom_Locks)
'Trailer Width
S_Trailer_Width()
'Liner Option
S_Liner()
'Posted Straight Side Options for Height & Length
IfSide_Style="Posted Straight"Then
C_IsActive("Alum Side 22x48CS S:1", True)
C_IsActive("17 Rear Post CS:1", True)
Parameter("Alum Side 22x48CS S:1", "Side_Style")="Posted Side"
C_IsActive("Alum Side 22x48RS S:1", True)
C_IsActive("17 Rear Post RS:1", True)
Parameter("Alum Side 22x48RS S:1", "Side_Style")="Posted Side"
C_IsActive("AD Tapered 22x48 PRSide:1", False)
C_IsActive("AD Tapered 22x48 PCSide:1", False)
C_IsActive("Alum Side 22x48CS PBDG:1", False)
C_IsActive("Alum Side 22x48RS PBDG:1", False)
C_IsActive("Alum Side 22x48RS HL:1", False)
C_IsActive("Alum Side 22x48CS HL:1", False)
C_IsActive("Alum Side 22x48RS Tapered HL:1", False)
C_IsActive("Alum Side 22x48CS Tapered HL:1", False)
C_IsActive("Tail Gate Assy:1", False)
C_IsActive("TAIL-GATE-ASSY:1", True)
Parameter("TAIL-GATE-ASSY:1", "Tailgate_Style")="Standard Tailgate"
Constraint.IsActive("Angle:5")= False
Constraint.IsActive("Mate:54")= False
Constraint.IsActive("Mate:51")= True
Constraint.IsActive("Mate:56")= False
Constraint.IsActive("Angle:6")= False
Constraint.IsActive("Angle:7")= True
RuleParametersOutput()
InventorVb.DocumentUpdate()
EndIf
IfSide_Style="Posted Straight"Then
C_IsActive("Alum Side 22x48CS S:1", True)
Parameter("Alum Side 22x48RS S:1", "Side_Style")="Posted Side"
Parameter("Alum Side 22x48CS S:1", "CS_Height")=Side_Height
C_IsActive("Alum Side 22x48RS S:1", True)
Parameter("Alum Side 22x48CS S:1", "Side_Style")="Posted Side"
Parameter("Alum Side 22x48RS S:1", "RS_Height")=Side_Height
Parameter("TAIL-GATE-ASSY:1", "Tailgate_Height")=Side_Height
Parameter("Bulkhead:1", "Bulkhead_Height")=Side_Height
SelectCaseSide_Height
Case48 in, 54 in, 60 in, 66 in, 72 in
Parameter("IN-027:1", "Hoist_Box_Height")=Side_Height-4 in
Case78 in, 84 in, 90 in, 96 in, 102 in
Parameter("IN-027:1", "Hoist_Box_Height")=72 in
EndSelect
SelectCaseSide_Height
Case48 in, 78 in
Parameter("TAIL-GATE-ASSY:1", "Tailgate_Style")="Standard"
Case54 in, 60 in, 66 in, 72 in, 84 in, 90 in, 96 in, 102 in
Parameter("TAIL-GATE-ASSY:1", "Tailgate_Style")="Standard Tailgate"
EndSelect
EndIf
IfSide_Style="Posted Straight"Then
C_IsActive("Alum Side 22x48CS S:1", True)
Parameter("Alum Side 22x48RS S:1", "Side_Style")="Posted Side"
C_IsActive("Alum Side 22x48RS S:1", True)
Parameter("Alum Side 22x48RS S:1", "Side_Style")="Posted Side"
Parameter("Alum Side 22x48CS S:1", "CS_Length")=Trailer_Length
Parameter("Alum Side 22x48RS S:1", "RS_Length")=Trailer_Length
Parameter("AD Floor Complete-CP:1", "AD_Floor_Length")=Trailer_Length
EndIf
'Smooth Straight Side Options for Height & Length
IfSide_Style="Smooth Straight" Then
C_IsActive("Alum Side 22x48CS S:1", True)
C_IsActive("17 Rear Post CS:1", True)
Parameter("Alum Side 22x48CS S:1", "Side_Style")="Smooth Side"
C_IsActive("Alum Side 22x48RS S:1", True)
C_IsActive("17 Rear Post RS:1", True)
Parameter("Alum Side 22x48RS S:1", "Side_Style")="Smooth Side"
C_IsActive("AD Tapered 22x48 PRSide:1", False)
C_IsActive("AD Tapered 22x48 PCSide:1", False)
C_IsActive("Alum Side 22x48CS PBDG:1", False)
C_IsActive("Alum Side 22x48RS PBDG:1", False)
C_IsActive("Alum Side 22x48RS HL:1", False)
C_IsActive("Alum Side 22x48CS HL:1", False)
C_IsActive("Alum Side 22x48RS Tapered HL:1", False)
C_IsActive("Alum Side 22x48CS Tapered HL:1", False)
C_IsActive("Tail Gate Assy:1", True)
C_IsActive("TAIL-GATE-ASSY:1", False)
Parameter("Tail Gate Assy:1", "Tailgate_Style")="Standard"
Constraint.IsActive("Mate:21")= True
Constraint.IsActive("Angle:4")= True
Constraint.IsActive("Angle:5")= False
Constraint.IsActive("Mate:56")= False
Constraint.IsActive("Angle:6")= False
RuleParametersOutput()
InventorVb.DocumentUpdate()
EndIf
IfSide_Style="Smooth Straight"Then
C_IsActive("Alum Side 22x48CS S:1", True)
Parameter("Alum Side 22x48RS S:1", "Side_Style")=("Smooth Side")
Parameter("Alum Side 22x48CS S:1", "CS_Height")=Side_Height
C_IsActive("Alum Side 22x48RS S:1", True)
Parameter("Alum Side 22x48CS S:1", "Side_Style")=("Smooth Side")
Parameter("Alum Side 22x48RS S:1", "RS_Height")=Side_Height
Parameter("Tail Gate Assy:1", "Tailgate_Style")=("Standard Tailgate")
Parameter("Tail Gate Assy:1", "Tailgate_Height")=Side_Height
Parameter("Bulkhead:1", "Bulkhead_Height")=Side_Height
SelectCaseSide_Height
Case48 in, 54 in, 60 in, 66 in, 72 in
Parameter("IN-027:1", "Hoist_Box_Height")=Side_Height-4 in
Case78 in, 84 in, 90 in, 96 in, 102 in
Parameter("IN-027:1", "Hoist_Box_Height")=72 in
EndSelect
EndIf
IfSide_Style="Smooth Straight"Then
C_IsActive("Alum Side 22x48CS S:1", True)
Parameter("Alum Side 22x48RS S:1", "Side_Style")="Smooth Side"
C_IsActive("Alum Side 22x48RS S:1", True)
Parameter("Alum Side 22x48RS S:1", "Side_Style")="Smooth Side"
Parameter("Alum Side 22x48CS S:1", "CS_Length")=Trailer_Length
Parameter("Alum Side 22x48RS S:1", "RS_Length")=Trailer_Length
Parameter("AD Floor Complete-CP:1", "AD_Floor_Length")=Trailer_Length
EndIf
'Posted Straight HL Side Options for Height & Length
IfSide_Style="Posted Straight HL" Then
C_IsActive("Alum Side 22x48RS HL:1", True)
C_IsActive("11.5 HL Gate Rear Post RS:1", True)
Parameter("Alum Side 22x48CS HL:1", "SideStyle")="Posted Straight HL"
C_IsActive("Alum Side 22x48CS S:1", True)
C_IsActive("11.5 HL Gate Rear Post CS:1", True)
Parameter("Alum Side 22x48RS HL:1", "SideStyle")="Posted Straight HL"
C_IsActive("Alum Side 22x48CS S:1", False)
C_IsActive("Alum Side 22x48RS S:1", False)
C_IsActive("AD Tapered 22x48 PRSide:1", False)
C_IsActive("AD Tapered 22x48 PCSide:1", False)
C_IsActive("Alum Side 22x48CS PBDG:1", False)
C_IsActive("Alum Side 22x48RS PBDG:1", False)
C_IsActive("Alum Side 22x48RS HL:1", False)
C_IsActive("Alum Side 22x48CS HL:1", False)
C_IsActive("Alum Side 22x48RS Tapered HL:1", False)
C_IsActive("Alum Side 22x48CS Tapered HL:1", False)
C_IsActive("Tail Gate Assy:1", False)
C_IsActive("TAIL-GATE-ASSY:1", True)
Parameter("TAIL-GATE-ASSY:1", "Tailgate_Style")="High Lift Tailgate"
Constraint.IsActive("Angle:5")= False
Constraint.IsActive("Mate:54")= False
Constraint.IsActive("Mate:51")= True
Constraint.IsActive("Mate:56")= False
Constraint.IsActive("Angle:6")= False
Constraint.IsActive("Angle:7")= True
RuleParametersOutput()
InventorVb.DocumentUpdate()
EndIf
IfSide_Style="Posted Straight HL"Then
C_IsActive("Alum Side 22x48CS HL:1", True)
Parameter("Alum Side 22x48CS HL:1", "SideStyle")="Posted Side"
Parameter("Alum Side 22x48CS HL:1", "CS_Height")=Side_Height
C_IsActive("Alum Side 22x48RS HL:1", True)
Parameter("Alum Side 22x48RS HL:1", "SideStyle")="Posted Side"
Parameter("Alum Side 22x48RS HL:1", "RS_Height")=Side_Height
Parameter("TAIL-GATE-ASSY:1", "Tailgate_Style")="High Lift"
Parameter("TAIL-GATE-ASSY:1", "Tailgate_Height")=Side_Height
Parameter("Bulkhead:1", "Bulkhead_Height")=Side_Height
SelectCaseSide_Height
Case48 in, 54 in, 60 in, 66 in, 72 in
Parameter("IN-027:1", "Hoist_Box_Height")=Side_Height-4 in
Case78 in, 84 in, 90 in, 96 in, 102 in
Parameter("IN-027:1", "Hoist_Box_Height")=72 in
EndSelect
EndIf
IfSide_Style="Posted Straight HL"Then
C_IsActive("Alum Side 22x48CS S:1", True)
Parameter("Alum Side 22x48RS S:1", "Side_Style")="Posted Side"
C_IsActive("Alum Side 22x48RS S:1", True)
Parameter("Alum Side 22x48RS S:1", "Side_Style")="Posted Side"
Parameter("Alum Side 22x48CS S:1", "CS_Length")=Trailer_Length
Parameter("Alum Side 22x48RS S:1", "RS_Length")=Trailer_Length
Parameter("AD Floor Complete-CP:1", "AD_Floor_Length")=Trailer_Length
EndIf
'Smooth Straight HL Side Options for Height & Length
IfSide_Style="Smooth Straight HL" Then
C_IsActive("Alum Side 22x48RS HL:1", True)
C_IsActive("11.5 HL Gate Rear Post RS:1", True)
Parameter("Alum Side 22x48RS HL:1", "SideStyle")="Smooth"
C_IsActive("Alum Side 22x48CS HL:1", True)
C_IsActive("11.5 HL Gate Rear Post CS:1", True)
Parameter("Alum Side 22x48CS HL:1", "SideStyle")="Smooth"
C_IsActive("Alum Side 22x48CS S:1", False)
C_IsActive("Alum Side 22x48RS S:1", False)
C_IsActive("AD Tapered 22x48 PRSide:1", False)
C_IsActive("AD Tapered 22x48 PCSide:1", False)
C_IsActive("Alum Side 22x48CS PBDG:1", False)
C_IsActive("Alum Side 22x48RS PBDG:1", False)
C_IsActive("Alum Side 22x48RS Tapered HL:1", False)
C_IsActive("Alum Side 22x48CS Tapered HL:1", False)
C_IsActive("Tail Gate Assy:1", True)
C_IsActive("TAIL-GATE-ASSY:1", False)
Parameter("Tail Gate Assy:1", "Tailgate_Style")="High Lift Tailgate"
Constraint.IsActive("Mate:21")= True
Constraint.IsActive("Angle:4")= True
Constraint.IsActive("Angle:5")= False
Constraint.IsActive("Mate:56")= False
Constraint.IsActive("Angle:6")= False
RuleParametersOutput()
InventorVb.DocumentUpdate()
EndIf
IfSide_Style="Smooth Straight HL"Then
C_IsActive("Alum Side 22x48CS HL:1", True)
Parameter("Alum Side 22x48CS HL:1", "SideStyle")="Smooth Side"
Parameter("Alum Side 22x48CS HL:1", "CS_Height")=Side_Height
C_IsActive("Alum Side 22x48RS HL:1", True)
Parameter("Alum Side 22x48RS HL:1", "SideStyle")="Smooth Side"
Parameter("Alum Side 22x48RS HL:1", "RS_Height")=Side_Height
Parameter("Tail Gate Assy:1", "Tailgate_Style")="High Lift"
Parameter("Tail Gate Assy:1", "Tailgate_Height")=Side_Height
Parameter("Bulkhead:1", "Bulkhead_Height")=Side_Height
SelectCaseSide_Height
Case48 in, 54 in, 60 in, 66 in, 72 in
Parameter("IN-027:1", "Hoist_Box_Height")=Side_Height-4 in
Case78 in, 84 in, 90 in, 96 in, 102 in
Parameter("IN-027:1", "Hoist_Box_Height")=72 in
EndSelect
EndIf
IfSide_Style="Smooth Straight HL"Then
C_IsActive("Alum Side 22x48CS S:1", True)
Parameter("Alum Side 22x48RS S:1", "Side_Style")="Smooth Side"
C_IsActive("Alum Side 22x48RS S:1", True)
Parameter("Alum Side 22x48RS S:1", "Side_Style")="Smooth Side"
Parameter("Alum Side 22x48CS S:1", "CS_Length")=Trailer_Length
Parameter("Alum Side 22x48RS S:1", "RS_Length")=Trailer_Length
Parameter("AD Floor Complete-CP:1", "AD_Floor_Length")=Trailer_Length
EndIf
'Posted Tapered Side Options for Height & Length
IfSide_Style="Posted Tapered"Then
C_IsActive("Alum Side 22x48CS S:1", False)
C_IsActive("Alum Side 22x48RS S:1", False)
C_IsActive("AD Tapered 22x48 PRSide:1", True)
C_IsActive("17T Rear Post RS:1", True)
Parameter("AD Tapered 22x48 PRSide:1", "Side_Style")="Posted Side"
C_IsActive("AD Tapered 22x48 PCSide:1", True)
C_IsActive("17T Rear Post CS:1", True)
Parameter("AD Tapered 22x48 PCSide:1", "Side_Style")="Posted Side"
C_IsActive("Alum Side 22x48CS PBDG:1", False)
C_IsActive("Alum Side 22x48RS PBDG:1", False)
C_IsActive("Alum Side 22x48RS HL:1", False)
C_IsActive("Alum Side 22x48CS HL:1", False)
C_IsActive("Alum Side 22x48RS Tapered HL:1", False)
C_IsActive("Alum Side 22x48CS Tapered HL:1", False)
C_IsActive("Tail Gate Assy:1", False)
C_IsActive("TAIL-GATE-ASSY:1", True)
C_IsActive("TR Angle:1", False)
C_IsActive("TR Angle:2", False)
C_IsActive("TR Angle TG:1", False)
Constraint.IsActive("Mate:56")= True
Constraint.IsActive("Angle:6")= True
Constraint.IsActive("Mate:54")= True
Constraint.IsActive("Angle:5")= True
Constraint.IsActive("Angle:7")= False
Constraint.IsActive("Flush:36")= False
Constraint.IsActive("Mate:58")= False
RuleParametersOutput()
InventorVb.DocumentUpdate()
EndIf
IfSide_Style="Posted Tapered"Then
C_IsActive("AD Tapered 22x48 PRSide:1", True)
Parameter("AD Tapered 22x48 PRSide:1", "Side_Style")="Posted Side"
Parameter("AD Tapered 22x48 PRSide:1", "TPRS_height")=Side_Height
C_IsActive("AD Tapered 22x48 PCSide:1", True)
Parameter("AD Tapered 22x48 PCSide:1", "Side_Style")="Posted Side"
Parameter("AD Tapered 22x48 PCSide:1", "TPCS_height")=Side_Height
Parameter("TAIL-GATE-ASSY:1", "Tailgate_Style")="Standard"
Parameter("TAIL-GATE-ASSY:1", "Tailgate_Height")=Side_Height
Parameter("Bulkhead:1", "Bulkhead_Height")=Side_Height
SelectCaseSide_Height
Case48 in, 54 in, 60 in, 66 in, 72 in
Parameter("IN-027:1", "Hoist_Box_Height")=Side_Height-4 in
Case78 in, 84 in, 90 in, 96 in, 102 in
Parameter("IN-027:1", "Hoist_Box_Height")=72 in
EndSelect
EndIf
IfSide_Style="Smooth Straight HL"Then
C_IsActive("AD Tapered 22x48 PRSide:1", True)
Parameter("AD Tapered 22x48 PRSide:1", "Side_Style")="Posted Side"
Parameter("AD Tapered 22x48 PRSide:1", "TPRS_length")=Trailer_Length
C_IsActive("AD Tapered 22x48 PCSide:1", True)
Parameter("AD Tapered 22x48 PCSide:1", "Side_Style")="Posted Side"
Parameter("AD Tapered 22x48 PCSide:1", "TPCS_length")=Trailer_Length
Parameter("AD Floor Complete-CP:1", "AD_Floor_Length")=Trailer_Length
EndIf
'Smooth Tapered Side Options for Height & Length
IfSide_Style="Smooth Tapered"Then
C_IsActive("Alum Side 22x48CS S:1", False)
C_IsActive("Alum Side 22x48RS S:1", False)
C_IsActive("AD Tapered 22x48 PRSide:1", True)
C_IsActive("17T Rear Post RS:1", True)
Parameter("AD Tapered 22x48 PRSide:1", "Side_Style")="Smooth Side"
C_IsActive("AD Tapered 22x48 PCSide:1", True)
C_IsActive("17T Rear Post CS:1", True)
Parameter("AD Tapered 22x48 PCSide:1", "Side_Style")="Smooth Side"
C_IsActive("Alum Side 22x48CS PBDG:1", False)
C_IsActive("Alum Side 22x48RS PBDG:1", False)
C_IsActive("Alum Side 22x48RS HL:1", False)
C_IsActive("Alum Side 22x48CS HL:1", False)
C_IsActive("Alum Side 22x48RS Tapered HL:1", False)
C_IsActive("Alum Side 22x48CS Tapered HL:1", False)
C_IsActive("Tail Gate Assy:1", True)
C_IsActive("TR Angle TG:1", False)
C_IsActive("TR Angle:1", False)
C_IsActive("TR Angle:2", False)
Constraint.IsActive("Flush:37")= False
Constraint.IsActive("Mate:59")= False
Constraint.IsActive("Angle:4")= False
Constraint.IsActive("Mate:51")= False
Constraint.IsActive("Mate:52")= False
Constraint.IsActive("Mate:21")= False
Constraint.IsActive("Angle:4")= False
Constraint.IsActive("Mate:56")= True
Constraint.IsActive("Angle:6")= True
C_IsActive("TAIL-GATE-ASSY:1")= False
RuleParametersOutput()
InventorVb.DocumentUpdate()
EndIf
IfSide_Style="Posted Tapered"Then
C_IsActive("AD Tapered 22x48 PRSide:1", True)
Parameter("AD Tapered 22x48 PRSide:1", "Side_Style")="Smooth Side"
Parameter("AD Tapered 22x48 PRSide:1", "TPRS_height")=Side_Height
C_IsActive("AD Tapered 22x48 PCSide:1", True)
Parameter("AD Tapered 22x48 PCSide:1", "Side_Style")="Smooth Side"
Parameter("AD Tapered 22x48 PCSide:1", "TPCS_height")=Side_Height
Parameter("Tail Gate Assy:1", "Tailgate_Style")=("Standard")
Parameter("Tail Gate Assy:1", "Tailgate_Height")=Side_Height
Parameter("Bulkhead:1", "Bulkhead_Height")=Side_Height
SelectCaseSide_Height
Case48 in, 54 in, 60 in, 66 in, 72 in
Parameter("IN-027:1", "Hoist_Box_Height")=Side_Height-4 in
Case78 in, 84 in, 90 in, 96 in, 102 in
Parameter("IN-027:1", "Hoist_Box_Height")=72 in
EndSelect
EndIf
IfSide_Style="Smooth Tapered"Then
C_IsActive("AD Tapered 22x48 PRSide:1", True)
Parameter("AD Tapered 22x48 PRSide:1", "Side_Style")="Smooth Side"
C_IsActive("AD Tapered 22x48 PCSide:1", True)
Parameter("AD Tapered 22x48 PCSide:1", "Side_Style")="Smooth Side"
Parameter("AD Tapered 22x48 PCSide:1", "TPCS_length")=Trailer_Length
Parameter("AD Tapered 22x48 PRSide:1", "TPRS_length")=Trailer_Length
Parameter("AD Floor Complete-CP:1", "AD_Floor_Length")=Trailer_Length
EndIf
'Posted Tapered HL Side Options for Height & Length
IfSide_Style="Posted Tapered HL"Then
C_IsActive("Alum Side 22x48CS Tapered HL:1", True)
C_IsActive("17T Rear Post CS:1", True)
Parameter("Alum Side 22x48CS Tapered HL:1", "SideStyle")="Posted Side"
C_IsActive("Alum Side 22x48RS Tapered HL:1", True)
C_IsActive("17T Rear Post RS:1", True)
Parameter("Alum Side 22x48RS Tapered HL:1", "SideStyle")="Posted Side"
C_IsActive("Alum Side 22x48CS S:1", False)
C_IsActive("Alum Side 22x48RS S:1", False)
C_IsActive("AD Tapered 22x48 PRSide:1", False)
C_IsActive("AD Tapered 22x48 PCSide:1", False)
C_IsActive("Alum Side 22x48CS PBDG:1", False)
C_IsActive("Alum Side 22x48RS PBDG:1", False)
C_IsActive("Alum Side 22x48RS HL:1", False)
C_IsActive("Alum Side 22x48CS HL:1", False)
C_IsActive("Alum Side 22x48RS Tapered HL:1", False)
C_IsActive("Alum Side 22x48CS Tapered HL:1", False)
C_IsActive("Tail Gate Assy:1", False)
C_IsActive("TAIL-GATE-ASSY:1", True)
Parameter("TAIL-GATE-ASSY:1", "Tailgate_Style")="High Lift Tailgate"
C_IsActive("TR Angle:1", False)
C_IsActive("TR Angle:2", False)
C_IsActive("TR Angle TG:1", False)
Constraint.IsActive("Mate:56")= True
Constraint.IsActive("Angle:6")= True
Constraint.IsActive("Mate:54")= True
Constraint.IsActive("Angle:5")= True
Constraint.IsActive("Angle:7")= False
Constraint.IsActive("Flush:36")= False
Constraint.IsActive("Mate:58")= False
RuleParametersOutput()
InventorVb.DocumentUpdate()
EndIf
IfSide_Style="Posted Tapered HL"Then
C_IsActive("Alum Side 22x48CS Tapered HL:1", True)
Parameter("Alum Side 22x48CS Tapered HL:1", "SideStyle")="Posted Tapered Side HL"
Parameter("AD Tapered 22x48 PRSide:1", "TPRS_height")=Side_Height
C_IsActive("Alum Side 22x48RS Tapered HL:1", True)
Parameter("Alum Side 22x48RS Tapered HL:1", "SideStyle")="Posted Tapered Side HL"
Parameter("AD Tapered 22x48 PCSide:1", "TPCS_height")=Side_Height
Parameter("TAIL-GATE-ASSY:1", "Tailgate_Style")="High Lift Tailgate"
Parameter("TAIL-GATE-ASSY:1", "Tailgate_Height")=Side_Height
Parameter("Bulkhead:1", "Bulkhead_Height")=Side_Height
SelectCaseSide_Height
Case48 in, 54 in, 60 in, 66 in, 72 in
Parameter("IN-027:1", "Hoist_Box_Height")=Side_Height-4 in
Case78 in, 84 in, 90 in, 96 in, 102 in
Parameter("IN-027:1", "Hoist_Box_Height")=72 in
EndSelect
EndIf
IfSide_Style="Posted Tapered HL"Then
C_IsActive("Alum Side 22x48RS Tapered HL:1", True)
Parameter("Alum Side 22x48RS Tapered HL:1", "SideStyle")="Posted Tapered Side HL"
Parameter("Alum Side 22x48RS Tapered HL:1", "RS_Length")=Trailer_Length
C_IsActive("Alum Side 22x48CS Tapered HL:1", True)
Parameter("Alum Side 22x48CS Tapered HL:1", "SideStyle")="Posted Tapered Side HL"
Parameter("Alum Side 22x48CS Tapered HL:1", "CS_Length")=Trailer_Length
Parameter("AD Floor Complete-CP:1", "AD_Floor_Length")=Trailer_Length
EndIf
'Smooth Tapered Side Options for Height & Length
IfSide_Style="Smooth Tapered HL"Then
C_IsActive("Alum Side 22x48RS Tapered HL:1", True)
C_IsActive("17T Rear Post RS:1", True)
Parameter("Alum Side 22x48RS Tapered HL:1", "SideStyle")="Smooth Tapered Side HL"
C_IsActive("Alum Side 22x48CS Tapered HL:1", True)
C_IsActive("17T Rear Post CS:1", True)
Parameter("Alum Side 22x48CS Tapered HL:1", "SideStyle")="Smooth Tapered Side HL"
C_IsActive("Alum Side 22x48CS S:1", False)
C_IsActive("Alum Side 22x48RS S:1", False)
C_IsActive("AD Tapered 22x48 PRSide:1", True)
C_IsActive("AD Tapered 22x48 PCSide:1", True)
C_IsActive("Alum Side 22x48CS PBDG:1", False)
C_IsActive("Alum Side 22x48RS PBDG:1", False)
C_IsActive("Alum Side 22x48RS HL:1", False)
C_IsActive("Alum Side 22x48CS HL:1", False)
C_IsActive("Alum Side 22x48RS Tapered HL:1", False)
C_IsActive("Alum Side 22x48CS Tapered HL:1", False)
C_IsActive("Tail Gate Assy:1", True)
Parameter("Tail Gate Assy:1", "Tailgate_Style")="High Lift Tailgate"
C_IsActive("TR Angle TG:1", False)
C_IsActive("TR Angle:1", False)
C_IsActive("TR Angle:2", False)
Constraint.IsActive("Flush:37")= False
Constraint.IsActive("Mate:59")= False
Constraint.IsActive("Angle:4")= False
Constraint.IsActive("Mate:51")= False
Constraint.IsActive("Mate:52")= False
Constraint.IsActive("Mate:21")= False
Constraint.IsActive("Angle:4")= False
Constraint.IsActive("Mate:56")= True
Constraint.IsActive("Angle:6")= True
C_IsActive("TAIL-GATE-ASSY:1", False)
RuleParametersOutput()
InventorVb.DocumentUpdate()
EndIf
IfSide_Style="Smooth Tapered HL"Then
C_IsActive("Alum Side 22x48RS Tapered HL:1", True)
Parameter("Alum Side 22x48RS Tapered HL:1", "SideStyle")="Smooth Tapered Side HL"
Parameter("Alum Side 22x48RS Tapered HL:1", "RS_Height")=Side_Height
C_IsActive("Alum Side 22x48CS Tapered HL:1", True)
Parameter("Alum Side 22x48CS Tapered HL:1", "SideStyle")="Smooth Tapered Side HL"
Parameter("Alum Side 22x48CS Tapered HL:1", "CS_Height")=Side_Height