BC: Test- und Echtsystem farblich trennen
Verfasst: 17. Januar 2025 16:19
Um Test- und Echtsystem farblich deutlicher zu trennen als mit den eher dezenten Bordmitteln Company Badge im Webclient (erst ab BC 15 verfügbar ) bzw. System Indicator im Windows Client, hier als Extension für Page 22, damit beim Testsystem die erste Spalte in roter Schrift erscheint. Analog kann man die primären Mastertabellen Kreditoren-,Artikel-Kontenübersicht usw. versorgen, sofern man die gewünschte Farbe der StyleExpr (hier als Style Unfavorable, also in rot) nicht anderweitig benötigt.
In Tabelle Company Information das Feld "System Usage" dazu vorher einbauen.
In Tabelle Company Information das Feld "System Usage" dazu vorher einbauen.
- Code:
pageextension 50056 CustomerPageExt extends "Customer List"
{
layout
{
modify("No.")
{
ApplicationArea = All;
StyleExpr = StyleExprTestProd;
}
}
trigger OnOpenPage()
begin
CompanyInformation.get();
end;
trigger OnAfterGetRecord()
begin
if CompanyInformation."System Usage" = CompanyInformation."System Usage"::Test then
StyleExprTestProd := 'Unfavorable'
else
StyleExprTestProd := 'Standard';
end;
var
CompanyInformation: Record "Company information";
StyleExprTestProd: Text;
}