Ilya

10
Рейтинг

ivisor_fil



  •   Регистрация: 13.08.2007 (16 лет назад)

  •   Был(а) на сайте: 19.05.2021

Подписчики 2
Группы

Рейтинг 10

Распределение доли НДС для 1с 7.7: Бухгалтерский учет для Украины (297)
+1 –

Инструменты и обработки Бухгалтер Бухгалтерский учет 7.7 1С:Бухгалтерия 7.7 Украина Бухгалтерский учет Налоговый учет Windows НДС Абонемент ($m) Конфигурация (md, cf) Регламентированный учет и отчетность

Доработка типовой конфигурации 1с 7.7: Бухгалтерский учет для Украины (297), которая позволяет автоматически формировать налоговые накладные согласно проценту распределения доли НДС. И отображать их в реестре.

1 стартмани

10.04.2013    12248    1    ivisor_fil    2       

1

Чтение строк файла CSV в список значений с помощью метода ИзСтрокиСРазделителями
+9 –

Статья Программист Платформа 1С v7.7 Windows Бесплатно (free) Нет файла Механизмы платформы 1С

Чтение строк файла CSV в список значений с помощью метода ИзСтрокиСРазделителями

04.04.2013    21635    ivisor_fil    11       

9
Смотреть все

Комментарии

HighLoad › "Восстановить положение окна" - не помогает. Как я решил проблему. › #48 16.01.21 18:17
(47) мне помогло вот такое:
1. Форма > Показать привязки
2. Правка > Выделить все
3. В свойствах открыть настройки привязки и нажать кнопку Сбросить все привязки
4. В свойствах формы поставить флажок АвтоПравила
ВК › Внешняя компонента - звуковой сигнал с помощью системного динамика › #14 08.04.17 16:36
Вот посылка звукового сигнала на спикер:

Код
Процедура глБиип(КолЗвуков=0)
    Если КолЗвуков=0 Тогда Возврат; КонецЕсли;
    
    Shell = Новый COMОбъект("WScript.Shell");
    Команда = "%comspec% /c @echo ";
    Для Ном = 1 по КолЗвуков Цикл
        Команда = Команда + Символ(7);
    КонецЦикла;
    Shell.Run(Команда,0,0);
КонецПроцедуры


Скрыть
ВК › Альтернативная реализация функции Сигнал(Beep) › #9 08.04.17 16:25
(6)
Искал себе как сделать звуковую индикацию ошибочного ввода в 1с через спикер (потому как может не быть колонок, или выключен звук, или использоваться схема без звука)

Вот в итоге получиась такая небольшая процедурина:
Код
Процедура глБиип(КолЗвуков=0)
    Если КолЗвуков=0 Тогда Возврат; КонецЕсли;
    
    Shell = Новый COMОбъект("WScript.Shell");
    Команда = "%comspec% /c @echo ";
    Для Ном = 1 по КолЗвуков Цикл
        Команда = Команда + Символ(7);
    КонецЦикла;
    Shell.Run(Команда,0,0);
КонецПроцедуры
ВК › Альтернативная реализация функции Сигнал(Beep) › #8 08.04.17 16:17
Искал себе как сделать звуковую индикацию ошибочного ввода в 1с через спикер (потому как может не быть колонок, или выключен звук, или использоваться схема без звука)

Вот посылка звукового сигнала на спикер:

Код
Процедура глБиип(КолЗвуков=0)
   Если КолЗвуков=0 Тогда Возврат; КонецЕсли;
   
   Shell = Новый COMОбъект("WScript.Shell");
   Команда = "%comspec% /c @echo ";
   Для Ном = 1 по КолЗвуков Цикл
      Команда = Команда + Символ(7);
   КонецЦикла;
   Shell.Run(Команда,0,0);
