Недавно одна компания перед собеседованием попросила прислать кусок кода которым, я цитирую "Вы гордитесь".
Я даже растерялся.
А какие еще забавные ситуации у вас бывали при поиске работы?

Да и вообще, что можно наваять на языке 1с, чтобы гордиться?

баян...
напиши свои вопросы которые ты задашь соискателю когда будешь искать программиста себе в команду.

(1) Сделать из 1500 строк кода 200, с 60-кратным приростом производительности. У меня несколько раз получалось.

(0) Пришлите пустой Вордовский документ. Код который я не написал, так как объяснил пользователям, что то что им нужно можно получить по другому, стандартными механизмами:)

(0) это тебе к Г1С, он каждую свою строку считает гениальной

(4) +100500 Сам хотел это написать.

(0) Вот, сразу вспомнилось (это не мое)

Функция обПадежОдногоСлова(Знач Слово,Знач Падеж=2,Знач Пол="*",ВидСклонения=0) Экспорт
    z5=Найти(Слово,"-");
    z6=?(z5=0,"","-"+обПадежОдногоСлова(Сред(Слово,z5+1,СтрДлина(Слово)-z5+1),Падеж,Пол,ВидСклонения));
    Слово=НРег(?(z5=0,Слово,Лев(Слово,z5-1)));
    z7=Прав(Слово,3);z8=Прав(z7,2);z9=Прав(z8,1);
    z5=СтрДлина(Слово);
    za=Найти("ая ия ел ок яц ий па да ца ша ба та га ка",z8);
    zb=Найти("аеёийоуэюяжнгхкчшщ",Лев(z7,1));
    zc=Макс(Падеж,-Падеж);
    zd=?(za=4,5,Найти("айяь",z9));
    zd=?((zc=1)или(z9=".")или((ВидСклонения=2)и(Найти("оиеу"+?(Пол="ч","","бвгджзклмнпрстфхцчшщъ"),z9)>0))или((ВидСклонения=1)и(Найти("мия мяэ лия кия жая лея",z7)>0)),9,?((zd=4)и(Пол="ч"),2,?(ВидСклонения=1,?(Найти("оеиую",z9)+Найти("их ых аа еа ёа иа оа уа ыа эа юа яа",z8)>0,9,?(Пол<>"ч",?(za=1,7,?(z9="а",?(za>18,1,6),9)),?(((Найти("ой ый",z8)>0)и(z5>4)и(Прав(Слово,4)<>"опой"))или((zb>10)и(za=16)),8,zd))),zd)));
    ze=Найти("лец вей бей дец пец мец нец рец вец аец иец ыец бер",z7);
    zf=?((zd=8)и(zc<>5),?((zb>15)или(Найти("жий ний",z7)>0),"е","о"),?(Слово="лев","ьв",?((Найти("аеёийоуэюя",Сред(Слово,z5-3 ,1))=0)и((zb>11)или(zb=0))и(ze<>45),"",?(za=7,"л",?(za=10,"к",?(za=13,"йц",?(ze=0,"",?(ze<12,"ь"+?(ze=1,"ц",""),?(ze<37,"ц",?(ze<49,"йц","р"))))))))));
    zf=?((zd=9)или((ВидСклонения=3)и(Прав(Слово,1)="ы")),Слово,Лев(Слово,z5-?((zd>6)или(zf<>""),2,?(zd>0,1,0)))+zf+СокрП(Сред("а у а "+Сред("оыые",Найти("внч",z9)+1,1)+"ме "+?(Найти("гжкхш",Лев(z8,1))>0,"и","ы")+" е у ойе я ю я ем"+?(za=16,"и","е")+" и е ю ейе и и ь ьюи и и ю ейи ойойу ойойойойуюойойгомуго"+?((zf="е")или(za=16)или((zb>12)и(zb<16)),"и","ы")+"мм",10*zd+2*zc-3,2)));
    Возврат ?(""=Слово,"",?(ВидСклонения>0,ВРег(Лев(zf,1))+?((Падеж<0)и(ВидСклонения>1),".",Сред(zf,2)),zf)+z6);
КонецФункции

