Имя: Пароль:
1C
1С v8
Это что за технологии древлян?
maxab72, craxx, Мультук, Fedor-1971, furchia, Злопчинский, ДемьянТ, alexxx961503, calmius, StanyaGeya, lubitelxml, Tarlich, Жеглофф, H A D G E H O G s, PLUT, zzz_zzz_zzz, АгентБезопаснойНацио, tomvlad, Garikk, VladZ, Sabron, Gucci76, Serpuh, Fregat, Irbis, dmt, mTema32, Михаил_, dedmoroz777, akronim, zalexey, boozin, CepeLLlka, Климов Сергей, vis, asady, obs191, Гипервизор, evgen48, Ватт, _Batoo, Джордж1, PuhUfa, murfor, AlvlSpb, BMW1C, ptiz, runuts, ALCAPONA, roman383, мистер игрек, shuhard, ads55, Fish, Amra, evgeniy_n, , RomaH, Kongo2019, Sneer, Karamzin, корум, Garykom, АНДР, maxar, trad, ЕRPe, Галахад, GlRoznica, DeeK, Кирпич, Верещагин, d4rkmesa, bvb, ДенисСмирнов, SleepyHead, unenu, Михаил Козлов, Lama12, MWWRuza, den_oren, BOOL, Хряк, Dotoshin, LuckyStar, Гость из Мариуполя, kuromanlich, NV_corp, 2mugik, abfm, dnab, Анцеранана, Александр111, Prog_man, p-soft, arsik, privetik, toypaul, FirstLineSupport, Чужой, firenze600, Широкий, Mraque, X Leshiy, novichok79, dchumak, diamkms, butterbean, Krendel, kir-g, AndreyZhukov, StarPer, nick86, Sserj, Builder, DiMel_77, Rovan, Mihenius, Crusher, zxc, DimVad, vbus, 1cVandal, ОбновляторОдинЭс, John D, avkynev, mishaPH, golem14, paramedic, Бешеный заяц, ADirks, KJlag, Ногаминебить, icipher, inkvizitr, Волшебник, vladko, Кир Пластелинин, mortal, Lazy Stranger, tir654
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) Древние шизы основывают шизофазический уклад.
28 CepeLLlka
 
05.02.26
16:24
(21)А как же #Вставить #КонецВставить?
Смешно же было, жаль отменили :)
29 Гипервизор
 
05.02.26
16:34
(28) Ага, помню анонс на Зазеркалье. )
На производстве есть "короткие концы", так что не очень смешно.
30 maxab72
 
05.02.26
17:00
(20) жив он. Только используется для того, для чего и предназначался - математические расчеты повышенной точности.
31 АгентБезопасной Нацио
 
05.02.26
17:10
(20) фортран не сдох, и вполне активно развивается (последний  стандарт на данный момент - fortran2023). Просто нишевый язык сейчас, для числодробления.
32 VladZ
 
05.02.26
17:14
(0) А тебе это зачем?
Откопал - закопай обратно.
33 craxx
 
05.02.26
18:23
(26) Эх, многих тут уже и на этом свете нету((
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn