Дорогие Господа!!!
Простите, если не туда попал, но я рад встречи с Вами. Первый раз обнаружил форум , где про ADABAS говорят по русски.
У меня жизнь сложилась так , что мне по наследству досталось сопровождение ИС на базе ADABAS и собственных приложений на разных языках программирования. С одной стороны идет постепенная миграция приложенний в другие продукты, но есть функциональные компоненты, которые уникальны для нас и мигрировать данный функционал во что то другое кажется безнадежным. А жизнь продолжается и есть необходимость в новых интерфейса х с новыми и "стандартными приложениями" типа 1C .
А я не вижу стандартных методов интеграции с ними, либо этого нет в принципе.?
Неужели нельзя добраться в ADABAS по SQL или dotnet...?
Возникает масса жизненных вопросов :
Как можно послать почту из приложений natural,?
И что вообще для этого нужно или можно сделать в наших условия ( старые версии )...?
Кто-нибудь сталкивался с этим? Пошлите меня куда-нибудь ? Ж)
Добрый день!
Заходите, заходите. Здесь не только наши боги и прочие небожители (см. посты выше)...
Есть и те , кто в понедельник родился... :)
Безусловно все ответы на ваши вопросы есть.
Напрмер, почту у нас "популярно" посылать через Entire Connection , написав на Natural некий VB - script . Если хотите я пошлю вам наш вариант... Хотя безусловно, есть масса других вариантов и по другим вашим проблемам.
Но много зависит - от состава продуктов, операционной среды и какие конкретно версии продуктов вы используете.
Скажите вашу почту?
.
... кстати моя почта kiselev@sis-pro.ru///
Я мало пока программировал на 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.
С 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'>
Иван,
интерфейсов 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? Что мешает их выровнять?
Спасибо! Владимир!
Попробую поизучать эти варианты.
А по поводу версий - в составе моего наследства оказались еще и программы на COBOL, PL1 и assembler, которые работают с ADABAS. И на их написаны уникальные программы по разузлованию наших специфичных продуктов. И там есть какая-то особенность, которая не мигрируется в ADABAS версии 6. Вообщем программы снимаются. А специалистов по этим языкам уже нет.
Это - не беда, но, чтобы не грузить форум, был бы признателен, если бы вы смогли написать на мою почту: vladimir.silin@softwareag.com
Спасибо!