ARIS Community - We Love BPM

Первый визит

strannik's picture
by ИВАН Твердохлебов in Adabas & Natural в России posted on 2011-04-15

Дорогие Господа!!!

Простите, если не туда попал, но я рад встречи с Вами. Первый раз обнаружил  форум , где про ADABAS говорят по русски.

У меня жизнь сложилась так , что мне по наследству досталось сопровождение ИС на базе ADABAS  и собственных приложений на разных языках программирования. С одной стороны идет постепенная миграция приложенний в другие продукты, но есть функциональные компоненты, которые уникальны для нас  и мигрировать данный функционал во что то другое  кажется безнадежным. А жизнь продолжается и есть необходимость в новых интерфейса х  с новыми и "стандартными приложениями" типа 1C .

А я  не вижу стандартных методов интеграции с ними, либо этого нет в принципе.?

Неужели нельзя добраться в ADABAS по SQL или dotnet...?

Возникает масса жизненных вопросов :

Как можно послать почту из приложений natural,? 

И что вообще для этого нужно или можно сделать в наших условия ( старые версии )...?

Кто-нибудь сталкивался с этим?  Пошлите меня куда-нибудь ? Ж) 

 

 

16380 Views
0 Likes
7 Comments
Sorry there are no tags
There are no attachments
Виктор Киселев posted on 2011-04-18

Добрый день!

Заходите, заходите. Здесь не только наши боги и прочие небожители (см. посты выше)...

Есть и те , кто в понедельник родился...  :)

Безусловно все ответы на ваши вопросы есть.

Напрмер, почту у нас "популярно" посылать через Entire Connection , написав на Natural некий VB - script . Если хотите я пошлю вам наш вариант... Хотя безусловно, есть масса других вариантов и по другим вашим проблемам.

Но много зависит - от состава продуктов, операционной среды и какие конкретно версии продуктов вы используете.

Скажите вашу почту?

.

 

Виктор Киселев posted on 2011-04-18

... кстати моя почта kiselev@sis-pro.ru///

ИВАН Твердохлебов posted on 2011-04-19

Я мало пока программировал на Natural , но у меня есть бывалые программисты.

Моя задача сейчас помочь во внедрении 1С и основная сейчас проблема достать информацию, которая есть в бд ADABAS. Я ищу любые интерфейсы для их интеграции.

У кого-нибудь был такой опыт.?

Насколько я успел разобраться , у нас в работе следующее:

- ADABAS версии 5.1.2 и 6.2.3

-Natural версии 2.1.5 и 2.3.4

- Predict 3.3.2

- Entire X 5.3.1

Все это под OS390.

 

Виктор Киселев posted on 2011-04-19

С 1С мы работали только с 7 версией и миграция информации осуществлялась через импорт/экспорт файлов в заданной структуре. Какие в 8 версии есть возможности не могу сказать. 

Вообще стоило бы задуматься  над создание локализованного продукта типа SAG 1C Gateway или чего-то подобного...?

В случае с почтой версии вполне приемлимы.

Тогда покажите своим программистам скрипт, который можно  сформировать в Natural и через Entire Connection вывести на PC и выполнить его:

  1 VB-LINES
     2 L1    (A100)  INIT <'set Message = CreateObject("CDO.Message")'>
     2 L2    (A100)  INIT <'with Message'>
     2 L3    (A100)  INIT <'    .From = "&FROM" '>
     2 L4    (A100)  INIT <'    .To = "&TO"'>
     2 L5    (A100)  INIT <'    .Subject = "&SUBJECT" '>
     2 L6    (A100)  INIT <'    .Textbody = "&TEXT " & vbCrLf'>
     2 L61   (A100)  INIT <'    .Textbody = .Textbody & "&TEXT " & vbCrLf'>
     2 L7    (A100)  INIT <'with .Configuration.Fields'>
     2 L8    (A100)  INIT <' .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2'>
    2 L9    (A100)  INIT <' .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "&SERVER" '>
    2 L10    (A100) INIT <' .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = &PORT'>
 2 L11    (A100) INIT <' .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = &AUTH'>
 2 L12    (A100) INIT <' .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "&AUTH-USER"'>
 2 L13    (A100) INIT <' .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "&AUTH-PSW"'>
  2 L14    (A100) INIT <'  .Update'>
  2 L15    (A100) INIT <'end with'>
  2 L16    (A100) INIT <' .AddAttachment "&ATTACHMENT"'>
  2 L17    (A100) INIT <' .Send'>
  2 L18    (A100) INIT <'  set Message = nothing'>
  /* Receipt confirm
  2 L19    (A100) INIT <'  .fields("urn:schemas:mailheader:disposition-notification-to") = "&USER-NOTIF"'>
 2 L20    (A100) INIT <'  .fields("urn:schemas:mailheader:return-receipt-to") = "&USER-RECEIPT"'>
 2 L21    (A100) INIT <'  .DSNOptions = 14'>

Владимир Силин posted on 2011-04-20

Иван,

интерфейсов Adabas тем больше, чем актуальнее версия продукта и его окружения, в первую очередь - Natural. 

Аналогично в случае 1С.  :) 

В вашем случае можно говорить о:

- обмене файлами данных с помощью Entire Connection, предлагаемом Виктором

- обмене сообщениями, созданными на основе экранных форм Natural. Этот способ реализуется с помощью продукта ApplinX, который позволяет преобразовать и опубликовать содержимое экранов 3270 в виде веб сервиса. Кроме того, данный продукт позволяет описать навигацию по экранам приложения, собирая по пути все те данные, которые будут составлять атрибуты веб сервиса. Подробнее см. http://www.softwareag.com/ru/products/wm/mainframe_integration/applinx/overview/default.asp.

Последний способ предполагает, что 1С имеет возможность обращаться к внешним провайдерам веб сервисов. По крайней мере, 1С версии 8.2 умеет публиковать веб сервисы, в чем мы недавно смогли убедиться в одном проекте.

По поводу шлюза к 1С: а почему бы не использовать в этом качестве платформу webMethods? Она, собственно, для этого и предназначена (см. http://www.softwareag.com/ru/products/wm/default.asp)

Иван, а не сложно ли поддерживать две разные версии Adabas и Natural? Что мешает их  выровнять?

 

 

ИВАН Твердохлебов posted on 2011-04-20

Спасибо! Владимир!

Попробую поизучать эти варианты.

А по поводу версий - в составе моего наследства оказались еще и программы на COBOL, PL1 и assembler, которые работают с ADABAS.  И на их написаны уникальные программы по разузлованию наших специфичных продуктов. И там есть какая-то особенность, которая  не мигрируется в ADABAS версии 6. Вообщем программы снимаются. А специалистов по этим языкам уже нет. 

Владимир Силин posted on 2011-04-20

Это - не беда, но, чтобы не грузить форум, был бы признателен, если бы вы смогли написать на мою почту: vladimir.silin@softwareag.com

Спасибо!