КонецПроцедуры
Dev › Чтение строк файла CSV в список значений с помощью метода ИзСтрокиСРазделителями › #10 10.04.13 20:54
Все же не понимаю о каких функциях речь (приведите пример).
Здесь всего одна функция ЧтениеФайлаCSV. Остальное предопределенные методы объектов 1с 7.7.
Функции чтения CSV в глобальных модулях типовых конфигураций, которые мне попадались или в самом языке 1с 7.7 (без использования ВК)нет.
Поэтому я к сожалению совершенно не пойму что вы подразумеваете под "ссылками на функции общих модулей".
Собственно по тому я и выложил пример быстрого и краткого так сказать "пожарного" способа чтения CSV-файла т.к. ни каких "штатных" средств нет а для 2-3-х едино разовых эпизодических задач обычно не охота писать полноценный парсер.
Dev › Распределение доли НДС для 1с 7.7: Бухгалтерский учет для Украины (297) › #0 10.04.13 15:39
Доработка типовой конфигурации 1с 7.7: Бухгалтерский учет для Украины (297), которая позволяет автоматически формировать налоговые накладные согласно проценту распределения доли НДС. И отображать их в реестре.
Dev › Универсальная обработка для перенумерации справочников › #5 10.04.13 12:10
(4) soba
Дык это ж не я выложил - я просто написал, что бы я сам стал выкладывать и делать.
А простую перенумерацию можно на коленке за 5 минут написать - даже на форуме искать не придется.
Dev › Чтение строк файла CSV в список значений с помощью метода ИзСтрокиСРазделителями › #8 10.04.13 12:05
(7) МимохожийОднако,
О каких общих модулях речь?
Может вы 8.х имели ввиду?
Так это для 7.7
Dev › Универсальная обработка для перенумерации справочников › #2 09.04.13 14:08
А слабо без отмены контроля уникальности?

Выгрузить коды и ссылки на элементы в таблицу исходных кодов.
Добавить колонку и привести коды к необходимому формату.
Отсортировать по этой колонке.
Сформировать таблицу с последовательностью "правильных" кодов по формату и исходя из количества элементов в исх. таблице.
В первом проходе из таблицы исходных кодов выбрать элементы с "правильными" кодами и подставить их в таблицу правильных кодов (а из исходных удалить - останутся только "неправильные").
Во втором проходе из исходной таблицы подряд выбирать оставшиеся элементы и ставить их в соответствие незадействованным "правильным" кодам.
Пройтись по таблице правильных кодов и транзакцией записать "правильные" коды только элементам у которых код отличается от "приведенного".
(можно использовать только одну ТЗ - тут по желанию)

Т.о. во первых не нужно ни кого выгонять из базы и менять конфигурацию.
Во вторых, особенно если справочник большой, а нарушена нумерация только у небольшой части кодов (например вчера кто-то "накосячил" и пара сотен кодов из 10 000 "пошли вразнос") сохранится нумерация для тех элементов, которые уже имели верные коды даже неправильного формата(а это часто бывает важно, когда пользователи ориентируются по кодам а не по наименованиям).

Да и в обще - как-то по феншую это ;)
К тому же гораздо интереснее, чем тупо перебором перебить все подряд ИМХО.
БУ › Сложный алгоритм распределения Платежных поручений по Банковским счетам › #7 05.04.13 8:13
Лично мне понравился метод динамического программирования.
Строится сеть. По оси X откладываем количество платежей, по оси Y — их стоимость. На первом шаге из начала координат строятся две линии: горизонтальная, соответствующая тому, что первый платеж не был сделан, и наклонная, соответствующая сделанному первому платежу. Их проекции на ось Y равны сумме платежа. На втором шаге опять строим 2 линии, горизонтальная (второй платеж не был сделан) или наклонная (второй платеж сделан)...
Таким образом, любому решению задачи соответствует некоторый путь в сети.
Задача сводится к нахождению пути максимальной длины.(на рисунке пунктиром)

Прикрепленные файлы:

1.JPG