Delphi nach RPG

Dieselbe Routine, von Hand geschrieben in Delphi und in RPG. Sie steht hier, damit Sie sehen, was sich ändert und was nicht, bevor Ihnen jemand einen Preis nennt.

Was Sie haben · Delphi

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

Was daraus wird · RPG

**free
dcl-s balance packed(11:2) inz(0);
dcl-s rate    packed(5:4)  inz(0.0425);
dcl-s interest packed(11:2);

interest = %dec(balance * rate : 11 : 2);
dsply ('INTEREST: ' + %char(interest));
*inlr = *on;

Eine Routine: ein Saldo mal ein Zinssatz, auf den Cent gerundet. In beiden Sprachen von einem Menschen geschrieben, nicht von einem Werkzeug erzeugt. Ihre Datei ist länger, und darin passiert mehr. Genau darum geht es.

Zwei Dateien nebeneinander zu lesen ist die leichte Hälfte. Die schwere ist der Rest des Systems: welche Dateien niemand mehr aufruft, welcher Job um 02:00 den Satz schreibt, den ein anderer liest, und ob die neu geschriebene Fassung noch die Zahlen erzeugt, die Ihre Prüfer letzten Monat gesehen haben. Diese Arbeit läuft auf unserer Plattform, unter Aufsicht eines Entwicklers, und sie beginnt mit einem Blick in Ihre Codebasis.

Wann ein Konverter nicht mehr reicht

Zwei Dateien zu vergleichen ist die leichte Hälfte. Nichts auf dieser Seite kann Ihnen sagen, welche Dateien niemand mehr aufruft, welcher Batch-Job um 02:00 den Satz schreibt, den ein anderer liest, oder ob die neu geschriebene Fassung noch die Zahlen erzeugt, die Ihre Prüfer letzten Monat gesehen haben. Die Analyse beantwortet das an Ihrer echten Codebasis.

Systemkarte anfordern