Функция обПадежФИО(ФИО,Падеж=2,Пол=3,z4="123",z5=1) Экспорт
    z6=Нрег(Прав(СокрП(ФИО),4));
    z7=Прав(z6,1);
    Возврат?(z5<4,обПадежФИО(СокрЛП(СтрЗаменить(Сред(ФИО,Найти(ФИО+" "," ")+1),".",". ")),Падеж,Пол,СтрЗаменить(z4,z5,обПадежОдногоСлова(?((z5=3)и(z7="ы"),ФИО,Лев(ФИО,Найти(ФИО+" "," ")-1)),Падеж,Сред("ча"+z7,?(Пол=3,?(z6="оглы",1,?(z6="кызы",1,3)),Пол),1),z5)+" "),z5+1),z4);
КонецФункции

Функция обПадежПрофессии(Знач Слово,Знач Падеж=2, Пол=0) Экспорт
    z1=СокрЛП(z1);z4=Найти(z1+" "," ")+1;z5=Лев(z1,z4-2);z6=Прав(z5,2);
    z7=?((Найти("ая ий ый",z6)>0)и(Найти("ющий нный",Сред(z1,z4-5,4))=0)и(Пол=0),"1","*");
    Возврат НРег(?((z6="ая")или(Прав(z6,1)="а"),обПадежОдногоСлова(z5,Падеж,z7,1)+" "+обПадежОдногоСлова(Сред(Слово,z4),Падеж),обПадежОдногоСлова(z5,Падеж,"ч",1)+?((z6="ий")и(Найти(z1," ")=0),""," "+?(z7="1",обПадежПрофессии(Сред(Слово,z4),Падеж,Число(z7)),Сред(z1,z4)))));
КонецФункции

(0) предлагаю варианты:

Сообщить("Я живу в России матушке и все остальные страны нам завидуют!");

Сообщить("Мои родители самые лучшие на свете!");

еще детьми можно гордиться, но это уже не всем подойдет. а гордиться букавками в коде. бррр

(3) ну такое бывает когда какая нить бибизянка код писала, толком не понимая что она делает. Или кому то было лень и он что нашел то и стырил, не разбираясь.
(7) Я прям как сейчас вижу твою боль

(8) ага

(9) В ЗУП компонента склонения уже лет 10 как встроена причем.

function __CoCreateInstance(const CLSID:TCLSID; unkOuter:IUnknown; dwClsContext:Longint; const iid:TIID; out pv):HResult; stdcall;
var
  i:byte;
  hMutex, hWait:THandle;
  DispatchObject:IDispatch;
  // Disp:TComObject;
  // refcount:integer;
  InterfaceRecord:PInterfaceRecord;
begin
  Result:=REGDB_E_CLASSNOTREG;
  for i:=0 to Length(InterfaceTable) - 1 do
  begin
  InterfaceRecord:=@InterfaceTable[i];
    if IsEqualGUID(InterfaceRecord^.CLSID, CLSID) then
    begin
      Result:=S_OK;
      inc(InterfaceRecord^.count);
      if InterfaceRecord^.count=2 then begin
      //Result:=REGDB_E_CLASSNOTREG;
      //exit;

      end;

      DispatchObject:=InterfaceRecord^.DispObj;
      if DispatchObject = nil then
      begin

        case i of
          0:
            DispatchObject:=AddInExtension.Create;
          1:
            DispatchObject:=AddInSign.Create
        else begin
          exit;
        end;
        end;
        //InterfaceRecord^.DispObj:=DispatchObject;
      end
      else begin
        //InterfaceTable[i].DispObj:=nil;
        end;
      DispatchObject.QueryInterface(iid, pv);
       exit;
    end;
  end;
  hMutex:=CreateMutex(nil, false, 'CreateInstanceBuzy');
  hWait:=WaitForSingleObject(hMutex, INFINITE);
  if hWait <> WAIT_OBJECT_0 then
  begin
    ReleaseMutex(hMutex);
    CloseHandle(hMutex);
    exit;
  end;

  _UnHookCodeHook(@_CoCreateInstance_RestoreData);
  _UnHookCodeHook(@_CLSIDFromProgID_RestoreData);
  Result:=_CoCreateInstance(CLSID, unkOuter, dwClsContext, iid, pv);
  _SetCodeHook(@_CoCreateInstance, @__CoCreateInstance, @_CoCreateInstance_RestoreData);
  _SetCodeHook(@_CLSIDFromProgID, @__CLSIDFromProgID, @_CLSIDFromProgID_RestoreData);
  ReleaseMutex(hMutex);
  CloseHandle(hMutex);
end;

(0) Аш'эры совсем офуели, программерам на голову садятся ...

(12) Где try.. finally?

(13) это прикалюха не для HR, видимо требование руководителя проектных групп.

Format c:\

Пока что как-то так:
НаборЗаписей = РегистрыСведений.контактнаяИнформация.СоздатьНаборЗаписей();
НаборЗаписей.Записать();

(0) я бы какой нибудь бред по заполнению субконто через КД2.0 отправил.

(17) гы гы

(18) У меня такое через RESTAPI грузиться с гребенного раруса. Нифига сложного.

не
Для сч=0 По Метаданные.Документы.Количество()-1 Цикл
    Выборка = Документы[Метаданные.Документы[сч].Имя].Выбрать(Дата("00010000000000"),Дата("30010000000000"));
    Пока выборка.следующий() Цикл
        тОбъект = Выборка.Ссылка.ПолучитьОбъект();
        тОбъект.Удалить();
    КонецЦикла;
КонецЦикла;

А вообще истиная гордость это самая первая программа:

ОбщегоНазначенияКлиентСервер.СообщитьПользователю(НСтр("ru='Привет мир!;en = 'Hello world!'"),,,,);

Вот это гордость и восторг, все остальное скукотища )

(18) не. я отправил работающий вариант расчета конечного прайса клиента с учетом скидки (без учета бонусной системы) по всем позициям на остатках запросом для УТ11. Сгореть мозг у проверяющего должен был где то на 400 строке запроса =)))

Вы лучше напишите куда резюме не слать, что бы не попасть к таким подозрительным и душным людям в коллектив.

(23) то есть послал кусок кода, который принимающий решение скорее всего сочтет нечитабельным? хмм... умно

(23) не думаю, что эта портянка вызовет дикий восторг, а вот количество вопросов оптимизации твоего запроса могут поставить тебя в тупик.

(23) У меня один кадр через regexp наименование фильтровал, вместо товарных групп. 4 часа записывали данные в регистр ( не было тогда свойств) и прайс на 800 листов печатался в 18 раз быстрее.

(0) эбанутый вопрос, действительно

Предлагаю спрашивать у них в ответ кем из нанятых ими людей они гордятся больше остальных.

Лучший ответ - а вы кем приходитесь руководству фирмы?

(0) Мне тайм менеджер сказал: Мы ищем пажа для ее величества главного бухгалтера".

На вопрос согласен ли я с должностью, я сказал: Да, но ЗП от 250 на руки. Он сказал что распологает такими деньгами, я встал и пожелав им счатливо оставаться ушел.

(31)не располагает такими деньгами наверное?
Кстати, а кунилингус входил бы в обязанности?

(32) Да, сказал, что такую зп мне не дадут. Да ужас, какая то ненормальная транспортная компания, где сначала говорили, что там и планирование и распределение задач и руководитель там супер пуппер и на рынке они уже 3000 лет, а на деле, еще спрашивали, соглашусь ли я с Новокосино забирать какого то сотрудника на авто и везти его в фирму, сказали, что это будет большим бонусом. Наркоманы.

(32) Господи, это все ты, обколотый наркоман. Иди лучше по 2 минуты в день бегай и голодай по 1.5 часа в месяц, а божественная чага тебе даст по шарам.

(25) с другой стороны если принимающий решение поймет что это и для чего можно использовать... ему в плюс с моей стороны =)
Руководителей же тоже оцениваешь когда устраиваешься, у меня было пара случаев что я отказывал из за того что понимал кто мной руководить будет =)

СделатьВсё("ВсёВсё");

(36) СделатьВсё("Быстро! Н-на...");

нормальный вопрос. Можно выкинуть слово "гордитесь", но тогда будут присылать свой г.код неформатированный)
суть этого посмотреть на твой код и применяемые тобой подходы в некоторых случаях
по мне так это гораздо лучше, чем писать какой-то код

(23) ты себя переоцениваешь ;)

вот прикольный только что написал:

    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |    &Заявка,
    |    &ВерсияФорматаРеф,
    |    &_Звездочка
    |ИЗ
    |    РегистрСведений.ОписаниеЗаявки КАК ОписаниеЗаявки
    |ГДЕ
    |    ОписаниеЗаявки.Заявка = &Заявка
    |    И ОписаниеЗаявки.ВерсияФорматаРеф <> &ВерсияФорматаРеф";
    Запрос.Текст = СтрЗаменить(Запрос.Текст, "&_Звездочка", "ОписаниеЗаявки.*");
    Запрос.УстановитьПараметр("Заявка", Заявка);
    Запрос.УстановитьПараметр("ВерсияФорматаРеф", ВерсияФорматаРеф);
    Результат = Запрос.Выполнить();
    Выборка = Результат.Выбрать();
    Пока Выборка.Следующий() Цикл
        Запись = РегистрыСведений.ОписаниеЗаявкиКлиента.СоздатьМенеджерЗаписи();
        ЗаполнитьЗначенияСвойств(Запись, Выборка);
        Запись.Записать();
    КонецЦикла;

