Вход | Регистрация


1С:Предприятие :: 1С:Предприятие 8 общая

Как красиво вставить свой код на форуме ? иногда автоматом вставляется +code ?

Ø [Asmody, 19.09.16 - 08:20]
Как красиво вставить свой код на форуме ? иногда автоматом вставляется +code ?
Я
   Радим1987
 
17.09.16 - 18:06
Как вставить код сгруппированном виде?
 
 
   Радим1987
 
1 - 17.09.16 - 18:07
пример

ВЫБРАТЬ
    График.Сотрудник КАК Сотрудник,
    График.ДатаРегистрации КАК ДатаНачало,
    График.Территория КАК Территория
ПОМЕСТИТЬ ВТ
ИЗ
    РегистрСведений.РТ_ГрафикСотрудниковПоОбъектамУчета КАК График
ГДЕ
    График.ДатаРегистрации МЕЖДУ &Начало И &Конец
    И График.Сотрудник = &Сотрудник
;

////////////////////////////////////////////////////////////////////////////////

ВЫБРАТЬ
    ВТ.Сотрудник КАК Сотрудник,
    ВТ.Территория КАК Территория,
    СТ.Территория КАК ТерриторияСТ,
    ВТ.ДатаНачало КАК ДатаНачало
ПОМЕСТИТЬ ВТНачало
ИЗ
    ВТ КАК ВТ
        ЛЕВОЕ СОЕДИНЕНИЕ ВТ КАК СТ
        ПО (ВТ.ДатаНачало = ДОБАВИТЬКДАТЕ(СТ.ДатаНачало, ДЕНЬ, 1))
;

////////////////////////////////////////////////////////////////////////////////

ВЫБРАТЬ
    ВТ.Сотрудник КАК Сотрудник,
    ВТ.Территория КАК Территория,
    СТ.Территория КАК ТерриторияСТ,
    ВТ.ДатаНачало КАК ДатаНачало
ПОМЕСТИТЬ ВТКонец
ИЗ
    ВТ КАК ВТ
        ЛЕВОЕ СОЕДИНЕНИЕ ВТ КАК СТ
        ПО (ВТ.ДатаНачало = ДОБАВИТЬКДАТЕ(СТ.ДатаНачало, ДЕНЬ, -1))
;

////////////////////////////////////////////////////////////////////////////////

ВЫБРАТЬ
    МАКСИМУМ(ВВТ.Сотрудник) КАК Сотрудник,
    ВВТ.Территория КАК Территория,
    МИНИМУМ(ВВТ.ДатаНачало) КАК ДатаНачало,
    ВВТ.ТерриторияСТ КАК ТерриторияСТ
ПОМЕСТИТЬ ВТПоследняяНачало
ИЗ
    ВТНачало КАК ВВТ

СГРУППИРОВАТЬ ПО
    ВВТ.Территория,
    ВВТ.ТерриторияСТ
;

////////////////////////////////////////////////////////////////////////////////

ВЫБРАТЬ
    МАКСИМУМ(ВВТ.Сотрудник) КАК Сотрудник,
    ВВТ.Территория КАК Территория,
    МИНИМУМ(ВВТ.ДатаНачало) КАК ДатаНачало,
    ВВТ.ТерриторияСТ КАК ТерриторияСТ
ПОМЕСТИТЬ ВТПоследняяКонец
ИЗ
    ВТКонец КАК ВВТ

СГРУППИРОВАТЬ ПО
    ВВТ.Территория,
    ВВТ.ТерриторияСТ
;

////////////////////////////////////////////////////////////////////////////////

ВЫБРАТЬ
    ВТПоследняя.Сотрудник КАК Сотрудник,
    ВТПоследняя.Территория КАК Территория,
    ВТПоследняя.ДатаНачало КАК ДатаНачало
ПОМЕСТИТЬ ВНачало
ИЗ
    ВТПоследняяНачало КАК ВТПоследняя
ГДЕ
    (ВТПоследняя.Территория <> ВТПоследняя.ТерриторияСТ
            ИЛИ ВТПоследняя.ТерриторияСТ ЕСТЬ NULL )
;

////////////////////////////////////////////////////////////////////////////////

ВЫБРАТЬ
    ВТПоследняя.Сотрудник КАК Сотрудник,
    ВТПоследняя.Территория КАК Территория,
    ВТПоследняя.ДатаНачало КАК ДатаНачало
