pageextension 50118 CustomerCardExt extends "Customer Card"
{
layout
{
addafter(Name)
{
field(ShortDescription; ShortDescription)
{
Caption = 'Short Description';
ApplicationArea = All;
trigger OnLookup(var Text: Text): Boolean
var
LabBook: Record "Lab Book";
begin
LabBook.Reset();
if Page.RunModal(Page::"Lab Book List", LabBook) = Action::LookupOK then
ShortDescription := LabBook."Short Description";
end;
}
}
}
var
ShortDescription: Text[100];
}
table 50100 "Lab Book"
{
DataClassification = CustomerContent;
fields
{
field(1; "No."; Code[10])
{
Caption = 'No.';
DataClassification = CustomerContent;
}
field(2; Title; Text[30])
{
Caption = 'Title';
DataClassification = CustomerContent;
}
field(3; Author; Text[30])
{
Caption = 'Author';
DataClassification = CustomerContent;
}
field(4; Hardcover; Boolean)
{
Caption = 'Hardcover';
DataClassification = CustomerContent;
}
field(5; "Page Count"; Integer)
{
Caption = 'Page Count';
DataClassification = CustomerContent;
}
field(6; "Short Description"; Text[250])
{
Caption = 'Short Description';
DataClassification = CustomerContent;
}
}
keys
{
key(PK; "No.")
{
Clustered = true;
}
}
fieldgroups
{
fieldgroup(Brick; "No.", Title, Author, "Short Description")
{
}
}
}
page 50111 "Lab Book List"
{
PageType = Worksheet;
UsageCategory = Lists;
ApplicationArea = All;
SourceTable = "Lab Book";
Caption = 'Book List';
layout
{
area(Content)
{
repeater(Group)
{
field("No."; Rec."No.")
{
}
field(Title; Rec.Title)
{
}
field(Author; Rec.Author)
{
}
field(Hardcover; Rec.Hardcover)
{
}
field("Short Description"; Rec."Short Description")
{
}
field("Page Count"; Rec."Page Count")
{
}
}
}
}
}
André Arnaud de Cal...
291,965
Super User 2025 Season 1
Martin Dráb
230,836
Most Valuable Professional
nmaenpaa
101,156