Init.AtStartUp Init.AtStartUp = false; At startup ;init.atstartup@value; true AXCon = GetSetting("data.navision.connectionstring"); Connections ;axcon@value; true Product.Product@options = GetOptions(Product.Product@localname; true; AXCon; "Item"; "ItemId"; "="; "0.447.756.1"); Retrieve data for Product.Product ;product.product@options; Product.Product.Product <> "" Product.Product.OmschrijvingNL = GetStringValue(AXCon; "EcoResProductTranslation"; "Description"; "Product"; "="; Product.Product.Product; "LanguageID" "="; "nl-be"); Product.Product.OmschrijvingFR = GetStringValue(AXCon; "EcoResProductTranslation"; "Description"; "Product"; "="; Product.Product.Product; "LanguageID" "="; "fr"); Descriptions ;product.product.omschrijvingnl@value;product.product.omschrijvingfr@value; true local double lSumLengths; index l of Length; lSumLengths = lSumLengths + Length(l).Length; end index; TotalLength = lSumLengths; Total length ;totallength@value; TotalLength > Product.Product.Width "Total length is greater than the product length" Validation1 ; true ItemId = "9.660.418.5"; Item ;itemid@value; true if ADUConfigVariant.ConfigVariantId == "" then ADUConfigVariant.ConfigVariantId = NewID(); end if; ADUConfigVariant.ItemId = ItemId; ADUConfigVariant.EConObjectID = CLng(GetArg("saveas")); ADUConfigVariant.ProductName = "Test"; ADU Config variant ID ;aduconfigvariant.configvariantid@value;aduconfigvariant.itemid@value;aduconfigvariant.econobjectid@value;aduconfigvariant.productname@value; true local long lLine; local string lID = ""; lLine = RemovePosition(ADUConfigVariant.BOMLine@localname; ADUConfigVariant.BOMLine[1].ID@id; lID); index l of ADUConfigVariant.BOMLine; ADUConfigVariant.BOMLine(l)@repeat = false; ADUConfigVariant.BOMLine(l).BOMLine = l; end index; ADU BOM line general ; true local long lLine; local string lID = "GeselecteerdeArtikel"; lLine = AddPosition(ADUConfigVariant.BOMLine@localname; ADUConfigVariant.BOMLine[1].ID@id; lID); ADUConfigVariant.BOMLine(lLine).ID = lID; ADUConfigVariant.BOMLine(lLine).ItemId = Product.Product.ItemId; ADUConfigVariant.BOMLine(lLine).BOMQty = 1; Gekozen artikel ;aduconfigvariant.bomline[1].id@value;aduconfigvariant.bomline[1].itemid@value;aduconfigvariant.bomline[1].bomqty@value; true local long lLine; local string lID = "Zaagkosten"; lLine = AddPosition(ADUConfigVariant.BOMLine@localname; ADUConfigVariant.BOMLine[1].ID@id; lID); ADUConfigVariant.BOMLine(lLine).ID = lID; ADUConfigVariant.BOMLine(lLine).ItemId = "9.931.080.17"; ADUConfigVariant.BOMLine(lLine).BOMQty = Length@length; Zaagkosten ;aduconfigvariant.bomline[1].id@value;aduconfigvariant.bomline[1].itemid@value;aduconfigvariant.bomline[1].bomqty@value; true local long lLine; local string lID = ""; lLine = RemovePosition(ADUConfigVariant.Description@localname; ADUConfigVariant.Description[1].ID@id; lID); index l of ADUConfigVariant.Description; ADUConfigVariant.Description(l)@repeat = false; end index; ADU Descriptions ; true local long lLine; local string lID = "Nederlands"; lLine = AddPosition(ADUConfigVariant.Description@localname; ADUConfigVariant.Description[1].ID@id; lID); ADUConfigVariant.Description(lLine).ID = lID; ADUConfigVariant.Description(lLine).LanguageID = "NL-BE"; ADUConfigVariant.Description(lLine).Description = "Nederlandse tekst"; ADUConfigVariant.Description(lLine).Name = Product.Product.ProductName; Nederlands ;aduconfigvariant.description[1].id@value;aduconfigvariant.description[1].languageid@value;aduconfigvariant.description[1].description@value;aduconfigvariant.description[1].name@value; true local long lLine; local string lID = "Frans"; lLine = AddPosition(ADUConfigVariant.Description@localname; ADUConfigVariant.Description[1].ID@id; lID); ADUConfigVariant.Description(lLine).ID = lID; ADUConfigVariant.Description(lLine).LanguageID = "FR-BE"; ADUConfigVariant.Description(lLine).Description = "Franse tekst"; ADUConfigVariant.Description(lLine).Name = Product.Product.ProductName; Frans ;aduconfigvariant.description[1].id@value;aduconfigvariant.description[1].languageid@value;aduconfigvariant.description[1].description@value;aduconfigvariant.description[1].name@value;