- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
if <fr_Pipeline1."OPERNAME"> = 'Тупаков Н.В.' then Memo50.Text:='Телефон: 350-24-53';
if <fr_Pipeline1."OPERNAME"> = 'Абрамовна Мария Н.' then Memo50.Text:='Телефон: 531-39-86';
if <fr_Pipeline1."OPERNAME"> = 'Кошкина Р.Ф.' then Memo50.Text:='Телефон: 170-83-28';
if <fr_Pipeline1."OPERNAME"> = 'Шабанов Д.Л.' then Memo50.Text:='Телефон: 981-04-61';
if <fr_Pipeline1."OPERNAME"> = 'Ирискина Рита Н.' then Memo50.Text:='Телефон: 330-58-55';
if <fr_Pipeline1."OPERNAME"> = 'Бъенсе Н.Б.' then Memo50.Text:='Телефон: 761-77-93';
if <fr_Pipeline1."OPERNAME"> = 'Батрудинова О.П.' then Memo50.Text:='Телефон: 580-55-42';
if <fr_Pipeline1."OPERNAME"> = 'Кудина Д.М.' then Memo50.Text:='Телефон: 440-61-62';
Больше похоже на Delphi
Примечательно что пишет пожилой программист что всяко не свойственно по возрасту и опыту ;)
и ведь не переучишь такому отношению :(
Это часть кода RеpGen'вской формы - идет постобработка запроса SQL из Oracle.
Так же это выглядело бы у автора и в Oralce Reports.
Теперь ЭТО относится к говнокоду SQL ? =)
Афтар сия поста лишь представил его за посмеяться :-D а так как происхождение кода всетаки PL/SQL то на..рал здесь ... :))
ШОК! Певица Бьенс - русская! Все подробности от Надежды Бенедиктовны (18 фото)