Advertisement
Guest User

Untitled

a guest
Oct 19th, 2018
82
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.75 KB | None | 0 0
  1. Если ТипЗначения="Date" Тогда
  2.  
  3. Если ЗначениеСтрокой<>"" Тогда
  4.  
  5. ДатаCRM = Дата(ЗначениеСтрокой);
  6.  
  7. Если ДатаCRM<НачалоДня(ТекущаяДата()) Тогда
  8. ДатаCRM = ТекущаяДата();
  9. КонецЕсли;
  10.  
  11. Если ДокументНайден Тогда
  12.  
  13. Если НЕ Заказ.Проведен Тогда
  14.  
  15. Заказ.Дата = ДатаCRM;
  16.  
  17. КонецЕсли;
  18.  
  19. Иначе
  20. Заказ.Дата = ДатаCRM;
  21. КонецЕсли;
  22.  
  23. КонецЕсли;
  24. КонецЕсли;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement