Имя: Пароль:
1C
1С v8
Это что за технологии древлян?
lubitelxml, Гипервизор, Fedor-1971, shuhard, ads55, PLUT, Fish, Amra, H A D G E H O G s, evgeniy_n, , RomaH, Kongo2019, Sneer, Karamzin, корум, Garykom, Джордж1, АНДР, maxar, trad, ЕRPe, Галахад, GlRoznica, DeeK, Кирпич, Верещагин, d4rkmesa, bvb, Irbis, ДенисСмирнов, SleepyHead, vis, unenu, Михаил Козлов, Lama12, MWWRuza, den_oren, Garikk, BOOL, Хряк, Жеглофф, Dotoshin, LuckyStar, Гость из Мариуполя, kuromanlich, NV_corp, 2mugik, abfm, dnab, Fregat, Анцеранана, Александр111, Prog_man, p-soft, ptiz, arsik, tomvlad, privetik, toypaul, FirstLineSupport, Чужой, firenze600, Широкий, Mraque, X Leshiy, novichok79, dchumak, diamkms, butterbean, Krendel, kir-g, zzz_zzz_zzz, AndreyZhukov, StarPer, nick86, Sserj, Builder, DiMel_77, Rovan, Mihenius, Мультук, Crusher, zxc, obs191, DimVad, vbus, 1cVandal, Климов Сергей, ОбновляторОдинЭс, John D, avkynev, mishaPH, golem14, paramedic, Бешеный заяц, ADirks, KJlag, Ногаминебить, icipher, inkvizitr, Волшебник, Serpuh, vladko, Кир Пластелинин, mortal, Lazy Stranger, tir654, Tefal, Aloex, НаборДанных, Double_Medved, Philix, maxab72, бегинер, orakool, K1RSAN, Silgis, Stepashkin, Timon1405, СеньорПрограммист, Доминошник, CepeLLlka, Михаил_, dva1c, trdm, Ненавижу 1С, sikuda, s_trikozin, Ёпрст, mgreat, Indian, Mankubus, jack777, PR, integer, Homer, Новиков, ansh15, Kigo_Kigo, АгентБезопаснойНацио, Hmster, Бычье сердце, Шурик71, eklmn, Trucker, Phace, АЛьФ, Fragster, Vstur, craxx, evorle145, elka302, Telcher, okmail, RAJAH, El_Duke, 2S, Sanchez_22, Elf_80_lvl, rbcvg, ryutao, kupec, ANDRU48, RomanYS, END, Arh01, zva, Затейник, yurikmellon2, TormozIT, boev82, ReaLg, Winnie Buh
0 NV_corp
 
05.02.26
08:37
10 лет работаю с 1С, а такой код вижу впервые. И ладно бы, это новомодное детище нейросети, 1с исполнителя или еще чего. Нет, это в примере КД2.1, который писался наверно еще до моего рождения:

ДатаИзмененияОбъекта = ДатаНачала;
Сообщить("Контрагенты");

Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса = "
|ТекущийЭлемент = Справочник.Партнеры.ТекущийЭлемент;
|ДатаИзменения = Справочник.Партнеры.ДатаИзменения;
|Группировка ТекущийЭлемент;
|Условие(ДатаИзменения >= ДатаИзмененияОбъекта);";

Запрос.Выполнить(ТекстЗапроса);
Пока Запрос.Группировка(1) = 1 Цикл
ВыгрузитьПоПравилу(Запрос.ТекущийЭлемент, , , , "Контрагенты");
КонецЦикла;
1 Мультук
 
гуру
05.02.26
08:40
(0)

Это код 7.7 и вроде (сколько помню) тут всё ок.
2 Fedor-1971
 
05.02.26
09:16
(0) Это кусок правила выгрузки от КД2 из 1С 7.7
ДатаНачала - реквизит формы обработки выгрузки V77Exp.ert (в терминах 8)
дальше обход результатов и выгрузка данных
3 craxx
 
05.02.26
09:25
(0) Здравствуй человек из будущего))) теперь ты познакомился с творчеством древних 1Сников.
"10 лет работаю с 1С, а такой код вижу впервые."
Даже завидую. Я 10 лет назад именно это разгребал.
4 Rovan
 
гуру
05.02.26
09:28
(0) для это было как будто "вчера"
на самом деле 15-20 лет назад
5 craxx
 
05.02.26
09:30
(4) местами и сейчас еще. Год назад одних переводил с ТиС.
6 Fedor-1971
 
05.02.26
09:40
(4) 7.7 живее всех живых (почти как дедушка Ленин).
Слезают с неё крайне неохотно, особенно там, где выстроили процессы и допилили под себя
7 toypaul
 
гуру
05.02.26
10:13
10 лет мало. 30 - вот это срок
8 vis
 
05.02.26
10:24
Вот и выросло новое поколение
9 Stepashkin
 
05.02.26
10:45
(8) Не говори)
10 ads55
 
