Ochiq tizim adapteri-Express Mijoz uchun qo'llanma va ma'lumotnoma

z/VSE sozlamalari
OSA/SF tomonidan foydalaniladigan a'zolar uchun oldindan belgilab qo'ygan bo'ladi. OSA/SF a'zolaridan ba'zilari foydalanadi
Shakl 21. Asosiy indeks
quyidagilar:
Ushbu o'zgarishlar kutubxona 59 a'zosi uchun o'rnatish paytida siz uchun amalga oshiriladi.
3. A'zoni PRD2.OSASF.xxxxx.IOAINX da saqlang, xxxxx o'rniga siz rejalashtirayotgan a'zo nomini qo'ying.
• XXXX.IOAINX - Asosiy indeks (71-betdagi 21-rasmga qarang)
keyingi bosqichda belgilang.
• XXXXXX.IOAMSGXX
• XXXX.IOACFG
22-rasm. IOAMAIN ishi
Eslatma: IOACFG va IOAMSGXX OSA/SF tomonidan o'rnatiladi va foydalaniladi. Siz bilan hech narsa qilishingiz shart emas
2. JCLni ishdagi sharhlarga muvofiq o'zgartiring.
2. Agar kerak bo'lsa, 1-ustunda boshlanadigan xost kichik kutubxona nomlarini o'z xususiyatlaringizga mos kelishi uchun yangilang.
bu a'zolar.
* <-- 1 va 56-ustunlardagi yozuvlarni boshlang... -->
*
C-RUNTIME KUTUBXONASI.... PRD2.SCEEBASE
* $$ EOJ
../& "/&
* kutubxona (PRD2.OSASF OSA/SF ma'lumotlar kutubxonasi deb taxmin qilinadi).
***************************************************** ****************************
*
* Agar bu sizning muhitingizga mos kelmasa, iltimos, o'zgartiring
*
ACC S = PRD2.OSASF
*
IOA_SNA_IMAGEF
"
// SETPFIX LIMIT=100K, PERM
EOD=/H
DD:PRD1.BASE(IOBNULL2.O)
DD:PRD1.BASE(IOBSNAFE.O) /
*
// JOB IOAMAIN
// EXEC PGM=IOAMAIN,SIZE=IOAMAIN,PARM='PRD2.OSASF(XXXXXX)'
* $$ JOB JNM = IOAINX, CLASS = 0, DISP = D
***************************************************** ****************************
***************************************************** ****************************
*$$ EOJ
OSA/SF MA'LUMOTLAR KUTUBXONASI.. PRD2.OSASF
/&
..$$ $$ ga oÿzgartirish ../*
" /*
***************************************************** ****************************
MAHSULOT(50:SNA V1R1M0)
* Ushbu JOB OSA/SF Master indeksini OSA/SF ma'lumotlariga kataloglaydi
Netview.............. PRD1.BASE
*
"
// EXEC LIBR
***************************************************** ****************************
IOA_SNA_IMAGE1
* mos ravishda quyidagi bayonotlar.
KATALOG xxxxxx.IOAINX
MAHSULOT(00:TCP/IP Passthru V1R1M0)
DD:PRD1.BASE(IOBSNA2.O)
* $$ JOB JNM = IOAMAIN, CLASS = x, DISP = L
// LIBDEF *,SEARCH=(PRD1.BASE,PRD2.SCEEBASE)
ALSHIRISh=HA
IOA_NULL_IMAGE1
/&
* USHBU ISH NAMUNASI FAZZA TUTADI: OSA/SF KOD KUTUBXONASI.. PRD1.BASE
/*
// JOB IOAINX