Skip to content

Commit

Permalink
move preset fields to bottom
Browse files Browse the repository at this point in the history
  • Loading branch information
Drakonian committed Jul 4, 2024
1 parent cf530ee commit a181f4f
Show file tree
Hide file tree
Showing 3 changed files with 32 additions and 32 deletions.
62 changes: 31 additions & 31 deletions Pages/Pag81001.DETDataEditor.al
Original file line number Diff line number Diff line change
Expand Up @@ -13,37 +13,6 @@ page 81001 "DET Data Editor"
{
group(General)
{
field(PresetCodeField; PresetCode)
{
ApplicationArea = All;
ToolTip = 'Preset';
Caption = 'Preset';

trigger OnLookup(var Text: Text): Boolean
var
QueryPreset: Record "DET Query Preset";
QueryPresetList: Page "DET Query Preset";
begin
QueryPresetList.LookupMode(true);
if (QueryPresetList.RunModal() in [Action::LookupOK, Action::OK]) then begin
QueryPresetList.GetRecord(QueryPreset);
PresetCode := QueryPreset.Code;
EnteredQueryPresetCode(PresetCode);
end;
end;

trigger OnValidate()
begin
EnteredQueryPresetCode(PresetCode);
end;
}
field(PresetNameField; PresetName)
{
ApplicationArea = All;
ToolTip = 'Preset Name';
Caption = 'Preset Name';
Editable = false;
}
field(SourceTableNoField; SourceTableNo)
{
ApplicationArea = All;
Expand Down Expand Up @@ -141,6 +110,37 @@ page 81001 "DET Data Editor"
SetDirty();
end;
}
field(PresetCodeField; PresetCode)
{
ApplicationArea = All;
ToolTip = 'Preset';
Caption = 'Preset';

trigger OnLookup(var Text: Text): Boolean
var
QueryPreset: Record "DET Query Preset";
QueryPresetList: Page "DET Query Preset";
begin
QueryPresetList.LookupMode(true);
if (QueryPresetList.RunModal() in [Action::LookupOK, Action::OK]) then begin
QueryPresetList.GetRecord(QueryPreset);
PresetCode := QueryPreset.Code;
EnteredQueryPresetCode(PresetCode);
end;
end;

trigger OnValidate()
begin
EnteredQueryPresetCode(PresetCode);
end;
}
field(PresetNameField; PresetName)
{
ApplicationArea = All;
ToolTip = 'Preset Name';
Caption = 'Preset Name';
Editable = false;
}
field(SavePresetField; SavePreset)
{
ApplicationArea = All;
Expand Down
Binary file not shown.
2 changes: 1 addition & 1 deletion app.json
Original file line number Diff line number Diff line change
Expand Up @@ -2,7 +2,7 @@
"id": "e28d62da-ceb0-46e7-9e06-774bc46f4bac",
"name": "Data Editor Tool",
"publisher": "Volodymyr Dvernytskyi",
"version": "2.0.1.5",
"version": "2.0.1.6",
"brief": "https://vld-nav.com/",
"description": "https://vld-nav.com/",
"privacyStatement": "https://vld-nav.com/",
Expand Down

0 comments on commit a181f4f

Please sign in to comment.