Delphi в VB6

Одна и та же процедура, написанная руками на Delphi и на VB6. Она здесь, чтобы вы увидели, что меняется, а что остаётся, до того как кто-то назовёт вам цену.

Что у вас есть · Delphi

function Interest(Balance, Rate: Currency): Currency;
begin
  Result := RoundTo(Balance * Rate, -2);
end;

Во что это превращается · VB6

Public Function Interest(ByVal Balance As Currency, _
                         ByVal Rate As Double) As Currency
    Interest = Round(Balance * Rate, 2)
End Function

Одна процедура: остаток умножить на ставку, округлить до копейки. На обоих языках её писал человек, инструмент тут ни при чём. Ваш файл длиннее, и в нём происходит больше, в этом и дело.

Прочитать два файла рядом легко. Трудное начинается дальше, в остальной системе: какие файлы уже никто не вызывает, какое задание пишет в 02:00 запись, которую потом читает другое, и выдаёт ли переписанная версия те же числа, которые ваши аудиторы видели в прошлом месяце. Эта работа идёт на нашей платформе под присмотром инженера и начинается с того, что мы смотрим вашу кодовую базу.

Когда конвертера перестаёт хватать

Сравнить два файла легко. Ничто на этой странице не скажет вам, какие файлы уже никто не вызывает, какое батч-задание пишет в 02:00 запись, которую потом читает другое, и выдаёт ли переписанная версия те же числа, которые ваши аудиторы видели в прошлом месяце. На это отвечает аудит по вашей настоящей кодовой базе.

Запросить карту системы