» Казахстанский Бухгалтерский форум www.balans.kz

В 1С 8.1 в платежном поручении исх. автоматом выставляется дата валютирования

  
Показать сообщения:
Начиная со старых .::. Начиная с новых
Автор: Lukman4ik
Добавлено: #1  Ср Авг 18, 2010 17:04:43
Заголовок сообщения: В 1С 8.1 в платежном поручении исх. автоматом выставляется дата валютирования
Здравствуйте, В 1С 8.1 в платежном поручении исх. автоматом выставляется дата валютирования, подскажите, что сделать чтоб эта графа оставалась пустой?
СПАСИБО
Автор: Cleaner
Добавлено: #2  Ср Авг 18, 2010 17:23:09
Заголовок сообщения:
Lukman4ik, Вам шашечки или ехать?
Автор: Lukman4ik
Добавлено: #3  Ср Авг 18, 2010 17:45:06
Заголовок сообщения:
Не поняла?? простите
Автор: DreamDi
Добавлено: #4  Ср Авг 18, 2010 17:56:12
Заголовок сообщения:
скиньте Cleaner в личку номер подписки на ИТС, тогда Вам ответят
Автор: Cleaner
Добавлено: #5  Ср Авг 18, 2010 18:16:37
Заголовок сообщения:
Lukman4ik говорит:
что сделать чтоб эта графа оставалась пустой?

Если так уж сильно надо -
Код:
Процедура ПриОткрытии()
   
   Если РасшифровкаПлатежа.Количество()=0 Тогда
      НоваяСтрока = РасшифровкаПлатежа.Добавить();
   КонецЕсли;
   
   ЕстьРасчетыСКонтрагентами = УправлениеДенежнымиСредствами.ЕстьРасчетыСКонтрагентами(ВидОперации);
   ЕстьРасчетыПоКредитам     = УправлениеДенежнымиСредствами.ЕстьРасчетыПоКредитам(ВидОперации);
   
   //получаем настройку пользователя
   ОткрыватьНастройкуДвижений = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глТекущийПользователь, "ПоказыватьДвиженияПриПроведении");

   ЭлементыФормы.РасшифровкаПлатежа.ТекущаяСтрока = РасшифровкаПлатежа[0];
   СтрокаПлатеж = ЭлементыФормы.РасшифровкаПлатежа.ТекущиеДанные;
   
   Если ЭтоНовый() Тогда
      // Заполнить реквизиты значениями по умолчанию.
      
      УправлениеДенежнымиСредствами.ЗаполнитьРеквизитыРасчетногоДокумента(ЭтотОбъект, глТекущийПользователь, мВалютаРегламентированногоУчета,РасшифровкаПлатежа);
      НачальноеЗаполнениеПриВыбореОрганизации();
      ПриИзмененииСчетаОрганизации();
      
      ДатаВалютирования = ДатаВыписки;


Код:
Процедура ДатаВыпискиПриИзменении(Элемент)
   
   Если НЕ Оплачено Тогда
      Дата = ДатаВыписки;      
   КонецЕсли;
   
   Если ЭтоНовый() Тогда
      ДатаВалютирования = ДатаВыписки;

Заремарить ДатаВалютирования = ДатаВыписки;

  

Служба поддержки WWW.BALANS.KZ