G
Guest
Для Каа или еще кого-нибудь умного. Подскажите, пожалуйста, змагаюсь с 1С 7,7. Начало истории находится на
https://codeby.net/threads/20795.html?pi...amp;#entry95606. Для расчета пишу вот такой алгоритм:
БухИт = СоздатьОбъект("БухгалтерскиеИтоги");
БухИт.ИспользоватьСубконто(ВидыСубконто.Номенклатура,Номенклатура,2);
БухИт.ВыполнитьЗапрос(НачМесяца(ДатаДок),КонМесяца(ДатаДок),,"СМ");
А=(БухИт.ДО());
БухИт.ИспользоватьСубконто(ВидыСубконто.ВидыНоменклатуры,ВидНоменклатуры,1);
БухИт.ВыполнитьЗапрос(НачМесяца(ДатаДок),КонМесяца(ДатаДок),,"СМ");
В=(БухИт.ДО());
Доля=А/В;
БухИт.ИспользоватьСубконто(ВидыСубконто.ВидыНоменклатуры,ВидНоменклатуры,1);
БухИт.ВыполнитьЗапрос(НачМесяца(ДатаДок),КонМесяца(ДатаДок),,"40");
Сумма=Окр((Доля*(БухИт.ДО())),2,1);
Стоимость=Окр(Сумма/?(Количество=1,2,Количество),2,1);
КонецЦикла;
КонецЦикла;
Но, к сожалению, не берутся данные со счета 40, а в ячейку вписываются цифры как на забалансовом СМ . Здесь явно что-то не так. Помогите, пожалуйста.
https://codeby.net/threads/20795.html?pi...amp;#entry95606. Для расчета пишу вот такой алгоритм:
БухИт = СоздатьОбъект("БухгалтерскиеИтоги");
БухИт.ИспользоватьСубконто(ВидыСубконто.Номенклатура,Номенклатура,2);
БухИт.ВыполнитьЗапрос(НачМесяца(ДатаДок),КонМесяца(ДатаДок),,"СМ");
А=(БухИт.ДО());
БухИт.ИспользоватьСубконто(ВидыСубконто.ВидыНоменклатуры,ВидНоменклатуры,1);
БухИт.ВыполнитьЗапрос(НачМесяца(ДатаДок),КонМесяца(ДатаДок),,"СМ");
В=(БухИт.ДО());
Доля=А/В;
БухИт.ИспользоватьСубконто(ВидыСубконто.ВидыНоменклатуры,ВидНоменклатуры,1);
БухИт.ВыполнитьЗапрос(НачМесяца(ДатаДок),КонМесяца(ДатаДок),,"40");
Сумма=Окр((Доля*(БухИт.ДО())),2,1);
Стоимость=Окр(Сумма/?(Количество=1,2,Количество),2,1);
КонецЦикла;
КонецЦикла;
Но, к сожалению, не берутся данные со счета 40, а в ячейку вписываются цифры как на забалансовом СМ . Здесь явно что-то не так. Помогите, пожалуйста.