ПОМЕСТИТЬ ВКонец
ИЗ
    ВТПоследняяКонец КАК ВТПоследняя
ГДЕ
    (ВТПоследняя.Территория <> ВТПоследняя.ТерриторияСТ
            ИЛИ ВТПоследняя.ТерриторияСТ ЕСТЬ NULL )
;

////////////////////////////////////////////////////////////////////////////////

ВЫБРАТЬ
    ВНачало.Сотрудник КАК Сотрудник,
    ВНачало.Территория КАК Территория,
    ВНачало.ДатаНачало КАК Дата
ИЗ
    ВНачало КАК ВНачало

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
    ВКонец.Сотрудник,
    ВКонец.Территория,
    ВКонец.ДатаНачало
ИЗ
    ВКонец КАК ВКонец

УПОРЯДОЧИТЬ ПО
    Дата
   jsmith
 
2 - 17.09.16 - 18:08
ВЫБРАТЬ 
    График.Сотрудник КАК Сотрудник,
    График.ДатаРегистрации КАК ДатаНачало,
    График.Территория КАК Территория
ПОМЕСТИТЬ ВТ
ИЗ
    РегистрСведений.РТ_ГрафикСотрудниковПоОбъектамУчета КАК График
ГДЕ 
    График.ДатаРегистрации МЕЖДУ &Начало И &Конец 
    И График.Сотрудник = &Сотрудник
;

////////////////////////////////////////////////////////////////////////////////


ВЫБРАТЬ
    ВТ.Сотрудник КАК Сотрудник,
    ВТ.Территория КАК Территория,
    СТ.Территория КАК ТерриторияСТ,
    ВТ.ДатаНачало КАК ДатаНачало
ПОМЕСТИТЬ ВТНачало
ИЗ
    ВТ КАК ВТ
        ЛЕВОЕ СОЕДИНЕНИЕ ВТ КАК СТ
        ПО (ВТ.ДатаНачало = ДОБАВИТЬКДАТЕ(СТ.ДатаНачало, ДЕНЬ, 1))
;

////////////////////////////////////////////////////////////////////////////////


ВЫБРАТЬ
    ВТ.Сотрудник КАК Сотрудник,
    ВТ.Территория КАК Территория,
    СТ.Территория КАК ТерриторияСТ,
    ВТ.ДатаНачало КАК ДатаНачало
ПОМЕСТИТЬ ВТКонец
ИЗ
    ВТ КАК ВТ
        ЛЕВОЕ СОЕДИНЕНИЕ ВТ КАК СТ
        ПО (ВТ.ДатаНачало = ДОБАВИТЬКДАТЕ(СТ.ДатаНачало, ДЕНЬ, -1))
;

////////////////////////////////////////////////////////////////////////////////


ВЫБРАТЬ
    МАКСИМУМ(ВВТ.Сотрудник) КАК Сотрудник,
    ВВТ.Территория КАК Территория,
    МИНИМУМ(ВВТ.ДатаНачало) КАК ДатаНачало,
    ВВТ.ТерриторияСТ КАК ТерриторияСТ
ПОМЕСТИТЬ ВТПоследняяНачало
ИЗ
    ВТНачало КАК ВВТ

СГРУППИРОВАТЬ ПО
    ВВТ.Территория,
    ВВТ.ТерриторияСТ
;

////////////////////////////////////////////////////////////////////////////////


ВЫБРАТЬ
    МАКСИМУМ(ВВТ.Сотрудник) КАК Сотрудник,
    ВВТ.Территория КАК Территория,
    МИНИМУМ(ВВТ.ДатаНачало) КАК ДатаНачало,
    ВВТ.ТерриторияСТ КАК ТерриторияСТ
ПОМЕСТИТЬ ВТПоследняяКонец
ИЗ
    ВТКонец КАК ВВТ

СГРУППИРОВАТЬ ПО
    ВВТ.Территория,
    ВВТ.ТерриторияСТ
;

////////////////////////////////////////////////////////////////////////////////


ВЫБРАТЬ
    ВТПоследняя.Сотрудник КАК Сотрудник,
    ВТПоследняя.Территория КАК Территория,
    ВТПоследняя.ДатаНачало КАК ДатаНачало
ПОМЕСТИТЬ ВНачало
ИЗ
    ВТПоследняяНачало КАК ВТПоследняя
