Вт, 26.11.2024, 09:55
Приветствую Вас Гость | RSS
Главная | Переход с СВМ 4.13 Адабас 5 на z/VM Адабас 6 - Форум | Регистрация | Вход
Форма входа
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 2
  • 1
  • 2
  • »
Переход с СВМ 4.13 Адабас 5 на z/VM Адабас 6
LionLexXxДата: Чт, 27.09.2018, 12:04 | Сообщение # 1
Лейтенант
Группа: Проверенные
Сообщений: 50
Репутация: 1
Статус: Offline
Добрый день.
Подскажите, пожалуйста, как в ZVM создать хранимые сегменты для Natural (в частности для буферного пула), а точнее перенести из СВМ ?
В СВМ - они лежат в области хранимых систем и сегментов , предварительно там описанные. И сохраняются там при помощи команды SAVESYS.

В конфигурации СВМ 4.13 - это определяется файлом : "DMKSNT   ASSEMBLE", какой аналог этому в z/VM?
 
akostДата: Вс, 30.09.2018, 19:29 | Сообщение # 2
Admin
Группа: Администраторы
Сообщений: 619
Репутация: 5
Статус: Offline
а версию zVM хоть скажите... хотя, для любой версии, начиная с VM/ESA, нужно делать динамическое описание в MAINT (или в другой высокоуполномоченной виртуальной машине) командой DEFSEG и SAVESEG.
 
LionLexXxДата: Пн, 01.10.2018, 14:55 | Сообщение # 3
Лейтенант
Группа: Проверенные
Сообщений: 50
Репутация: 1
Статус: Offline
Цитата akost ()
а версию zVM хоть скажите...
zVM 4.4
Цитата akost ()
командой DEFSEG и SAVESEG
   Приведите пожалуйста пример.

Добавлено (02.10.2018, 07:23)
---------------------------------------------

Как с помощью DEFSEG и SAVESEG перенести это в zVM 4.4?

Добавлено (02.10.2018, 07:38)
---------------------------------------------
наш файл : "DMKSNT   ASSEMBLE"

https://cloud.mail.ru/public/KDPk/qdDzTLa2M

Добавлено (02.10.2018, 07:44)
---------------------------------------------
Например:
Код
*********************************************************************** DМК01580
***  СОХРАНЯЕМЫЙ ОБНОВЛЯЕМЫЙ СЕГМЕНТ ДЛЯ NАТURАL22 ******************** DМК01590
*           БУФЕРНЫЙ ПУЛ                    * DМК01600
*********************************************************************** DМК01610
NАТВР    NАМЕSYS  SYSNАМЕ=NАТВР2,SYSСYL=,VSYSАDR=IGNОRЕ,SYSVОL=СР0400,* DМК01620
SYSSТRТ=(145,001),SYSРGСТ=256,SYSРGNМ=(1024-1279),                    * DМК01630
VSYSRЕS=,SYSSIZЕ=256К,SYSНRSG=(64,65,66,67,68,69,70,                  * DМК01640
71,72,73,74,75,76,77,78,79),                    * DМК01650
РRОТЕСТ=ОFF                    DМК01660
ЕJЕСТ                    DМК01670
*********************************************************************** DМК01680
*********************************************************************** DМК01690
***  СОХРАНЯЕМЫЙ СЕГМЕНТ ДЛЯ NАТURАL22 ******************************** DМК01700
*********************************************************************** DМК01710
NАТ22    NАМЕSYS  SYSNАМЕ=NАТ22,VSYSАDR=IGNОRЕ,SYSVОL=СР0400,         * DМК01720
SYSSТRТ=(147,001),SYSРGСТ=224,SYSРGNМ=(768-991),                      * DМК01730
VSYSRЕS=,SYSSIZЕ=512К,SYSСYL=,                    * DМК01740
SYSНRSG=(48,49,50,51,52,53,54,55,56,57,58,59,60,61)                     DМК01750
ЕJЕСТ                    DМК01760
***********************************************************************


