ernestasjuska

codeunit 50100 "MY Event Subscribers"
{
    [EventSubscriber(ObjectType::Codeunit, Codeunit::GlobalTriggerManagement, 'OnAfterGetDatabaseTableTriggerSetup', '', false, false)]
    local procedure GetSetup(TableId: Integer; var OnDatabaseInsert: Boolean; var OnDatabaseModify: Boolean; var OnDatabaseDelete: Boolean; var OnDatabaseRename: Boolean)
    var
        ActiveSession: Record "Active Session";
    begin
        if TableId = Database::"MY Tag A" then
            OnDatabaseInsert := true;

ernestasjuska

We currently have to use separate codebases to support different BC versions. This usually is done using Git branches.

Most of the code does not depend on platform version - for example table definition in BC22 is the pretty much matches one in BC19, same for other object types. The differences in code are only because platform has different functionality or application has different functionality. These differences could be processed using preprocessor directives but in current form they not really useful.

There needs to be a way to define several compiler configurations (maybe in app.json file), e.g:

  "targets": {
    "BC21CU5": { // for example some new functionality was added here
      "runtime": "10.0", // mandatory property

ernestasjuska

\n        key\(Key(?!1;).*\n.*(\n            .*)*\n        \}

ernestasjuska

\n        field\(.*\n.*\n(            .*\n)*            FieldClass = Flow(Field|Filter);(\n            .*)*\n        \}

ernestasjuska

codeunit 99999 "My Global State"
{
    SingleInstance = true;

    var
        LastOperationId: Guid;
        AllowSmth: Boolean;

    local procedure UpdateState(CurrentOperationId: Guid)
    begin

ernestasjuska

$XsdFileName = 'C:\Git\softera-baltic\eCom\eCom.DocuBank\camt.053.001.02.xsd'
$Prefix = 'tns'
$Tab = '  '
$ThemeName = 'Light'

Set-StrictMode -Version Latest
$ErrorActionPreference = 'Stop'

$Themes = @{
    Dark = @{

ernestasjuska

pageextension 50149 CustomerListExt extends "Customer List"
{
    /* BC16 >> */

    trigger OnOpenPage();
    var
        ApplicationObjectMetadata: Record "Application Object Metadata";
        MyCodeunit: Codeunit "My Codeunit";
        BlobStream: InStream;
        UserAlCodeText: Text;