Ispirer MnMTK ist das Tool für die Anwendungskonvertierung. Dieses Tool kann die Konvertierung von COBOL nach C#.NET automatisch durchführen.
Während der Erarbeitung unser Tools berücksichtigen wir die Anforderungen der Kunden um die besten Konvertierungsergebnisse zu erreichen.
Unser technishes Team hat viele Erfahrung und immer findet die innovativen Lösungen zu den komplizierten Problemen.
Diese Demo zeigt, wie Ispirer MnMTK 2015 COBOL nach C#.NET konvertieren kann.
Warum Ispirer MnMTK
Unsere Vorteile:
- Hochqualifiziertes Team: unsere Experten haben viele Erfahrung in den Migrationsprojekten und können Migrationen auf jeden Schwierigkeitsgrad durchführen.
- Kundenorientierung: wir personalisieren das Tool gemäß der Anforderungen von den Kunden. Die Erweiterung des Tools nimmt 1-2 Tage in Anspruch;
- Online-Meeting: es gibt die Möglichkeit Online-Meetings zu vereinbaren, während dessen unser Team den Konvertierungsprozess Ihnen demonstrieren kann;
- Projektbezogene Preise: die Preise hängen von der Größe des Projektes ab; wir bieten eine Reihe von Optionen an, damit Sie am besten passende Option wählen können;
- Optimierte Konvertierung: nach der Konvertierung bekommen Sie den komplett funktionellen Code.
Ispirer Migrationslösung
COBOL nach C#.NET Anfragen
Bewertungsprozess
Füllen Sie bitte den Fragenbogen, der uns bei der Bewertung helfen wird. Auf der Basis deiser Information können wir Ihnen üngefähres Angebot machen:
Um im Detail über den Bewertungsprozess kennenzulernen, folgen Sie dem Link:
COBOL-Programmstruktur
IDENTIFICATION DIVISION.
PROGRAM-ID. DemoId.
ENVIRONMENT DIVISION.
DATA DIVISION.
PROCEDURE DIVISION.
FIRST-PARAGRAPH.
DISPLAY "First DEMO".
Es gibt 4 Divisionen:
- IDENTIFIZIERUNG TEIL: Hier muss man den Namen des Programms eingeben.
- ENVIRONMENT TEIL: Hier muss man die Dateien, die das Programm braucht, festlegen.
- DATA TEIL: Hier muss man die Variablen, Anschreibungen, Dateien usw erklären.
- PROCEDURE TEIL: Hier muss man das Programm schreiben. Aus dem Beispiel oben ist das alles in einem Absatz. Ein Absatz ist eine Reihe von Aussagen, die durch ein Label benannt sind. Es gibt keine spezifische Markierung auf das Ende eines Absatzes.
Konvertierungsfunktionen
- Migration einer Datenbank von einer COBOL Anwendung nach einer Datenbank MSSQLServer
- Konvertierung vom COBOL Programm in die C# Klassen
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace CobolApplication
{
class DemoId
{
static void Main(string[] args)
{
Console.WriteLine("First DEMO");
}
}
}
Konvertierung der Identifikationsnamen nach "camel case"
Konvertierung einer WORKING-STORAGE Sektion mit Erklärung Variablen nach Klassenvariablen
WORKING-STORAGE SECTION.
01 MY_STRING_1 PIC X(20).
01 MY_STRING_2 PIC X(30).
01 MY_NUMBER PIC 9(2) VALUE 1.
Nach:
private string MyString1;
private string MyString2;
private int MyNumber = 1;
Konvertierung von COBOL Records nach benutzerdefinierten C#-Typen:
MOVE 5 TO MY_NUMBER.
Nach:
MyNumber = 5;
Konvertierung der Anweisungen COBOL MOVE TO/COMPUTE nach C# Assignment-Anweisungen
MOVE 5 TO MY_NUMBER.
Nach:
MyNumber = 5;
Konvertierung der COBOL Sektionen (eine Gruppe von Paragraphen und Anweisungen) nach C# Methoden. Die SEKTION kann mithilfe einer Anweisung PERFORM aufgerufen werden. PERFORM wird nach dem Aufruf der C# Methode konvertiert
DISPLAY-INFORMATION.
DISPLAY DISPLAY 'My Number = ' MY_NUMBER.
Nach:
private void DisplayInformation()
{
Console.WriteLine("My Number = " + MyNumber);
}
Konvertierung der Kontrollstrukturen COBOL nach C# Kontrollstrukturen
IF MY_NUMBER > 5
MOVE 12 TO MY_NUMBER.
Nach:
if (MyNumber > 5)
{
MyNumber = 12;
}
Und
PERFORM UNTIL WS-NUMBER-1 > 100 AND WS-NUMBER-1 < 1000
DISPLAY "Still between 100 and 1000"
END-PERFORM
Nach:
while ((MyNumber > 100) && (MyNumber < 1000))
{
Console.WriteLine("Still between 100 and 1000");
}
Konvertierung der Ausgabe am Bildschirm (DISPLAY Anweisung) nach einer Methode “Console.WriteLine”
Konvertierung der Anweisungen EXEC SQL/ END-EXEC (select, insert, update, delete, CURSOR Anweisungen) auf C# LINQ nach Entities
EXEC SQL
SELECT COUNT(*)
INTO :MY_NUMBER
FROM MY_TABL
WHERE CTR_ID = :MY_STRING_1 AND
MOD_CD = 'ONE'
WITH UR
END-EXEC.
Nach:
MyNumber = (from MyTabl in db.MyTabls
where (MyTabl.CtrId == MyString1)
&& (MyTabl.ModCd == "ONE")
select MyTabl).Count();
Und
EXEC SQL
DECLARE MY_CUR CURSOR FOR
SELECT LOC_NO,
EFF_DT,
XPIR_DT,
DET_AMT
FROM MY_TABL
WHERE CTR_ID = :MY_STRING_1
AND MOD_CD = 'TWO'
AND TRN_ID IS NULL
ORDER BY LOC_NO, EFF_DT
WITH UR
END-EXEC.
EXEC SQL
OPEN MY_CUR
END-EXEC.
EXEC SQL
FETCH MY_CUR
INTO :MY-LOC-NO,
:MY-EFF-DT,
:MY-XPIR-DT,
:MY-ARO-AMT
END-EXEC
EXEC SQL CLOSE MY_CUR END-EXEC.
Nach:
foreach (var MyCur in (from MyTabl in db.MyTabls
where (MyTabl.CtrId == MyString1) &&
(MyTabl.ModCd == "TWO") &&
(MyTabl.TrnId == null)
orderby MyTabl.LocNo, MyTabl.EffDt
descending
select MyTabl))
{
MyLocNo = MyCur.LocNo;
MyEffDt = MyCur.EffDt;
MyXpirDt = MyCur.XpirDt;
MyAroAmt = MyCur.DetAmt;
}
Für weitere Informationen, kontaktieren Sie bitte uns.
|