Как для natural22 будет выглядеть команда?


Сообщение отредактировал LionLexXx - Вт, 02.10.2018, 07:59
 
akostДата: Чт, 04.10.2018, 08:51 | Сообщение # 4
Admin
Группа: Администраторы
Сообщений: 619
Репутация: 5
Статус: Offline
доберусь до работы - попробую помочь. а так, если не ждать, есть в книжке по 4.4 в описании команды прямо однозначные соответствия макрокоманды и опциям.

на работе буду с середины следующей недели.
 
LionLexXxДата: Пт, 12.10.2018, 09:17 | Сообщение # 5
Лейтенант
Группа: Проверенные
Сообщений: 50
Репутация: 1
Статус: Offline
Посмотрели карту сегментов командой:
 Q NSS ALL MAP




Чтобы не пересекались адреса сегментов создаем сегмент для буферного пула NATURAL22 командой:
 DEFSEG NATBP2 02A00-02DFF SN

И в ответ на это поучаем следующее:


Подскажите пожалуйста, что делаем не так? может предварительно надо было ещё что-нибудь сделать?

Добавлено (12.10.2018, 14:11)
---------------------------------------------
У нас наверное было много печатных отчетов в спуле или на ридере. Удалили командой PURGE:
PUR SYSTEM P ALL
PUR SYSTEM R ALL

Сегмент создался.

Прикрепления: 8735650.jpg (247.6 Kb) · 6917458.jpg (124.4 Kb) · 3515100.jpg (25.6 Kb)
 
akostДата: Пн, 15.10.2018, 23:07 | Сообщение # 6
Admin
Группа: Администраторы
Сообщений: 619
Репутация: 5
Статус: Offline
Цитата LionLexXx ()
У нас наверное было много печатных отчетов в спуле или на ридере.
 
не жмитесь на спуле. добавьте пару-тройку томов, и на страничный обмен тоже. диски стоят дешево, а время на разбор ситуаций из-за забитого спула - дорого.
 
SamVladДата: Чт, 25.10.2018, 12:37 | Сообщение # 7
Рядовой
Группа: Проверенные
Сообщений: 3
Репутация: 2
Статус: Offline
Добрый День !

Подскажите, пожалуйста, Где мне найти Высокоуровневый Ассемблер в Z/VM 4.4

High Level Assembler V4.4 (5696-234)

НА каком м/диске ВМ "MAINT" - он может лежать ?
(или на Другой ВМ ?) и как его вызвать.

Простой ассемблер вызывается командой "A".
 
LionLexXxДата: Ср, 07.11.2018, 10:05 | Сообщение # 8
Лейтенант
Группа: Проверенные
Сообщений: 50
Репутация: 1
Статус: Offline
Цитата SamVlad ()
Простой ассемблер вызывается командой "A".

Нашли как вызывается высокоуровневый ассемблер, командой: ASMAHL

На текущий момент на z/VM удалось запустить ADABAS 6 и NATURAL 2.28.
 
GregoryДата: Чт, 13.12.2018, 23:18 | Сообщение # 9
Генерал-майор
Группа: Доверенные
Сообщений: 482
Репутация: 22
Статус: Offline
HLASM вообще-то всегда был...

примите поздравления по случаю запуска ADABAS / NATURAL


Сообщение отредактировал Gregory - Чт, 13.12.2018, 23:19
 
LionLexXxДата: Ср, 26.12.2018, 05:36 | Сообщение # 10
Лейтенант
Группа: Проверенные
Сообщений: 50
Репутация: 1
Статус: Offline
Цитата Gregory ()
HLASM вообще-то всегда был...

В СВМ не был. А в z/VM мы его по началу пытались вызвать командой HLASM, а надо было ASMAHL. Хотя его вызов можно переопределить в файле SYN SYNONYM, или нет?
 
