View a markdown version of this page

Koleksi artefak sumber mainframe - AWS Transformasi

Terjemahan disediakan oleh mesin penerjemah. Jika konten terjemahan yang diberikan bertentangan dengan versi bahasa Inggris aslinya, utamakan versi bahasa Inggris.

Koleksi artefak sumber mainframe

Topik ini menguraikan proses pengumpulan kode sumber mainframe dan artefak terkait untuk mendukung inisiatif modernisasi mainframe menggunakan Transform. AWS Pengumpulan dan persiapan artefak sumber yang tepat sangat penting untuk keberhasilan analisis, perencanaan migrasi, dan implementasi.

Inventaris kode sumber

Jenis kode sumber aplikasi

Jenis kode sumber aplikasi berikut didukung:

  • Program COBOL

  • Skrip JCL

  • Program assembler

  • PL/I program

  • Transaksi CICS

  • Program alami

  • Skrip REXX

  • Program Easytrieve

  • Copybook dan termasuk

  • Perpustakaan proc

Aset basis data

Aset database berikut didukung:

  • Skrip DB2 DCLGEN dan DDL

  • Definisi database IMS (PSB dan DBD)

  • Definisi file VSAM

  • Skema database fisik dan logis

  • Prosedur dan pemicu basis data

Ekstensi file kode sumber

Jika Anda tidak yakin dengan ekstensi, biarkan kosong atau .txt dan AWS Transform mengklasifikasikannya untuk Anda.

Tabel berikut mencantumkan ekstensi file umum untuk artefak sumber mainframe.

Ekstensi file kode sumber mainframe
Language/Type Ekstensi umum Deskripsi
COBOL .cbl, .cob, .cobol Program sumber COBOL
JCL .jcl Skrip Bahasa Kontrol Pekerjaan
Perakit .asm Program bahasa Assembler
PL/I .pl1 PL/I program bahasa
Definisi CICS .csd Definisi sistem CICS (CSD)
Alami .nat Program alami
REXX .rex, .rexx Skrip REXX
Easytrieve .ezt Program laporan Easytrieve
Copybook .cpy Copybook COBOL
BMS .bms Dukungan Pemetaan Dasar (BMS)
PL/I copybook .pl1_salinan PL/I copybook
Db2 DCLGEN .dcl Generator deklarasi Db2
Definisi Db2 .sql, .ddl Definisi database Db2
Definisi IMS .ims Kumpulan data definisi sumber daya IMS (IMS Tahap 1)
MFS .mfs IMS MFS (Layanan Format Pesan)
PSB .psb IMS PSB (Blok Spesifikasi Program)
DBD .dbd Definisi Basis Data IMS
JCL Proc .prc, .proc Pustaka Prosedur JCL
JCL Termasuk .inc JCL Sertakan file
Makro .mac Makro assembler
Kartu Kontrol .ctl Kartu kontrol Utilitas JCL

Metode pengumpulan

Ekstraksi kode sumber

Gunakan klien FTP aman (WinSCP/FileZilla) untuk ekstraksi kode sumber interaktif dari pustaka PDS mainframe.

Ekstraksi skema DB2

Perangkat lunak klien DB2 LUW (Linux, UNIX, dan Windows) mencakup db2look utilitas sebagai bagian dari paket instalasinya. db2lookUtilitas mengekstrak pernyataan DDL (Data Definition Language) dari database DB2.

Jalankan perintah berikut:

db2look -d DATABASE_NAME -i userid -w password -a -e -m -l -x -f -createdb -printdbcfg -o DATABASE_NAME.sql

Daftar berikut menjelaskan parameter:

  • -d DATABASE_NAME: Menentukan nama database untuk mengekstrak skema dari

  • -i userid: User ID untuk otentikasi database

  • -w password: Kata sandi untuk otentikasi basis data

  • -a: Mengekstrak informasi otorisasi (hibah)

  • -e: Ekstrak semua objek database (tabel, tampilan, indeks, dan sebagainya)

  • -m: Ekstrak statistik dan karakteristik fisik

  • -l: Ekstrak tabel dan kolom komentar

  • -x: Ekstrak menjelaskan tabel

  • -f: Memformat output untuk keterbacaan yang lebih baik

  • -createdb: Termasuk pernyataan pembuatan database

  • -printdbcfg: Termasuk parameter konfigurasi database

  • -o DATABASE_NAME.sql: Menentukan nama file output

