INFOSTART EVENT 2018 EDUCATION

Второй тур голосования за доклады.
Окончание 5 сентября.

Ошнуров Андрей | Программист | Предприниматель

«РусскийФокс — 1С-подобный язык программирования»

Новый язык 1С-подобный объектно-ориентированный язык программирования РусскийФокс (интерпретатор), FreeWare. Удобен для обучения (Размер платформы 14Мб, инсталляции не требует. Разрабатывается на FoxPro 9) Удобен для системных администраторов: писать сценарии для командной строки. Операционная система WinXP и выше. На данный момент из синтакс-помошника учебной версии 1С реализованы все функции работы со строками, все функции работы со значениями типа Дата, функции преобразования значений (число, строка, дата). Пока отсутствует отладчик, но реализованы операторы ПОПЫТКА, ИСКЛЮЧЕНИЕ, КОНЕЦПОПЫТКИ; В ближайшее время планируется создать объекты для работы с DBF-файлами (с CDX индексами), объект для работы с MySQL-сервером, генерация отчетных форм на основе шаблонов OpenOffice и LibreOffice (либо на MS Excel), создание экранных форм ввода данных, создания меню, объекты типа строка ввода, кнопки, таблица, чекбоксы и т.д.. Особое внимание будет уделено взаимодействию с платформой 1С. Доклад будет посвящен краткому обзору возможностей и демонстрации примеров написания кода.

Акт сверки взаиморасчетов для Бухгалтерии 3.0

Печать - Печатные формы документов

1
Акт сверки доработан для отображения шапки договора. Немного подправил для себя. Кому нужно, берите. Макет подменить в конфигураторе вместо стандартного.

Этот код нужно вставить в модуль менеджера Документа АктСверкиВзаиморасчетов

// За период
        ДатаНачалаОтчета = ?(ЗначениеЗаполнено(Шапка.ДатаНачала), Шапка.ДатаНачала, Шапка.МинДата);
        Если ЗначениеЗаполнено(ДатаНачалаОтчета) Тогда
            ЗаПериод = ПредставлениеПериода(НачалоДня(ДатаНачалаОтчета), КонецДня(Шапка.ДатаОкончания), "ФП = Истина");
            ПараметрыЗаголовок.Вставить("ЗаПериод", СтрШаблон(НСтр("ru='за период: %1'"), ЗаПериод));
        КонецЕсли;
    
        ТекстЗаголовка = "взаимных расчетов за период: " + ЗаПериод  + Символы.ПС
                        + "между " + НазваниеОрганизации + Символы.ПС + "и " + НаименованиеКонтрагента;
        ДоговорКонтрагента = Шапка.ДоговорКонтрагентаВШапке;
        Если ЗначениеЗаполнено(ДоговорКонтрагента) И НЕ ДоговорКонтрагента.ЭтоГруппа Тогда
            ТекстЗаголовка = ТекстЗаголовка + Символы.ПС + "по договору " + ДоговорКонтрагента;
        КонецЕсли;
        
        ПараметрыЗаголовок.Вставить("ТекстЗаголовка", ТекстЗаголовка);

Тестировалось на 1С:Бухгалтерия 3.0.43.

1

Скачать файлы

Наименование Файл Версия Размер
печатная форма акта взаиморасчетов
.mxl 11,65Kb
19.02.18
1
.mxl 11,65Kb 1 Скачать

См. также

Комментарии
Сортировка: Древо
2. rjkjlptq 11 21.05.18 06:54 Сейчас в теме
Добрый день!
А где печатная форма?!

Скачивается файл в .mxl.
Лохотрон за 1 стартмани.
3. maxon 4 22.05.18 23:11 Сейчас в теме
Это и есть макет. Все верно выложил. Его нужно в конфигураторе заменить вместо стандартного макета. И добавить тот код что указан в описании.
Оставьте свое сообщение