I have a problem on this, i need to populate the product number on EcoResproductCreate form automatically, upon clicking new button.
////// /// /// [PreHandlerFor(formStr(EcoResProductCreate), formMethodStr(EcoResProductCreate, init))] public static void EcoResProductCreate_Pre_init(XppPrePostArgs args) { str Chem; str Tin; str dimensionwork; //table EcoResProduct EcoResProduct; //objects tccpEventscenario6 tccpEventscenario6 = new tccpEventscenario6(); EcoResProductNumberBuilder EcoResProductNumberBuilder = new EcoResProductNumberBuilder(); //number seq for chemical Chem = tccpEventscenario6.chemicalSequence(); //number seq for chemical Tin = tccpEventscenario6.tinCanSequence(); dimensionwork = tccpEventscenario6.getWorkerFinDimension(); if (dimensionwork == '069') { //Chemical //number seq for chemical Chem = tccpEventscenario6.chemicalSequence(); info(Chem); EcoResProductNumberBuilder.parmProductNumber(Tin); EcoResProduct.DisplayProductNumber = Tin; } else if (dimensionwork == '202') { //TinCan //number seq for chemical Tin = tccpEventscenario6.tinCanSequence(); info(Tin); EcoResProductNumberBuilder.parmProductNumber(Tin); EcoResProduct.DisplayProductNumber = Tin; } } public str chemicalSequence() { NumberSeq numSeq; tccpChemicalPaint id; ttsbegin; numSeq = NumberSeq::newGetNum(tccpNumSeqClass::tccpChemicalPaint()); id = numSeq.num(); ttscommit; return id; } public str tinCanSequence() { NumberSeq numSeq; tccpTinCan id2; ttsbegin; numSeq = NumberSeq::newGetNum(tccpNumSeqClass_1::tccpTinCan()); id2 = numSeq.num(); ttscommit; return id2; } public str getWorkerFinDimension() { HcmEmployment hcmEmployment; DimensionAttributeValueSetItem setItem; DimensionAttributeValue dimAttrValue; DimensionAttribute dimAttribute; ; dimAttribute = DimensionAttribute::findByName('BusinessUnit'); ttsbegin; select firstonly * from hcmEmployment where hcmEmployment.Worker == HcmWorkerLookup::currentWorker() join RecId, DisplayValue from setItem where setItem.DimensionAttributeValueSet == hcmEmployment.DefaultDimension join dimAttrValue where dimAttrValue.RecId == setItem.DimensionAttributeValue && dimAttrValue.DimensionAttribute == dimAttribute.RecId && dimAttrValue.IsDeleted == false; // info(strFmt("Employee = %1 %2 = %3 ",HcmWorker::find(hcmEmployment.Worker).PersonnelNumber, dimAttribute.Name, setItem.DisplayValue)); ttscommit; return setItem.DisplayValue; }