Интеграция АСУ ВРК с 1С и другими учетными системами

Для интеграции АСУ ВРК с другими системами существует COM-объект который может быть использован практически в любом языке программирования. Для использования COM-объекта АСУ ВРК (asu_vrk_com.dll или asu_vrk_com64.dll) необходимо зарегистрировать его по помощи regsvr32 (от имени администратора). Данная возможность предоставляется бесплатно.

Вы можете скачать для изучения пример внешней обработки для платформы 1С:Предприятие 8.3 (ЗагрузкаАСУВРК.epf), использующей данный COM-объект. Обработка предоставляется "как есть".

Текущая версия COM-объекта - 23.2.27

Внимание - в силу особенностей работы 1С не рекомендуем в одной сессии работы 1С создавать два и более объекта iASUVRK, при этом первый изначально созданный объект ведет себя не стабильно

Также рекомендуем избегать длинных конструкций. Например,
АСУВРК.GetVagonComplekt(Код).OUT.BR_count
лучше сделать так:
k=АСУВРК.GetVagonComplekt(Код).OUT;
k.BR_count

Изменения в версии 23.2.27:
В объект iVagon добавлено свойство: ReinstallFrom - Возвращает код депо - источника перевыставления

Описание в справке ниже.

Изменения в версии 23.2.10:
В объект iDetalRp добавлен метод: GETKP - Возвращает объект iKPDetal с данными по колесной паре

Описание в справке ниже.

Изменения в версии 23.1.30:
В объект iKeepCost добавлено свойство: DEL - признак удаления документа

Описание в справке ниже.

Изменения в версии 23.1.26:
Изменен метод SaveVKMdata объекта iKPDetal;
добавлен объект iNewHIDVKM

Описание в справке ниже.

Изменения в версии 23.1.25:
В объект iVagon добавлены свойства:
Nomer_KPR номер платежно-расчетного документа;
Data_KPR дата платежно-расчетного документа;

Описание в справке ниже.

Изменения в версии 23.1.23:
В объект iDTHistoryInfo добавлено свойство: SKLAD_DOC_ID - код документа АРМ Склад

Описание в справке ниже.

Изменения в версии 22.12.14:
В объект iKeepCost добавлено свойство: ACTSUM - сумма стоимости хранения

Описание в справке ниже.

Изменения в версии 22.11.15:
В объект iVagonScrap добавлены свойства:
Data_ECP_D - дата подписи документов со стороны ВЧДр/ВРП;
Data_ECP_S - дата подписи документов со стороны собственника;

В функцию GetVagonsScrap добавлен входной параметр FilterID.

Описание в справке ниже.

Изменения в версии 22.10.20:
Изменены функции
AddDocumentCopy
DocumentCopyExists;

добавлена функция DeleteDocumentCopyByInd

Описание в справке ниже.

Изменения в версии 22.10.19:
В объект iKeepCost добавлены свойства:
SID - код собственника (по договору) в АСУ ВРК;
SNAME - наименование собственника в АСУ ВРК;
Contract - Договор (объект iContract);
Ecp_Reglament - Регламент работы;
Data_ECP_D - дата подписи документов со стороны ВЧДр/ВРП;
Data_ECP_S - дата подписи документов со стороны собственника;
EDITDATE - дата последнего изменения;

Описание в справке ниже.

/p>

Изменения в версии 22.10.17:
В методе GetKeepCosts(FromDate,ToDate,FilterId) добавлен опциональный параметр FilterId.
В объект iRemains добавлено свойство BankDetailsP - Банковские реквизиты подрядчика.

Описание в справке ниже.

Изменения в версии 22.8.17:
В методе GetSkladExDocs(FromDate,ToDate,DocFilter,HideClearDocs,SkladID,FilterId,depoId) добавлен обязательный параметр depoId.
Описание в справке ниже.

Изменения в версии 22.6.2:
В COM-объект добавлен функционал по добавлению/сохранению данных о КП в ВКМ.
В интерфейсе iKPDetal это методы GetVKMdata и SaveVKMdata.
Описание в справке ниже.

Изменения в версии 21.6.9:
В COM-объект добавлен функционал по работе с АРМ Расчёта стоимости и хранения.
В интерфейсе iASU_VRK это методы: GetKeepCosts и GetKeepCostsByIND
И объекты: iKeepCosts и iKeepCost.
Описание в справке ниже.

Изменения в версии 20.12.24:
В интерфейсе iVagon добавлен метод для возврата объекта IVU23, содержащего информацию о ВУ-23 вагона

Изменения в версии 20.9.14:
В интерфейсе iVagon переименовано свойство Nomer_ChekFakt в Nomer_ChetFakt

Вышла новая версия COM объекта: 20.8.21
Рекомендуется к обновлению для корректной работы с АСУ ВРК.

