Form Methods for tag
Class Declaration method
public class FormRun extends ObjectRun
{
InventTransReference inventTransReference;
InventDimCtrl_Frm_ActiveRightClick inventDimFormSetup;
FormRun formRun;
}
public boolean canClose()
{
boolean ret;
EAMTag tag;
EAMEquipment eamEquipments;
// EAMEquipmentWarranty EquipmentWarranty;
EAMEquipmentindividualitems equipmentComponent;
;
ret = super();
while select tag
{
if(tag.NextLevel==NoYes::No)
{
while select eamEquipments
{
if(eamEquipments.Interchangeindicator==NoYes::Yes)
{
select count(Number) from equipmentComponent
where equipmentComponent.Number==eamEquipments.Number;
if(str2int(equipmentComponent.Number)<=0)
{
error(strfmt("@EAM14577","@SYS5437"+"@EAM70004","@EAM10190",eamEquipments.Number));
ret = false;
}
}
}
}
}
public void init()
{
EAMParameters eamParameters;
super();
select firstonly eamParameters;
if(eamParameters.EquipmentHierarchy==NoYes::Yes)
{
throw error("@EAM15586");
}
element.updateDesign(InventDimFormDesignUpdate::Init);
eamTag_ds.active();
}
Object inventDimSetupObject()
{
return inventDimFormSetup;
}
void updateDesign(InventDimFormDesignUpdate mode)
{
InventDimParm inventDimParm;
switch (mode)
{
case InventDimFormDesignUpdate::Init :
InventDimSetupGrid::initInventDimParmInventTrans(inventDimParm);
if (!inventDimFormSetup)
inventDimFormSetup = InventDimCtrl_Frm_ActiveRightClick::newFromForm(element);
inventDimFormSetup.parmDimParmVisibleGrid(inventDimParm);
inventDimFormSetup.formSetControls(true);
}
}