- 1
- 2
- 3
- 4
- 5
- 6
Выборка=Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
ФизЛицо=Выборка.Физлицо;
Состояние("Обробатывается - "+ФизЛицо.Ссылка);
...
КонецЦикла;
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−179
Выборка=Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
ФизЛицо=Выборка.Физлицо;
Состояние("Обробатывается - "+ФизЛицо.Ссылка);
...
КонецЦикла;
Если новичок порой может забыть указать реквизит ".Ссылка", где это требуется. То тут всё наоборот. Видать, чел настолько поднаторел, что только он знает, нахера тут ссылка. (про грамматику молчу)
−122
my $title=$self->{ditems}->get_field_value({SET=>'City', itemid=>$cityid, field=>'genitive_case', notitle=>1});
$title='в '.$self->{ditems}->get_field_value({SET=>'City', itemid=>$cityid, field=>'prepositional_case', notitle=>1}) unless length($title);
return '' if $title eq 'в ';
+128.3
List<estExecPeriod> lst = TEDManager.getExecPeriodByIDExecWork(budget.IdBudget);
+91.1
s := TStringList.Create;
LocalIniFile.ReadSection(sPad, s);
for x := 0 to ActionListMenu.ActionCount - 1 do
begin
for y := 0 to 9 do
begin
for z := 0 to s.Count - 1 do
begin
if (Length(s[z]) <> Length('Tag0')) and (s[z] = 'Tag' + IntToStr(ActionListMenu[x].Tag + y)) then
begin
try
ActionListMenu[x].Execute;
except
end;
end;
end;
end;
end;
s.Free;
Эм, ну комментарии излишни?
+141.5
switch (Step)
{
case 6:
{
goto case 5;
}
case 5:
{
Step = 2;
goto case 2;
}
case 4:
{
if (ReadOnly)
{
Step = 2;
goto case 2;
}
pollingMatrix.Fill(Id, pollingRow.RiskObjectTypeId, languageId, connection);
Scenario.Fill(Id, pollingRow.RiskObjectTypeId, languageId, connection);
tbMain.SetCurrentTab(tcEnding);
break;
}
case 3:
{
if (ReadOnly)
{
btnPrevPg4.Visible = false;
btnNextPg4.Visible = false;
}
CleanScenarios();
Scenario.Fill(Id, pollingRow.RiskObjectTypeId, languageId, connection);
tbMain.SetCurrentTab(tcScenarios);
break;
}
case 2:
{
if (ReadOnly)
{
btnPrevPg3.Visible = false;
btnNextPg3.Visible = false;
}
pollingMatrix.Fill(Id, pollingRow.RiskObjectTypeId, languageId, connection);
tbMain.SetCurrentTab(tcPollingMatrix);
break;
}
case 1:
{
if (ReadOnly)
{
btnPrevPg2.Visible = false;
btnNextPg2.Visible = false;
//tvRiskFactors.Enabled = false;
//tvRiskObjects.Enabled = false;
//Раскрывает ноду если есть отмеченные дочерние элементы
tvRiskObjects.ExpandAllNodes();
}
pollingMatrix.Fill(Id, pollingRow.RiskObjectTypeId, languageId, connection);
doRiskFactorTree();
doRiskObjectTree();
hcpRiskObjects.PanelName = pollingRow.QSARiskObjectTypeNameDictionaryName;
tbMain.SetCurrentTab(tcRiskFactors);
break; //goto case 0;
}
case 0:
{
if (ReadOnly)
{
Name.ReadOnly = true;
Comment.ReadOnly = true;
Hypothesis.ReadOnly = true;
calDateTo.Enabled = true;
RiskObjectTypeId.ReadOnly = true;
btnNextPg1.Visible = false;
Instructions.ReadOnly = true;
}
tbMain.SetCurrentTab(tcPolling);
break;
}
default:
{
#if (DEBUG)
exc_viewer.ViewException(@"Неверный Step, провалились в default");
#endif
Step = 0;
goto case 0;
}
}
Часть метода из 200 строк в кодбехайнде ASP.NET странички...
Красота!!! =)
−863.7
Нашёл в проекте
SELECT DISTINCT sale_date, SUM(sale_price), buyer FROM ...
GROUP BY sale_date, buyer;
DISTINCT здесь лишний
+157.3
function SetStyleForFilterOver(this2) {
this2.style.border = "1px solid #ea0000";
this2.style.color = "white";
this2.style.background = "#404040";
}
function SetStyleForFilterOut(this2) {
this2.style.border = "1px solid #404040";
this2.style.color = "#ea0000";
this2.style.color = "#ea0000";
this2.style.background = "#eeeeee";
}
Тс-с-с-с... Только не говорите автору про css и селектор ":hover" :о)
−92.1
Запрос.Текст =
"ВЫБРАТЬ
| СостояниеРаботниковОрганизаций.Регистратор,
| СостояниеРаботниковОрганизаций.ФизЛицо,
| СостояниеРаботниковОрганизаций.Организация,
| СостояниеРаботниковОрганизаций.Приказ,
| СостояниеРаботниковОрганизаций.Состояние,
| СостояниеРаботниковОрганизаций.Период
|ИЗ
| (ВЫБРАТЬ
| СостояниеРаботниковОрганизаций.Регистратор КАК ДокументРегистратор
| ИЗ
| РегистрСведений.СостояниеРаботниковОрганизаций КАК СостояниеРаботниковОрганизаций
| ГДЕ
| СостояниеРаботниковОрганизаций.Период МЕЖДУ &ДатаНачала И &ДатаКонца
| И СостояниеРаботниковОрганизаций.Организация = &Организация
| И СостояниеРаботниковОрганизаций.ФизЛицо = &ФизЛицо
| И СостояниеРаботниковОрганизаций.Приказ = &Приказ) КАК ДокРегистратор
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.СостояниеРаботниковОрганизаций КАК СостояниеРаботниковОрганизаций
| ПО ДокРегистратор.ДокументРегистратор = СостояниеРаботниковОрганизаций.Регистратор";
.
Просто выбрать движения из регистра - это не круто.
+136.4
// Работаю asp.net программистом.
// Показал главному программисту, как с помощью System.Web.Routing можно легко делать человекопонятные урлы.
// Итог: Теперь у сайта урлы вида http://domain/filterDisks/42/0/14/1.
// Вот сижу и думаю, что значат все эти циферки :'о(
+55.9
while (true)
{
m_CurrentDevice += delta;
if (m_CurrentDevice < 0)
m_CurrentDevice = devices[DEV_PLATE]-1;
if (m_CurrentDevice > devices[DEV_PLATE]-1)
m_CurrentDevice = 0;
break;
}
Это конечно написано не специально - в результат целой кучи итераций и переделок. но результата это не отменяет