ВНИМАНИЕ ! В связи с оптимизацией структуры кода библиотеки, были внесены важные изменения:
В АРМ Склад удален объект IMaterial_data. Метод Get_Detal_By_Params теперь возвращает объект iSkladExMat.
В объекте iSkladExMat добавлены свойства (аналогичные IMaterial_data):
TYP
ScrapId
STORAGE
DocID.
Свойство IND в объекте iSkladExMat аналогично свойству id удаленного объекта IMaterial_data.
Свойство GlobalDetalId в объекте iSkladExMat аналогично свойству GLOBAL_DETALID удаленного объекта IMaterial_data.
Свойство Prise в объекте iSkladExMat аналогично свойству fprice удаленного объекта IMaterial_data.
Обновите ваш код под новые изменения.

ВНИМАНИЕ ! Важные изменения:
В АРМ ремонта деталей, в методе GetRepDetails убран параметр Doc_Type.
В объекте iRepDetail:
Удалены методы GetDetalRpAvailable и AddDetalRpOUT.
Удалено свойство TRANSPORT.
Удалено свойство CountAvDet.
В методе AddAS удален параметр Ftype.
В методе AddPA удален параметр Ftype.
В методе AddKP удалены параметры STAL, TypKP, Obod1, Obod2, Greben1, Greben2, Prokat1, Prokat2.
Обновите ваш код под новые изменения.

Важные изменения:
В методе GetSkladExDocs(FromDate,ToDate,DocFilter,HideClearDocs,SkladID,FilterId) добавлен обязательный параметр SkladID.
В объектах iVagonDetails и iSkladEx добавлены методы по добавлению КП - Add_KP с параметром определяющим тип подшипника.
В объекте iKPDetal добавлен тип подшипника.
Описание в справке ниже.

Важные изменения:
В интерфейсе iVagon добавлен метод работы с Актом допуска
GetAktDopuska
Описание в справке ниже.

Важные изменения:
В интерфейсе iVagon добавлен метод работы с паспортом ВУ-4М
GetVU4M
Описание в справке ниже.

Важные изменения:
В интерфейсе iVagon добавлены методы работы с кодами модернизации:
AddKodModern
CheckKodModern
Описание в справке ниже.

Важные изменения в предыдущих версиях:
В COM-объект добавлен функционал по работе с АРМ Ремонта деталей.
В интерфейсе iASU_VRK это метод GetRepDetails
И объекты:
  iRepDetails
  iRepDetail
  iDetalRp
Описание в справке ниже.

Важные изменения в предыдущих версиях:
В объект iASU_VRK и iVagon добавлен метод GetAvrOnVagon, который вернет Вам акт выполненных работ в том виде, в котором он печатается в АСУ ВРК без необходимости перебора работ и деталей, подробне смотрите ниже.
В процедуру iASU_VRK.GetVagons - добавлен еще один параметр FilterId:
было GetVagons(Nvagon,Fromdate,ToDate,NoDel)
стало GetVagons(Nvagon,Fromdate,ToDate,NoDel,FilterId)
где:
FilterId=0 - фильтрация вагонов будет осуществляться по дате окончания ремонта
FilterId=1 - фильтрация вагонов будет осуществляться по дате подписи документов со стороны подрядчика
FilterId=2 - фильтрация вагонов будет осуществляться по дате подписи документов со стороны заказчика

Важные изменения в предыдущих версиях
В связи с вводом дополнительного поля (тип торцевого крепления КП), в Акте осмотра колесных пар, изменились некоторые функции в объектах:
было iVagonDetails.AddKP(Zavod,Nomer,God,Stal,Obod1,Obod2,Greben1,Greben2,Prokat1,Prokat2);
стало iVagonDetails.AddKP(Zavod,Nomer,God,Stal,TypKP,Obod1,Obod2,Greben1,Greben2,Prokat1,Prokat2);

в объект iVagonDetal добавилось новое своейство TypKP, подробности смотрите ниже в описании.

Описание доступных интерфейсов и методов, экспортируемых COM-объектом.

+iASU_VRK - основной интерфейс для доступа к данным

Ни один из ниже описанных объектов не может быть создан на стороне клиента.

+iVagons - возвращает список вагонов, полученных ранее из объекта iASU_VRK функция GetVagons

+iVagonsScrap - возвращает список вагонов, полученных ранее из объекта iASU_VRK функция GetVagonsScrap

+iJobs - возвращает список работ, производившихся на вагоне

+iAktDopS - возвращает список Актов допуска к текущему вагону

+iAktDop - возвращает параметры Акта допуска

+iAvrs - возвращает список строк АВР

+iVagonMessages - возвращает список замечаний и коментариев относительно вагона

+iVagonMXList - возвращает список лома и деталей, взятых на хранение с вагона

+iVagonReplaceDetList - возвращает список замененных деталей на вагоне

+iJob - возвращает параметры выполненной работы

+iAvr - возвращает параметры строки акта выполненных работ

+iDetal - возвращает параметры детали, стоимость которой устанавливается отдельно от работы

+iVagonMX - возвращает параметры детали, взятой на хранение или в лом с вагона

+iVagonReplaceDet - возвращает параметры замененной детали

+iModel - возвращает информацию о модели вагона

+iVagon - возвращает параметры вагона

+iVU23 - возвращает параметры ВУ-23 вагона.

+iVU4M - возвращает параметры паспорта ВУ-4М.

+iVagonScrap - возвращает параметры вагона с разделки

+iScrapDetal - содержит параметры лома снятого в вагона после разделки

+iBankDetails - содержит банковские реквизиты

+iContract - возвращает параметры договора

+iGroupList - возвращает список групп вагонов в АРМ ремонта вагонов

+iTelRamaGapList - возвращает список зазоров тележек с вагона (в АРМ ремонта вагонов)

+iTelRamaGap - содержит информацию о зазорах тележек на вагоне

+iDTHistoryList - возвращает список деталей при запросе истории детали, так как деталей с одинаковыми номерами может быть две и более

+iScraps - возвращает список доступных детлей для добавления под вагон (АРМ разделки)

+iContracts - возвращает список доступных договоров

+iDetalComplekt - содержит информацию по входной и выходной комплектации

+iVagonDetails - содержит информацию о кол-ве деталей на вагоне на входе или на выходе из ремонта

+iVagonDetal - содержит информацию о детали, полученную ранее при помощи объекта iVagonDetails

+iVagonModels - возвращает список доступных моделей вагонов

+iSkladExDocs - содержит список документов, заведенных в АРМ склад

+iRemains - содержит информацию о детали из остатков (это может быть колесная пара, боковая рама, автосцепка и т.д.)

+iSkladEx - содержит документ, заведенный в АРМ склад

+iSkladExMat - содержит информацию о материале, добавленном в АРМ склад

+iKPDetal - содержит информацию о колесной паре.

+iGroupInfo - содержит информацию о группировке вагонов в один акт выполненных работ

+iDTHistoryRows - возвращает список строк из истории конкретной детали, нумерация начинается с 0 и продолжается до Count-1.

+iDTHistoryInfo - содержит подробную информацию о записи в истории детали или ее актуальном состоянии

+iVagonMessage - содержит подробную информацию о коментарии собственника к вагону

+iVagonTypes - возвращает справочник типов вагонов

+iVKMdata - возвращает данные о КП из ВКМ

+iNewHIDVKM - возвращает код Оси(или код КП), полученной в АРМ ВКМ при расформировании(формировании)
(результат метода SaveVKMData объекта iKPDetal)

АРМ Ремонта деталей:

+iRepDetails - возвращает список документов, полученных ранее из объекта iASU_VRK функция GetRepDetails

+iRepDetail - возвращает параметры документа АРМ Ремонта деталей

+iRemDetMXList - возвращает список лома образованного при ремонте детали

+iRemDetMX - возвращает параметры детали или в лома

+iDetalRp - содержит информацию о детали, полученную ранее при помощи метода GetDetalRp

АРМ Расчёта стоимости и хранения:

+iKeepCosts - возвращает список документов, полученных ранее из объекта iASU_VRK функция GetKeepCosts

+iKeepCost - возвращает параметры документа АРМ Расчёта стоимости и хранения

+Пример использования на языке 1С

+Пример использования на языке Delphi

+Пример использования на языке C#

using System;
using asu_vrk_com;
 
namespace AsuVrkService
{
    internal class Program
    {
        public static void Main(string[] args)
        {
            // Подключение может быть сделано один раз на протяжении жизни переменной
            var asuVrk = (IASUVRK)Activator.CreateInstance(Type.GetTypeFromProgID("asu_vrk_com.ASUVRK"));
            // в качестве параметров указывает IP адрес или имя сервера где установлена база АСУ ВРК и логин пароль для доступа к данным
            var connectResult = asuVrk.ConnectToBase("*.*.*.*","UserName","Pass");
            if (connectResult != 0)
            {
                Console.WriteLine($"Не удалось подключится к базе АСУ ВРК {asuVrk.GetLastError}");
                return;
            }
            var fromDate = new DateTime(2013,07,24);
            var toDate = new DateTime(2015,07,24);
 
            var vagons = (IVagons) asuVrk.GetVagons(54186275, fromDate, toDate, 0, 0);
 
            for (var i=0; i<vagons.Count;i++)
            {
                // получаем данные по вагону, среди данных могут быть доступны почти все параметры вагона, данный функционал постоянно развивается
                var vagon = (IVagon) vagons.GetVagon(i);
                Console.WriteLine(vagon.DepoId);
            }
        }
    }
}