Тема: Как записать номенклатурный текст?
Записать в номенклатурный текст что-то через апи.
Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
TechnologiCS → TechnologiCS → Использование TechnologiCS API → Как записать номенклатурный текст?
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Записать в номенклатурный текст что-то через апи.
что-то не работает....
не пойму что...
Set NmkText = Nomenclatures.Properties("NmkText").AsIDispatch If Not NmkText Is Nothing Then Call NmkText.CancelChanges Call NmkText.Edit NmkText.Properties("NMK_TEXT").AsString = NmkText On Error Resume Next Call NmkText.SaveChanges Call NmkText.CancelChanges End If Set NmkText = Nothing
ничего не записывается
руками записать могу
Sub FormMacro_Test123(TCSActiveModule) 'Test Set NmkText = TCSActiveModule.Properties("NmkText").AsIDispatch If Not NmkText Is Nothing Then Call NmkText.CancelChanges Call NmkText.Edit NmkText.Properties("NMK_TEXT").AsString = "Мой текст!" On Error Resume Next Call NmkText.SaveChanges Call NmkText.CancelChanges End If Set NmkText = Nothing End Sub
Да вроде работает.
и правда если просто так то работает, а в контектсте всего у меня не работает, поищу разницу.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
TechnologiCS → TechnologiCS → Использование TechnologiCS API → Как записать номенклатурный текст?