Can you please update from:

OnBeforeCheckBinMaxCubageAndWeight(BinContent, Bin, IsHandled);

To:

OnBeforeCheckBinMaxCubageAndWeight(Rec, Bin, IsHandled);

 local procedure CheckBinMaxCubageAndWeight()

    var

        BinContent: Record "Bin Content";

        WMSMgt: Codeunit "WMS Management";

        TotalCubage: Decimal;

        TotalWeight: Decimal;

        Cubage: Decimal;

        Weight: Decimal;

        IsHandled: Boolean;

    begin

        IsHandled := false;

        OnBeforeCheckBinMaxCubageAndWeight(BinContent, Bin, IsHandled);

        if IsHandled then

            exit;