Mengekstrak informasi katalog dari mainframe

Perintah LISTCAT di IDCAMS adalah utilitas untuk mengambil informasi katalog tentang kumpulan data pada mainframe. Ini berguna selama proyek modernisasi mainframe untuk menginventarisasi kumpulan data dan memahami karakteristiknya.

//LSTCATJ JOB 'LISTCAT',CLASS=A,MSGCLASS=X,NOTIFY=&SYSUID //* //STEP1 EXEC PGM=IDCAMS //* //SYSPRINT DD DSN=AWS.M2.CATALOG.LIST, // DISP=(NEW,CATLG,DELETE), // SPACE=(CYL,(1,1),RLSE), // DCB=(RECFM=FBA,LRECL=133,BLKSIZE=0) //* //SYSIN DD * LISTCAT ENT('AWS.M2.CARDDEMO.*') ALL LISTCAT ENT('SYS1.*') ALL /*

Mengekstrak definisi CICS

Utilitas IBM-provided DFHCSDUP dapat mengekstrak definisi sumber daya CICS dari file CICS System Definition (CSD).

Gunakan JCL berikut untuk membongkar definisi yang ada dari DFHCSD:

//CSDEXTJ JOB 'EXTRACT CSD',CLASS=A,MSGCLASS=X,NOTIFY=&SYSUID //* //STEP1 EXEC PGM=DFHCSDUP,REGION=0M, // PARM='CSD(READONLY),PAGESIZE(60),NOCOMPAT' //* //STEPLIB DD DSN=your-hlq.SDFHLOAD,DISP=SHR //DFHCSD DD DSN=your-hlq.DFHCSD,DISP=SHR //* //CBDOUT DD DSN=your-hlq.CSD, // DISP=(NEW,CATLG,DELETE), // SPACE=(CYL,(1,1),RLSE), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=0) //SYSPRINT DD SYSOUT=* //SYSIN DD * EXTRACT GROUP(cics-group) USERPROGRAM(DFH0CBDC) OBJECTS /*

Mengekstrak definisi IMS

Untuk mengekstrak definisi IMS, Anda dapat menghasilkan file Transaksi IMS dengan menggunakan utilitas DFSURDD0. Utilitas ini membuat pernyataan makro tahap 1 yang dapat Anda gunakan untuk tujuan migrasi. Hanya IMS Tahap 1 yang saat ini didukung.

Gunakan JCL berikut untuk mengekstrak definisi IMS:

//IMSEXTJ JOB 'IMS STAGE 1',CLASS=A,MSGCLASS=X,NOTIFY=&SYSUID //* //STEP1 EXEC PGM=DFSURDD0,MEMLIMIT=12G //* //STEPLIB DD DISP=SHR,DSN=your-hlq.SDFSRESL //* //RDDSDSN DD DISP=SHR,DSN=your-rdds //* //SYSOUT DD DSN=your-hlq.STAGE1.IMS, // DISP=(NEW,CATLG,DELETE), // SPACE=(CYL,(1,1),RLSE), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=0) //SYSPRINT DD SYSOUT=* //SYSIN DD * OUTPUT=MAC /*

Mengekstrak informasi CA-7 penjadwal

CA-7 Informasi jadwal kerja terdiri dari laporan LJOB. Gunakan utilitas LJOB dengan LIST=NODD parameter untuk menghasilkan laporan pada mainframe. Laporan harus memiliki .ca7 perpanjangan. Setiap laporan harus memiliki karakter kontrol pengangkutan ANSI di kolom 1. Anda dapat membuat laporan dengan karakter kontrol carriage di kolom 1 dengan menentukan DCB=RECFM=FBA (atau FA) di JCL yang digunakan untuk menjalankan utilitas LJOB.

