ЗаписатьДатуJSON() в 1С 8.3: Код 1C v 8.3 Процедура ПреобразованиеДатыВДатуJSON() // Пример: 12.08.2023 09:15:29 ТестДата = Дата("20230812091529"); // Вариант записи - "ЛокальнаяДата" // Локальная дата без указания часового пояса. // // Преобразует дату в "2023-08-12T09:15:29" ДатаJSONСтрока = ЗаписатьДатуJSON(ТестДата, ФорматДатыJSON.ISO, ВариантЗаписиДатыJSON.ЛокальнаяДата); // Вариант записи - "ЛокальнаяДатаСоСмещением" // Локальная дата с указание смещения относительно всемирного координированного времени (UTC). // // Преобразует дату в "2023-08-12T09:15:29+03:00" ДатаJSONСтрока = ЗаписатьДатуJSON(ТестДата, ФорматДатыJSON.ISO, ВариантЗаписиДатыJSON.ЛокальнаяДатаСоСмещением); // Вариант записи - "УниверсальнаяДата // Дата в поясе UTC. // // Преобразует дату в "2023-08-12T09:15:29Z" ДатаJSONСтрока = ЗаписатьДатуJSON(ТестДата, ФорматДатыJSON.ISO, ВариантЗаписиДатыJSON.УниверсальнаяДата); //////////////////////// // Для формата: JavaScript, Microsoft, - необходимо использовать вариант записи "УниверсальнаяДата"! // Преобразует дату в "new Date(1691820929)" ДатаJSONСтрока = ЗаписатьДатуJSON(ТестДата, ФорматДатыJSON.JavaScript, ВариантЗаписиДатыJSON.УниверсальнаяДата); // Преобразует дату в "/Date(1691820929)/" ДатаJSONСтрока = ЗаписатьДатуJSON(ТестДата, ФорматДатыJSON.Microsoft, ВариантЗаписиДатыJSON.УниверсальнаяДата);КонецПроцедуры // ПреобразованиеДатыВДатуJSON() Категория:
WEB-сервисы, WS-ссылки, XDTO-пакеты Как строку вида 2023-07-24T15:35:34+03:00 (формат ISO 8601) преобразовать в дату? Стандарт ISO 8601, составлен таким образом, что:
Строка даты-времени сплошная без пробельных разделителей Латинские символы используются в качестве разделителей/идентификаторов: D - дни, Y - годы, Z - идентификатор UTC и т.д., например можно задать промежуток времени: P4Y3M2D1H - 4 года, 3 месяца, 2 дня и 1 час. Буква T выбрана в качестве уникального разделителя времени, остальные буквы латинского алфавита (почти все) задействованы под разные цели и они не пересекаются. Соответственно упрощается парсинг ISO-8601 строки: имеется заранее известный набор флагов/символов/маркеров, опираясь на которые, можно достаточно быстро разбить строку на нужные составляющие и при этом сохраняется требование к human readability самой строки. Конвертация даты из формата ISO8601 в дату 1С:
Код 1C v 8.3 //Простой пример Категория:
Работа с Датами (Временем) РазницаДат в универсальном отчете УПП 1.3. Делаю отчет с помощью Универсального отчета. Как вывести количество дней в выбранном периоде?
РАЗНОСТЬДАТ(&ДатаНач,ДатаКон, ДЕНЬ) не подошло. Не видит параметров ДатаНач и ДатаКон.
Категория:
1С Управление производственным предприят… COM-подключение к базе 7.7 из .NET, .NET Core Инсталяция:> dotnet add package sabatex.V1C77
или добавить через NUGET пакет sabatex.V1C77.
Добавить пространство имен: using sabatex.V1C77;
пример использованя: ---C#
static void Main(string[] args) { // создаём строку соединения var connection = new sabatex.V1C77.Models.Connection { DataBasePath = @"C:\demo\1SBUKRD", // путь к базе PlatformType = sabatex.V1C77.Models.EPlatform1C.V77M, // платформа 1С77 UserName = "Админов", // имя пользователя UserPass = "" // пароль или пустая строка }; // соединяемся с 1С77 // using (var _1c77 = sabatex.V1C77.COMObject1C77.CreateConnection(connection)) { // перебор всего справочника Контрагенты var contr = _1c77.GlobalContext.CreateObject("Справочник.Контрагенты"); if (contr.Method<double>("ВыбратьЭлементы") == 1) { while (contr.Method<double>("ПолучитьЭлемент")==1) { if (contr.Method<double>("ЭтоГруппа") == 1) continue; var name = contr.GetProperty<string>("Наименование"); Console.WriteLine(name); } } } } [/pre]соответствие типов данных 1С7.7 и C#
строка - string число - doubl дата - DataTime остальное - V1C77COMObject возможно использовать bool для замены double(0- false;1 - true) тогда выражение сократится к if (contr.Method("ВыбратьЭлементы"))
Категория:
OLE, ActiveX Получить основной договор контрагента &НаСервере
Процедура НайтиДоговорКонтрАгента(ФормаОрганизация,ФормаКонтрагент)
Сообщить(ФормаКонтрагент);
КАгент = Новый Структура;
КАгент.Вставить("Организация",ФормаОрганизация);
КАгент.Вставить("Контрагент",ФормаКонтрагент);
КАгент.Вставить("ВидДоговора",Перечисления.ВидыДоговоровКонтрагентов.СПокупателем);
Сообщить(РегистрыСведений.ОсновныеДоговорыКонтрагента.Получить(ТекущаяДата(),КАгент)[0]);
КонецПроцедуры
Категория:
Регистры Сколько лет, месяцев, дней прошло между дата ми Код 1C v 8.х Категория:
Работа с Датами (Временем) Сколько лет, месяцев, дней прошло между дата ми ////////////////////////// параметры даты в запрос ////////////////////////////////////// приведем период в нормальную форму к виду (с лДата по пДата) /////////// ВЫБРАТЬ МИНИМУМ(пДаты._Дата) КАК лДата, МАКСИМУМ(пДаты._Дата) КАК пДата ПОМЕСТИТЬ _д ИЗ(ВЫБРАТЬ НАЧАЛОПЕРИОДА(&лДата,ДЕНЬ) AS _Дата ОБЪЕДИНИТЬ ВСЕ ВЫБРАТЬ НАЧАЛОПЕРИОДА(&пДата,ДЕНЬ)) КАК пДаты;////////////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ _д.лДата, _д.пДата, ВЫБОР КОГДА ГОД(_д.пДата)>= ГОД(_д.лДата)ТОГДА ВЫБОР КОГДА МЕСЯЦ(_д.пДата)>= МЕСЯЦ(_д.лДата)ТОГДА ГОД(_д.пДата)- ГОД(_д.лДата) КОГДА МЕСЯЦ(_д.пДата)< МЕСЯЦ(_д.лДата)ТОГДА ГОД(_д.пДата)- ГОД(_д.лДата)-1 КОНЕЦ КОНЕЦ КАК Лет, ВЫБОР КОГДА ГОД(_д.пДата)>= ГОД(_д.лДата)ТОГДА ВЫБОР КОГДА МЕСЯЦ(_д.пДата)>= МЕСЯЦ(_д.лДата)ТОГДА ВЫБОР КОГДА ДЕНЬ(_д.пДата)>= ДЕНЬ(_д.лДата)ТОГДА МЕСЯЦ(_д.пДата)- МЕСЯЦ(_д.лДата) КОГДА ДЕНЬ(_д.пДата)< ДЕНЬ(_д.лДата)ТОГДА МЕСЯЦ(_д.пДата)- МЕСЯЦ(_д.лДата)-1 КОНЕЦ КОГДА МЕСЯЦ(_д.пДата)< МЕСЯЦ(_д.лДата)ТОГДА ВЫБОР КОГДА ДЕНЬ(_д.пДата)>= ДЕНЬ(_д.лДата)ТОГДА12+ МЕСЯЦ(_д.пДата)- МЕСЯЦ(_д.лДата) КОГДА ДЕНЬ(_д.пДата)< ДЕНЬ(_д.лДата)ТОГДА12+ МЕСЯЦ(_д.пДата)- МЕСЯЦ(_д.лДата)-1 КОНЕЦ КОНЕЦ КОНЕЦ КАК Месяцев, ВЫБОР КОГДА ГОД(_д.пДата)>= ГОД(_д.лДата)ТОГДА ВЫБОР КОГДА МЕСЯЦ(_д.пДата)>= МЕСЯЦ(_д.лДата)ТОГДА ВЫБОР КОГДА ДЕНЬ(_д.пДата)>= ДЕНЬ(_д.лДата)ТОГДА ДЕНЬ(_д.пДата)- ДЕНЬ(_д.лДата) КОГДА ДЕНЬ(_д.пДата)< ДЕНЬ(_д.лДата)ТОГДА(ДЕНЬ(КОНЕЦПЕРИОДА(_д.лДата,МЕСЯЦ))- ДЕНЬ(_д.лДата))+ ДЕНЬ(_д.пДата) КОНЕЦ КОГДА МЕСЯЦ(_д.пДата)< МЕСЯЦ(_д.лДата)ТОГДА ВЫБОР КОГДА ДЕНЬ(_д.пДата)>= ДЕНЬ(_д.лДата)ТОГДА ДЕНЬ(_д.пДата)- ДЕНЬ(_д.лДата) КОГДА ДЕНЬ(_д.пДата)< ДЕНЬ(_д.лДата)ТОГДА(ДЕНЬ(КОНЕЦПЕРИОДА(_д.лДата,МЕСЯЦ))- ДЕНЬ(_д.лДата))+ ДЕНЬ(_д.пДата)+1 КОНЕЦ КОНЕЦ КОНЕЦ КАК Дней
Категория:
Работа с Датами (Временем) Пишу дипломный проект, можете подсказать как можно сделать диаграмму в инете нашел но так и не понял в таблице указано дата и показатель нужно построить обычную гистограмму
Категория:
1С ERP Управление предприятием 2.0 Как получить день недели прописью? При разработке часто пользователю хочется видеть на форме день недели словом, например: Вторник , Среда и т.д. Собственно как получить день недели словом?
Через функцию формат:
Код 1C v 8.3 ДеньПрописью = Формат(ТекущаяДата(), "ДФ=дддд"); Еще вариант для краткого представления:
Код 1C v 8.3 мнстр = "пн Категория:
Работа с Датами (Временем) Отправка и получение почты с использованием технологии шифрования SSL Почти все почтовые сервисы перешли на использование SSL и для получения почты нужно использовать IMAP, можно конечно и POP, но это уже прошлый век )
Пример получения почты с mail.ru по IMAP используя SSL:
Код 1C v 8.3 Функция ПолучитьНовыеПисьма() Экспорт Категория:
Работа с Интернет, Почтой (Mail), FTP Программное создание, заполнение документа и открытие формы (УП, тонкий клиент) Чтобы программно заполнить документ по кнопке, делаем примерно следующее:
1. на форму, в нашем случае документа, добавляем кнопку (Команда и у нее процедура СоздатьПеремещение(Команда))
2. в ее обработчике пишем код создания документа перемещение товаров и заполняем его
Код 1C v 8.3 &НаСервере Категория:
Документы Как посчитать разницу между двумя дата ми? Код уникален и сработает везде.
Код 1C v 8.3 Функция ПолучитьКоличествоДней() Категория:
Работа с Датами (Временем) Как в УТ 11.3, в справочник номенклатуры добавить остатки на складах и актуальные цены Попросил клиент добавить в справочник номенклатуры остатки и цены на текущий момент. Нужно!? Делаем:
1. Открываем форму списка номенклатуры и в свойства СписокНоменклатуры - Настройка списка
Корректируем запрос добавляя выборку по остаткам склада, новый вариант:
Код 1C v 8.3 ВЫБРАТЬ2. Устанавливаем параметры в Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
Код 1C v 8.3 СписокНоменклатура.Параметры.УстановитьЗначениеПараметра("Склад1", Справочники.Склады.НайтиПоНаименованию("PRO")); Добавляем Динамический список Цены:
В свойствах произвольный запрос:
Код 1C v 8.3 ВЫБРАТЬ РАЗРЕШЕННЫЕИ для списка номенклатуры пропишем обновление цен при активизации строки
Код 1C v 8.3 В результате:
Клиент доволен, а это самое главное
Если Вам нужна аналогичная настройка, обращайтесь, контакты тут
Категория:
1С Управление торговлей 11 Как заполнить поле табличного поля данными при добавлении новой строки Часто при вводе новой строки табличного поля нужно автоматически заполнить некоторые колонки, например Дата или Ставка НДС:
При добавлении в табличное поле новой строки может возникнуть ситуация, когда необходимо заполнить некоторые поля новой строки значениями по умолчанию. Для этого следует использовать событие ПриНачалеРедактирования () табличного поля. Обработчик данного события вызывается при начале редактирования старой или добавленной строки табличного поля и имеет параметры НоваяСтрока и Копирование . Параметр НоваяСтрока указывает, что происходит редактирование новой строки, а параметр Копирование указывает, что происходит копирование строки. Ниже код для управляемого приложения и обычного:
Код 1C v 8.3 &НаКлиентеРезультат при добавлении новой строки:
В обычном приложении:
Код 1C v 8.х Процедура СоставПриНачалеРедактирования(Элемент, НоваяСтрока, Копирование) Категория:
Работа с Формой (Диалог) и её элементами Не задана фамилия подписанта 1с 8.3 ЗУП, Как поменять подписанта? Как в программе 1С:Зарплата и Управление Персоналом поменять подписанта?
Для изменения подписанта в программе 1С:ЗУП необходимо провести следующие действия: Организации - ответственные лица - добавить нового (дата с какого).
При проверке отчетности выдает сообщение: Не задана фамилия подписанта и имя подписанта:
Расчет по страховым взносам за 1 квартал 2017 г. (Первичный. ИФНС: 7715) Не задана фамилия подписанта.
Решение:
Открыть данные организации:
В регистрации в налоговом органе должно быть указано кто подписывает: Руководитель и Представитель
Далее на Закладке Учетная политика и другие настройки - Ответственные лица организации
И на начало периода заполнить ответственных лиц.
Заполняйте отчет - все появится!
Внимание! встречались случаи когда подписант не заполнялся в отчете, нужно создать новый отчет за этот период!
Категория:
1С Зарплата и Управление Персоналом 3.0 
ЗаписатьДатуJSON() в 1С 8.3: Категория: WEB-сервисы, WS-ссылки, XDTO-пакеты
.gif)
