ИТ

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

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

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

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

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

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

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

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

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

 

 

by Виктор Киселев
Posted on Mon, 04/18/2011 - 09:10

Добрый день!

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

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

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

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

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

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

.

 

0
by Виктор Киселев
Posted on Mon, 04/18/2011 - 09:21

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

0
by ИВАН Твердохлебов Author
Posted on Tue, 04/19/2011 - 09:51

Я мало пока программировал на 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.

 

0
by Виктор Киселев
Posted on Tue, 04/19/2011 - 15:13

С 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'>

0
by Владимир Силин
Posted on Wed, 04/20/2011 - 09:15

Иван,

интерфейсов 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? Что мешает их  выровнять?

 

 

0
by ИВАН Твердохлебов Author
Posted on Wed, 04/20/2011 - 14:57

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

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

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

0
by Владимир Силин
Posted on Wed, 04/20/2011 - 16:01

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

Спасибо!

 

0

Featured achievement

Question Solver
Share your expertise and have your answer accepted as best reply.
Recent Unlocks
  • CR
  • BH
  • Profile picture for user Ivan.Ivanov.softwareag.com
  • Profile picture for user mscheid
  • MS
  • PacMan

Leaderboard

|
icon-arrow-down icon-arrow-cerulean-left icon-arrow-cerulean-right icon-arrow-down icon-arrow-left icon-arrow-right icon-arrow icon-back icon-close icon-comments icon-correct-answer icon-tick icon-download icon-facebook icon-flag icon-google-plus icon-hamburger icon-in icon-info icon-instagram icon-login-true icon-login icon-mail-notification icon-mail icon-mortarboard icon-newsletter icon-notification icon-pinterest icon-plus icon-rss icon-search icon-share icon-shield icon-snapchat icon-star icon-tutorials icon-twitter icon-universities icon-videos icon-views icon-whatsapp icon-xing icon-youtube icon-jobs icon-heart icon-heart2 aris-express bpm-glossary help-intro help-design Process_Mining_Icon help-publishing help-administration help-dashboarding help-archive help-risk icon-knowledge icon-question icon-events icon-message icon-more icon-pencil forum-icon icon-lock