GregoryДата: Сб, 16.11.2019, 23:23 | Сообщение # 11
Генерал-майор
Группа: Доверенные
Сообщений: 482
Репутация: 22
Статус: Offline
в СВМ и в ОС ЕС назывался ASM2 (Assembler-2, а вообще этот период "удаления ссылок на прототип" нужно забыть как страшный сон). В synonym можно все переопределить.

l hlasm * *
HLASM    MODULE   Y2
Ready; T=0.01/0.01 23:57:15

q cplevel
z/VM Version 4 Release 4.0, service level 0402 (64-bit


Сообщение отредактировал Gregory - Вс, 17.11.2019, 00:04
 
LionLexXxДата: Пн, 18.11.2019, 11:02 | Сообщение # 12
Лейтенант
Группа: Проверенные
Сообщений: 50
Репутация: 1
Статус: Offline
Цитата Gregory ()
q cplevel
z/VM Version 4 Release 4.0, service level 0402 (64-bit

q cplevel
z/VM Version 4 Release 4.0, service level 0301 (64-bit)


Сообщение отредактировал LionLexXx - Пн, 18.11.2019, 11:04
 
SamVladДата: Пт, 06.12.2019, 12:17 | Сообщение # 13
Рядовой
Группа: Проверенные
Сообщений: 3
Репутация: 2
Статус: Offline
Все Работает !  Перенос ВСЕЙ базы (7 CMS м/дисков)  с ADABAS 5.24на сервер с Z/VM по FTP - занимает всего 5 минут.Если при этом в 5-ке ядро было закрыто, то ядро с ADABAS 6.23 в Z/VMзапускается без проблем (предварительно запустив конвертацию файлов).Проблема с м/дисками пользователей решается довольно просто : -  по FTP переносишь нужные пакеты дисков в виде файлов; затем в них заменяешь шестнадцатеричное     сочетание "PTS1" на "CMS1" с помощью шестнадцатеричного редактора или-   при помощи "DITTO" в Z/VM исправляешь "PTS1" на "CMS1"  Но 1-ый вариант предпочтительней, т.к. пользователей где то около 250.Для переноса описаний ВМ из CBM 4.13 (из оглавления "REL413 DIRECT" на ВМ SYSPRG)в файл оглавления для Z/VM на MAINT написал программку на Natural 2.28(выгружаю в 4-й (не во 2-ой !) рабочий файл и затем по FTP в Z/VM, и там добавляю его в DIRECT на MAINT-те)С панелями проблема решилась совсем просто - достаточно было переименовать один файл типа "Module".С запуском Natural 1.2 - решение оказалось тоже довольно простым.У всех пользователей ADABAS в PROFILE-е стоит вызов  "NUCXTNTS EXEC", который находится на общем м/диске.Достаточно было вставить в него одну строчку :  "CP SET 370ACCOM ON" (Режим совместимости с VM 370) инаш старенький Natural 1.2 (то бишь TRIOD) заработал без проблем. С Уважением Владимир
http://s390soft.ru/load/11-1-0-65


Сообщение отредактировал SamVlad - Пт, 06.12.2019, 12:57
 
GregoryДата: Пт, 20.12.2019, 22:50 | Сообщение # 14
Генерал-майор
Группа: Доверенные
Сообщений: 482
Репутация: 22
Статус: Offline
Цитата SamVlad ()
затем в них заменяешь шестнадцатеричное сочетание "PTS1" на "CMS1" с помощью шестнадцатеричного редактора
полагаю, что
SET PTS OFF
в СВМ/PTS сэкономит время)
 
SamVladДата: Пт, 10.01.2020, 08:17 | Сообщение # 15
Рядовой
Группа: Проверенные
Сообщений: 3
Репутация: 2
Статус: Offline
Цитата Gregory ()
полагаю, что
SET PTS OFF
в СВМ/PTS сэкономит время)

За счет Чего и в Каком месте ?
(на каких командах ПДО ? )
 
  • Страница 1 из 2
  • 1
  • 2
  • »
Поиск: