Форумы Интермех
 ° Начало ° Ответить ° Статистика ° Регистрация ° Поиск ° RSS ° Wiki °

Форумы Интермех / Techcard / Получение способа нормирования через API. Возможно ли??
Автор Сообщение
Vchik
Участник
Таганрог

Дата: 9 Сен 2010 12:56:39 ° Поправил: Vchik


Добрый день. есть задача переноса данных из техкард в 1С. в данный момент требуется из техкарда вытянуть техпроцессы. с цехами и операциями проблем не возникает. Подскажите как добраться до нормирования тех операций? возможно ли получить нормирование через API функции???!!!
Спасибо.

P.S. И еще, имеется ли у кого-нибудь свежая документация по TeachAPI и по описанию БД в техкард. буду очень благодарен если поделитесь знаниями и материалом.

Katenok-13
Участник
ОАО "Бийский котельный завод"

Дата: 13 Сен 2010 07:28:00


Все значения хранятся в понятиях. Да, есть API-функции, позволяющие получить значения любых понятий. Для задач интеграции с 1С обычно необходимо лишь несколько параметров - например, Тшт, Норма и т.д. Написать программу, которая получает значения соответствующих понятий, и помещает в удобную для 1С форму (например, dbf или таблицы SQL Server), не так уж сложно.

Документация находится на установочном диске. Если приложенной информации недостаточно, разработчики высылают по запросу по e-mail.

Vchik
Участник
Таганрог

Дата: 16 Сен 2010 13:42:26


Спасибо за ответ, все получилось Решил отписаться в этой теме. Может быть кому-нибудь будет полезна:

В techapi для класса ITOper есть метод Value. Для меня стоял вопрос как получить норму времени и что передать в качестве параметра. Самый просто способ раскатать базу данных и посмотреть таблицу TC_Entity. В ней содержится все необходимые значения. для получения Нормы штучного времени ITOper. Value("Тшт") возвращает необходимое значение для текущего техпроцесса.

Vchik
Участник
Таганрог

Дата: 23 Сен 2010 15:21:46 ° Поправил: Vchik


Появился еще один вопрос...
Необходимо в название тех-операции получать не только операцию, а операцию + оборудование. Точно так же, как оно отображается в Techcard. Оборудование получаю по обращению к полю "ОПЕР" таблицы TC_ENTITY, а по какому полю и какой таблицы можно получить оборудование, на котором выполняется Тех-операция??

Спасибо

Katenok-13
Участник
ОАО "Бийский котельный завод"

Дата: 24 Сен 2010 06:06:40


Оборудование хранится в таблице tp_ob. Но необходимо учитывать следующую особенность: на операцию может быть назначено несколько штук оборудования. Соответственно, в таблице будет несколько записей. А в дереве операций отображается только одно (обычно - первое).

ktb
Участник
ОАО ТВЗ г. Тверь

Дата: 7 Фев 2011 13:43:52


Фрагмент:
set tp1 = tp_list.ByArchCode(id_tp)
if tp1 Is Nothing then
ws.Cells.Item(row, 5).Value = "Не найден ТП в базе Техкард"
else
obozn=tp1.designation
ws.Cells.Item(row, 1).Value = obozn
ws.Cells.Item(row, 2).Value = tp1.value("Ceh")
set fop=tp1.opers
if fop Is Nothing then
msgbox "Не создался объект операции"
else
kol_op=fop.count
''''
if kol_op>0 then
for io=0 to kol_op-1
set fop1=fop.oper(io)
if not fop1 Is Nothing then
ws.Cells.Item(row,3).Value = fop1.value("УЧК")
ws.Cells.Item(row,4).Value = fop1.Number
ws.Cells.Item(row,5).Value = fop1.Value("Тшт")
ws.Cells.Item(row,9).Value = fop1.Value("ТштИ")
' текущая операция
set fobors=fop1.Equipments ' список оборудования к ней
k_ob=fobors.count ' колич. оборудования на операцию
if k_ob>0 then
for i_ob=0 to k_ob-1 ' цикл по списку оборуд
set fobor1=fobors.Equipment(i_ob)
if fobor1 Is Nothing then
ws.Cells.Item(row,6).Value ="fobor1 не назначился"
else
ws.Cells.Item(row,6).Value = fobor1.Value("ИнвН")
ws.Cells.Item(row,7).Value = fobor1.InvNum ' f_key в табл. tc_invnom
ws.Cells.Item(row,.Value = fobor1.code
end if 'fobor1 Is Nothing
row=row+1
next
else
row=row+1
end if ' k_ob>0

end if ' not fop1 Is Nothing the
set fop1=fop.next
next
else
row=row+1
end if ' kol>0
'''''
end if ' fop Is Nothing then
end if ' tp1 Is Nothing then
end if ' id_tp > 0

Vchik
Участник
Таганрог

Дата: 28 Мар 2011 11:15:03


ktb - Спасибо за пример!

Ваш ответ

Bold Style  Italic Style  Underlined Style  Image Link  Insert URL 
...



Перед отправкой "нелатинского" текста проверьте кодировку броузера!
 » Логин  » Пароль 
 

На форуме сейчас: гостей - 1
пользователей - 0
Наибольшее количество посетителей: 165 [12 Янв 2025 18:00:44]
гостей - 165 / пользователей - 0


miniВВ © 2001-2025