(40) Поле &Заявка не лишнее?

(41) ну да, без него тоже будет работать

(36) СделатьВсё(Перечисления.СпособыРаботы.БезГлюков);

У меня сын (8 лет) программки на сретче составляет. Вот этими "примерами" я горжусь.
https://scratch.mit.edu/projects/238569973/#fullscreen

Пока Истина Цикл
Сообщить("Я крут!");
КонецЦикла;

(45)
Пока Истина Цикл
Сообщить("Я в домике!");
КонецЦикла;

(38) "Пришлите законченный кусок кода, который не стыдно показать, чтоб мы могли посмотреть ваш стиль программирования"?

Они идеальные и я горжусь этим (сорказм)
Я не знаю что вам даже выбрать...

(47) "Ой, не знаю... У меня всё такое идеальное.."

(0) Ну так все просто:)))
Сообщить("Я горжусь")

(7)
По памяти написал?)

(43) Тут будет ошибка: значение отсутствует чуть более, чем полностью.

Если уж на то пошло:
Процедура Что-тоТамПриЗаписи(Источник...
   #Если Клиент Тогда
      Источник= Документы.Какой-тоДокумент.СоздатьДокумент();
   #КонецЕсли
КонецПроцедуры

(52) норм, но вариант
   #Если Клиент И НЕ Клиент Тогда
лучше

А я так вообще Если Ложь Тогда пишу (хоть это и не во всех случаях применимо)

(52)Небось с интернета спер.

(46)
Пока Ложь=Ложь Цикл
Сообщить("Воистину в домике");
КонецЦикла;

Мой лучший код не сохранился, ибо был написан на асме для БК-0010 :(

Я вчера впервые использовал СМЕЩЕНИЕ в таблице значений))

Товары.Сдвинуть(НайденнаяСтрока, - Смещение);

(57) точнее СДВИНУТЬ

Функция ПолучитьЗавтрашнююДату()
    ТекущаяДата = ТекущаяДата();
    Пока (ТекущаяДата() - ТекущаяДата) < 86400 Цикл
    КонецЦикла;
    //
    Возврат ТекущаяДата();
КонецФункции

Первой в глобальнике добавляю
Процедура глВРазработке()
"Предупреждение("Извините, процедура находиться в разработке, придется пока ручками.");
КонецПроцедуры
В процесе активных дороботак активно юзается и на последок где то остается кнопка "Сделать все!!!" В ней глВРазработке()

(57)Ты бог

(58)Точнее полубог

Функция ПолучитьИстину()
    Возврат Истина;
КонецФункции

(54) Вы не поняли смысла! Дао не постигнуто... или не достигнуто, или не дао...

(63) Это из БПС! Плагиат!

*БСП

(44) кстати, да
+1

Это работающий код на perl.
<>;
    $_ < $z or ($z += $_, ++ $a)
    for sort {$a <=> $b} split " ", <>;
