Непонятные моменты

[nr1]

Товарищи, скажите, что в этом коде должно быть перед функцией написано, чтобы она "сообщалась" (Ошибка - Недостаточно фактических параметров..)

Процедура ПриНачалеРаботыСистемы()
   Предупреждение("Загрузилась автоматическая система бомбардировки Пентагона!!!
                  |Нажмите ОК для начала операции наведения",10,"Уничтожение врага средствами 1С");
   Сообщить ("Каюк Америке наступит " + (ТекущаяДата()+60*60));
   Сообщить("С прошлой гранидиозной пьянки прошло "+ДеньГода(ТекущаяДата()) + " дней");
      Сообщить("Дней до Нового года "+ЧТО ЗДЕСЬ ДОЛЖНО БЫТЬ?ДоСледующегоНовогоГода());        
КонецПроцедуры
 
Функция ДоСледующегоНовогоГода(Прошло,ОбщДни = 365) Экспорт
   Прошло = ДеньГода(ТекущаяДата());
    Возврат ОбщДни - Прошло;
   
КонецФункции

[Dethmontt]

И выделяйте код тегом:

Код Выделить Развернуть

Процедура ПриНачалеРаботыСистемы()
   Предупреждение("Загрузилась автоматическая система бомбардировки Пентагона!!!
                  |Нажмите ОК для начала операции наведения",10,"Уничтожение врага средствами 1С");
   Сообщить ("Каюк Америке наступит " + (ТекущаяДата()+60*60));
   Сообщить("С прошлой гранидиозной пьянки прошло "+ДеньГода(ТекущаяДата()) + " дней");
      Сообщить("Дней до Нового года "+ДоСледующегоНовогоГода());       
КонецПроцедуры
 
Функция ДоСледующегоНовогоГода(ОбщДни = 365) Экспорт
   Прошло = ДеньГода(ТекущаяДата()); //Обратите внимание на входящие параметры
    Возврат ОбщДни - Прошло;
   
КонецФункции

[nr1]

Dethmontt, Ок - не знал просто....

Добавлено: 14 ноя 2012, 15:53

//Обратите внимание на входящие параметры   

И?

[cska-fanat-kz]

Пока вы научитесь программить... Мне страшно за Америку

[nr1]

Пока вы научитесь программить... Мне страшно за Америку

Москва не сразу строилась, а Америку не так-то просто разбомбить
Лучшеб, вот, решение подсказали

[Gunner]

Я бы сделал так:

Процедура ПриНачалеРаботыСистемы()
   Предупреждение("Загрузилась автоматическая система бомбардировки Пентагона!!!
                  |Нажмите ОК для начала операции наведения",10,"Уничтожение врага средствами 1С");
   Сообщить ("Каюк Америке наступит " + (ТекущаяДата()+60*60));
   Сообщить("С прошлой гранидиозной пьянки прошло "+ДеньГода(ТекущаяДата()) + " дней");
   Сообщить("Дней до Нового года "+ ДоСледующегоНовогоГода());       
КонецПроцедуры

Функция ДоСледующегоНовогоГода() Экспорт
    ДеньКонцаГода = ДеньГода(КонецГода(ТекущаяДата()));
    Возврат (ДеньКонцаГода +1) - ДеньГода(ТекущаяДата()) ;    //366день в году(31декабря2012) + 1(т.к НГ 1янв)-день тек. даты
КонецФункции
 

[nr1]

Gunner, А почему он с параметрами не захотел работать???

[Gunner]

nr1, зачем? что вы хотите передавать?
Вот так лучше: Возврат ДеньКонцаГода - ДеньГода(ТекущаяДата()) ;   
день прибавлять не надо

[nr1]

зачем? что вы хотите передавать?

То, что передал тогда: Сколько дней осталось и Всего дней в году. Я понимаю, что так, как вы написали - правильно, но хотелось бы все-таки понять - в чем была ошибка. А то вдруг потом придется передавать, а она (функция), опять не примет?

[Gunner]

Я не вижу, чтобы вы что-то передавали.
С параметрами будет так:
Процедура ПриНачалеРаботыСистемы()
   Предупреждение("Загрузилась автоматическая система бомбардировки Пентагона!!!
                  |Нажмите ОК для начала операции наведения",10,"Уничтожение врага средствами 1С");
   Сообщить ("Каюк Америке наступит " + (ТекущаяДата()+60*60));
   Сообщить("С прошлой гранидиозной пьянки прошло "+ДеньГода(ТекущаяДата()) + " дней");
   Прошло = ДеньГода(ТекущаяДата());
   Сообщить("Дней до Нового года "+ ДоСледующегоНовогоГода(Прошло));       
КонецПроцедуры

Функция ДоСледующегоНовогоГода(Прошло, ОбщДни = 365) Экспорт
    Возврат ОбщДни - Прошло;   
КонецФункции