COBOL nach VB6
Dieselbe Routine, von Hand geschrieben in COBOL und in VB6. Sie steht hier, damit Sie sehen, was sich ändert und was nicht, bevor Ihnen jemand einen Preis nennt.
Was Sie haben · COBOL
IDENTIFICATION DIVISION.
PROGRAM-ID. INTEREST.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-BALANCE PIC S9(9)V99 COMP-3 VALUE 0.
01 WS-RATE PIC S9(1)V9(4) COMP-3 VALUE 0.0425.
01 WS-INTEREST PIC S9(9)V99 COMP-3.
PROCEDURE DIVISION.
COMPUTE WS-INTEREST ROUNDED = WS-BALANCE * WS-RATE
DISPLAY 'INTEREST: ' WS-INTEREST
STOP RUN.Was daraus wird · VB6
Public Function Interest(ByVal Balance As Currency, _
ByVal Rate As Double) As Currency
Interest = Round(Balance * Rate, 2)
End FunctionUnten steht eine Routine in beiden Sprachen. In einem echten System läuft derselbe Umzug über den ganzen Baum auf einmal: Unsere Plattform liest jede Sprache darin parallel, baut den Abhängigkeitsgraphen, und ein Entwickler legt die Grenzen fest, an denen geschnitten wird. Eine Million Zeilen ist für diese Arbeit die übliche Größe, und in dreißig Tagen ist sie fertig.
So sieht das auf Ihrem ganzen System aus
Auf Ihrer echten Codebasis beantwortet derselbe Umzug die Fragen, die ein Dateipaar offenlässt: welche Dateien niemand mehr aufruft, welcher Batch-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. Die Analyse bringt alle drei Antworten mit, in drei bis fünf Tagen.