search

BartPermentier / al-toolbox

Adds Features to the AL Language Extension
MIT License
13 stars 9 forks source link

rUpgradeFunctionDatabase snippets sets upgrade tags incorrectly #123

Closed dsaveyn closed 8 months ago

dsaveyn commented 8 months ago

Current

    internal procedure UpgradeFeature1()
    var
        UpgradeTag: Codeunit "Upgrade Tag";
    begin
        if UpgradeTag.HasUpgradeTag(ReturnFeature1UpgradeTag()) then
            exit;

        ...     

        UpgradeTag.SetUpgradeTag(ReturnFeature1UpgradeTag());
    end;

Desired:

    internal procedure UpgradeFeature2()
    var
        UpgradeTag: Codeunit "Upgrade Tag";
    begin
        if UpgradeTag.HasUpgradeTag(ReturnFeature2UpgradeTag(), '') then
            exit;
        ...             
        UpgradeTag.SetDatabaseUpgradeTag(ReturnFeature2UpgradeTag());
    end;