Misalnya: LJOB,JOB=ZBN*,LIST=ALL

Untuk informasi selengkapnya, lihat dokumentasi Broadcom.

Mengekstrak data SMF

Catatan Fasilitas Manajemen Sistem (SMF) menyediakan metrik aktivitas yang digunakan oleh AWS Transform untuk menganalisis pekerjaan batch dan penggunaan transaksi CICS. Jenis catatan SMF berikut didukung: 14, 15, 30 (sub tipe 5), 64, 102, 110 (sub tipe 1 dengan kelas data 1, 3, dan 4).

Persyaratan format untuk catatan SMF:

  • Harus menyertakan jenis rekaman 30 dan 110 (minimal)

  • Harus dalam format EBCDIC biner mentah dengan byte RDW (Record Descriptor Word) disertakan

  • Harus disediakan sebagai salah satu dari berikut ini:

    • File hingga 600 MB dikompresi dalam format.zip

    • File hingga 5 GB dikompresi dalam format.tar.gz atau.gz

  • Harus disimpan dalam folder terpisah dari kode sumber Anda di Amazon S3

Berikan catatan SMF minimal 13 bulan untuk menangkap siklus batch tahunan dan pola musiman yang mungkin terlewatkan oleh kerangka waktu yang lebih pendek.

Opsi 1: Ekstrak dan urutkan catatan SMF

Gunakan contoh JCL berikut untuk mengekstrak dan mengurutkan catatan SMF:

//SMFEXTR JOB (ACCT),'EXTRACT SMF',CLASS=A, // MSGCLASS=X,NOTIFY=&SYSUID //*-------------------------------------------------------------------* //* SMF RECORD EXTRACTION TEMPLATE //* CUSTOMIZE: Job card, dataset names, date range, record types //*-------------------------------------------------------------------* //* //* STEP 1: EXTRACT SMF RECORDS //* //EXTRACT EXEC PGM=IFASMFDP //SYSPRINT DD SYSOUT=* //* //* INPUT: Specify your SMF datasets (MAN files or GDG) //* //DUMPIN DD DISP=SHR,DSN=SYS1.MAN1 // DD DISP=SHR,DSN=SYS1.MAN2 // DD DISP=SHR,DSN=SYS1.MAN3 //* //* OUTPUT: Extracted SMF records //* //DUMPOUT DD DSN=your.hlq.SMF.EXTRACT, // DISP=(NEW,CATLG,DELETE), // UNIT=SYSDA, // SPACE=(CYL,(500,100),RLSE), // DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=27998) //* //* CONTROL CARDS //* //SYSIN DD * INDD(DUMPIN,OPTIONS(DUMP)) OUTDD(DUMPOUT,TYPE(14,15,30,110)) DATE(yyyy/ddd,yyyy/ddd) START(0000) END(2359) /* //* //* STEP 2: SORT EXTRACTED RECORDS (OPTIONAL) //* //SORT EXEC PGM=SORT //SORTIN DD DISP=SHR,DSN=your.hlq.SMF.EXTRACT //SORTOUT DD DSN=your.hlq.SMF.SORTED, // DISP=(NEW,CATLG,DELETE), // UNIT=SYSDA, // SPACE=(CYL,(500,100),RLSE), // DCB=(RECFM=VBS,LRECL=32760) //SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(50)) //SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(50)) //SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(50)) //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSIN DD * SORT FIELDS=(11,4,CH,A,7,4,CH,A,15,4,CH,A),EQUALS /*

Sesuaikan nilai-nilai berikut di JCL sebelumnya:

  1. Job card: Update account, class, dan msgclass

  2. DUMPIN: Arahkan ke kumpulan data SMF Anda

  3. DUMPOUT: Tentukan nama dataset keluaran dan HLQ

  4. JENIS: Pilih jenis rekaman (14, 15, 30, 110 atau lainnya)

  5. TANGGAL: Format yyyy/ddd (misalnya, 2026/055,2026/056)

  6. SPACE: Sesuaikan berdasarkan volume data yang diharapkan

  7. Hapus langkah SORT jika tidak diperlukan

