Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
karram
in reply to: Anonymous

'setting ExcelFile to be the one that exists in the workspace
ExcelFile =ThisDoc.WorkspacePath & "\" & "Nozzle_table.xls"

'finding the row number according to custom property: "Nozzle_ID"
GoExcel.FindRow(ExcelFile, "Nozzle_table","NOZZLE", "=", iProperties.Value("Custom", "Nozzle_ID"))

'getting the values for the nozzle list
iProperties.Value("Custom", "Nozzle_DESCR") = GoExcel.CurrentRowValue("DESCRIPTION")
iProperties.Value("Custom", "Nozzle_CODE") = GoExcel.CurrentRowValue("CODE")
iProperties.Value("Custom", "Nozzle_TYPE") = GoExcel.CurrentRowValue("NOZZLE TYPE")
iProperties.Value("Custom", "Nozzle_SIZE") = GoExcel.CurrentRowValue("LIST SIZE") 
iProperties.Value("Custom", "Nozzle_RATING") = GoExcel.CurrentRowValue("LIST RATING")
iProperties.Value("Custom", "Nozzle_COMMENT") = GoExcel.CurrentRowValue("COMMENT")

'getting the values for the nozzle dimensions and placing
Diameter_Excel=GoExcel.CurrentRowValue("SIZE (ACT.)")
Connection_thickness = GoExcel.CurrentRowValue("THICKNESS")
Dist_FR_XYplane_Excel = GoExcel.CurrentRowValue("DIST. FR. XY-PLANE")
Dist1_FR_Zaxis_Excel = GoExcel.CurrentRowValue("DIST1. FR. Z-AXIS")
Dist2_FR_Zaxis_Excel = GoExcel.CurrentRowValue("DIST2. FR. Z-AXIS")
Course_Excel = GoExcel.CurrentRowValue("COURSE") 
Direction_Excel=GoExcel.CurrentRowValue("DIRECTION")

iLogicVb.UpdateWhenDone = True

iLogicVb.RunRule("Nozzle balloon")