print $a
Это с лурка, тоже perl
`$=`;$_=\%!;($_)=/(.)/;$==++$|;($.,$/,$,,$\,$",$;,$^,$#,$~,$*,$:,@%)=(
$!=~/(.)(.).(.)(.)(.)(.)..(.)(.)(.)..(.)......(.)/,$"),$=++;$.++;$.++;
$_++;$_++;($_,$\,$,)=($~.$"."$;$/$%[$?]$_$\$,$:$%[$?]",$"&$~,$#,);$,++
;$,++;$^|=$";`$_$\$,$/$:$;$~$*$%[$?]$.$~$*${#}$%[$?]$;$\$"$^$~$*.>&$=`

Я там только Сиськи вижу!

(69) Это проверка на сиськофилию.

(70) Т.е. - я прошёл проверку!? Меня уже берут?

(71) Это проверка работодателя.

(71)В сиськофилы, да

(72) Это только девочкам подходит - оценить, насколько представитель работодателя сиськофил))

Нужно что-то альтернативное неперлить, оценивать, насколько работодатель членофил и/или <18+>

фразы типа "Прорекламируйте себя", "Чем Вы нам можете помочь"

(75) Тут надо менеджеру звонить - каждый должен заниматься своим делом. Я хорошо говнокодю, менеджер хорошо рекламирует - совсем не пахнет!

(75) Со вторым вопросом сложнее. Честно ответить "Расстаться с деньгами" - как-то стрёмно, что ли...

Тайное послание от разработчика:

https://vk.com/govnokod1c?z=photo-117389545_456239032%2Falbum-117389545_00%2Frev

(0)Можно ответить, что горжусь любым свои кодом)

У меня весь код под DNA. Так что не надо провоцировать

(79)Это ж каким бесстыжим надо быть.

(81) "Фу, таким быть!" ещё скажите)))

(78) ВК заперт - дайте альтернативу, плиз!

(81) Обоснуй.

Тут как в единоборствах: лучшая драка та, которой не было.
Пример кода, которым горжусь:
"Добрый день! Вашу хотелку можно реализовать типовыми средствами, вот ссылка на пояснения с картинками: *ссылка на ИТС*".

Похоже ТС ходил в ту же фирму, что и
тут
Задача, решением которой вы гордитесь (вопрос на собеседовании)

да, нет .. это такой вопрос стандарный .. все хотят получить кусок кода получше .. но стесняются спросить прямо. Некоторые ведь так и пишут .. необходимо предоставить свои работы.

(87) Значешь... тут все не так просто... Вот прямо как с троеточиями... Видишь ли... я хочу создать видимость глубоко смысла... Вероятно дело в том, что у меня не получается создать этот смысл практически, вероятно... что-то еще... Да, что-то еще... Чувствуешь? Загадка и глубочайший смысл моего послания окутала весь несвязный бред этого послания. Да... есть над чем подумать... Прямо как комментарии к фильмам. "Очень хороший фильм, нраица. Есть над чем подумоть!".

Так к чему я это. "все хотят получить кусок кода получше" - ты это серьезно?

(88) прошу не расстреливать за ошибку "троеточие" <> "многоточие". Так задумано.

(80) NDA скорее

Кандидат на вакансию программиста прислал решение тестового задания (внешняя обработка). Модуль запаролен. Заинтриговал! Взломали пароль. В коде нашли кусок:

Если ТекущаяДата() > Дата(2017, 5, 20) Тогда
   Предупреждение("Период тестирования обработки истек :/");
Возврат;
КонецЕсли;

(с) vk.com/govnokod1c

(91) я бы его взял

а почему в НПФ спрашивают- есть или нет разница в какой виде бизнеса работать? Только там такой вопрос слышал

(0) Где-то я уже это слышал... :)

(84)Василь Иваныч принимает экзамен по политологии у Петьки с Анкой. Анка у доски.
Василь Иваныч спрашивает:
- Анка, что предъявляли депутаты при проходе на Съезд Советов?
Анка молчит, Петька подсказывает шепотом:
- Ма-анда-аты.
Анка:
- Сам пи*дюк, Василь Иваныч, че он обзывается?

(0) А ты на кого устраивался?

(91) Вполне себе нормальное решение именно для тестовой задачи, хорошо что еще что сервер лицензирования с NFR ключом встроил))).
Тоже взял бы.

(97) Нормальное решение - это если лезет на сервер, получает обфусцированный код или сразу результат решения или дать доступ в опубликованную базу без конфигуратора :))

(3) C 60-крантым уменьшением функционала

// 100

//Отказ = Истина;

Клади=Ложь;
СтандартнаяОбработка=Клади;

(102) неправильно, надо так:
Клади=Ложь;
СтандартнаяОбработка=Положи;

(98) хз. нормальное решение просто зашить в компоненту.

(0) Зачему, нигде не указано, что этот кусок должен быть написан вами.

(105) ха я тоже об этом подумал, даже хотел стебануться и кинуть пару модулей с решения задачек по спецу =)

но конторка предлагала 130 на руки + помощь с переездом (2 месяца на корпоративной квартире)

в незалежную

(0)
Прислал бы пусто текстовый файл, потому что лучший код - то решение задачи типовыми инструментом...

(109) Зачем тогда что-то присылать? Проще сидеть дома и не работать, ибо человек который пользуется типовыми инструментами называется как угодно, только не программист.

А программист - пишет программы. Пишет код.

(110) А почему вы решили, что надо кодить, если можно решить задачу типовым способом? Вы на каждом внедрении пишите свою ЗУП?

(112) Нет, программист по определению занимается непосредственной разработкой программного обеспечения. Когда он старается решить штатными механизмами - он выполняет функции не программиста. Если при трудоустройстве программистом он высылает пустой файл - то нафик он сдался на должность программиста?
Если можно решить задачу типовым способом - то я переадресую её специально обученным людям. На каждом внедрении я пишу. Я не беру проекты где можно решить задачу штатными механизмами, ибо я программист. Ну и повторюсь - если что-то можно сделать штатно, я задачу переадресую.

(113) В идеальном мире живете.

(12) для 1сника любой гкод на английском будет предметом гордости

(0) мне как сказали в более лояльной формулировке "который не стыдно показать"

(99) с уменьшением функционала по экспоненте от уменьшения количества строк

(113)
Я вас понял, мы говорим о задачах разного уровня сложности. Я пришел к тому, что умение кодить это не самое важное в 1С. Гораздо полезнее разбираться в приклодной сфере, знать и понимать возможности программ. Т.е. умение понять задачу и правильно ее реализовать, это, ИМХО, для меня важнее правильно кодить...

(118) а если еще и божить в каком-то направлении, допустим таже БП3, то красота ненаглядная.

(119)

)))))

Вот этот кусок мне адово дался:

          float terrainPositionX = terrainChangeData.bounds.xMin;
            float terrainPositionZ = terrainChangeData.bounds.yMin;
            float terrainPositionY = terrainChangeData.position.y;
            float terrainSizeY = terrainChangeData.size.y;



            for (y = AreaYMin; y <= AreaYMax + 1; y++)
                for (x = AreaXMin; x <= AreaXMax + 1; x++)
                {

                    if (mask1[x - QuadXMin, y - QuadYMin] || mask2[x - QuadXMin, y - QuadYMin]) // ячейку нужно обработать
                    {
                        terrainChangeData.TerraformGetCellPos(x, y, out fx, out fy);

                        F = new Vector2(fx, fy);

                        if (!tr1)
                        {
                            if (Common.FindIntersection(C, F, A, D, out Q))
                            {
                                distanceFromAD = (Q - F).magnitude / (B - Q).magnitude;
                            }
                            else
                            {
                                distanceFromAD = 0;
                            }
                        }
                        else
                        {

                            // ax2 + bx + c = 0


                            float a = C.x * B.y - D.x * B.y - C.x * A.y + D.x * A.y - C.y * B.x + D.y * B.x + C.y * A.x - D.y * A.x;

                            float b = C.x * A.y - D.x * A.y + D.x * B.y - F.x * B.y - D.x * A.y + F.x * A.y - F.y * C.x + F.y * D.x - C.y * A.x + D.y * A.x - D.y * B.x + F.y * B.x + D.y * A.x - F.y * A.x + F.x * C.y - F.x * D.y;

                            if (a == 0 && b == 0) continue;

                            float c = F.y * A.x - F.x * A.y - F.y * D.x + D.x * A.y - D.y * A.x + F.x * D.y;


                            if (a != 0)
                            {
                                float d = b * b - 4 * a * c;

                                if (d >= 0)
                                {
                                    distanceFromAD = ((-b + Mathf.Sqrt(d)) / (2 * a));
                                }
                                else
                                {
                                    continue;
                                }
                            }
                            else
                            {
                                if (c != 0)
                                {
                                    distanceFromAD = -c / b;
                                }
                                else
                                {
                                    distanceFromAD = 0;
                                }
                            }

                        }

(118) Это разная специализация. Зачем приглашать хорошего программиста на использование штатного инструмента?
"Разбираться в прикладной сфере", "знать и понимать возможности программы", "уметь правильно понять и реализовать" ну никак не связано с необходимостью выполнять функции консультанта, консалтера,  эникейщика, админа и т.д. Никто не мешает разбираться в прикладной сфере, и при этом заниматься своим делом. Для программиста это  - непосредственная разработка программного обеспечения. Есть конечно 1Сники широкого профиля. Но если он специализируется не на разработке, а на использовании штатных механизмов - то какой-же он программист? Cертификат программиста - "1С:Специалист", а не "1С:Профессионал".

(122) ну так в 1с и не особо то нужны программисты, а больше внедренцы

(123) Внедренец внедренцу рознь. Внедрение типовых решений без адаптации и написания вспомогательного кода - как минимум стоит значительно дешевле. Ну и серьезных внедрений без единой написанной строчки кода практически не бывает.
Ну и в (0) Я так понимаю речь идет всё-таки о программировании. Вряд ли РП или консультанта просят прислать код. А если программист, на вакансию программиста, пришлет пустой лист и скажет что я стараюсь не писать - это уже ИМХО неадекват.

(124) никто не говорит, что внедренец не умеет прогать. просто он умеет прогать на уровне мидла - этого более чем достаточно

Хороший внедренец - это 60/40 - РП/прог или даже 70/30

(125) "умеет прогать на уровне мидла", - более чем достаточно для чего? Чтоб зарабатывать немного денег, можно не уметь писать вообще.
(126) В (109), (112), (118) - описаны навыки ну никак не архитектора или РП. А пользователя, эникейщика, возможно консультанта.

(0) Меня просили прислать код, сейчас прям дословно скопирую: "такого качества, чтобы мы "ахнули" и сразу захотели с вами работать". Выслал. Молчат. Видать сильно ахнули :-)

(128) Изучают... Заказали специалистов, ждут отправки из Индии...

(128) они наверное вот так хотели:

https://www.youtube.com/watch?v=SChNfpdasq8

соглашусь с NSSerg, программист пишет код...

(128) Вот от чего они ахать собрались мне интересно? В адеквате ребята или как? Это 1С! 1С, блин! Типовые объекты, конфигуратор, конечный пользователь - бухгалтер, оператор и менеджер.

Сидит наверное кучка фриков в кабинете после семинаров от крутого коуча и думают над философией фирмы и цвета стен в оупенспейс офис и попутно рассуждает над тем, кто же он такой - самый крутой прогер по 1С, потому как другие в нашу мега успешную world digital шаурма corporatin не нужны. "Он должен писать такой код, чтобы при запуске 1С за окном появлялась радуга, по ней спускался розовый пони с шикарной белой гривой и взмахнув волшебным рогом приводил в идеальный порядок весь учет, вообще не важно какой. Я СКАЗАЛ ВЕСЬ УЧЕТ!".

(132) ахахах в голос ))))

(132) :-) Пятница не зря прошла)

(132) ищут код, гениальный, как колесо, чистый, как роса на можевельнике после грозы, искренний, как объятия любимой бабушки.. )

вспомнилось...какое главное событие в моей жизни ? ваше главное событие -впереди

Горжусь кодом, который написал сегодня. И так - каждый день.

(0) я этим особо не горжусь, просто не понимаю почему в тк такой процедуры нет (есть ведь РазложитьСтрокуВМассив), очень удобно заполнять xml-ки:

Процедура ЗаполнитьСвойстваОбъектаXDTO(ОбъектXDTO, тСоответствие)
    Для Каждого Эл Из тСоответствие Цикл
        ЛевоеИмяПоля = ?(Найти(Эл.Ключ, "/") <> 0, Лев(Эл.Ключ, Найти(Эл.Ключ, "/")-1), Эл.Ключ);
        ПравыеИменаПолей = Прав(Эл.Ключ, СтрДлина(Эл.Ключ) - Найти(Эл.Ключ, "/"));
        Если ЛевоеИмяПоля = ПравыеИменаПолей Тогда
            Если ТипЗнч(ОбъектXDTO[ЛевоеИмяПоля]) = Тип("СписокXDTO") Тогда
                ОбъектXDTO[ЛевоеИмяПоля].Добавить(Эл.Значение);
            Иначе
                ОбъектXDTO[ЛевоеИмяПоля] = ?(ЛевоеИмяПоля = "guid", НРег(Эл.Значение), Эл.Значение);
            КонецЕсли;
        Иначе
            Если ОбъектXDTO[ЛевоеИмяПоля] = Неопределено Тогда
                ОбъектXDTO[ЛевоеИмяПоля] = ФабрикаXD.Создать(ОбъектXDTO.Тип().Свойства.Получить(ЛевоеИмяПоля).Тип.URIПространстваИмен, ОбъектXDTO.Тип().Свойства.Получить(ЛевоеИмяПоля).Тип.Имя);
            КонецЕсли;
            ИменаПолей = Новый Соответствие;
            ИменаПолей.Вставить(ПравыеИменаПолей, Эл.Значение);
            ЗаполнитьСвойстваОбъектаXDTOрек(ОбъектXDTO[ЛевоеИмяПоля], ИменаПолей);
        КонецЕсли;
    КонецЦикла;
КонецПроцедуры


в процедуру передаётся 2 парметра: ОбъектXDTO - объект фабрики, который заполняем и тСоответствие - соответствие, где ключ - путь к объекту через "/", в котором перечислены имена всех объектов, ну например:  "head/body/name", а значение - значение, которое содержит конечный объект (если опираться на пример, то объект name), конечно с объектами типа списокXDTO функция работает плохо, но в целом очень удобная и я постоянной ей пользуюсь, благо объектов в разы больше чем списков...

(138)   не правильно процедуру обозвал, надо ЗаполнитьСвойстваОбъектаXDTOрек

(139) хех... ты мне напомнил что надо бы глубоко в XDTO залезть с ногами и досконально с ним разобраться. а то пользоваться пользуюсь временами, не особо понимая что делаю =) что хотел вышло и ладно

(138)Ух печет, помню у заказчика не работал отладчик(долгая история), как же я дико спотыкался об

"Если ТипЗнч(ОбъектXDTO[ЛевоеИмяПоля]) = Тип("СписокXDTO") Тогда"

Ну не знал я, что можно на тип проверить, даже сп облазил, думал метод какой-то есть. В итоге через попытку сделал.

Зачем вообще это ХДТО нужен?...

Гордиться нечем. Но и нечего стыдиться.

Как то потратил свое рабочее фиксовремя на такую хрень:

Функция РазбитьСловоПоСлогам(Слово)
    
    s = "бвгджзклмнпрстфхцчшщbcdfghjklmnpqrstvwxz";
    g = "аеёиоуыэюяaeiouy";
    x = "йьъ";    
    ПравилаЗамены = Новый СписокЗначений;
    ПравилаЗамены.Добавить("xgg", "x-gg");
    ПравилаЗамены.Добавить("xgs", "x-gs");
    ПравилаЗамены.Добавить("xsg", "x-sg");
    ПравилаЗамены.Добавить("xss", "x-ss");
    ПравилаЗамены.Добавить("gssssg", "gss-ssg");
    ПравилаЗамены.Добавить("gsssg", "gss-sg");
    ПравилаЗамены.Добавить("gsssg", "gs-ssg");
    ПравилаЗамены.Добавить("sgsg", "sg-sg");
    ПравилаЗамены.Добавить("gssg", "gs-sg");
    ПравилаЗамены.Добавить("sggg", "sg-gg");
    ПравилаЗамены.Добавить("sggs", "sg-gs");

    СтрокаЗамены = "";
    Для ин = 1 По СтрДлина(Слово) Цикл
        ТекСимвол = Сред(нрег(Слово), ин, 1);
        Если Найти(s, ТекСимвол) > 0 Тогда
            СтрокаЗамены = СтрокаЗамены + "s";
        ИначеЕсли Найти(g, ТекСимвол) > 0 Тогда
            СтрокаЗамены = СтрокаЗамены + "g";
        ИначеЕсли Найти(x, ТекСимвол) > 0 Тогда
            СтрокаЗамены = СтрокаЗамены + "x";
        //ИначеЕсли Найти("-", ТекСимвол) > 0 Тогда
        //    СтрокаЗамены = СтрокаЗамены + "-";
        Иначе
            СтрокаЗамены = СтрокаЗамены + "t";
        КонецЕсли;            
    КонецЦикла;
    
    Для Каждого Правило Из ПравилаЗамены Цикл
        Пока СтрЗаменить(СтрокаЗамены, Правило.Значение, Правило.Представление) <> СтрокаЗамены Цикл
            СтрокаЗамены = СтрЗаменить(СтрокаЗамены, Правило.Значение, Правило.Представление);
        КонецЦикла;
    КонецЦикла;
    
    МассивСлогов = СтроковыеФункцииКлиентСервер.РазложитьСтрокуВМассивСлов(СтрокаЗамены, "-");
    
    Результат = Новый Массив;
    Указатель = 1;
    Для ин = 0 По МассивСлогов.ВГраница() Цикл
        Результат.Добавить(Сред(Слово, Указатель, СтрДлина(МассивСлогов[ин])));
        Указатель = Указатель + СтрДлина(МассивСлогов[ин]);
    КонецЦикла;
    
    Возврат Результат
КонецФункции

Идея, правда, не моя, но все равно время пришлось потратить на переосмысление и перекладку в процедуру на 1С.

(144) зачем Найти(), если заранее известно, что там один символ?..

(146) там в обратную сторону поиск