|
|
Это что за технологии древлян?
ads55, PLUT, Fish, Amra, H A D G E H O G s, evgeniy_n, Fedor-1971, , RomaH, Kongo2019, Sneer, Karamzin, корум, Garykom, Джордж1, АНДР, maxar, trad, ЕRPe, Галахад, GlRoznica, DeeK, Гипервизор, Кирпич, Верещагин, lubitelxml, 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) Древние шизы основывают шизофазический уклад.
|
|