Месяц: Март 2013
Выгрузка списка контрагентов в XML (1C 8.2)
Достаточно простой код, используя обьект 1С ЗаписьXML:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 |
Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | Контрагенты.Наименование как имя, | Контрагенты.НаименованиеПолное как полноеимя, | Контрагенты.Код как код, | Контрагенты.ИНН как инн, | Контрагенты.КПП как кпп, | Контрагенты.Ссылка, | Контрагенты.Покупатель как покупатель, | Контрагенты.Поставщик как поставщик |ИЗ | Справочник.Контрагенты КАК Контрагенты"; Результат = Запрос.Выполнить().Выбрать(); ЗаписьXML = Новый ЗаписьXML; ЗаписьXML.ОткрытьФайл("\\10.80.16.34\Documents\counterpart.xml","UTF-8"); ЗаписьXML.ЗаписатьОбъявлениеXML(); ЗаписьXML.ЗаписатьНачалоЭлемента("export"); пока Результат.Следующий() цикл ЗаписьXML.ЗаписатьНачалоЭлемента("counterpart"); ЗаписьXML.ЗаписатьБезОбработки("<name>"+Результат.имя+"</name>"); ЗаписьXML.ЗаписатьБезОбработки("<fullname>"+Результат.полноеимя+"</fullname>"); ЗаписьXML.ЗаписатьБезОбработки("<code>"+Результат.код+"</code>"); ЗаписьXML.ЗаписатьБезОбработки("<inn>"+Результат.инн+"</inn>"); ЗаписьXML.ЗаписатьБезОбработки("<kpp>"+Результат.кпп+"</kpp>"); ЗаписьXML.ЗаписатьБезОбработки("<buyer>"+Результат.покупатель+"</buyer>"); ЗаписьXML.ЗаписатьБезОбработки("<supplier>"+Результат.поставщик+"</supplier>"); ЗаписьXML.ЗаписатьКонецЭлемента(); конеццикла; ЗаписьXML.ЗаписатьКонецЭлемента(); |
Сохранение ширины столбцов макета в табличной части при выводе разных макетов (1С)
Дано: два макета с различной шириной столбцов последовательно друг за другом выводятся в табличную часть документа.
Получаем: при выводе второго макета используется ширина столбцов от первого макета. Соотвественно печатная форма искажается.
Решение: в каждом макете выделяем мышкой все строки, и удерживая CTRL дергаем мышкой любую колонку. После чего выводится диалог: «Сохранить новый формат строк?». Отвечаем — Да. Как результат, при выводе макета в табличную часть, используется именно сохраненный формат, а не формат первого выведенного макета.
Получение прав root на Pipo m1 max
Предыстория: планшетом 90% времени пользуется маленький ребенок (2.7 года). А точнее играет в игрушки, слушает сказки, «раскрашивает» рисунки и т.п. Как оказалось очень трудно научить ребенка не нажимать случайно пальчиками на не убираемые кнопки внизу экрана характерные для операционок семейства Android 4.х Да меня немножко напрягало то, что часть экрана, даже при просмотре фильмов используется для этой статусной строки (бред!!бред!!). Из предложенных программ для устранения данного недостатка, Google Play выдал ссылку на приложение FullScreen. Один правда нюанс, для работы данного приложения необходимо получить root доступ к операционной системе.
Дураки и дороги..
У меня предложение к тем кто отвечает за состояние дорог в Вологодской области: ну не можете привести в порядок все дороги, так приведите хотя-бы в нормальный вид дороги на мостах и на перекрестках. Это сильно поспособствует в деле уменьшения пробок на дорогах в частности в Вологде. Ну не поеду например я быстрее 40 км/час по Ленинградскому мосту по его колеям, рискуя улететь на ж/д пути. Или хоть убибикайтесь, взади едущие, но не поеду я по светофорам по перекресткам больше 20-30 км/час по раздолбаным дорогам, пусть и зелёный свет. Мне ежегодный ремонт подвески обходится в 16 тыс. рублей. Не готов я ремонтировать подвеску два раза в год. Со мной я думаю солидарны ОЧЕНЬ большая часть водителей.