ГДЕ
    (ВТПоследняя.Территория <> ВТПоследняя.ТерриторияСТ 
            ИЛИ ВТПоследняя.ТерриторияСТ ЕСТЬ NULL ) 
; 
////////////////////////////////////////////////////////////////////////////////


ВЫБРАТЬ
    ВТПоследняя.Сотрудник КАК Сотрудник,
    ВТПоследняя.Территория КАК Территория,
    ВТПоследняя.ДатаНачало КАК ДатаНачало
ПОМЕСТИТЬ ВКонец
ИЗ
    ВТПоследняяКонец КАК ВТПоследняя
ГДЕ
    (ВТПоследняя.Территория <> ВТПоследняя.ТерриторияСТ 
            ИЛИ ВТПоследняя.ТерриторияСТ ЕСТЬ NULL ) 
; 
////////////////////////////////////////////////////////////////////////////////


ВЫБРАТЬ
    ВНачало.Сотрудник КАК Сотрудник,
    ВНачало.Территория КАК Территория,
    ВНачало.ДатаНачало КАК Дата
ИЗ
    ВНачало КАК ВНачало

ОБЪЕДИНИТЬ ВСЕ

ВЫБРАТЬ
    ВКонец.Сотрудник,
    ВКонец.Территория,
    ВКонец.ДатаНачало
ИЗ
    ВКонец КАК ВКонец

УПОРЯДОЧИТЬ ПО
    Дата

   jsmith
 
3 - 17.09.16 - 18:09
[1ц][/1ц]
Вместо ц С
   Tarzan_Pasha
 
4 - 17.09.16 - 18:09
Обучите меня тоже. Как писать жирным, зачеркнутым, как обрамлять код и цитаты.
   jsmith
 
5 - 17.09.16 - 18:09
(4) Это только для модеров
   Mankubus
 
6 - 17.09.16 - 18:10
тест

   Радим1987
 
7 - 17.09.16 - 18:17
[1c] ghbvth [/1с]
   Радим1987
 
8 - 17.09.16 - 18:17
 ghbvth

   Радим1987
 
9 - 17.09.16 - 18:18
Спасибо )))
   bolder
 
10 - 17.09.16 - 21:59
 Процедура

 
 Рекламное место пустует
   jsmith
 
11 - 17.09.16 - 22:04
Хорошо, что Consolas'ом идёт, а не Courier'ом New дефолтным
   youalex
 
12 - 17.09.16 - 22:05
 Переменная1 = Переменная;

   youalex
 
13 - 17.09.16 - 22:05
класс, спасибо)
   vis_tmp
 
14 - 17.09.16 - 22:07
Пример!

   Dark_Warrior
 
15 - 19.09.16 - 08:03
Тестовая ветка?

   varyag
 
16 - 19.09.16 - 08:05
[1с]С - на латинице или кириллице?[/1с]
   varyag
 
17 - 19.09.16 - 08:05
А вот на латинице

   varyag
 
18 - 19.09.16 - 08:06
Не важно в общем)) [1с]спасибо[/1с]
   DDwe
 
19 - 19.09.16 - 08:15
[1c] Пробуем [/1с]
   DDwe
 
20 - 19.09.16 - 08:15
 Странно

   DDwe
 
21 - 19.09.16 - 08:15
Ок.
   Когнитивный Диссонанс
 
22 - 19.09.16 - 08:18
[1с]
// создание линии на карте
Процедура СоздатьЛинию( ШиротаНач, ДолготаНач, ШиротаКон, ДолготаКон, ЦветЛинии, ТолщинаЛинии)
    ЭлементыФормы.Карта.Документ.parentWindow.eval("addLine("+ ШиротаНач +", "+ДолготаНач+", "+ ШиротаКон +", "+ДолготаКон+", '"+ ЦветЛинии + "' )");    
КонецПроцедур
[/1с]
   Когнитивный Диссонанс
 
23 - 19.09.16 - 08:19
хорошо было бы, если было бы доступно постредактирование, как на приличных форумах
   Asmody
 
24 - 19.09.16 - 08:20
Внизу ссылка Описание. Там все написано.


Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Тема не обновлялась длительное время, и была помечена как архивная. Добавление сообщений невозможно.
Но вы можете создать новую ветку и вам обязательно ответят!
Каждый час на Волшебном форуме бывает более 2000 человек.
Рекламное место пустует