field(Dim_Val_Tbl; Dimension_Val_Filter)
{
Caption = 'Select Dimension Value';
ApplicationArea = all;
TableRelation = "Dimension Value".Code;
Lookup = true;
trigger OnLookup(var text: Text): Boolean
var
DimensionValue: Record "Dimension Value";
DimensionValuesPage: Page "Dimension Value List";
begin
DimensionValue.SetRange("Dimension Code", Dimension_Filter);
DimensionValue.SetRange("Dimension Value Type", 0);
if DimensionValue.FindSet() then begin
DimensionValuesPage.LOOKUPMODE := true;
DimensionValuesPage.SetTableView(DimensionValue);
if DimensionValuesPage.RunModal() = ACTION::LookupOK then begin
DimensionValuesPage.GetRecord(DimensionValue);
Dimension_Val_Filter := DimensionValue.Code;
end;
end;
end;
}