Importieren von COBOL-Hostdefinitionen für CICS-, IMS- und Hostdateien
Das ursprüngliche Feature "Host Integration Server TI Designer" wurde mit den vollständigen Funktionen zum Entwerfen von Metadatenartefakten von Grund auf mit Unterstützung eines Mainframe-Programmierers eingeführt. Später wurde die Möglichkeit zum Importieren von Hostdefinitionen im COBOL- oder RPG-Kopierbuchformat hinzugefügt, um Szenarien zur Automatisierung des Entwurfs zu unterstützen und die Beteiligung von Mainframe-Programmierern zu reduzieren. Im Laufe der Jahre wurde diese Funktion zur wichtigsten Option zum Erstellen von Metadatenartefakten.
Voraussetzungen
Herunterladen und Installieren von Visual Studio. Stellen Sie nach der Installation sicher, dass Sie auch die Workload mit dem Namen Desktopentwicklung mit C++ in Visual Studio installieren. Andernfalls erhalten Sie den Fehler Ausnahme von HRESULT 0x800A007C.
Laden Sie die HIS-Designer für Azure Logic Apps herunter, und installieren Sie sie. Die einzige Voraussetzung ist Microsoft .NET Framework 4.8.
Eine Visual Studio-Hostanwendungslösung und ein Projekt (CICS- oder IMS - oder Hostdateiprojekt, in das Sie die Hostdefinition importieren möchten.
Hinweis
Die HIS-Designer bietet und zeigt verschiedene Optionen an, je nachdem, ob Sie eine CICS-, IMS- oder Hostdateilösung öffnen.
Verstehen Sie, wie das Programmiermodell für die Technologie funktioniert, die Sie integrieren möchten, nämlich CICS oder IMS. Beide Plattformen haben unterschiedliche Anforderungen und Möglichkeiten, Informationen zu übergeben und zu empfangen. Stellen Sie sicher, dass Sie sich mit dem entsprechenden Programmiermodell vertraut machen, bevor Sie die Hostdefinitionen importieren.
Rufen Sie die Hostdefinitionen (Copybooks) ab, die Sie in HIS Designer für Logic Apps importieren möchten. Dieser Designer unterstützt COBOL- und RPG-Kopierbücher.
Vorbereiten eines COBOL-Kopierbuchs
COBOL-Kopierbücher sollten den grundlegenden COBOL-Codierungsregeln entsprechen. Die HIS-Designer für Logic Apps erzwingt viele dieser Regeln. In der folgenden Tabelle sind die Standard Regeln aufgeführt:
Spalten Typ Beobachtung 1–6 Sequenznummer Geben Sie in diesen Positionen nichts ein. 7 Indikator Verwenden Sie ein Sternchen (*) oder einen Schrägstrich (/), um einen Kommentar zu codieren. 8-11 Ein Rand (Bereich A) 77 Ebenennummern und 01 Ebenennummern 12-72 B Rand (Bereich B) Reserviert für 02 Ebenen und höher 73-80 Identifikation Hier sind keine Definitionen zulässig. Vergewissern Sie sich, dass das COBOL- oder RPG-Kopierbuch die Anforderungen des ausgewählten Programmiermodells erfüllt.
Überprüfen Sie die Punkte am Ende jeder Zeile. Stellen Sie sicher, dass sie angezeigt werden, auch wenn die neuesten Versionen von COBOL diese Formatierung nicht erfordern.
Wenn Ihr Kopierbuch REDEFINEs enthält, lassen Sie den Mainframeprogrammierer die Hostdefinition bestätigen, die Sie verwenden möchten, wenn kein Diskriminant verfügbar ist.
Entfernen Sie alle anderen Zeichen als die in der vorherigen Tabelle angegebenen. Stellen Sie sicher, dass Sie über die richtige Anzahl von Zeichen verfügen.
Importieren einer COBOL-Hostdefinition (CICS)
Die folgenden Schritte zeigen, wie Sie ein COBOL-Copybook für ein CICS-Hostanwendungsprojekt in die HIS-Designer für Logic Apps importieren. Dieses COBOL-Programm folgt dem CICS ELM Link-Programmiermodell.
Öffnen Sie in Visual Studio die CICS-Hostanwendungslösung, die automatisch die HIS-Designer für Logic Apps öffnet.
Öffnen Sie im linken Bereich des Designers das Kontextmenü des Komponentenknotens, und wählen Sie Hostdefinition importieren> aus.
Im folgenden Beispiel heißt der Komponentenknoten NetCInt1.
Wählen Sie im Feld System z COBOL-Quelldatei importierendie Option Durchsuchen aus.
Suchen Sie das zu importierende Kopierbuch, und wählen Sie es aus, und wählen Sie dann Öffnen aus.
Das folgende Beispiel zeigt das zu importierende COBOL-Programm:
***************************************************************** ** THIS PROGRAM IS A SAMPLE CICS SERVER THAT DEMONSTRATES A * ** SIMPLE BANKING APPLICATION WHICH FORMATS AND RETURNS AN * ** ARRAY OF ACCOUNT RECORDS THAT WILL CONTAIN EITHER CHECKING OR* ** SAVINGS INFORMATION. * ***************************************************************** IDENTIFICATION DIVISION. PROGRAM-ID. GETAINFO. ENVIRONMENT DIVISION. DATA DIVISION. ***************************************************************** ** VARIABLES FOR INTERACTING WITH THE TERMINAL SESSION * ***************************************************************** WORKING-STORAGE SECTION. LINKAGE SECTION. 01 DFHCOMMAREA. 05 SSN PIC X(9). 05 ACCT-ARRAY OCCURS 2 TIMES. 10 ACCT-NUM PIC X(10). 10 ACCT-TYPE PIC X. 10 ACCT-INFO PIC X(39). 10 CHECKING REDEFINES ACCT-INFO. 15 CHK-OD-CHG PIC S9(3)V99 COMP-3. 15 CHK-OD-LIMIT PIC S9(5)V99 COMP-3. 15 CHK-OD-LINK-ACCT PIC X(10). 15 CHK-LAST-STMT PIC X(10). 15 CHK-DETAIL-ITEMS PIC S9(7) COMP-3. 15 CHK-BAL PIC S9(13)V99 COMP-3. 10 SAVINGS REDEFINES ACCT-INFO. 15 SAV-INT-RATE PIC S9(1)V99 COMP-3. 15 SAV-SVC-CHRG PIC S9(3)V99 COMP-3. 15 SAV-LAST-STMT PIC X(10). 15 SAV-DETAIL-ITEMS PIC S9(7) COMP-3. 15 SAV-BAL PIC S9(13)V99 COMP-3. 15 FILLER PIC X(12). PROCEDURE DIVISION. IF SSN = '111223333' THEN ********************************************************** * SSN = 111223333 IS AN INDICATION TO RETURN A * DISCRIMINATED UNION OF CHECKING AND SAVINGS ACCOUNTS ********************************************************** MOVE 'CHK4566112' TO ACCT-NUM OF ACCT-ARRAY(1) MOVE 'C' TO ACCT-TYPE OF ACCT-ARRAY(1) MOVE SPACES TO ACCT-INFO OF ACCT-ARRAY(1) MOVE 25.00 TO CHK-OD-CHG OF ACCT-ARRAY(1) MOVE 2000.00 TO CHK-OD-LIMIT OF ACCT-ARRAY(1) MOVE 'SAV1234567' TO CHK-OD-LINK-ACCT OF ACCT-ARRAY(1) MOVE '10/31/2005' TO CHK-LAST-STMT OF ACCT-ARRAY(1) MOVE 1 TO CHK-DETAIL-ITEMS OF ACCT-ARRAY(1) MOVE 41852.16 TO CHK-BAL OF ACCT-ARRAY(1) MOVE 'SAV1234567' TO ACCT-NUM OF ACCT-ARRAY(2) MOVE 'S' TO ACCT-TYPE OF ACCT-ARRAY(2) MOVE SPACES TO ACCT-INFO OF ACCT-ARRAY(2) MOVE 4.50 TO SAV-INT-RATE OF ACCT-ARRAY(2) MOVE 5.00 TO SAV-SVC-CHRG OF ACCT-ARRAY(2) MOVE '10/15/2005' TO SAV-LAST-STMT OF ACCT-ARRAY(2) MOVE 1 TO SAV-DETAIL-ITEMS OF ACCT-ARRAY(2) MOVE 146229.83 TO SAV-BAL OF ACCT-ARRAY(2) ELSE ********************************************************** * SSN = 333221111 IS AN INDICATION TO RETURN A * SIMPLE REDEFINITION OF CHECKING ACCOUNTS ONLY ********************************************************** MOVE 'CHK4566112' TO ACCT-NUM OF ACCT-ARRAY(1) MOVE 'C' TO ACCT-TYPE OF ACCT-ARRAY(1) MOVE SPACES TO ACCT-INFO OF ACCT-ARRAY(1) MOVE 25.00 TO CHK-OD-CHG OF ACCT-ARRAY(1) MOVE 2000.00 TO CHK-OD-LIMIT OF ACCT-ARRAY(1) MOVE 'SAV1234567' TO CHK-OD-LINK-ACCT OF ACCT-ARRAY(1) MOVE '10/31/2005' TO CHK-LAST-STMT OF ACCT-ARRAY(1) MOVE 1 TO CHK-DETAIL-ITEMS OF ACCT-ARRAY(1) MOVE 41852.16 TO CHK-BAL OF ACCT-ARRAY(1) MOVE 'CHK7896112' TO ACCT-NUM OF ACCT-ARRAY(2) MOVE 'C' TO ACCT-TYPE OF ACCT-ARRAY(2) MOVE SPACES TO ACCT-INFO OF ACCT-ARRAY(2) MOVE 25.00 TO CHK-OD-CHG OF ACCT-ARRAY(2) MOVE 2000.00 TO CHK-OD-LIMIT OF ACCT-ARRAY(2) MOVE 'SAV7891234' TO CHK-OD-LINK-ACCT OF ACCT-ARRAY(2) MOVE '10/31/2005' TO CHK-LAST-STMT OF ACCT-ARRAY(2) MOVE 1 TO CHK-DETAIL-ITEMS OF ACCT-ARRAY(2) MOVE 41852.16 TO CHK-BAL OF ACCT-ARRAY(2) END-IF. EXEC CICS RETURN END-EXEC.Überprüfen Sie das zu importierende Kopierbuch. Klicken Sie abschließend auf Weiter.
Nachdem das Feld Elementoptionen geöffnet und mit dem Artefaktnamen und dem Wert link-to-Program name aufgefüllt wird, wählen Sie Weiter aus.
Der Designer stellt das Metadatenartefakt dar, das aus dem COBOL-Kopierbuch generiert wird.
Der Designer generiert auch eine Hostdefinition für das Copybook. Diese Hostdefinition enthält nicht das gesamte bereitgestellte Copybook, sondern nur die Felder und Datentypen, die für die Interaktion des Artefakts mit dem Mainframeprogramm erforderlich sind. Obwohl das zuvor bereitgestellte Beispiel ein gesamtes Programm ist, extrahiert das HIS-Designer nur die informationen, die basierend auf dem ausgewählten Programmiermodell erforderlich sind.
Um den HIDX zu generieren, wählen Sie Alle speichern aus.
Navigieren Sie zum Ordner Ihrer Hostanwendung, um die generierte HIDX-Datei zu finden.
Importieren einer COBOL-Hostdefinition (IMS)
Sowohl CICS als auch IMS hosten unternehmenskritische Programme, haben jedoch jeweils unterschiedliche Anforderungen. Die folgenden Schritte zeigen, wie Sie ein COBOL-Copybook für ein IMS-Hostanwendungsprojekt in die HIS-Designer für Logic Apps importieren. Dieses COBOL-Programm folgt dem IMS Connect-Programmiermodell.
Öffnen Sie in Visual Studio die IMS-Hostanwendungslösung, die automatisch die HIS-Designer für Logic Apps öffnet.
Öffnen Sie im linken Bereich des Designers das Kontextmenü des Komponentenknotens, und wählen Sie Hostdefinition importieren> aus.
Im folgenden Beispiel heißt der Komponentenknoten NetCInt1.
Wählen Sie im Feld System z COBOL-Quelldatei importierendie Option Durchsuchen aus.
Suchen Sie das zu importierende Kopierbuch, und wählen Sie es aus, und wählen Sie dann Öffnen aus.
Das folgende Beispiel zeigt das zu importierende COBOL-Programm:
IDENTIFICATION DIVISION. PROGRAM-ID. GETBAL. ENVIRONMENT DIVISION. DATA DIVISION. WORKING-STORAGE SECTION. ************************************************************** * USER DATA DEFINITIONS. * ************************************************************** 01 INPUT-AREA. 05 LLI PIC S9(4) COMP VALUE ZERO. 05 ZZI PIC S9(4) COMP VALUE ZERO. 05 TRAN PIC X(7) VALUE SPACES. 05 NAME PIC X(30). 05 ACCNUM PIC X(6). 01 OUTPUT-AREA. 05 LLO PIC S9(4) COMP VALUE ZERO. 05 ZZO PIC S9(4) COMP VALUE ZERO. 05 ACCBAL PIC S9(7)V9(2) COMP-3. 01 IMS-VALUES. 02 END-OF-MSG PIC X(2) VALUE 'QD'. 02 QUEUE-EMPTY PIC X(2) VALUE 'QC'. 02 GU PIC X(4) VALUE 'GU '. 02 ISRT PIC X(4) VALUE 'ISRT'. 02 CHNG PIC X(4) VALUE 'CHNG'. LINKAGE SECTION. 01 IOTP-PCB. 05 IOTP-LTERM PIC X(8). 05 FILLER PIC X(2). 05 IOTP-STATUS PIC X(2). 05 IOTP-PREFIX. 10 IOTP-DATE PIC S9(7) COMP-3. 10 IOTP-TIME PIC S9(7) COMP-3. 10 IOTP-MSG-NUMBER PIC S9(4) COMP. 10 FILLER PIC X(2). 05 IOTP-MOD-NAME PIC X(8). 05 IOTP-USER-ID PIC X(8). PROCEDURE DIVISION. ENTRY 'DLITCBL' USING IOTP-PCB. CALL 'CBLTDLI' USING GU IOTP-PCB INPUT-AREA. IF IOTP-STATUS = END-OF-MSG DISPLAY 'IOTP-STATUS = END-OF-MSG' END-IF. IF IOTP-STATUS = QUEUE-EMPTY DISPLAY 'IOTP-STATUS = QUEUE-EMPTY' END-IF. IF IOTP-STATUS NOT = ' ' DISPLAY 'CALL FAILED IOTP-STATUS = ' IOTP-STATUS END-IF. MOVE 777.12 TO ACCBAL OF OUTPUT-AREA. MOVE LENGTH OF OUTPUT-AREA TO LLO. CALL 'CBLTDLI' USING ISRT IOTP-PCB OUTPUT-AREA. IF IOTP-STATUS NOT = ' ' DISPLAY 'SEND FAILED IOTP-STATUS = ' IOTP-STATUS END-IF. GOBACK.Überprüfen Sie das zu importierende Kopierbuch. Klicken Sie abschließend auf Weiter.
Nachdem das Feld Elementoptionen geöffnet und mit dem Artefaktnamen und dem Transaktions-ID-Wert aufgefüllt wird, wählen Sie Weiter aus.
Hinweis
Vergewissern Sie sich für die nächsten Schritte, dass die Option Importimportstandard verwenden nicht ausgewählt oder verfügbar ist. Dies sollte das Standardverhalten sein, wenn Sie mit einer IMS-Hostanwendung arbeiten.
Nachdem das Feld Eingabebereich geöffnet wurde, wählen Sie alle Elemente im Knoten EINGABEBEREICH aus, und wählen Sie dann Weiter aus.
Nachdem das Feld Ausgabebereich geöffnet wurde, wählen Sie alle Elemente im Knoten AUSGABEBEREICH aus, und wählen Sie dann Weiter aus.
Nachdem das Feld Rückgabewert geöffnet wurde, wählen Sie ein Element im Knoten OUTPUT AREA für den Rückgabewert aus, und wählen Sie dann Weiter aus.
Nachdem das Feld Datentabellen, Strukturen und Unionen geöffnet wurde, wählen Sie die Gruppen aus, die für die Datentabellen und -strukturen verwendet werden sollen, und wählen Sie dann Weiter aus.
In diesem Beispiel sind keine Auswahlen erforderlich, sodass keine Elemente ausgewählt werden.
Nachdem das Feld LL-Felderbereich geöffnet wird, wählen Sie die LL-Felder aus, die aus der Transaktion ausgeschlossen werden müssen. Klicken Sie abschließend auf Weiter.
Nachdem das Feld Bereich für ZZ-Felder geöffnet wurde, wählen Sie die ZZ-Felder aus, die aus der Transaktion ausgeschlossen werden müssen. Klicken Sie abschließend auf Weiter.
Nachdem das Feld TRANCODE-Felderbereich geöffnet wurde, wählen Sie die TRANCODE-Felder aus, die aus der Transaktion ausgeschlossen werden müssen. Wählen Sie abschließend Fertig stellen aus.
Der Designer zeigt das Metadatenartefakt an, das aus dem COBOL-Kopierbuch generiert wurde:
Der Designer generiert auch eine Hostdefinition für das Copybook. Diese Hostdefinition enthält nicht das gesamte bereitgestellte Copybook, sondern nur die Felder und Datentypen, die für die Interaktion des Artefakts mit dem Mainframeprogramm erforderlich sind. Obwohl das zuvor bereitgestellte Beispiel ein gesamtes Programm ist, extrahiert das HIS-Designer nur die informationen, die basierend auf dem ausgewählten Programmiermodell erforderlich sind.
Wählen Sie Alle speichern aus, um den HIDX zu generieren.
Navigieren Sie zum Ordner Ihrer Hostanwendung, um die generierte HIDX-Datei zu finden.
Importieren einer COBOL-Hostdateidefinition (Hostdateien)
IBM-Hostdateien verfügen über mehrere Typen und können in Mainframe- oder Midrangesystemen vorhanden sein. Jede hat ihre eigenen Typen und Merkmale. Der Bedarf an Der Modernisierung oder Migration von Mainframe- und Midrangeanwendungen, die Hostdateidaten verwenden, steigt. Ein Beispiel ist die Migration von VSAM-Dateien (Virtual Storage Access Method) zu Azure. Mit dieser Anforderung wird der Anwendungsfall immer häufiger für den Zugriff auf diese Dateien und die Integration in moderne Lösungen.
Die folgenden Schritte zeigen, wie Sie ein COBOL-Copybook für ein Hostdateiprojekt in die HIS-Designer für Logic Apps importieren. Dieses COBOL-Kopierbuch stellt eine einfache VSAM-Datei dar. Der Import-Assistent erstellt Strukturen und Vereinigungen. Nachdem Sie das Copybook importiert haben, können Sie Tabellen erstellen und den richtigen Schemas zuweisen.
Öffnen Sie in Visual Studio Ihre Hostdateilösung, wodurch automatisch die HIS-Designer für Logic Apps geöffnet wird.
öffnen Sie im linken Bereich des Designers das Kontextmenü des Komponentenknotens, und wählen Sie Hostdefinition importieren> aus.
Im folgenden Beispiel heißt der Komponentenknoten HostFileDefinition1.
Wählen Sie im Feld System z COBOL-Quelldatei importierendie Option Durchsuchen aus.
Suchen Sie das zu importierende Kopierbuch, und wählen Sie es aus, und wählen Sie dann Öffnen aus.
Das folgende Beispiel zeigt das zu importierende COBOL-Programm:
****************************************************************** *HIS TRANSACTION DESIGNER EXPORT, 9.0 *DATA DECLARATION GENERATED ON 9/23/2013 5:21:51 PM ****************************************************************** *LIBRARY NAME.............CustomerDatabaseZOS.HIDX *DESCRIPTION..............NONE AVAILABLE ****************************************************************** 01 CUSTOMER-RECORD. 05 CUSTOMER-NAME PIC X(30). 05 CUSTOMER-SSN PIC X(9). 05 CUSTOMER-ADDRESS. 10 CUSTOMER-STREET PIC X(20). 10 CUSTOMER-CITY PIC X(10). 10 CUSTOMER-STATE PIC X(4). 10 CUSTOMER-ZIP PIC 9(5). 05 CUSTOMER-PHONE PIC X(13). 05 CUSTOMER-ACCESS-PIN PIC X(4).Überprüfen Sie im Feld System z COBOL-Quelldatei importieren das zu importierende Kopierbuch.
Vergewissern Sie sich, dass die Auswahl für die folgenden Optionen für die Hostdefinition erfolgt: REDEFINE, Verwenden von Importer-Standardwerten und Struktur für Einzuge generieren. Klicken Sie abschließend auf Weiter.
Der Designer zeigt das Metadatenartefakt an, das aus dem COBOL-Kopierbuch generiert wurde. Dieses Artefakt ist unvollständig, sodass Sie eine oder mehrere Tabellen erstellen müssen, die die Hostdatei widerspiegeln.
Öffnen Sie in der Struktur des Komponentenknotens das Kontextmenü Tabellen , und wählen Sie Tabelle hinzufügen aus.
Öffnen Sie das Kontextmenü der neuen Tabelle, und wählen Sie Eigenschaften aus. Aktualisieren Sie im Fenster Eigenschaften die folgenden Eigenschaften:
Eigenschaft Beschreibung Alias Der Tabellenname, z. B . CUSTOMER Hostname Der Mainframe- oder Midrange-Systemname für die Hostdatei, z . B. HISDEMO. NWIND. KUNDE Schema Das zuvor importierte Schema, z. B. CUSTOMER_RECORD Das folgende Beispiel zeigt die aktualisierten Tabelleneigenschaften:
Das folgende Beispiel zeigt das Metadatenartefakt der abgeschlossenen Hostdatei:
So generieren Sie den HIDX. Datei, wählen Sie Alle speichern aus.
Navigieren Sie zum Ordner Ihrer Hostanwendung, um die generierte HIDX-Datei zu finden.