AXForum  
Вернуться   AXForum > Прочие обсуждения > Курилка
CRM
Забыли пароль?
Зарегистрироваться Правила Справка Пользователи Сообщения за день Поиск Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
Старый 01.12.2010, 09:45   #1  
Alex04 is offline
Alex04
Участник
 
6 / 10 (1) +
Регистрация: 19.10.2009
Наткнулся на шутку коллеги в коде Navision.
"А найдем последнюю дату месяца" - и:

D2 := DMY2DATE(1,DATE2DMY(TODAY,2)+1,DATE2DMY(TODAY,3)) - 1;
Старый 01.12.2010, 10:27   #2  
Sancho is offline
Sancho
Administrator
Аватар для Sancho
Лучший по профессии 2017
Лучший по профессии 2009
 
1,294 / 221 (10) ++++++
Регистрация: 11.01.2006
и такие конструкции встречаются...

If a = TRUE THEN
b := FALSE
ELSE
b := TRUE;
Старый 01.12.2010, 16:19   #3  
prefreitor is offline
prefreitor
Участник
 
214 / 11 (1) +
Регистрация: 03.10.2006
Стишок - рекурсия

DogManagement:
SendMailMessage(var Pop - Record (Type Pop)), var DogMgt - Codeunit(DogManagement);
Код:
IF Pop.DogExist AND Pop.PopLoveDog AND Pop.DogEatingMeat THEN
  IF DogMgt.KillDog(Pop) THEN BEGIN
    DogMgt.BuryDog(Pop);
    DogMgt.SendMailMessage(Pop);
END;
Старый 13.01.2011, 12:49   #4  
Milk is offline
Milk
Участник
 
242 / 12 (1) ++
Регистрация: 08.06.2006
А вот какой кусок кода для нахождения первого дня текущего месяца я увидел как-то у клиента, ведущего доработки своими силами:

Код:
Datv:=CALCDATE('<CM-1M+1D>')                       ;
IF DATE2DMY(Datv,1)=1 THEN Datv:=CALCDATE('<CM-1M>')    ;
DnachMes:=CALCDATE('<-'+FORMAT(DATE2DMY(Datv,1)-1)+'D>',Datv);   // ПЕРВЫЙ ДЕНЬ МЕСЯЦА
Старый 14.01.2011, 10:37   #5  
prefreitor is offline
prefreitor
Участник
 
214 / 11 (1) +
Регистрация: 03.10.2006
Что за феминизм? А где же ОН!
Изображения
Тип файла: bmp ono.bmp (949.4 Кб, 487 просмотров)
Старый 03.04.2011, 01:10   #6  
Fly is offline
Fly
Участник
Аватар для Fly
 
102 / 10 (1) +
Регистрация: 05.10.2007
На хабре недавно появился пост по поводу одного интересного языка программирования (если его таковым можно назвать). Делюсь с вами
 

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход

Рейтинг@Mail.ru
Часовой пояс GMT +3, время: 22:55.
Powered by vBulletin® v3.8.5. Перевод: zCarot
Контактная информация, Реклама.