05.02.26
11:10
Вот ещё древнее технологии тех же "древлян" есть - http://old-dos.ru/files/file_1899.html
11 ptiz
 
05.02.26
11:13
Чему удивляться, если выросло целое поколение, не умеющее работать даже с обычными формами 1С 8.
12 Джордж1
 
05.02.26
11:44
Бухгалтерия 6.0

* Выясняем длину строки с ФИО
!П_ДлинаСтроки=СТРДЛИНА(П_СтрокаФИО)

* Выясняем количество символов в фамилии
* Для этого ищем позицию первого пробела
!ПорНомерСимвола=1
!ЦИКЛ ВЫД(П_СтрокаФИО\ПорНомерСимвола\1)<>" "
    !* Крутим цикл, пока не встретим первый пробел
    !ПорНомерСимвола=ПорНомерСимвола+1
!ВОЗВРАТ

* Выделяем подстроку с фамилией из строки ФИО
!П_Фамилия=ВЫД(П_СтрокаФИО\1\ПорНомерСимвола)
* Выделяем подстроку с именем и отчеством из строки ФИО
!П_ИмяОтчество=ВЫД(П_СтрокаФИО\ПорНомерСимвола+1\П_ДлинаСтроки-ПорНомерСимвола)

А вот так проводки создавались

!ВЫБРАТЬ СТРОКУ
   !пСумма=СКД41:{|2}/СКД41:{|2}Н*ЗН|3
   !*       Дата;  Д;     К;     Сумма;     Содержание;                      Субк Д; Субк К; Кол
   !ПРОВОДКА ЗН2; "90.2"; "41.1"; пСумма; "НК "+ЗН1+": "+СН{|2}+" по средней"; ЗН7; ЗН|2; ЗН|3
!СЛЕДУЮЩАЯ СТРОКА
13 Джордж1
 
05.02.26
11:43
У нас в этом году юбилей 7-ки
Версия 7.0 вышла в 1996 году. Но вот не написано когда точно.
Кто-то знает?
14 ptiz
 
05.02.26
11:51
(13) Интересно, создатели 7.0. и 7.7 на сколько лет жизни своего детища рассчитывали?
15 p-soft
 
05.02.26
11:56
(14) они просто ошиблись. клюшки вычны! но заработать на них сложно, поэтому это удел бедных энтузиастов)
16 Krendel
 
05.02.26
11:57
(15) также говорили и про фортран ;-)
17 Гипервизор
 
05.02.26
12:00
(12) Т.е. СКД уже в 6.0 была. )
18 Lama12
 
05.02.26
12:01
(17) Сальдо конечное дебетовое. 😎
19 Джордж1
 
05.02.26
12:09
Когда я только начинал в 1997 мне знакомый описание встроенного языка Бухгалтерии 6.0 на 3-х страницах дал

Еще и с Бухгалтерией 5.0 под DOS пришлось поработать - там еще проще был язык и главное всего 1 субконто и формы не настраивались

А еще, к отцу на работу дяденька приехал в первой половине 90-х Зарплату (АиТ-Зарплата) и Бухгалтерию 5.0 под DOS внедрять.
И отец познакомил меня с этим небожителем.
А дяденька рассказывал что оно новую Волгу 31029 приобрел, что бы охрененно круто. У нас и компьютера то дома не было
(Помните хейт про Вадима и Короллу?)
20 p-soft
 
05.02.26
12:06
(16) фортран - крутая тема была. но на винде он сдох. удивительно, что даже аксесс не особо жив.. хотя это у нас только наверное
21 Мультук
 
гуру
05.02.26
12:06
А кто помнит такое? В официальном релизе было в ЗУП 7.7

//Если бы...
Функция ПодохНалог(Сумма)




Да, тогда программисты от 1С умели в шутки юмора
22 Джордж1
 
05.02.26
12:08
(21)Еще с тех времен не перевариваю ЗиК и ЗУП.
Камин рулит
23 p-soft
 
05.02.26
12:09
(21) и слава богу))
24 Гипервизор
 
05.02.26
12:17
(21) Сейчас другой юмор: ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент и вот это вот всё.
25 X Leshiy
 
05.02.26
12:42
(0) Салага)
26 ads55
 
05.02.26
12:59
(24) Наткнулся в лурке, кажется это с Мисты -
"GROOVY: Событие "ПриИзменении" отрабатывает на клиенте, а не на сервере.
Крошка Ру: Предлагаю в 1С внедрить новую директиву:
&НаКлиентеНоЕслиЧоТоИНаСервере
специально для начинающих программистов
Fragster: ты не поверишь: &НаКлиентеНаСервереБезКонтекста
Fragster:&НаКлиентеНаСервере
Господин ПЖ: лучше сразу:
&ИменемБорисаНуралиеваВыполнисьГдеБыНиБыл" :)
27 H A D G E H O G s
 
05.02.26
15:39
(0) Древние шизы основывают шизофазический уклад.