Работа с 1С | |
---|---|
Maxiv Автор |
Стояла задача удалить одну из фирм в 1С Торговле и все документы относящиеся к ней.
Вот кусочек возможно не лучшего кода, но с задачей он справился. V7=CREATEOBJECT("v77.Application") PATH_1C=Путь к базе V7.INITIALIZE(V7.RMTRADE, '/D'+PATH_1C+' /M','NO_SPLASH_SHOW') ДОК=V7.CREATEOBJECT('Документ') ДОК.ВЫБРАТЬДОКУМЕНТЫ() DO WHILE ДОК.ПОЛУЧИТЬДОКУМЕНТ()>0 ТДОК=ДОК.ТЕКУЩИЙДОКУМЕНТ() ДОКАТР=ТДОК.ПОЛУЧИТЬАТРИБУТ("Фирма") IF ДОКАТР.НАИМЕНОВАНИЕ==Название фирмы подлежащей удалению ДОК.УДАЛИТЬ(0) ENDIF ENDDO ![]() |
© 2000-2025 Fox Club  |