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.
| 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 -dDATABASE_NAME-iuserid-wpassword-a -e -m -l -x -f -createdb -printdbcfg -oDATABASE_NAME.sql
Daftar berikut menjelaskan parameter:
-d: Menentukan nama database untuk mengekstrak skema dariDATABASE_NAME-i: User ID untuk otentikasi databaseuserid-w: Kata sandi untuk otentikasi basis datapassword-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: Menentukan nama file outputDATABASE_NAME.sql
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:
Job card: Update account, class, dan msgclass
DUMPIN: Arahkan ke kumpulan data SMF Anda
DUMPOUT: Tentukan nama dataset keluaran dan HLQ
JENIS: Pilih jenis rekaman (14, 15, 30, 110 atau lainnya)
TANGGAL: Format yyyy/ddd (misalnya, 2026/055,2026/056)
SPACE: Sesuaikan berdasarkan volume data yang diharapkan
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.10useridpasswordtype i LOCSITE RDW put 'your.hlq.SMF.OUTPUT'SMFREQS.SMFquit
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:
Atur file ke dalam subfolder berdasarkan jenis artefak (misalnya, /cobol, /jcl, /copybooks, /db2, /ims, /cics, /ca7).
Kompres folder tingkat atas menjadi satu file.zip.
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