Opsi 2: Ekstrak data SMF dengan DFSORT

Anda dapat menggunakan DFSORT untuk mengkonsolidasikan dan melaporkan data SMF historis. Ini berguna jika Anda menyimpan catatan SMF Anda dalam GDG berdasarkan hari atau minggu. Pekerjaan berikut menggunakan DFSORT untuk mengkonsolidasikan catatan SMF dari file SORTIN dan memfilter berdasarkan catatan yang ditentukan dalam parameter INCLUDE COND.

//EXTRSMF JOB 'EXTRACT SMF RECORDS',CLASS=S,MSGCLASS=H, // MSGLEVEL=(1,1),REGION=0M,NOTIFY=&SYSUID,TIME=1440 //SORTJES2 EXEC PGM=SORT,REGION=0M //SYSOUT DD SYSOUT=* //SORTMSG DD SYSOUT=* //SORTIN DD DISP=SHR,DSN=your.hlq.SMF.EXTRACT //SORTOUT DD DSN=your.hlq.SMF.OUTPUT, // DISP=(MOD,CATLG,DELETE), // DCB=(BUFNO=20, // RECFM=VBS,LRECL=32760,BLKSIZE=27998), // SPACE=(CYL,(1400,900),RLSE) //SORTWK1 DD UNIT=SYSDA,SPACE=(CYL,(30,50)) //SORTWK2 DD UNIT=SYSDA,SPACE=(CYL,(30,50)) //SORTWK3 DD UNIT=SYSDA,SPACE=(CYL,(30,50)) //SORTWK4 DD UNIT=SYSDA,SPACE=(CYL,(30,50)) //SYSIN DD * OPTION COPY INCLUDE COND=(6,1,BI,EQ,X'0E',OR,6,1,BI,EQ,X'0F',OR, 6,1,BI,EQ,X'1E',OR,6,1,BI,EQ,X'40',OR, 6,1,BI,EQ,X'50',OR,6,1,BI,EQ,X'59',OR, 6,1,BI,EQ,X'5C',OR,6,1,BI,EQ,X'65',OR, 6,1,BI,EQ,X'66',OR,6,1,BI,EQ,X'6E')

Untuk mengunduh data sambil menyimpan data RDW, Anda dapat menggunakan server FTP untuk menerima file yang diekstrak. Pastikan data ditransfer dalam format biner dan opsi RDW digunakan sehingga RDW disertakan dalam transfer data. Pekerjaan berikut menunjukkan contoh pekerjaan FTP untuk mentransfer file ini.

//EXTRSMF JOB 'EXTRACT SMF RECORDS',CLASS=A,MSGCLASS=H, // MSGLEVEL=(1,1),REGION=0M,NOTIFY=&SYSUID,TIME=1440 //STEP1 EXEC PGM=FTP,REGION=2048K //SYSIN DD * 10.10.10.10 userid password type i LOCSITE RDW put 'your.hlq.SMF.OUTPUT' SMFREQS.SMF quit

Mengunggah laporan SCRT

Anda juga dapat mengunggah Sub-Capacity laporan Reporting Tool (SCRT) ke AWS Transform.

Unggahan inventaris aplikasi

Setelah Anda mengumpulkan semua artefak, selesaikan langkah-langkah berikut:

  1. Atur file ke dalam subfolder berdasarkan jenis artefak (misalnya, /cobol, /jcl, /copybooks, /db2, /ims, /cics, /ca7).

  2. Kompres folder tingkat atas menjadi satu file.zip.

  3. Unggah file.zip ke bucket Amazon S3 yang terhubung ke ruang kerja Transform AWS Anda.

catatan

Catatan SMF harus ditempatkan di folder terpisah dari kode sumber Anda dalam bucket Amazon S3, dan harus dalam format.tar.gz atau.gz.

Untuk petunjuk mendetail tentang menghubungkan bucket Amazon S3 Anda ke AWS Transform, lihat. Siapkan konektor